/[MITgcm]/MITgcm/pkg/gchem/gchem_check.F
ViewVC logotype

Diff of /MITgcm/pkg/gchem/gchem_check.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.5 by jmc, Wed Jun 5 19:23:51 2013 UTC revision 1.6 by jmc, Mon Jun 10 02:59:01 2013 UTC
# Line 7  C $Name$ Line 7  C $Name$
7  C     *==========================================================*  C     *==========================================================*
8  C     | SUBROUTINE GCHEM_CHECK  C     | SUBROUTINE GCHEM_CHECK
9  C     | o Validate basic package setup and inter-package  C     | o Validate basic package setup and inter-package
10  C     | dependencies.  C     |   dependencies.
11  C     *==========================================================*  C     *==========================================================*
12        IMPLICIT NONE        IMPLICIT NONE
13    
# Line 69  C     GCHEM cannot run darwin and cfc to Line 69  C     GCHEM cannot run darwin and cfc to
69          STOP 'ABNORMAL END: S/R GCHEM_CHECK'          STOP 'ABNORMAL END: S/R GCHEM_CHECK'
70        ENDIF        ENDIF
71    
72    #ifdef ALLOW_CFC
73    C     run checks specific to CFC
74          IF ( useCFC ) THEN
75            CALL CFC_CHECK( myThid )
76          ENDIF
77    #endif
78    
79  #ifdef ALLOW_DARWIN  #ifdef ALLOW_DARWIN
80  C     run checks specific to darwin  C     run checks specific to darwin
81        IF ( useDARWIN ) THEN        IF ( useDARWIN ) THEN
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22