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

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

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

revision 1.18 by stephd, Mon Nov 5 21:02:03 2007 UTC revision 1.19 by stephd, Mon Nov 5 22:27:00 2007 UTC
# Line 111  c Line 111  c
111  #endif  #endif
112  #endif  #endif
113    
          call DIC_ATMOS(myIter,myTime,myThid,1)  
114  #endif  #endif
115  cccccccccccccccccccccccccc END DIC cccccccccccccccccccccccccccccccccc  cccccccccccccccccccccccccc END DIC cccccccccccccccccccccccccccccccccc
116    
# Line 119  c Line 118  c
118          ENDDO          ENDDO
119         ENDDO         ENDDO
120    
121    #ifdef ALLOW_DIC
122             call DIC_ATMOS(myIter,myTime,myThid,1)
123    #endif
124    
125  #endif /* GCHEM_SEPARATE_FORCING */  #endif /* GCHEM_SEPARATE_FORCING */
126  #endif /* ALLOW_GCHEM */  #endif /* ALLOW_GCHEM */
127    
Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19
  ViewVC Help
Powered by ViewVC 1.1.22