--- trunk/libf/phylmd/Orography/start_init_orog_m.f90	2010/04/06 17:52:58	32
+++ trunk/libf/phylmd/Orography/start_init_orog_m.f90	2010/12/02 17:11:04	36
@@ -52,8 +52,6 @@
     REAL, ALLOCATABLE:: lon_ini(:), lat_ini(:)
     REAL, ALLOCATABLE:: lon_rel(:, :), lat_rel(:, :)
 
-    CHARACTER(len=120) orogfname
-
     !-----------------------------------
 
     print *, "Call sequence information: start_init_orog"
@@ -65,10 +63,8 @@
          size(zgam_2d, 2), size(zthe_2d, 2), size(zpic_2d, 2), &
          size(zval_2d, 2)/) /= jjm + 1)) stop "start_init_orog size 2"
 
-    orogfname = 'Relief.nc'
     print *, 'Reading the high resolution orography'
-
-    CALL flininfo(orogfname, iml_rel, jml_rel, llm_tmp, ttm_tmp, fid)
+    CALL flininfo('Relief.nc', iml_rel, jml_rel, llm_tmp, ttm_tmp, fid)
 
     ALLOCATE(lat_rel(iml_rel, jml_rel))
     ALLOCATE(lon_rel(iml_rel, jml_rel))