--- trunk/libf/dyn3d/etat0.f90	2010/03/26 18:33:04	28
+++ trunk/libf/dyn3d/etat0.f90	2010/04/06 17:52:58	32
@@ -37,7 +37,9 @@
     use iniadvtrac_m, only: iniadvtrac
     use inidissip_m, only: inidissip
     use inigeom_m, only: inigeom
-    USE ioipsl, only: flinget, flinclo, flinopen_nozoom, flininfo, histclo
+    USE flincom, only: flinclo, flinopen_nozoom, flininfo
+    use flinget_m, only: flinget
+    use histcom, only: histclo
     use paramet_m, only: ip1jm, ip1jmp1
     use phyredem_m, only: phyredem
     use pressure_var, only: pls, p3d
@@ -220,7 +222,7 @@
     ALLOCATE(dlon_lic(iml_lic))
     ALLOCATE(dlat_lic(jml_lic))
     ALLOCATE(fraclic(iml_lic, jml_lic))
-    CALL flinopen_nozoom("landiceref.nc", iml_lic, jml_lic, &
+    CALL flinopen_nozoom(iml_lic, jml_lic, &
          llm_tmp, lon_lic, lat_lic, lev, ttm_tmp, itaul, date, trash,  &
          fid)
     CALL flinget(fid, 'landice', iml_lic, jml_lic, llm_tmp, ttm_tmp &