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 4162 for branches/2013/dev_LOCEAN_2013/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsms.F90 – NEMO

Ignore:
Timestamp:
2013-11-07T11:19:49+01:00 (10 years ago)
Author:
cetlod
Message:

dev_LOCEAN_2013 : merge in trunk changes between r4028 and r4119, see ticket #1169

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2013/dev_LOCEAN_2013/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsms.F90

    r4153 r4162  
    291291   END SUBROUTINE p4z_ph_ini 
    292292 
    293  
    294293   SUBROUTINE p4z_rst( kt, cdrw ) 
    295294      !!--------------------------------------------------------------------- 
    … …  
    320319         ELSE 
    321320!            hi(:,:,:) = 1.e-9  
    322            CALL p4z_ph_ini 
     321            CALL p4z_ph_ini 
    323322         ENDIF 
    324323         CALL iom_get( numrtr, jpdom_autoglo, 'Silicalim', xksi(:,:) ) 
Note: See TracChangeset for help on using the changeset viewer.