/[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.9 by dfer, Tue Apr 8 16:20:16 2008 UTC revision 1.10 by jmc, Tue Apr 8 21:00:17 2008 UTC
# Line 34  ccccccccccccccccccccccccccc Line 34  ccccccccccccccccccccccccccc
34  #ifdef ALLOW_DIC  #ifdef ALLOW_DIC
35        IF ( useDIC ) THEN        IF ( useDIC ) THEN
36            print*,'QQ load dic parameters, initial vari'            print*,'QQ load dic parameters, initial vari'
           CALL DIC_READPARMS(myThid)  
37            CALL DIC_INI_FORCING(myThid)            CALL DIC_INI_FORCING(myThid)
38            CALL DIC_SURFFORCING_INIT(myThid)            CALL DIC_SURFFORCING_INIT(myThid)
39            CALL DIC_BIOTIC_INIT(myThid )            CALL DIC_BIOTIC_INIT(myThid )

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

  ViewVC Help
Powered by ViewVC 1.1.22