11 USE modi_read_default_slt
13 USE modi_read_slt_conf
16 USE yomhook
,ONLY : lhook, dr_hook
17 USE parkind1
,ONLY : jprb
21 CHARACTER(LEN=6),
INTENT(IN) :: hprogram
22 REAL(KIND=JPRB) :: zhook_handle
26 IF (lhook) CALL dr_hook(
'READ_NAMELISTS_SLT',0,zhook_handle)
32 IF (lhook) CALL dr_hook(
'READ_NAMELISTS_SLT',1,zhook_handle)
subroutine read_slt_conf(HPROGRAM)
subroutine read_namelists_slt(HPROGRAM)
subroutine read_default_slt(HPROGRAM)