/[MITgcm]/MITgcm/pkg/gridalt/gridalt_initialise.F
ViewVC logotype

Diff of /MITgcm/pkg/gridalt/gridalt_initialise.F

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

revision 1.6 by molod, Mon May 23 20:51:09 2005 UTC revision 1.7 by jmc, Sat Jul 7 00:08:09 2012 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
3    
4    #include "GRIDALT_OPTIONS.h"
5    
6         subroutine gridalt_initialise (myThid)         subroutine gridalt_initialise (myThid)
7  c-----------------------------------------------------------------------  c-----------------------------------------------------------------------
8  c  Routine to initialise the gridalt package.  c  Routine to initialise the gridalt package.
9  c    c
10  c  Input: myThid       - Process number calling this routine  c  Input: myThid       - Process number calling this routine
11  c  c
12  c  Notes:  c  Notes:
13  c   When used with fizhi, this routine is the interface  c   When used with fizhi, this routine is the interface
14  c                                       to make_phys_grid  c                                       to make_phys_grid
15  c  Calls: make_phys_grid (define the physics grid and mappings)  c  Calls: make_phys_grid (define the physics grid and mappings)
16  c         when diagnostics are used, call gridalt_diagnostics_init  c         when diagnostics are used, call gridalt_diagnostics_init
17  c-----------------------------------------------------------------------  c-----------------------------------------------------------------------
18         implicit none         implicit none
 #include "PACKAGES_CONFIG.h"  
 #include "CPP_OPTIONS.h"  
19  #include "SIZE.h"  #include "SIZE.h"
20  #include "EEPARAMS.h"  #include "EEPARAMS.h"
21  #include "PARAMS.h"  #include "PARAMS.h"
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22