Changeset 10 for trunk/SOURCES/out_horiz_mod.f90

Timestamp:

02/12/15 16:09:32 (9 years ago)

Author:

dumas

Message:

Modification chemin dirnameinp et dirsource pour lancer GRISLI depuis le répertoire RESULTATS/ma_simule. Lecture du fichier param dans le repertoire de la simulation avec nom standard type hemin40_param_list.dat. Pour le moment seule la version Hemin-40 est utilisable.

File:

• trunk/SOURCES/out_horiz_mod.f90 (modified) (2 diffs)

trunk/SOURCES/out_horiz_mod.f90

@@ -87 +87 @@
     ! lecture des pas de temps de sortie
     !------------------------------------
-    open(num_dat,file='../'//trim(dirsource)//'/Fichiers-parametres/TEMPS-HZ.dat')
+    ! open(num_dat,file='../'//trim(dirsource)//'/Fichiers-parametres/TEMPS-HZ.dat')
+    open(num_dat,file=trim(dirsource)//'/Fichiers-parametres/TEMPS-HZ.dat')
 
     ! passe les commentaires qui se terminent par une ligne de ~~~
@@ -134 +135 @@
     !-----------------------------------------------------------
 
-    open(num_dat,file='../'//trim(dirsource)//'/Fichiers-parametres/LISTE-VAR-HZ.dat')
+    ! open(num_dat,file='../'//trim(dirsource)//'/Fichiers-parametres/LISTE-VAR-HZ.dat')
+    open(num_dat,file=trim(dirsource)//'/Fichiers-parametres/LISTE-VAR-HZ.dat')
 
     !saute les commentaires