From 7128b0552ff69accc2ac688dc2b01cda64df000f Mon Sep 17 00:00:00 2001
From: Juan Escobar <escj@aero.obs-mip.fr>
Date: Mon, 8 Jan 2024 18:31:40 +0100
Subject: [PATCH] Juan 08/01/2024:SURFEX/read_pgd_teb_parn.F90, missing USE
 MODI_HOR_INTERPOL

---
 src/SURFEX/read_pgd_teb_parn.F90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/SURFEX/read_pgd_teb_parn.F90 b/src/SURFEX/read_pgd_teb_parn.F90
index 0dbf024ec..cf84d5528 100644
--- a/src/SURFEX/read_pgd_teb_parn.F90
+++ b/src/SURFEX/read_pgd_teb_parn.F90
@@ -1525,6 +1525,8 @@ END SUBROUTINE READ_FIELD
 !_______________________________
 SUBROUTINE READ_FIELD_2D(HRECFM,PFIELD,YDIR)
 !
+USE MODI_HOR_INTERPOL  
+!  
 IMPLICIT NONE
 !
 CHARACTER(LEN=*),           INTENT(IN)  :: HRECFM ! name of record in the file
-- 
GitLab