Juan 08/01/2024:SURFEX/*.F90, add missing use modi_abor1_sfx & modi_getluout

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
 !

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
 !

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
 !

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
 !

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
 !

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
 !

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
 !

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

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

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
 !

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
 !

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
 !

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

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
 !

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
 !

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
 !

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
 !

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
 !

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
 !

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
 !