Changeset 372 for IOIPSL


Ignore:
Timestamp:
08/04/08 15:04:07 (16 years ago)
Author:
bellier
Message:

Changing a test for more security

File:
1 edited

Legend:

Unmodified
Added
Removed
  • IOIPSL/trunk/tools/flio_rbld.f90

    r369 r372  
    748748              ENDDO 
    749749            ENDDO 
    750             l_o_m = ALL(io_cm /= 0) 
     750            l_o_m = ALL(io_cm > 0) 
    751751          ELSE 
    752752!---------- the data can be read/write in one piece 
Note: See TracChangeset for help on using the changeset viewer.