12 |
! Author: Fr\'ed\'eric Hourdin |
! Author: Fr\'ed\'eric Hourdin |
13 |
! Objet : \'ecriture des variables pour transport offline |
! Objet : \'ecriture des variables pour transport offline |
14 |
|
|
15 |
|
use gr_fi_ecrit_m, only: gr_fi_ecrit |
16 |
USE histwrite_m, ONLY: histwrite |
USE histwrite_m, ONLY: histwrite |
17 |
USE histsync_m, ONLY: histsync |
USE histsync_m, ONLY: histsync |
18 |
USE dimens_m, ONLY: iim, jjm, nqmx |
USE dimens_m, ONLY: iim, jjm |
19 |
USE indicesol, ONLY: nbsrf |
USE indicesol, ONLY: nbsrf |
20 |
use initphysto_m, only: initphysto |
use initphysto_m, only: initphysto |
21 |
USE dimphy, ONLY: klev, klon |
USE dimphy, ONLY: klev, klon |