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 7910 for branches/2017/dev_r7881_no_wrk_alloc/NEMOGCM/TOOLS – NEMO

Ignore:
Timestamp:
2017-04-13T16:21:08+02:00 (7 years ago)
Author:
timgraham
Message:

All wrk_alloc removed

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r7881_no_wrk_alloc/NEMOGCM/TOOLS/MISCELLANEOUS/rewrite_nemo.sh

    r5407 r7910  
    174174# OPA_SRC/DYN/divcur.F90 
    175175#./OPA_SRC/DYN/divcur.F90:      CALL wrk_alloc( jpi+4, jpj  , zwv, kjstart = -1 ) 
    176 sed -e "s/DIMENSION(jpi+4,jpj)/DIMENSION(-1:jpi+2,jpj)/" OPA_SRC/DYN/divcur.F90 > tmp$$ 
    177 mv tmp$$ OPA_SRC/DYN/divcur.F90 
     176#sed -e "s/DIMENSION(jpi+4,jpj)/DIMENSION(-1:jpi+2,jpj)/" OPA_SRC/DYN/divcur.F90 > tmp$$ 
     177#mv tmp$$ OPA_SRC/DYN/divcur.F90 
    178178 
    179179# OPA_SRC/LDF/ldfslp.F90 
     
    185185# OPA_SRC/ZDF/zdfkpp.F90 
    186186#./OPA_SRC/ZDF/zdfkpp.F90:      CALL wrk_alloc( jpi,3, zmoek, kjstart = 0 ) 
    187 sed -e "s/DIMENSION(jpi,3) *::* zmoek/DIMENSION(jpi,0:2) ::   zmoek/" OPA_SRC/ZDF/zdfkpp.F90 > tmp$$ 
    188 mv tmp$$ OPA_SRC/ZDF/zdfkpp.F90 
     187#sed -e "s/DIMENSION(jpi,3) *::* zmoek/DIMENSION(jpi,0:2) ::   zmoek/" OPA_SRC/ZDF/zdfkpp.F90 > tmp$$ 
     188#mv tmp$$ OPA_SRC/ZDF/zdfkpp.F90 
    189189 
    190190# links  
     
    192192# find . -type l 
    193193# 
    194 # ./LIM_SRC_2/limrhg.F90 
    195 cd LIM_SRC_2 
    196 ln -sf ../LIM_SRC_3/limrhg.F90 . 
    197 cd .. 
    198  
    199194# ./OOO_SRC/dtadyn.F90 
    200195cd OOO_SRC 
Note: See TracChangeset for help on using the changeset viewer.