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 4240 for branches – NEMO

Changeset 4240 for branches


Ignore:
Timestamp:
2013-11-18T17:59:48+01:00 (10 years ago)
Author:
cbricaud
Message:

correct an error and remove key vectop_loop in AMM cpp file

Location:
branches/2013/dev_MERCATOR_UKMO_2013/NEMOGCM
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_MERCATOR_UKMO_2013/NEMOGCM/CONFIG/AMM12/cpp_AMM12.fcm

    r3833 r4240  
    1  bld::tool::fppkeys  key_bdy key_tide key_vectopt_loop key_amm_12km  key_dynspg_ts key_ldfslp  key_zdfgls  key_vvl key_diainstant key_mpp_mpi key_iomput 
     1 bld::tool::fppkeys  key_bdy key_tide key_amm_12km  key_dynspg_ts key_ldfslp  key_zdfgls  key_vvl key_diainstant key_mpp_mpi key_iomput 
  • branches/2013/dev_MERCATOR_UKMO_2013/NEMOGCM/NEMO/OPA_SRC/DOM/domzgr.F90

    r4231 r4240  
    11271127      IF( nn_timing == 1 )  CALL timing_start('zgr_sco') 
    11281128      ! 
    1129       CALL wrk_alloc( jpi, jpj,      zenv, ztmp, zmsk, zri, zrj, zhbat                          ) 
     1129      CALL wrk_alloc( jpi, jpj, zenv, ztmp, zmsk, zri, zrj, zhbat , ztmpi1, ztmpi2, ztmpj1, ztmpj2 ) 
    11301130      ! 
    11311131      REWIND( numnam )                       ! Read Namelist namzgr_sco : sigma-stretching parameters 
     
    15421542      END DO 
    15431543      ! 
    1544       CALL wrk_dealloc( jpi, jpj,      zenv, ztmpi1, ztmpi2, ztmpj1, ztmpj2, zri, zrj, zhbat                           )      ! 
     1544      CALL wrk_dealloc( jpi, jpj, zenv, ztmp, zmsk, zri, zrj, zhbat , ztmpi1, ztmpi2, ztmpj1, ztmpj2 ) 
    15451545      ! 
    15461546      IF( nn_timing == 1 )  CALL timing_stop('zgr_sco') 
Note: See TracChangeset for help on using the changeset viewer.