Index: /LMDZ4/trunk/libf/dyn3d/limit_netcdf.F90
===================================================================
--- /LMDZ4/trunk/libf/dyn3d/limit_netcdf.F90	(revision 1403)
+++ /LMDZ4/trunk/libf/dyn3d/limit_netcdf.F90	(revision 1404)
@@ -347,5 +347,8 @@
     CASE('ALB'); varname='ALBEDO'; title='Albedo'
   END SELECT
-  extrp=(flag.AND.mode=='SST')
+  extrp=.FALSE. 
+  IF ( PRESENT(flag) ) THEN 
+    IF ( flag .AND. mode=='SST' ) extrp=.TRUE. 
+  END IF
 
 !--- GETTING SOME DIMENSIONAL VARIABLES FROM FILE ------------------------------
Index: /LMDZ4/trunk/libf/dyn3dpar/limit_netcdf.F90
===================================================================
--- /LMDZ4/trunk/libf/dyn3dpar/limit_netcdf.F90	(revision 1403)
+++ /LMDZ4/trunk/libf/dyn3dpar/limit_netcdf.F90	(revision 1404)
@@ -347,5 +347,9 @@
     CASE('ALB'); varname='ALBEDO'; title='Albedo'
   END SELECT
-  extrp=(flag.AND.mode=='SST')
+  extrp=.FALSE.
+  IF ( PRESENT(flag) ) THEN
+    IF ( flag .AND. mode=='SST' ) extrp=.TRUE.  
+  END IF  
+
 
 !--- GETTING SOME DIMENSIONAL VARIABLES FROM FILE ------------------------------
