FIXME notes for starters

fetch4 · Dec 20, 2024 · 45ef21f · 45ef21f
1 parent 65c09cd
commit 45ef21f
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/model/CHEM_DRV.F90 b/model/CHEM_DRV.F90
@@ -2154,6 +2154,7 @@ SUBROUTINE accumGCsubdd
     integer :: previous_units
 
 !    ! 3-D diagnostics of advected tracers on model levels
+!    ! FIXME:? JGW
 !    call find_groups('taijlh',grpids,ngroups)
 !    do igrp=1,ngroups
 !       subdd => subdd_groups(grpids(igrp))
@@ -2185,6 +2186,7 @@ SUBROUTINE accumGCsubdd
     IF ( RC /= GC_SUCCESS ) CALL STOP_MODEL( "CONVERT_SPC_UNITS", 255 )
 
     ! 3-D diagnostics of all tracers (advected and non-advected) on model levels
+    ! FIXME: JGW
     call find_groups('taijlh',grpids,ngroups)
     do igrp=1,ngroups
        subdd => subdd_groups(grpids(igrp))