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 1400 for branches/libIGCM/ORCA2_LIM – NEMO

Ignore:
Timestamp:
2009-04-14T15:02:27+02:00 (16 years ago)
Author:
flavoni
Message:

change opa9.driver to use diaptr.F90 function, see ticket #411

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/libIGCM/ORCA2_LIM/IGCM00/COMP/opa9.driver

    r1387 r1400  
    77    JOB_NAME=${config_UserChoices_JobName} 
    88 
    9 ######################################## 
    10 # old version: less compact 
    11 #    if [ -z "${opa_UserChoices_OPA_NDT_DAY}" ] ; then 
    12 #  OPA_NDT_DAY=15 
    13 #    else 
    14 #  OPA_NDT_DAY=${opa_UserChoices_OPA_NDT_DAY} 
    15 #    fi 
    16 ######################################## 
    17      OPA_NDT_DAY=${opa_UserChoices_OPA_NDT_DAY:=15} 
     9    OPA_NDT_DAY=${opa_UserChoices_OPA_NDT_DAY:=15} 
    1810 
    1911 
     
    3022    # ndate0 initial calendar date aammjj 
    3123    # nmsh  =1 create a mesh file (coordinates, scale factors, masks) 
     24    # nwrihf frequency of HF OUTPUT file 
     25    # rdt time step in seconds (coming from namelist) 
     26    # nf_ptr_wri frequency of zonal means and transport output 
     27 
    3228 
    3329# Local function to find namelists parameters 
     
    4743    PAT_NDATE0=$( supergrep ndate0    ${SUBMIT_DIR}/PARAM/namelist ) 
    4844    PAT_NMSH=$(   supergrep nmsh      ${SUBMIT_DIR}/PARAM/namelist )  
     45    PAT_NF_PTR=$( supergrep nf_ptr_wri ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} ) 
     46     
    4947 
    5048    OPA_RDT=$( supergrep rdt  ${SUBMIT_DIR}/PARAM/namelist | sed 's/ *rdt *=//' | sed 's/\. *,//' ) 
     
    156154   -e "s%${PAT_NIT000}%       nit000=${OPA_NIT000}%"                    \ 
    157155   -e "s%${PAT_NITEND}%       nitend=${OPA_NITEND}%"                    \ 
    158    -e "s%${PAT_NLEAPY}%       nleapy=${OPA_NLEAPY}%"                \ 
    159156   -e "s%${PAT_NWRITE}%       nwrite=${OPA_NWRITE}%"                    \ 
    160157   -e "s%${PAT_RESTAR}%       ln_rstart=${OPA_LRSTAR}%"                 \ 
     
    163160   -e "s%${PAT_NDATE0}%       ndate0=${PeriodDateBegin}%"                \ 
    164161   -e "s%${PAT_NMSH}%         nmsh=${OPA_NMSH}%"                        \ 
     162   -e "s%${PAT_NLEAPY}%       nleapy=${OPA_NLEAPY}%"                \ 
     163        -e "s/${PAT_NF_PTR}/       nf_ptr_wri=${OPA_NWRITE}/"                \ 
    165164   namelist > namelist.tmp 
    166165 
Note: See TracChangeset for help on using the changeset viewer.