7 hprogram,hinit,onam_read)
15 USE modi_init_read_data_cover
17 USE modi_read_namelists_surf_n
18 USE modi_read_namelists_surf
19 USE modi_read_namelists_flake_n
20 USE modi_read_namelists_watflux_n
21 USE modi_read_namelists_seaflux_n
22 USE modi_read_namelists_isba_n
23 USE modi_read_namelists_isba
24 USE modi_read_namelists_teb_n
25 USE modi_read_namelists_ideal_n
26 USE modi_read_namelists_ideal
27 USE modi_read_namelists_slt
28 USE modi_read_namelists_dst
29 USE modi_read_namelists_assim
30 USE modi_read_namelists_topd
32 USE modi_read_nam_prep_flake_n
33 USE modi_read_nam_prep_garden_n
34 USE modi_read_nam_prep_greenroof_n
35 USE modi_read_nam_prep_isba_n
36 USE modi_read_nam_prep_seaflux_n
37 USE modi_read_nam_prep_surf_n
38 USE modi_read_nam_prep_teb_n
39 USE modi_read_nam_prep_watflux_n
44 USE yomhook
,ONLY : lhook, dr_hook
45 USE parkind1
,ONLY : jprb
52 CHARACTER(LEN=6),
INTENT(IN) :: hprogram
53 CHARACTER(LEN=3),
INTENT(IN) :: hinit
54 LOGICAL,
INTENT(IN) :: onam_read
56 REAL(KIND=JPRB) :: zhook_handle
61 IF (lhook) CALL dr_hook(
'READ_ALL_NAMELISTS',0,zhook_handle)
74 IF (hprogram==
'AROME ')
THEN
76 CALL read_namelists_io(hprogram)
84 IF (.NOT.lnam_read)
THEN
109 ELSEIF (hinit==
'PRE')
THEN
122 IF (lhook) CALL dr_hook(
'READ_ALL_NAMELISTS',1,zhook_handle)
subroutine read_namelists_flake_n(FM, HPROGRAM, HINIT)
subroutine read_namelists_isba_n(IM, HPROGRAM, HINIT)
subroutine init_read_data_cover(HPROGRAM)
subroutine read_namelists_ideal_n(DGL, HPROGRAM)
subroutine read_namelists_seaflux_n(SM, HPROGRAM, HINIT)
subroutine read_nam_prep_greenroof_n(HPROGRAM)
subroutine read_nam_prep_garden_n(HPROGRAM)
subroutine read_nam_prep_flake_n(HPROGRAM)
subroutine read_nam_prep_seaflux_n(HPROGRAM)
subroutine read_nam_prep_isba_n(HPROGRAM)
subroutine read_namelists_teb_n(TM, TGRO, TVG, HPROGRAM, HINIT)
subroutine read_namelists_watflux_n(WM, HPROGRAM, HINIT)
subroutine read_nam_prep_watflux_n(HPROGRAM)
subroutine read_namelists_assim(HPROGRAM)
subroutine read_namelists_surf(HPROGRAM)
subroutine read_namelists_slt(HPROGRAM)
subroutine read_all_namelists(YSC, HPROGRAM, HINIT, ONAM_READ)
subroutine read_namelists_ideal(HPROGRAM)
subroutine read_namelists_dst(HPROGRAM)
subroutine read_namelists_surf_n(CHU, DGU, USS, HPROGRAM, HINIT)
subroutine read_namelists_topd(HPROGRAM)
subroutine read_nam_prep_teb_n(HPROGRAM)
subroutine read_nam_prep_surf_n(HPROGRAM)
subroutine read_namelists_isba(HPROGRAM)