11 |
|
|
12 |
USE comconst, ONLY: g |
USE comconst, ONLY: g |
13 |
USE comgeom, ONLY: aire_2d |
USE comgeom, ONLY: aire_2d |
14 |
USE dimens_m, ONLY: iim, jjm |
USE dimensions, ONLY: iim, jjm |
15 |
use dynetat0_m, only: rlatu, rlatv, rlonu, rlonv |
use dynetat0_m, only: rlatu, rlatv, rlonu, rlonv |
16 |
USE netcdf, ONLY: nf90_clobber, nf90_float, nf90_int |
USE netcdf, ONLY: nf90_clobber, nf90_float, nf90_int |
17 |
USE netcdf95, ONLY: nf95_close, nf95_create, nf95_def_dim, nf95_def_var, & |
USE netcdf95, ONLY: nf95_close, nf95_create, nf95_def_dim, nf95_def_var, & |