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

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

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

revision 1.10 by jmc, Tue Apr 8 21:00:17 2008 UTC revision 1.11 by jahn, Tue Jun 30 16:43:00 2009 UTC
# Line 2  C $Header$ Line 2  C $Header$
2  C $Name$  C $Name$
3    
4  #include "GCHEM_OPTIONS.h"  #include "GCHEM_OPTIONS.h"
5    #ifdef ALLOW_DARWIN
6    #include "DARWIN_OPTIONS.h"
7    #endif
8    
9  C !INTERFACE: ==========================================================  C !INTERFACE: ==========================================================
10        SUBROUTINE GCHEM_INIT_VARI(myThid )        SUBROUTINE GCHEM_INIT_VARI(myThid )
# Line 40  ccccccccccccccccccccccccccc Line 43  ccccccccccccccccccccccccccc
43        ENDIF        ENDIF
44  #endif /* ALLOW_DIC */  #endif /* ALLOW_DIC */
45    
46    #ifdef ALLOW_DARWIN
47          IF ( useDARWIN ) THEN
48             call DARWIN_INIT_VARI(myThid )
49    #ifdef ALLOW_CARBON
50             CALL DIC_SURFFORCING_INIT(myThid)
51             CALL DIC_DIAGS_INIT(myThid)
52    #endif
53          ENDIF
54    #endif
55  #endif /* ALLOW_GCHEM */  #endif /* ALLOW_GCHEM */
56    
57        RETURN        RETURN
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22