Changeset 1035


Ignore:
Timestamp:
2008-05-30T16:48:34+02:00 (13 years ago)
Author:
cetlod
Message:

the variable freeze is rename to fr_i, see ticket 176

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/TOP_SRC/PISCES/p4zflx.F90

    r1007 r1035  
    138138               &         * facvol(ji,jj,1)      & 
    139139# endif 
    140                &   / (100. * 3600.)* ( 1.- freeze(ji,jj) ) * tmask(ji,jj,1)   
     140               &   / (100. * 3600.)* ( 1.- fr_i(ji,jj) ) * tmask(ji,jj,1)   
    141141 
    142142            ! COMPUTE GAS EXCHANGE FOR CO2 
Note: See TracChangeset for help on using the changeset viewer.