diff --git a/src/MNH/prep_real_case.f90 b/src/MNH/prep_real_case.f90
index 97ba53e1cc0841baf5657256ce4116bfe2b668a3..951c7f53bda34d4a502cee2deb02d1eda402a485 100644
--- a/src/MNH/prep_real_case.f90
+++ b/src/MNH/prep_real_case.f90
@@ -373,6 +373,7 @@
 !!                   May   2006    Remove KEPS
 !!                  Mar   2012    Add NAM_NCOUT for netcdf output
 !!                  July  2013     (Bosseur & Filippi) Adds Forefire
+!!                  Mars  2014     (J.Escobar) Missing 'full' UPDATE_METRICS for arp2lfi // run
 !-------------------------------------------------------------------------------
 !
 !*       0.    DECLARATIONS
@@ -397,6 +398,7 @@ USE MODI_OPEN_PRC_FILES
 USE MODI_READ_ALL_DATA_MESONH_CASE
 USE MODI_READ_ALL_DATA_GRIB_CASE
 USE MODI_METRICS
+USE MODI_UPDATE_METRICS
 USE MODI_VER_PREP_GRIBEX_CASE
 USE MODI_VER_PREP_MESONH_CASE
 USE MODI_VER_THERMO
@@ -862,13 +864,10 @@ ALLOCATE(XDZZ(SIZE(XXHAT),SIZE(XYHAT),SIZE(XZHAT)))
 !
 CALL METRICS(XMAP,XDXHAT,XDYHAT,XZZ,XDXX,XDYY,XDZX,XDZY,XDZZ)
 !
-CALL ADD3DFIELD_ll(TZFIELDS_ll,XDXX)
-CALL ADD3DFIELD_ll(TZFIELDS_ll,XDZX)
-CALL UPDATE_HALO_ll(TZFIELDS_ll,IINFO_ll)
-CALL CLEANLIST_ll(TZFIELDS_ll)
+CALL UPDATE_METRICS(CLBCX,CLBCY,XDXX,XDYY,XDZX,XDZY,XDZZ)
 
-CALL EXTRAPOL('W',XDXX,XDZX)
-CALL EXTRAPOL('S',XDYY,XDZY)
+!!$CALL EXTRAPOL('W',XDXX,XDZX)
+!!$CALL EXTRAPOL('S',XDYY,XDZY)
 
 CALL SECOND_MNH(ZTIME2)