/[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.2 by stephd, Thu Dec 4 22:40:16 2003 UTC revision 1.3 by stephd, Wed Jan 28 18:49:05 2004 UTC
# Line 5  Line 5 
5  C !INTERFACE: ==========================================================  C !INTERFACE: ==========================================================
6        SUBROUTINE GCHEM_INIT_VARI(myThid )        SUBROUTINE GCHEM_INIT_VARI(myThid )
7    
8    C !DESCRIPTION:
9    C calls subroutines that initialize any time dependent variables
10    C for any tracer experiment
11    
12    C !USES: ===============================================================
13        IMPLICIT NONE        IMPLICIT NONE
14  #include "SIZE.h"  #include "SIZE.h"
15  #include "GRID.h"  #include "GRID.h"
# Line 15  C !INTERFACE: ========================== Line 20  C !INTERFACE: ==========================
20  C !INPUT PARAMETERS: ===================================================  C !INPUT PARAMETERS: ===================================================
21  C  myThid               :: thread number  C  myThid               :: thread number
22        INTEGER myThid        INTEGER myThid
23    CEOP
24    
25  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
26  #ifdef ALLOW_GCHEM  #ifdef ALLOW_GCHEM
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22