/[MITgcm]/MITgcm/pkg/fizhi/fizhi_mnc_init.F
ViewVC logotype

Diff of /MITgcm/pkg/fizhi/fizhi_mnc_init.F

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

revision 1.1 by edhill, Fri Jul 9 02:41:52 2004 UTC revision 1.2 by molod, Tue Jul 13 23:44:43 2004 UTC
# Line 36  C         Cor  &   &      &     &     \\ Line 36  C         Cor  &   &      &     &     \\
36  C       \end{tabular}  C       \end{tabular}
37  C     \end{center}  C     \end{center}
38    
39          implicit none
40  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
41        integer myThid        integer myThid
42        integer sNx,sNy, OLx,OLy, nSx,nSy, nPx,nPy        integer sNx,sNy, OLx,OLy, nSx,nSy, nPx,nPy
43        integer NrPhys        integer NrPhys
44    
45  C     !USES:  C     !USES:
       implicit none  
46  #ifdef ALLOW_MNC  #ifdef ALLOW_MNC
47  #include "mnc_common.h"  #include "mnc_common.h"
48  #endif  /*  ALLOW_MNC  */  #endif  /*  ALLOW_MNC  */
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22