9 |
! From dyn3d/dynredem.F, version 1.2, 2004/06/22 11:45:30 |
! From dyn3d/dynredem.F, version 1.2, 2004/06/22 11:45:30 |
10 |
! Ecriture du fichier de red\'emarrage au format NetCDF |
! Ecriture du fichier de red\'emarrage au format NetCDF |
11 |
|
|
12 |
USE dimens_m, ONLY: iim, jjm, llm, nqmx |
USE dimensions, ONLY: iim, jjm, llm, nqmx |
13 |
use dynredem0_m, only: ncid |
use dynredem0_m, only: ncid |
14 |
USE iniadvtrac_m, ONLY: tname |
USE iniadvtrac_m, ONLY: tname |
15 |
use netcdf95, only: nf95_close, nf95_inq_varid, nf95_put_var |
use netcdf95, only: nf95_close, nf95_inq_varid, nf95_put_var |