-
Notifications
You must be signed in to change notification settings - Fork 0
jhan_JaC_Redux_JaCFeb2021_initialization
Paul Leopardi edited this page Oct 8, 2024
·
2 revisions
.....
USE jules_model_environment_mod, ONLY: lsm_id, cable, jules
.....
USE init_surface_types_mod, ONLY: init_cable_surface_types
USE init_cable_mod, ONLY: init_cable
There is a bunch of initialisation in here that (lsm_id=)CABLE can possibly do without
....
! Initialise the surface types
CALL init_jules_surface_types(nml_dir)
....
....
IF ( lsm_id == cable ) THEN
CALL init_cable_surface_types(nml_dir)
END IF
! Declare/allocate/initialize - params,progs,state vars for CABLE
IF ( lsm_id == cable ) THEN
CALL init_cable (ainfo_data%frac_surft)