diff --git a/src/SURFEX/av_pgd.F90 b/src/SURFEX/av_pgd.F90 index 7d88e48f0b9a1c521e3bc04d466e4ee7b2f58398..e8b7b380720aa4b1508450cf514f8923301398c6 100644 --- a/src/SURFEX/av_pgd.F90 +++ b/src/SURFEX/av_pgd.F90 @@ -1677,6 +1677,7 @@ USE MODE_AV_PGD ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/av_pgd_1p.F90 b/src/SURFEX/av_pgd_1p.F90 index 663f88a82a73ca29d4892cdc6a2edf5a877757e1..d0e662401499866fcb78d57f98aa6d2e9d4f96e7 100644 --- a/src/SURFEX/av_pgd_1p.F90 +++ b/src/SURFEX/av_pgd_1p.F90 @@ -785,6 +785,7 @@ USE MODE_AV_PGD ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/bem.F90 b/src/SURFEX/bem.F90 index cefa2915c9b2b3867047181055a754697fb3f235..5de544ed2fde728532b3e78b25b96c90a5dda4f3 100644 --- a/src/SURFEX/bem.F90 +++ b/src/SURFEX/bem.F90 @@ -174,6 +174,8 @@ USE MODE_CONV_DOE ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/bld_occ_calendar.F90 b/src/SURFEX/bld_occ_calendar.F90 index a24e47b8e5ed337172ed597c88f8fc90414203f8..4a1a96777b3c242f73e1a90583d78402da966980 100644 --- a/src/SURFEX/bld_occ_calendar.F90 +++ b/src/SURFEX/bld_occ_calendar.F90 @@ -28,6 +28,8 @@ USE MODI_DAY_OF_WEEK ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/bldsoil_layer_e_budget.F90 b/src/SURFEX/bldsoil_layer_e_budget.F90 index 10f249c54d28593444c6a1a3dec09d556582afae..595330e45834baa5e3e44607542b49ef26c4474a 100644 --- a/src/SURFEX/bldsoil_layer_e_budget.F90 +++ b/src/SURFEX/bldsoil_layer_e_budget.F90 @@ -90,6 +90,8 @@ USE MODI_LAYER_E_BUDGET_GET_COEF ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/convert_patch_isba.F90 b/src/SURFEX/convert_patch_isba.F90 index 077479d44e07e0135022afc7e9742430c0472b78..d1484ea336a6d6c09385c3e25551f69919da22ea 100644 --- a/src/SURFEX/convert_patch_isba.F90 +++ b/src/SURFEX/convert_patch_isba.F90 @@ -106,6 +106,7 @@ USE MODI_VEGTYPE_TO_PATCH_IRRIG ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/floor_layer_e_budget.F90 b/src/SURFEX/floor_layer_e_budget.F90 index bd5fbb4db721e63b1510ea1a16181dd19ee6d34f..31b7907b3f5b803fe2b98148d22ea9f229762571 100644 --- a/src/SURFEX/floor_layer_e_budget.F90 +++ b/src/SURFEX/floor_layer_e_budget.F90 @@ -84,6 +84,8 @@ USE MODE_CONV_DOE ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/hvac_autosize.F90 b/src/SURFEX/hvac_autosize.F90 index 6e73993978a1f2b3695c6bac180d4851a167f332..c96e4613476f9f391d34537d074de345de79af28 100644 --- a/src/SURFEX/hvac_autosize.F90 +++ b/src/SURFEX/hvac_autosize.F90 @@ -64,6 +64,7 @@ USE MODI_DIAG_MISC_TEB_INIT_n USE MODI_ALLOC_LW_COEF USE MODI_DEALLOC_LW_COEF USE MODI_EXPLICIT_LONGWAVE +USE MODI_ABOR1_SFX ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB diff --git a/src/SURFEX/ini_data_param_teb.F90 b/src/SURFEX/ini_data_param_teb.F90 index 6e45707b41b70202d050a61546c5e843c63018ff..5c33b1a7c72fcbdc58147d0837e2eca1a4c6d707 100644 --- a/src/SURFEX/ini_data_param_teb.F90 +++ b/src/SURFEX/ini_data_param_teb.F90 @@ -61,6 +61,7 @@ USE MODD_DATA_TEB_n, ONLY : DATA_TEB_t USE MODD_CSTS, ONLY : XSURF_EPSILON ! USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB diff --git a/src/SURFEX/init_teb_soil_grid.F90 b/src/SURFEX/init_teb_soil_grid.F90 index f7bb60294797e0960c6d00ff629e8c7e67ecdbb3..e16f8fb86471b7426aaaca39c1e0de6a0432079f 100644 --- a/src/SURFEX/init_teb_soil_grid.F90 +++ b/src/SURFEX/init_teb_soil_grid.F90 @@ -40,6 +40,8 @@ USE MODI_AV_PGD ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/mass_layer_e_budget.F90 b/src/SURFEX/mass_layer_e_budget.F90 index febb0b57102830cf6d490c5b02ffb3ea92245059..32d1dfcc1e53da43bfb9d9c051bb8c1dbe29e541 100644 --- a/src/SURFEX/mass_layer_e_budget.F90 +++ b/src/SURFEX/mass_layer_e_budget.F90 @@ -79,6 +79,7 @@ USE MODI_GET_LUOUT ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/mode_coherence_frac.F90 b/src/SURFEX/mode_coherence_frac.F90 index 9599d81b85f3bcdef5bb29875033d417b6c25955..d68bb4a99a61161133b59aaaa4b5493ca9042d16 100644 --- a/src/SURFEX/mode_coherence_frac.F90 +++ b/src/SURFEX/mode_coherence_frac.F90 @@ -53,6 +53,8 @@ SUBROUTINE COHERENCE_FRAC(HPROGRAM,PFRAC_VALUE, CD_NAME, L_SUM_CHECK) USE MODD_CSTS ,ONLY : XSURF_EPSILON USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! @@ -147,6 +149,7 @@ USE MODD_DATA_BEM_n, ONLY : DATA_BEM_t ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/mode_psychro.F90 b/src/SURFEX/mode_psychro.F90 index 1d85dd332a80903f827e2a94005300745b1f08b2..42d795ff1952e15720600f649f8e224ff5f474d3 100644 --- a/src/SURFEX/mode_psychro.F90 +++ b/src/SURFEX/mode_psychro.F90 @@ -262,6 +262,7 @@ function TWB_FROM_TPQ_1D(PT, PP, PQ) RESULT(PTWB) ! USE MODE_THERMOS USE MODD_CSTS, ONLY : XTT +USE MODI_ABOR1_SFX ! ! Robert: ! The original version of this calculation based on an iteration diff --git a/src/SURFEX/pgd_surf_atm.F90 b/src/SURFEX/pgd_surf_atm.F90 index 9c35c67ef1e712803360f7417fa12c7e009dd4b9..fcafd53f1aeb11853002d05f6cc9d92fef9d3b4a 100644 --- a/src/SURFEX/pgd_surf_atm.F90 +++ b/src/SURFEX/pgd_surf_atm.F90 @@ -80,6 +80,7 @@ USE MODI_PGD_DMS ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/prep_teb.F90 b/src/SURFEX/prep_teb.F90 index 046dbdcf7de40ca22d02ebb9d3677f3c36c6b880..b777e1e21091580cf5fe0a60967eb742bf4406f0 100644 --- a/src/SURFEX/prep_teb.F90 +++ b/src/SURFEX/prep_teb.F90 @@ -72,6 +72,7 @@ USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB ! USE MODI_CLEAN_PREP_OUTPUT_GRID +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/roof_layer_e_budget.F90 b/src/SURFEX/roof_layer_e_budget.F90 index 4743ec132f8ec92e6ce9537d91f150105120fa80..b338e4698f5ad058189c434f1dc427d8e1241459 100644 --- a/src/SURFEX/roof_layer_e_budget.F90 +++ b/src/SURFEX/roof_layer_e_budget.F90 @@ -108,6 +108,8 @@ USE MODE_CONV_DOE ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/snow_cover_1layer.F90 b/src/SURFEX/snow_cover_1layer.F90 index 7de03b9cc27f8d5a6472cdb1e803b0c6b8eb14ee..afd5d23111ee2f786f833b2695c8dd48953fc064 100644 --- a/src/SURFEX/snow_cover_1layer.F90 +++ b/src/SURFEX/snow_cover_1layer.F90 @@ -74,6 +74,8 @@ USE MODI_SURFACE_AERO_COND ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/teb_bld_road.F90 b/src/SURFEX/teb_bld_road.F90 index 308cb79cbbe669341b3549a31dc1470e6e1dc16b..85660b400694c8c60e3fa74ba46431b54bd8e3e3 100644 --- a/src/SURFEX/teb_bld_road.F90 +++ b/src/SURFEX/teb_bld_road.F90 @@ -224,6 +224,8 @@ USE MODI_BLDSOIL_LAYER_E_BUDGET ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/urban_solar_abs.F90 b/src/SURFEX/urban_solar_abs.F90 index 1f2e48a58820aff041ed64f68ac2a2b6f51a8dad..5169098678455dc59b95cb799a2c9b01015aef5a 100644 --- a/src/SURFEX/urban_solar_abs.F90 +++ b/src/SURFEX/urban_solar_abs.F90 @@ -196,6 +196,7 @@ USE MODI_WINDOW_SHADING ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/wall_layer_e_budget.F90 b/src/SURFEX/wall_layer_e_budget.F90 index 8f4801b911a64d3e77512210ba172c73c09e767e..b06cddbe62b5fc167ecc6ed12a5c15c8f50bf9da 100644 --- a/src/SURFEX/wall_layer_e_budget.F90 +++ b/src/SURFEX/wall_layer_e_budget.F90 @@ -117,6 +117,8 @@ USE MODE_CONV_DOE ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX +USE MODI_GET_LUOUT ! IMPLICIT NONE ! diff --git a/src/SURFEX/write_diag_pgd_grdnn.F90 b/src/SURFEX/write_diag_pgd_grdnn.F90 index fc1cc0805de4e92047151bdc51db3b425c6002f8..c2d5b6f517abe1b84a61ff9166cc6dc5f9fbdf41 100644 --- a/src/SURFEX/write_diag_pgd_grdnn.F90 +++ b/src/SURFEX/write_diag_pgd_grdnn.F90 @@ -58,6 +58,7 @@ USE MODI_END_IO_SURF_n ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/write_ecoclimap2_data.F90 b/src/SURFEX/write_ecoclimap2_data.F90 index 4304a43b57b3ef5088838e0b86a011bd9b33c644..7bd221f8e3c57e3822685510f4a840941eb19935 100644 --- a/src/SURFEX/write_ecoclimap2_data.F90 +++ b/src/SURFEX/write_ecoclimap2_data.F90 @@ -18,6 +18,7 @@ USE MODD_SURF_PAR, ONLY: LEN_HREC ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE ! diff --git a/src/SURFEX/writesurf_tebn.F90 b/src/SURFEX/writesurf_tebn.F90 index 94a986dd658d741ac3d4f41f3d7d1cba8934ffa2..a519acd7bf111e3080fc569a15420d9fbdb5ae5d 100644 --- a/src/SURFEX/writesurf_tebn.F90 +++ b/src/SURFEX/writesurf_tebn.F90 @@ -63,6 +63,7 @@ USE MODI_WRITESURF_TEB_HYDRO_n ! USE YOMHOOK ,ONLY : LHOOK, DR_HOOK USE PARKIND1 ,ONLY : JPRB +USE MODI_ABOR1_SFX ! IMPLICIT NONE !