IF (useGCHEM) CALL GCHEM_CHECK( myThid )
IF (useGCHEM) CALL PACKAGES_CHECK_ERROR('GCHEM', myThid)
IF (useGCHEM) CALL GCHEM_INIT_FIXED(mythid)
IF (useGCHEM) THEN
IF ( useMATRIX .AND. useGCHEM ) THEN
useGCHEM=.FALSE.
& useGCHEM,
IF (useGCHEM)
IF ( useGCHEM ) THEN
IF (useGCHEM) CALL GCHEM_READPARMS( myThid )
LOGICAL useGCHEM
& usePTRACERS, useGCHEM,
IF ( useGCHEM )
IF ( .NOT. useGCHEM .AND. k .EQ. kSurface ) THEN