/[MITgcm]/MITgcm/pkg/mnc/mnc_dim.F
ViewVC logotype

Diff of /MITgcm/pkg/mnc/mnc_dim.F

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

revision 1.16 by mlosch, Thu May 22 12:21:19 2008 UTC revision 1.17 by utke, Fri Jun 20 20:36:58 2008 UTC
# Line 74  C     Create a dimension within the MNC Line 74  C     Create a dimension within the MNC
74    
75  C     !USES:  C     !USES:
76        implicit none        implicit none
 #include "netcdf.inc"  
77  #include "MNC_COMMON.h"  #include "MNC_COMMON.h"
78  #include "EEPARAMS.h"  #include "EEPARAMS.h"
79    #include "netcdf.inc"
80    
81  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
82        integer myThid, dlen, bi,bj        integer myThid, dlen, bi,bj
# Line 181  C     Get the size of the unlimited dime Line 181  C     Get the size of the unlimited dime
181                
182  C     !USES:  C     !USES:
183        implicit none        implicit none
 #include "netcdf.inc"  
184  #include "MNC_COMMON.h"  #include "MNC_COMMON.h"
185  #include "EEPARAMS.h"  #include "EEPARAMS.h"
186    #include "netcdf.inc"
187    
188  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
189        integer myThid, unlim_sz        integer myThid, unlim_sz

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

  ViewVC Help
Powered by ViewVC 1.1.22