1 |
subroutine gridalt_initialise (myThid) |
subroutine gridalt_initialise (myThid) |
2 |
|
CBOP |
3 |
c----------------------------------------------------------------------- |
c----------------------------------------------------------------------- |
4 |
c Routine to initialise the gridalt package. |
c !DESCRIPTION: Routine to initialise the gridalt package. |
5 |
|
c !ROUTINE: gridalt_initialise |
6 |
|
c !INTERFACE: subroutine gridalt_initialise (myThid) |
7 |
c |
c |
8 |
c Input: myThid - Process number calling this routine |
c Input: myThid - Process number calling this routine |
9 |
c |
c |
20 |
#include "fizhi_SIZE.h" |
#include "fizhi_SIZE.h" |
21 |
#include "gridalt_mapping.h" |
#include "gridalt_mapping.h" |
22 |
#include "SURFACE.h" |
#include "SURFACE.h" |
23 |
|
c----------------------------------------------------------------------- |
24 |
|
CEOP |
25 |
|
|
26 |
integer myThid |
integer myThid |
27 |
|
|