20 |
use calltherm_m, only: calltherm |
use calltherm_m, only: calltherm |
21 |
USE clesphys, ONLY: cdhmax, cdmmax, ecrit_ins, ok_instan |
USE clesphys, ONLY: cdhmax, cdmmax, ecrit_ins, ok_instan |
22 |
USE clesphys2, ONLY: conv_emanuel, nbapp_rad, new_oliq, ok_orodr, ok_orolf |
USE clesphys2, ONLY: conv_emanuel, nbapp_rad, new_oliq, ok_orodr, ok_orolf |
23 |
|
USE conf_interface_m, ONLY: conf_interface |
24 |
USE pbl_surface_m, ONLY: pbl_surface |
USE pbl_surface_m, ONLY: pbl_surface |
25 |
use clouds_gno_m, only: clouds_gno |
use clouds_gno_m, only: clouds_gno |
26 |
use comconst, only: dtphys |
use comconst, only: dtphys |
473 |
! Initialisation des sorties |
! Initialisation des sorties |
474 |
call ini_histins(ok_newmicro) |
call ini_histins(ok_newmicro) |
475 |
CALL phyredem0 |
CALL phyredem0 |
476 |
|
call conf_interface |
477 |
ENDIF test_firstcal |
ENDIF test_firstcal |
478 |
|
|
479 |
! We will modify variables *_seri and we will not touch variables |
! We will modify variables *_seri and we will not touch variables |