Changeset 233


Ignore:
Timestamp:
01/08/19 18:14:37 (5 years ago)
Author:
dumas
Message:

Change dirsource and DIRNAMEOUT to be compatible with the new structure

Location:
trunk/SOURCES
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/SOURCES/initial-phy-2.f90

    r224 r233  
    3333  ! ouverture du fichier parametre ..._param_list.dat 
    3434  !-------------------------------------------------------------- 
    35   ! dirsource='SOURCES' 
    36   dirsource='../../SOURCES' 
     35  dirsource='../SOURCES' 
     36  ! dirsource='../../SOURCES' 
    3737  ! filin='../'//trim(dirsource)//'/Fichiers-parametres/'//trim(geoplace)//'_param_list.dat' 
    3838  filin=trim(geoplace)//'_param_list.dat' 

  • trunk/SOURCES/main3D-0.4-40km.f90

    r192 r233  
    175175  marine=.true. 
    176176  !     ----------------------------------fin des modifs run les plus usuelles 
    177   !DIRNAMEOUT='../RESULTATS/' 
    178   DIRNAMEOUT='./' 
     177  DIRNAMEOUT='../RESULTATS/' 
     178  !DIRNAMEOUT='./' 
    179179 
    180180  call initial  ! routine qui appel toutes les routines d'initialisation 
Note: See TracChangeset for help on using the changeset viewer.