Changeset 2357


Ignore:
Timestamp:
2010-11-04T19:07:41+01:00 (10 years ago)
Author:
rblod
Message:

Adaptation for nec compiler in limrhg.F90,part 2

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/nemo_v3_3_beta/NEMOGCM/NEMO/LIM_SRC_3/limrhg.F90

    r2356 r2357  
    190190 
    191191#if  defined key_lim2 && ! defined key_lim2_vp 
     192# if defined key_agrif 
    192193     USE ice_2, vt_s => hsnm 
    193194     USE ice_2, vt_i => hicm 
     195# else 
     196     vt_s => hsnm 
     197     vt_i => hicm 
     198# endif 
    194199     at_i(:,:) = 1. - frld(:,:) 
    195200#endif 
Note: See TracChangeset for help on using the changeset viewer.