Update src/aed2_tracer.F90

chnaged ss name to tr
AquaticEcoDynamics · Nov 11, 2018 · e219b66 · e219b66
1 parent fa0cd61
commit e219b66
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/aed2_tracer.F90 b/src/aed2_tracer.F90
@@ -179,7 +179,7 @@ SUBROUTINE aed2_define_tracer(data, namlst)
       ALLOCATE(data%tau_0(num_tracers)) ; data%tau_0(1:num_tracers) = tau_0(1:num_tracers)
       ALLOCATE(data%fs(num_tracers))    ; data%fs(1:num_tracers)    = fs(1:num_tracers)
 
-      trac_name = 'ss0'
+      trac_name = 'tr0'
       ! Register state variables
       DO i=1,num_tracers
          trac_name(3:3) = CHAR(ICHAR('0') + i)