/[MITgcm]/MITgcm/model/src/ini_pressure.F
ViewVC logotype

Diff of /MITgcm/model/src/ini_pressure.F

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

revision 1.15 by jmc, Wed Aug 14 18:10:59 2013 UTC revision 1.16 by jmc, Mon Feb 15 18:00:26 2016 UTC
# Line 78  CEOP Line 78  CEOP
78         ENDDO         ENDDO
79        ENDDO        ENDDO
80    
81        IF ( useDynP_inEos_Zc ) THEN        IF ( storePhiHyd4Phys ) THEN
82    
83  #ifndef ALLOW_AUTODIFF  #ifndef ALLOW_AUTODIFF
84  cph-- deal with this iterative loop for AD once it will  cph-- deal with this iterative loop for AD once it will
# Line 185  C     print some diagnostics Line 185  C     print some diagnostics
185    
186  #endif /* ALLOW_AUTODIFF */  #endif /* ALLOW_AUTODIFF */
187    
188  c-- else of if useDynP_inEos_Zc  c-- else of if storePhiHyd4Phys
189        ELSE        ELSE
190  C     print a message and DO nothing  C     print a message and DO nothing
191         _BEGIN_MASTER( myThid )         _BEGIN_MASTER( myThid )
Legend:
Removed from v.1.15  
changed lines
  Added in v.1.16
  ViewVC Help
Powered by ViewVC 1.1.22