Last change
on this file was
939,
checked in by dubos, 5 years ago
|
devel : cleanup USE data_unstructured_mod
|
File size:
714 bytes
|
Rev | Line | |
---|
[12] | 1 | MODULE grid_param |
---|
[839] | 2 | USE ISO_C_BINDING |
---|
[830] | 3 | IMPLICIT NONE |
---|
| 4 | SAVE |
---|
[839] | 5 | |
---|
[939] | 6 | ! Some variables are BIND(C) to be accessible from Python |
---|
| 7 | ! They are declared using C sizes |
---|
[839] | 8 | |
---|
[15] | 9 | INTEGER :: iim_glo=40 |
---|
| 10 | INTEGER :: jjm_glo |
---|
[813] | 11 | INTEGER, PARAMETER :: nb_face=10 |
---|
| 12 | INTEGER, PARAMETER :: grid_unst=1, grid_ico = 2 |
---|
| 13 | INTEGER :: grid_type ! unstructured or icosahedral |
---|
[839] | 14 | |
---|
| 15 | INTEGER(C_INT), BIND(C) :: llm=19, & ! number of vertical levels |
---|
| 16 | nqdyn ! number of dynamical tracers : 1 if dry, more if moist |
---|
| 17 | |
---|
[387] | 18 | INTEGER :: nqtot ! number of tracers handled by advection scheme |
---|
[839] | 19 | |
---|
| 20 | INTEGER(C_INT), BIND(C) :: edge_num, primal_num, dual_num, & |
---|
| 21 | max_primal_deg, max_dual_deg, max_trisk_deg |
---|
| 22 | |
---|
[12] | 23 | END MODULE grid_param |
---|
Note: See
TracBrowser
for help on using the repository browser.