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