24 |
USE conf_guide_m, ONLY: ok_guide |
USE conf_guide_m, ONLY: ok_guide |
25 |
USE dimensions, ONLY: iim, jjm, llm, nqmx |
USE dimensions, ONLY: iim, jjm, llm, nqmx |
26 |
use dissip_m, only: dissip |
use dissip_m, only: dissip |
27 |
USE dynetat0_m, ONLY: day_ini |
USE dynetat0_m, ONLY: day_ini, itau_dyn |
28 |
use dynredem1_m, only: dynredem1 |
use dynredem1_m, only: dynredem1 |
29 |
use enercin_m, only: enercin |
use enercin_m, only: enercin |
30 |
USE exner_hyb_m, ONLY: exner_hyb |
USE exner_hyb_m, ONLY: exner_hyb |
34 |
use inidissip_m, only: idissip |
use inidissip_m, only: idissip |
35 |
use integrd_m, only: integrd |
use integrd_m, only: integrd |
36 |
use nr_util, only: assert |
use nr_util, only: assert |
|
USE temps, ONLY: itau_dyn |
|
37 |
use writehist_m, only: writehist |
use writehist_m, only: writehist |
38 |
|
|
39 |
! Variables dynamiques: |
! Variables dynamiques: |