Ignore:
Timestamp:
2012-11-15T16:18:40+01:00 (8 years ago)
Author:
vichi
Message:

Corrected bug in directory of ocean input files

It was not possible to read ocean input files from an external directory.
Also updated the header of ocean.output with the list of institutes

Location:
branches/2012/dev_r3379_CMCC6_topbfm/NEMOGCM
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • branches/2012/dev_r3379_CMCC6_topbfm/NEMOGCM/CONFIG/PELAGOS/EXP00/bfm.nml

    r3513 r3561  
    5252   bio_setup = 1  
    5353  bfm_rstctl = .FALSE. 
    54    out_fname = 'BFM_NEMO' 
     54   out_fname = 'PELAGOS' 
    5555     out_dir = '.' 
    5656   out_title = 'PELAGOS' 
     
    184184          'Z3c','Z4c','Z5c','Z6c','B1c', 
    185185          'R1c','R2c','R6c','R6f', 
    186           'xEPS','Chla', 
     186          'Chla','jsurO2o','jsurO3c', 
    187187          'eiPI(iiP1)','eiPI(iiP2)','eiPI(iiP3)', 
    188188          'qlPc(iiP1)','qlPc(iiP2)','qlPc(iiP3)', 
     
    190190          'qpPc(iiP1)','qpPc(iiP2)','qpPc(iiP3)', 
    191191          'sunPI(iiP1)','sunPI(iiP2)','sunPI(iiP3)', 
    192           'jbotR6c','jsurO2o', 
    193           'EICE','ETW','EIR','EWIND', 
     192          'EICE','ETW','EIR','EWIND' 
    194193/ 
    195194 
  • branches/2012/dev_r3379_CMCC6_topbfm/NEMOGCM/NEMO/OFF_SRC/dtadyn.F90

    r3294 r3561  
    433433      ! Open file for each variable to get his number of dimension 
    434434      DO ifpr = 1, jfld 
    435          CALL iom_open( slf_d(ifpr)%clname, inum ) 
     435         CALL iom_open( TRIM( cn_dir )//TRIM( slf_d(ifpr)%clname ), inum ) 
    436436         idv   = iom_varid( inum , slf_d(ifpr)%clvar )  ! id of the variable sdjf%clvar 
    437437         idimv = iom_file ( inum )%ndims(idv)             ! number of dimension for variable sdjf%clvar 
  • branches/2012/dev_r3379_CMCC6_topbfm/NEMOGCM/NEMO/OFF_SRC/nemogcm.F90

    r3294 r3561  
    184184         ! 
    185185         WRITE(numout,*) 
    186          WRITE(numout,*) '         CNRS - NERC - Met OFFICE - MERCATOR-ocean' 
     186         WRITE(numout,*) '   CNRS - NERC - Met OFFICE - MERCATOR-ocean - INGV - CMCC' 
    187187         WRITE(numout,*) '                       NEMO team' 
    188188         WRITE(numout,*) '            Ocean General Circulation Model' 
    189          WRITE(numout,*) '                  version 3.3  (2010) ' 
     189         WRITE(numout,*) '                  version 3.5  (2012) ' 
    190190         WRITE(numout,*) 
    191191         WRITE(numout,*) 
Note: See TracChangeset for help on using the changeset viewer.