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