New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 1991 for vendors/IOIPSL/current/example/testflio.f90 – NEMO

Ignore:
Timestamp:
2010-07-08T15:39:26+02:00 (14 years ago)
Author:
smasson
Message:

Load working_directory into vendors/IOIPSL/current.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • vendors/IOIPSL/current/example/testflio.f90

    r1895 r1991  
    11PROGRAM testflio 
    22!- 
    3 !$Id: testflio.f90 386 2008-09-04 08:38:48Z bellier $ 
     3!$Id: testflio.f90 887 2010-02-08 09:48:39Z bellier $ 
    44!- 
    55! This software is governed by the CeCILL license 
     
    106106  CALL fliodefv (fid,'my_var_1',(/ 5 /), & 
    107107 &               v_t=flio_r4,units='1',long_name='my_var_1', & 
    108  &               valid_min=-10.,valid_max=+20.) 
     108 &               valid_min=-10.,valid_max=+20.,fillvalue=+50.) 
    109109  CALL fliodefv (fid,'Var_vr4', & 
    110110 &               v_t=flio_r4,units='1',long_name='Var_vr4') 
Note: See TracChangeset for help on using the changeset viewer.