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

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

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

revision 1.2 by stephd, Wed Jul 9 19:59:52 2003 UTC revision 1.3 by stephd, Mon Oct 6 20:04:29 2003 UTC
# Line 24  C !OUTPUT PARAMETERS: ================== Line 24  C !OUTPUT PARAMETERS: ==================
24  C  none  C  none
25    
26  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
27    #ifdef ALLOW_GCHEM
28    
29  C !LOCAL VARIABLES: ====================================================  C !LOCAL VARIABLES: ====================================================
30  C  iTracer              :: loop indices  C  iTracer              :: loop indices
# Line 66  C Close the open data file Line 67  C Close the open data file
67  C Everyone else must wait for the parameters to be loaded  C Everyone else must wait for the parameters to be loaded
68        _BARRIER        _BARRIER
69    
70    #endif
71  #endif /* ALLOW_PTRACERS */  #endif /* ALLOW_PTRACERS */
72    
73        RETURN        RETURN
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22