Last change
on this file since 830 was
830,
checked in by dubos, 5 years ago
|
devel : merged init_grid_param and init_grid_type
|
File size:
431 bytes
|
Rev | Line | |
---|
[12] | 1 | MODULE grid_param |
---|
[830] | 2 | IMPLICIT NONE |
---|
| 3 | SAVE |
---|
[15] | 4 | INTEGER :: iim_glo=40 |
---|
| 5 | INTEGER :: jjm_glo |
---|
[813] | 6 | INTEGER, PARAMETER :: nb_face=10 |
---|
| 7 | INTEGER, PARAMETER :: grid_unst=1, grid_ico = 2 |
---|
| 8 | INTEGER :: grid_type ! unstructured or icosahedral |
---|
| 9 | INTEGER, BIND(C) :: llm=19 |
---|
[387] | 10 | INTEGER :: nqtot ! number of tracers handled by advection scheme |
---|
[813] | 11 | INTEGER, BIND(C) :: nqdyn ! number of dynamical tracers : 1 if dry, more if moist |
---|
[12] | 12 | END MODULE grid_param |
---|
Note: See
TracBrowser
for help on using the repository browser.