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 1035 for trunk/NEMO – NEMO

Changeset 1035 for trunk/NEMO


Ignore:
Timestamp:
2008-05-30T16:48:34+02:00 (16 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.