Changeset 1812


Ignore:
Timestamp:
2010-03-25T11:30:26+01:00 (11 years ago)
Author:
rblod
Message:

Syntax error for abort files in limwri_2, see ticket #623

File:
1 edited

Legend:

Unmodified
Added
Removed
  • tags/nemo_v3_2/NEMO/LIM_SRC_2/limwri_2.F90

    r1715 r1812  
    313313      CALL histwrite( kid, "iicetemp", kt, sist(:,:) - rt0, jpi*jpj, (/1/) ) 
    314314      CALL histwrite( kid, "ioceflxb", kt, fbif           , jpi*jpj, (/1/) ) 
    315       CALL histwrite( kid, "iicevelv", kt, u_ice          , jpi*jpj, (/1/) ) 
    316       CALL histwrite( kid, "iicevelu", kt, v_ice          , jpi*jpj, (/1/) ) 
     315      CALL histwrite( kid, "iicevelu", kt, u_ice          , jpi*jpj, (/1/) ) 
     316      CALL histwrite( kid, "iicevelv", kt, v_ice          , jpi*jpj, (/1/) ) 
    317317      CALL histwrite( kid, "isstempe", kt, sst_m          , jpi*jpj, (/1/) ) 
    318318      CALL histwrite( kid, "isssalin", kt, sss_m          , jpi*jpj, (/1/) ) 
Note: See TracChangeset for help on using the changeset viewer.