Skip to content
Snippets Groups Projects
Commit 74f6584d authored by Juan Escobar's avatar Juan Escobar
Browse files

Juan 08/01/2024:SURFEX/*.F90, more missing USE MODI_ABOR1_SFX

parent 7128b055
No related branches found
No related tags found
No related merge requests found
......@@ -84,6 +84,7 @@ USE MODD_CSTS,ONLY : XCPD, XLVTT, XLSTT, XSTEFAN, XSURF_EPSILON
USE MODD_ISBA_PAR, ONLY : XEMISVEG
!
USE MODE_THERMOS
USE MODI_ABOR1_SFX
!
!
USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
......
......@@ -51,6 +51,7 @@ USE MODD_CSTS, ONLY : XSIYEA, XTT
USE MODD_SOILCARB_PAR, ONLY : XADVREF
!
USE MODE_HYDRO_DIF
USE MODI_ABOR1_SFX
!
USE YOMHOOK, ONLY : LHOOK, DR_HOOK
USE PARKIND1, ONLY : JPRB
......
......@@ -61,6 +61,7 @@ USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
USE PARKIND1 ,ONLY : JPRB
!
USE MODI_COUPLING_TEB_n
USE MODI_ABOR1_SFX
!
IMPLICIT NONE
!
......
......@@ -54,6 +54,7 @@ USE PARKIND1 ,ONLY : JPRB
USE MODI_COUPLING_IDEAL_FLUX
!
USE MODI_COUPLING_TEB_OROGRAPHY_n
USE MODI_ABOR1_SFX
!
IMPLICIT NONE
!
......
......@@ -114,6 +114,7 @@ USE MODN_IO_OFFLINE , ONLY : XTSTEP_SURF ! time step of the surface
!
USE MODD_AGRI, ONLY : LIRRIGMODE
!
USE MODI_ABOR1_SFX
!
USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
USE PARKIND1 ,ONLY : JPRB
......
......@@ -50,6 +50,8 @@ USE MODD_DIAG_MISC_TEB_n, ONLY : DIAG_MISC_TEB_t
USE MODD_SURF_PAR, ONLY : XUNDEF
USE MODD_CSTS, ONLY : XSTEFAN
!
USE MODI_ABOR1_SFX
!
USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
USE PARKIND1 ,ONLY : JPRB
!
......
......@@ -43,6 +43,7 @@ USE MODD_CSTS, ONLY: XDAY
!
USE MODI_ADD_FORECAST_TO_DATE_SURF
USE MODI_SUBSTRACT_TO_DATE_SURF
USE MODI_ABOR1_SFX
!------------------------------------------------------------------------------
!
!* 0. DECLARATIONS
......
......@@ -129,6 +129,7 @@ USE MODI_ALLOC_LW_COEF
USE MODI_DEALLOC_LW_COEF
USE MODI_TEB_SPARTACUS
USE MODI_EXPLICIT_LONGWAVE
USE MODI_ABOR1_SFX
!
USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
USE PARKIND1 ,ONLY : JPRB
......
......@@ -61,6 +61,7 @@ FUNCTION TRAD_BODY_ISBA(HPROGRAM, PSCA_SW, PREF_SW, PEMIT_LW, PLW_RAD,&
! ------------
!
USE MODD_CSTS, ONLY : XSTEFAN, XPI, XSURF_EPSILON, XI0
USE MODI_ABOR1_SFX
!
USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
USE PARKIND1 ,ONLY : JPRB
......
......@@ -91,6 +91,7 @@ FUNCTION TRAD_BODY_TEB(HPROGRAM, PSCA_SW, PREF_SW_FAC, PREF_SW_GRND, &
! ------------
!
USE MODD_CSTS, ONLY : XSTEFAN, XPI, XSURF_EPSILON, XI0
USE MODI_ABOR1_SFX
!
USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
USE PARKIND1 ,ONLY : JPRB
......
......@@ -54,6 +54,7 @@ USE MODD_TEB_OPTION_n, ONLY : TEB_OPTIONS_t
USE MODD_CSTS, ONLY : XTT
USE MODI_UTCI_APPROX
USE MODI_TRAD_BODY_TEB
USE MODI_ABOR1_SFX
!
USE YOMHOOK , ONLY : LHOOK, DR_HOOK
USE PARKIND1, ONLY : JPRB
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment