diff --git a/src/SURFEX/read_pgd_teb_parn.F90 b/src/SURFEX/read_pgd_teb_parn.F90 index 0dbf024ec259cc434ff4ae3303ec22363a356541..cf84d552874a632782d99ca42d8fa5ee570b5389 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