Changeset 789


Ignore:
Timestamp:
2008-01-11T19:04:56+01:00 (13 years ago)
Author:
rblod
Message:

Suppress jki routines and associated key_mpp_omp

Location:
trunk
Files:
8 deleted
32 edited

Legend:

Unmodified
Added
Removed
  • trunk/CONFIG/GYRE/scripts/BB_make

    r784 r789  
    120120     key_mpp_dyndist \ 
    121121     key_mpp_mpi \ 
    122      key_mpp_omp \ 
    123122     key_mpp_shmem \ 
    124123     key_noslip_accurate \ 
     
    208207      $(MODEL_LIB)(dyncor1d.o)\ 
    209208      $(MODEL_LIB)(dynhpg.o)\ 
    210       $(MODEL_LIB)(dynhpg_jki.o)\ 
    211209      $(MODEL_LIB)(dynkeg.o)\ 
    212210      $(MODEL_LIB)(dynldf.o)\ 
     
    219217      $(MODEL_LIB)(dynspg.o)\ 
    220218      $(MODEL_LIB)(dynspg_exp.o)\ 
    221       $(MODEL_LIB)(dynspg_exp_jki.o)\ 
    222219      $(MODEL_LIB)(dynspg_flt.o)\ 
    223       $(MODEL_LIB)(dynspg_flt_jki.o)\ 
    224220      $(MODEL_LIB)(dynspg_oce.o)\ 
    225221      $(MODEL_LIB)(dynspg_rl.o)\ 
    226222      $(MODEL_LIB)(dynspg_ts.o)\ 
    227       $(MODEL_LIB)(dynspg_ts_jki.o)\ 
    228223      $(MODEL_LIB)(dynvor.o)\ 
    229224      $(MODEL_LIB)(dynzad.o)\ 
     
    231226      $(MODEL_LIB)(dynzdf_exp.o)\ 
    232227      $(MODEL_LIB)(dynzdf_imp.o)\ 
    233       $(MODEL_LIB)(dynzdf_imp_jki.o)\ 
    234228      $(MODEL_LIB)(eosbn2.o)\ 
    235229      $(MODEL_LIB)(flo4rk.o)\ 
     
    325319      $(MODEL_LIB)(traadv.o)\ 
    326320      $(MODEL_LIB)(traadv_cen2.o)\ 
    327       $(MODEL_LIB)(traadv_cen2_jki.o)\ 
    328321      $(MODEL_LIB)(traadv_eiv.o)\ 
    329322      $(MODEL_LIB)(traadv_muscl.o)\ 
     
    347340      $(MODEL_LIB)(trazdf_exp.o)\ 
    348341      $(MODEL_LIB)(trazdf_imp.o)\ 
    349       $(MODEL_LIB)(trazdf_imp_jki.o)\ 
    350342      $(MODEL_LIB)(trc_oce.o)\ 
    351343      $(MODEL_LIB)(trcstp.o)\ 
     
    369361      $(MODEL_LIB)(zdfric.o)\ 
    370362      $(MODEL_LIB)(zdftke.o)\ 
    371       $(MODEL_LIB)(zdftke_jki.o)\ 
    372363      $(MODEL_LIB)(zpshde.o) 
    373364 
     
    24772468   $(MODEL_LIB)(dom_oce.o) \ 
    24782469   $(MODEL_LIB)(in_out_manager.o) \ 
    2479    $(MODEL_LIB)(lbclnk.o) \ 
    24802470   $(MODEL_LIB)(ldftra_oce.o) \ 
    24812471   $(MODEL_LIB)(lib_mpp.o) \ 
     
    24962486   dom_oce.F90 \ 
    24972487   in_out_manager.F90 \ 
    2498    lbclnk.F90 \ 
    24992488   ldftra_oce.F90 \ 
    25002489   lib_mpp.F90 \ 
     
    25142503   zdf_oce.F90 \ 
    25152504   $(MODEL_LIB)(dom_oce.o) \ 
    2516    $(MODEL_LIB)(dynhpg_jki.o) \ 
    25172505   $(MODEL_LIB)(in_out_manager.o) \ 
    25182506   $(MODEL_LIB)(lbclnk.o) \ 
     
    25232511   $(MODEL_LIB)(trdmod_oce.o) \ 
    25242512   dom_oce.F90 \ 
    2525    dynhpg_jki.F90 \ 
    25262513   in_out_manager.F90 \ 
    25272514   lbclnk.F90 \ 
     
    25352522   KEY_CPP \ 
    25362523   dynhpg.F90 
    2537 $(MODEL_LIB)(dynhpg_jki.o) :  \ 
    2538    $(MODEL_LIB)(dom_oce.o) \ 
    2539    $(MODEL_LIB)(in_out_manager.o) \ 
    2540    $(MODEL_LIB)(lib_mpp.o) \ 
    2541    $(MODEL_LIB)(lib_print.o) \ 
    2542    $(MODEL_LIB)(oce.o) \ 
    2543    $(MODEL_LIB)(par_kind.o) \ 
    2544    $(MODEL_LIB)(par_oce.o) \ 
    2545    dom_oce.F90 \ 
    2546    in_out_manager.F90 \ 
    2547    lib_mpp.F90 \ 
    2548    lib_print.f90 \ 
    2549    oce.F90 \ 
    2550    par_kind.F90 \ 
    2551    par_oce.F90 \ 
    2552    $(MODEL_LIB)(dom_oce.o) \ 
    2553    $(MODEL_LIB)(in_out_manager.o) \ 
    2554    $(MODEL_LIB)(lbclnk.o) \ 
    2555    $(MODEL_LIB)(oce.o) \ 
    2556    $(MODEL_LIB)(phycst.o) \ 
    2557    dom_oce.F90 \ 
    2558    in_out_manager.F90 \ 
    2559    lbclnk.F90 \ 
    2560    oce.F90 \ 
    2561    phycst.F90 \ 
    2562    domzgr_substitute.h90 \ 
    2563    vectopt_loop_substitute.h90 \ 
    2564    KEY_CPP \ 
    2565    dynhpg_jki.F90 
    25662524$(MODEL_LIB)(dynkeg.o) :   \ 
    25672525   $(MODEL_LIB)(dom_oce.o) \ 
     
    30513009   $(MODEL_LIB)(dom_oce.o) \ 
    30523010   $(MODEL_LIB)(domvvl.o) \ 
    3053    $(MODEL_LIB)(dynspg_exp.o) \ 
    3054    $(MODEL_LIB)(dynspg_flt.o) \ 
    30553011   $(MODEL_LIB)(dynspg_oce.o) \ 
    3056    $(MODEL_LIB)(dynspg_ts.o) \ 
    30573012   $(MODEL_LIB)(dynvor.o) \ 
    30583013   $(MODEL_LIB)(flxrnf.o) \ 
     
    30973052   dom_oce.F90 \ 
    30983053   domvvl.F90 \ 
    3099    dynspg_exp.F90 \ 
    3100    dynspg_flt.F90 \ 
    31013054   dynspg_oce.F90 \ 
    3102    dynspg_ts.F90 \ 
    31033055   dynvor.F90 \ 
    31043056   flxrnf.F90 \ 
     
    31413093   $(MODEL_LIB)(dom_oce.o) \ 
    31423094   $(MODEL_LIB)(dynspg_exp.o) \ 
    3143    $(MODEL_LIB)(dynspg_exp_jki.o) \ 
    31443095   $(MODEL_LIB)(dynspg_flt.o) \ 
    3145    $(MODEL_LIB)(dynspg_flt_jki.o) \ 
    31463096   $(MODEL_LIB)(dynspg_oce.o) \ 
    31473097   $(MODEL_LIB)(dynspg_rl.o) \ 
    31483098   $(MODEL_LIB)(dynspg_ts.o) \ 
    3149    $(MODEL_LIB)(dynspg_ts_jki.o) \ 
    31503099   $(MODEL_LIB)(in_out_manager.o) \ 
    31513100   $(MODEL_LIB)(obc_oce.o) \ 
     
    31563105   dom_oce.F90 \ 
    31573106   dynspg_exp.F90 \ 
    3158    dynspg_exp_jki.F90 \ 
    31593107   dynspg_flt.F90 \ 
    3160    dynspg_flt_jki.F90 \ 
    31613108   dynspg_oce.F90 \ 
    31623109   dynspg_rl.F90 \ 
    31633110   dynspg_ts.F90 \ 
    3164    dynspg_ts_jki.F90 \ 
    31653111   in_out_manager.F90 \ 
    31663112   obc_oce.F90 \ 
     
    32783224   KEY_CPP \ 
    32793225   dynspg_exp.F90 
    3280 $(MODEL_LIB)(dynspg_exp_jki.o) : \ 
    3281    $(MODEL_LIB)(blk_oce.o) \ 
    3282    $(MODEL_LIB)(cpl_oce.o) \ 
    3283    $(MODEL_LIB)(daymod.o) \ 
    3284    $(MODEL_LIB)(dom_oce.o) \ 
    3285    $(MODEL_LIB)(dtasal.o) \ 
    3286    $(MODEL_LIB)(dtasss.o) \ 
    3287    $(MODEL_LIB)(dtasst.o) \ 
    3288    $(MODEL_LIB)(dtatem.o) \ 
    3289    $(MODEL_LIB)(dynspg_oce.o) \ 
    3290    $(MODEL_LIB)(eosbn2.o) \ 
    3291    $(MODEL_LIB)(flx_oce.o) \ 
    3292    $(MODEL_LIB)(flxmod.o) \ 
    3293    $(MODEL_LIB)(flxrnf.o) \ 
    3294    $(MODEL_LIB)(ice_oce.o) \ 
    3295    $(MODEL_LIB)(in_out_manager.o) \ 
    3296    $(MODEL_LIB)(ini1d.o) \ 
    3297    $(MODEL_LIB)(iom.o) \ 
    3298    $(MODEL_LIB)(lbclnk.o) \ 
    3299    $(MODEL_LIB)(lib_mpp.o) \ 
    3300    $(MODEL_LIB)(lib_print.o) \ 
    3301    $(MODEL_LIB)(obc_oce.o) \ 
    3302    $(MODEL_LIB)(obc_par.o) \ 
    3303    $(MODEL_LIB)(obccli.o) \ 
    3304    $(MODEL_LIB)(obcdta.o) \ 
    3305    $(MODEL_LIB)(oce.o) \ 
    3306    $(MODEL_LIB)(ocesbc.o) \ 
    3307    $(MODEL_LIB)(ocfzpt.o) \ 
    3308    $(MODEL_LIB)(par_kind.o) \ 
    3309    $(MODEL_LIB)(par_oce.o) \ 
    3310    $(MODEL_LIB)(phycst.o) \ 
    3311    $(MODEL_LIB)(prtctl.o) \ 
    3312    $(MODEL_LIB)(restart.o) \ 
    3313    $(MODEL_LIB)(taumod.o) \ 
    3314    $(MODEL_LIB)(tradmp.o) \ 
    3315    $(MODEL_LIB)(trdmld_oce.o) \ 
    3316    $(MODEL_LIB)(zpshde.o) \ 
    3317    blk_oce.F90 \ 
    3318    cpl_oce.F90 \ 
    3319    daymod.F90 \ 
    3320    dom_oce.F90 \ 
    3321    dtasal.F90 \ 
    3322    dtasss.F90 \ 
    3323    dtasst.F90 \ 
    3324    dtatem.F90 \ 
    3325    dynspg_oce.F90 \ 
    3326    eosbn2.F90 \ 
    3327    flx_oce.F90 \ 
    3328    flxmod.F90 \ 
    3329    flxrnf.F90 \ 
    3330    ice_oce.F90 \ 
    3331    in_out_manager.F90 \ 
    3332    ini1d.F90 \ 
    3333    iom.F90 \ 
    3334    lbclnk.F90 \ 
    3335    lib_mpp.F90 \ 
    3336    lib_print.f90 \ 
    3337    obc_oce.F90 \ 
    3338    obc_par.F90 \ 
    3339    obccli.F90 \ 
    3340    obcdta.F90 \ 
    3341    oce.F90 \ 
    3342    ocesbc.F90 \ 
    3343    ocfzpt.F90 \ 
    3344    par_kind.F90 \ 
    3345    par_oce.F90 \ 
    3346    phycst.F90 \ 
    3347    prtctl.F90 \ 
    3348    restart.F90 \ 
    3349    taumod.F90 \ 
    3350    tradmp.F90 \ 
    3351    trdmld_oce.F90 \ 
    3352    zpshde.F90 \ 
    3353    $(MODEL_LIB)(dom_oce.o) \ 
    3354    $(MODEL_LIB)(dynspg_exp.o) \ 
    3355    $(MODEL_LIB)(in_out_manager.o) \ 
    3356    $(MODEL_LIB)(lbclnk.o) \ 
    3357    $(MODEL_LIB)(lib_mpp.o) \ 
    3358    $(MODEL_LIB)(obc_oce.o) \ 
    3359    $(MODEL_LIB)(obc_par.o) \ 
    3360    $(MODEL_LIB)(obcdta.o) \ 
    3361    $(MODEL_LIB)(oce.o) \ 
    3362    $(MODEL_LIB)(ocesbc.o) \ 
    3363    $(MODEL_LIB)(phycst.o) \ 
    3364    $(MODEL_LIB)(prtctl.o) \ 
    3365    $(MODEL_LIB)(restart.o) \ 
    3366    dom_oce.F90 \ 
    3367    dynspg_exp.F90 \ 
    3368    in_out_manager.F90 \ 
    3369    lbclnk.F90 \ 
    3370    lib_mpp.F90 \ 
    3371    obc_oce.F90 \ 
    3372    obc_par.F90 \ 
    3373    obcdta.F90 \ 
    3374    oce.F90 \ 
    3375    ocesbc.F90 \ 
    3376    phycst.F90 \ 
    3377    prtctl.F90 \ 
    3378    restart.F90 \ 
    3379    domzgr_substitute.h90 \ 
    3380    vectopt_loop_substitute.h90 \ 
    3381    KEY_CPP \ 
    3382    dynspg_exp_jki.F90 
    33833226$(MODEL_LIB)(dynspg_flt.o) :  \ 
    33843227   $(MODEL_LIB)(blk_oce.o) \ 
     
    35313374   KEY_CPP \ 
    35323375   dynspg_flt.F90 
    3533 $(MODEL_LIB)(dynspg_flt_jki.o) : \ 
    3534    $(MODEL_LIB)(agrif_opa_interp.o) \ 
    3535    $(MODEL_LIB)(blk_oce.o) \ 
    3536    $(MODEL_LIB)(cla_dynspg.o) \ 
    3537    $(MODEL_LIB)(cpl_oce.o) \ 
    3538    $(MODEL_LIB)(daymod.o) \ 
    3539    $(MODEL_LIB)(dom_oce.o) \ 
    3540    $(MODEL_LIB)(domvvl.o) \ 
    3541    $(MODEL_LIB)(dtasal.o) \ 
    3542    $(MODEL_LIB)(dtasss.o) \ 
    3543    $(MODEL_LIB)(dtasst.o) \ 
    3544    $(MODEL_LIB)(dtatem.o) \ 
    3545    $(MODEL_LIB)(dynspg_oce.o) \ 
    3546    $(MODEL_LIB)(eosbn2.o) \ 
    3547    $(MODEL_LIB)(flx_oce.o) \ 
    3548    $(MODEL_LIB)(flxmod.o) \ 
    3549    $(MODEL_LIB)(flxrnf.o) \ 
    3550    $(MODEL_LIB)(ice_oce.o) \ 
    3551    $(MODEL_LIB)(in_out_manager.o) \ 
    3552    $(MODEL_LIB)(ini1d.o) \ 
    3553    $(MODEL_LIB)(iom.o) \ 
    3554    $(MODEL_LIB)(iom_def.o) \ 
    3555    $(MODEL_LIB)(iom_ioipsl.o) \ 
    3556    $(MODEL_LIB)(iom_nf90.o) \ 
    3557    $(MODEL_LIB)(iom_rstdimg.o) \ 
    3558    $(MODEL_LIB)(lbclnk.o) \ 
    3559    $(MODEL_LIB)(lib_feti.o) \ 
    3560    $(MODEL_LIB)(lib_mpp.o) \ 
    3561    $(MODEL_LIB)(lib_print.o) \ 
    3562    $(MODEL_LIB)(obc_oce.o) \ 
    3563    $(MODEL_LIB)(obc_par.o) \ 
    3564    $(MODEL_LIB)(obccli.o) \ 
    3565    $(MODEL_LIB)(obcdyn.o) \ 
    3566    $(MODEL_LIB)(obcvol.o) \ 
    3567    $(MODEL_LIB)(oce.o) \ 
    3568    $(MODEL_LIB)(ocesbc.o) \ 
    3569    $(MODEL_LIB)(ocfzpt.o) \ 
    3570    $(MODEL_LIB)(par_kind.o) \ 
    3571    $(MODEL_LIB)(par_oce.o) \ 
    3572    $(MODEL_LIB)(phycst.o) \ 
    3573    $(MODEL_LIB)(prtctl.o) \ 
    3574    $(MODEL_LIB)(restart.o) \ 
    3575    $(MODEL_LIB)(sol_oce.o) \ 
    3576    $(MODEL_LIB)(solfet.o) \ 
    3577    $(MODEL_LIB)(solisl.o) \ 
    3578    $(MODEL_LIB)(solmat.o) \ 
    3579    $(MODEL_LIB)(solpcg.o) \ 
    3580    $(MODEL_LIB)(solsor.o) \ 
    3581    $(MODEL_LIB)(solver.o) \ 
    3582    $(MODEL_LIB)(taumod.o) \ 
    3583    $(MODEL_LIB)(tradmp.o) \ 
    3584    $(MODEL_LIB)(trdmld_oce.o) \ 
    3585    $(MODEL_LIB)(zdf_oce.o) \ 
    3586    $(MODEL_LIB)(zpshde.o) \ 
    3587    agrif_opa_interp.F90 \ 
    3588    blk_oce.F90 \ 
    3589    cla_dynspg.F90 \ 
    3590    cpl_oce.F90 \ 
    3591    daymod.F90 \ 
    3592    dom_oce.F90 \ 
    3593    domvvl.F90 \ 
    3594    dtasal.F90 \ 
    3595    dtasss.F90 \ 
    3596    dtasst.F90 \ 
    3597    dtatem.F90 \ 
    3598    dynspg_oce.F90 \ 
    3599    eosbn2.F90 \ 
    3600    flx_oce.F90 \ 
    3601    flxmod.F90 \ 
    3602    flxrnf.F90 \ 
    3603    ice_oce.F90 \ 
    3604    in_out_manager.F90 \ 
    3605    ini1d.F90 \ 
    3606    iom.F90 \ 
    3607    iom_def.F90 \ 
    3608    iom_ioipsl.F90 \ 
    3609    iom_nf90.F90 \ 
    3610    iom_rstdimg.F90 \ 
    3611    lbclnk.F90 \ 
    3612    lib_feti.F90 \ 
    3613    lib_mpp.F90 \ 
    3614    lib_print.f90 \ 
    3615    obc_oce.F90 \ 
    3616    obc_par.F90 \ 
    3617    obccli.F90 \ 
    3618    obcdyn.F90 \ 
    3619    obcvol.F90 \ 
    3620    oce.F90 \ 
    3621    ocesbc.F90 \ 
    3622    ocfzpt.F90 \ 
    3623    par_kind.F90 \ 
    3624    par_oce.F90 \ 
    3625    phycst.F90 \ 
    3626    prtctl.F90 \ 
    3627    restart.F90 \ 
    3628    sol_oce.F90 \ 
    3629    solfet.F90 \ 
    3630    solisl.F90 \ 
    3631    solmat.F90 \ 
    3632    solpcg.F90 \ 
    3633    solsor.F90 \ 
    3634    solver.F90 \ 
    3635    taumod.F90 \ 
    3636    tradmp.F90 \ 
    3637    trdmld_oce.F90 \ 
    3638    zdf_oce.F90 \ 
    3639    zpshde.F90 \ 
    3640    $(MODEL_LIB)(agrif_opa_interp.o) \ 
    3641    $(MODEL_LIB)(cla_dynspg.o) \ 
    3642    $(MODEL_LIB)(dom_oce.o) \ 
    3643    $(MODEL_LIB)(dynspg_flt.o) \ 
    3644    $(MODEL_LIB)(flxrnf.o) \ 
    3645    $(MODEL_LIB)(in_out_manager.o) \ 
    3646    $(MODEL_LIB)(iom.o) \ 
    3647    $(MODEL_LIB)(lbclnk.o) \ 
    3648    $(MODEL_LIB)(lib_mpp.o) \ 
    3649    $(MODEL_LIB)(obc_oce.o) \ 
    3650    $(MODEL_LIB)(obcdyn.o) \ 
    3651    $(MODEL_LIB)(obcvol.o) \ 
    3652    $(MODEL_LIB)(oce.o) \ 
    3653    $(MODEL_LIB)(ocesbc.o) \ 
    3654    $(MODEL_LIB)(phycst.o) \ 
    3655    $(MODEL_LIB)(prtctl.o) \ 
    3656    $(MODEL_LIB)(restart.o) \ 
    3657    $(MODEL_LIB)(sol_oce.o) \ 
    3658    $(MODEL_LIB)(solfet.o) \ 
    3659    $(MODEL_LIB)(solmat.o) \ 
    3660    $(MODEL_LIB)(solpcg.o) \ 
    3661    $(MODEL_LIB)(solsor.o) \ 
    3662    $(MODEL_LIB)(solver.o) \ 
    3663    $(MODEL_LIB)(zdf_oce.o) \ 
    3664    agrif_opa_interp.F90 \ 
    3665    cla_dynspg.F90 \ 
    3666    dom_oce.F90 \ 
    3667    dynspg_flt.F90 \ 
    3668    flxrnf.F90 \ 
    3669    in_out_manager.F90 \ 
    3670    iom.F90 \ 
    3671    lbclnk.F90 \ 
    3672    lib_mpp.F90 \ 
    3673    obc_oce.F90 \ 
    3674    obcdyn.F90 \ 
    3675    obcvol.F90 \ 
    3676    oce.F90 \ 
    3677    ocesbc.F90 \ 
    3678    phycst.F90 \ 
    3679    prtctl.F90 \ 
    3680    restart.F90 \ 
    3681    sol_oce.F90 \ 
    3682    solfet.F90 \ 
    3683    solmat.F90 \ 
    3684    solpcg.F90 \ 
    3685    solsor.F90 \ 
    3686    solver.F90 \ 
    3687    zdf_oce.F90 \ 
    3688    domzgr_substitute.h90 \ 
    3689    $(AGRIF_LIB) \ 
    3690    KEY_CPP \ 
    3691    dynspg_flt_jki.F90 
    36923376$(MODEL_LIB)(dynspg_oce.o) :  \ 
    36933377   $(MODEL_LIB)(par_kind.o) \ 
     
    39263610   KEY_CPP \ 
    39273611   dynspg_ts.F90 
    3928 $(MODEL_LIB)(dynspg_ts_jki.o) :  \ 
    3929    $(MODEL_LIB)(blk_oce.o) \ 
    3930    $(MODEL_LIB)(cpl_oce.o) \ 
    3931    $(MODEL_LIB)(daymod.o) \ 
    3932    $(MODEL_LIB)(dom_oce.o) \ 
    3933    $(MODEL_LIB)(domvvl.o) \ 
    3934    $(MODEL_LIB)(dtasal.o) \ 
    3935    $(MODEL_LIB)(dtasss.o) \ 
    3936    $(MODEL_LIB)(dtasst.o) \ 
    3937    $(MODEL_LIB)(dtatem.o) \ 
    3938    $(MODEL_LIB)(dynadv.o) \ 
    3939    $(MODEL_LIB)(dynspg_oce.o) \ 
    3940    $(MODEL_LIB)(dynvor.o) \ 
    3941    $(MODEL_LIB)(eosbn2.o) \ 
    3942    $(MODEL_LIB)(flx_oce.o) \ 
    3943    $(MODEL_LIB)(flxmod.o) \ 
    3944    $(MODEL_LIB)(flxrnf.o) \ 
    3945    $(MODEL_LIB)(ice_oce.o) \ 
    3946    $(MODEL_LIB)(in_out_manager.o) \ 
    3947    $(MODEL_LIB)(ini1d.o) \ 
    3948    $(MODEL_LIB)(iom.o) \ 
    3949    $(MODEL_LIB)(iom_def.o) \ 
    3950    $(MODEL_LIB)(iom_ioipsl.o) \ 
    3951    $(MODEL_LIB)(iom_nf90.o) \ 
    3952    $(MODEL_LIB)(iom_rstdimg.o) \ 
    3953    $(MODEL_LIB)(lbclnk.o) \ 
    3954    $(MODEL_LIB)(lib_mpp.o) \ 
    3955    $(MODEL_LIB)(lib_print.o) \ 
    3956    $(MODEL_LIB)(obc_oce.o) \ 
    3957    $(MODEL_LIB)(obc_par.o) \ 
    3958    $(MODEL_LIB)(obccli.o) \ 
    3959    $(MODEL_LIB)(obcdta.o) \ 
    3960    $(MODEL_LIB)(obcfla.o) \ 
    3961    $(MODEL_LIB)(oce.o) \ 
    3962    $(MODEL_LIB)(ocesbc.o) \ 
    3963    $(MODEL_LIB)(ocfzpt.o) \ 
    3964    $(MODEL_LIB)(par_kind.o) \ 
    3965    $(MODEL_LIB)(par_oce.o) \ 
    3966    $(MODEL_LIB)(phycst.o) \ 
    3967    $(MODEL_LIB)(prtctl.o) \ 
    3968    $(MODEL_LIB)(restart.o) \ 
    3969    $(MODEL_LIB)(taumod.o) \ 
    3970    $(MODEL_LIB)(tradmp.o) \ 
    3971    $(MODEL_LIB)(trdmld_oce.o) \ 
    3972    $(MODEL_LIB)(trdmod.o) \ 
    3973    $(MODEL_LIB)(trdmod_oce.o) \ 
    3974    $(MODEL_LIB)(zpshde.o) \ 
    3975    blk_oce.F90 \ 
    3976    cpl_oce.F90 \ 
    3977    daymod.F90 \ 
    3978    dom_oce.F90 \ 
    3979    domvvl.F90 \ 
    3980    dtasal.F90 \ 
    3981    dtasss.F90 \ 
    3982    dtasst.F90 \ 
    3983    dtatem.F90 \ 
    3984    dynadv.F90 \ 
    3985    dynspg_oce.F90 \ 
    3986    dynvor.F90 \ 
    3987    eosbn2.F90 \ 
    3988    flx_oce.F90 \ 
    3989    flxmod.F90 \ 
    3990    flxrnf.F90 \ 
    3991    ice_oce.F90 \ 
    3992    in_out_manager.F90 \ 
    3993    ini1d.F90 \ 
    3994    iom.F90 \ 
    3995    iom_def.F90 \ 
    3996    iom_ioipsl.F90 \ 
    3997    iom_nf90.F90 \ 
    3998    iom_rstdimg.F90 \ 
    3999    lbclnk.F90 \ 
    4000    lib_mpp.F90 \ 
    4001    lib_print.f90 \ 
    4002    obc_oce.F90 \ 
    4003    obc_par.F90 \ 
    4004    obccli.F90 \ 
    4005    obcdta.F90 \ 
    4006    obcfla.F90 \ 
    4007    oce.F90 \ 
    4008    ocesbc.F90 \ 
    4009    ocfzpt.F90 \ 
    4010    par_kind.F90 \ 
    4011    par_oce.F90 \ 
    4012    phycst.F90 \ 
    4013    prtctl.F90 \ 
    4014    restart.F90 \ 
    4015    taumod.F90 \ 
    4016    tradmp.F90 \ 
    4017    trdmld_oce.F90 \ 
    4018    trdmod.F90 \ 
    4019    trdmod_oce.F90 \ 
    4020    zpshde.F90 \ 
    4021    $(MODEL_LIB)(dom_oce.o) \ 
    4022    $(MODEL_LIB)(dynspg_oce.o) \ 
    4023    $(MODEL_LIB)(dynspg_ts.o) \ 
    4024    $(MODEL_LIB)(dynvor.o) \ 
    4025    $(MODEL_LIB)(in_out_manager.o) \ 
    4026    $(MODEL_LIB)(iom.o) \ 
    4027    $(MODEL_LIB)(lbclnk.o) \ 
    4028    $(MODEL_LIB)(lib_mpp.o) \ 
    4029    $(MODEL_LIB)(obc_oce.o) \ 
    4030    $(MODEL_LIB)(obc_par.o) \ 
    4031    $(MODEL_LIB)(obcdta.o) \ 
    4032    $(MODEL_LIB)(obcfla.o) \ 
    4033    $(MODEL_LIB)(oce.o) \ 
    4034    $(MODEL_LIB)(ocesbc.o) \ 
    4035    $(MODEL_LIB)(phycst.o) \ 
    4036    $(MODEL_LIB)(prtctl.o) \ 
    4037    $(MODEL_LIB)(restart.o) \ 
    4038    dom_oce.F90 \ 
    4039    dynspg_oce.F90 \ 
    4040    dynspg_ts.F90 \ 
    4041    dynvor.F90 \ 
    4042    in_out_manager.F90 \ 
    4043    iom.F90 \ 
    4044    lbclnk.F90 \ 
    4045    lib_mpp.F90 \ 
    4046    obc_oce.F90 \ 
    4047    obc_par.F90 \ 
    4048    obcdta.F90 \ 
    4049    obcfla.F90 \ 
    4050    oce.F90 \ 
    4051    ocesbc.F90 \ 
    4052    phycst.F90 \ 
    4053    prtctl.F90 \ 
    4054    restart.F90 \ 
    4055    domzgr_substitute.h90 \ 
    4056    vectopt_loop_substitute.h90 \ 
    4057    KEY_CPP \ 
    4058    dynspg_ts_jki.F90 
    40593612$(MODEL_LIB)(dynvor.o) :   \ 
    40603613   $(MODEL_LIB)(dom_oce.o) \ 
     
    42393792   $(MODEL_LIB)(dynzdf_exp.o) \ 
    42403793   $(MODEL_LIB)(dynzdf_imp.o) \ 
    4241    $(MODEL_LIB)(dynzdf_imp_jki.o) \ 
    42423794   $(MODEL_LIB)(in_out_manager.o) \ 
    42433795   $(MODEL_LIB)(ldfdyn_oce.o) \ 
     
    42523804   dynzdf_exp.F90 \ 
    42533805   dynzdf_imp.F90 \ 
    4254    dynzdf_imp_jki.F90 \ 
    42553806   in_out_manager.F90 \ 
    42563807   ldfdyn_oce.F90 \ 
     
    43493900   KEY_CPP \ 
    43503901   dynzdf_imp.F90 
    4351 $(MODEL_LIB)(dynzdf_imp_jki.o) : \ 
    4352    $(MODEL_LIB)(cpl_oasis3.o) \ 
    4353    $(MODEL_LIB)(cpl_oasis4.o) \ 
    4354    $(MODEL_LIB)(daymod.o) \ 
    4355    $(MODEL_LIB)(dom_oce.o) \ 
    4356    $(MODEL_LIB)(geo2ocean.o) \ 
    4357    $(MODEL_LIB)(ice.o) \ 
    4358    $(MODEL_LIB)(in_out_manager.o) \ 
    4359    $(MODEL_LIB)(lbclnk.o) \ 
    4360    $(MODEL_LIB)(lib_print.o) \ 
    4361    $(MODEL_LIB)(par_kind.o) \ 
    4362    $(MODEL_LIB)(par_oce.o) \ 
    4363    $(MODEL_LIB)(phycst.o) \ 
    4364    cpl_oasis3.F90 \ 
    4365    cpl_oasis4.F90 \ 
    4366    daymod.F90 \ 
    4367    dom_oce.F90 \ 
    4368    geo2ocean.F90 \ 
    4369    ice.F90 \ 
    4370    in_out_manager.F90 \ 
    4371    lbclnk.F90 \ 
    4372    lib_print.f90 \ 
    4373    par_kind.F90 \ 
    4374    par_oce.F90 \ 
    4375    phycst.F90 \ 
    4376    $(MODEL_LIB)(dom_oce.o) \ 
    4377    $(MODEL_LIB)(in_out_manager.o) \ 
    4378    $(MODEL_LIB)(oce.o) \ 
    4379    $(MODEL_LIB)(phycst.o) \ 
    4380    $(MODEL_LIB)(taumod.o) \ 
    4381    $(MODEL_LIB)(zdf_oce.o) \ 
    4382    dom_oce.F90 \ 
    4383    in_out_manager.F90 \ 
    4384    oce.F90 \ 
    4385    phycst.F90 \ 
    4386    taumod.F90 \ 
    4387    zdf_oce.F90 \ 
    4388    domzgr_substitute.h90 \ 
    4389    vectopt_loop_substitute.h90 \ 
    4390    KEY_CPP \ 
    4391    dynzdf_imp_jki.F90 
    43923902$(MODEL_LIB)(eosbn2.o) :   \ 
    43933903   $(MODEL_LIB)(dom_oce.o) \ 
     
    53664876   $(MODEL_LIB)(domvvl.o) \ 
    53674877   $(MODEL_LIB)(dynspg_exp.o) \ 
    5368    $(MODEL_LIB)(dynspg_exp_jki.o) \ 
    53694878   $(MODEL_LIB)(dynspg_flt.o) \ 
    5370    $(MODEL_LIB)(dynspg_flt_jki.o) \ 
    53714879   $(MODEL_LIB)(dynspg_oce.o) \ 
    53724880   $(MODEL_LIB)(dynspg_rl.o) \ 
    53734881   $(MODEL_LIB)(dynspg_ts.o) \ 
    5374    $(MODEL_LIB)(dynspg_ts_jki.o) \ 
    53754882   $(MODEL_LIB)(dynvor.o) \ 
    53764883   $(MODEL_LIB)(eosbn2.o) \ 
     
    54204927   domvvl.F90 \ 
    54214928   dynspg_exp.F90 \ 
    5422    dynspg_exp_jki.F90 \ 
    54234929   dynspg_flt.F90 \ 
    5424    dynspg_flt_jki.F90 \ 
    54254930   dynspg_oce.F90 \ 
    54264931   dynspg_rl.F90 \ 
    54274932   dynspg_ts.F90 \ 
    5428    dynspg_ts_jki.F90 \ 
    54294933   dynvor.F90 \ 
    54304934   eosbn2.F90 \ 
     
    74296933   $(MODEL_LIB)(zdfric.o) \ 
    74306934   $(MODEL_LIB)(zdftke.o) \ 
    7431    $(MODEL_LIB)(zdftke_jki.o) \ 
    74326935   $(MODEL_LIB)(zpshde.o) \ 
    74336936   agrif_opa_sponge.F90 \ 
     
    75507053   zdfric.F90 \ 
    75517054   zdftke.F90 \ 
    7552    zdftke_jki.F90 \ 
    75537055   zpshde.F90 \ 
    75547056   $(MODEL_LIB)(cpl.o) \ 
     
    80087510   $(MODEL_LIB)(dynadv_cen2.o) \ 
    80097511   $(MODEL_LIB)(dynadv_ubs.o) \ 
    8010    $(MODEL_LIB)(dynhpg_jki.o) \ 
    80117512   $(MODEL_LIB)(dynkeg.o) \ 
    80127513   $(MODEL_LIB)(dynldf_bilap.o) \ 
     
    80157516   $(MODEL_LIB)(dynldf_lap.o) \ 
    80167517   $(MODEL_LIB)(dynspg_exp.o) \ 
    8017    $(MODEL_LIB)(dynspg_exp_jki.o) \ 
    80187518   $(MODEL_LIB)(dynspg_flt.o) \ 
    8019    $(MODEL_LIB)(dynspg_flt_jki.o) \ 
    80207519   $(MODEL_LIB)(dynspg_oce.o) \ 
    80217520   $(MODEL_LIB)(dynspg_rl.o) \ 
    80227521   $(MODEL_LIB)(dynspg_ts.o) \ 
    8023    $(MODEL_LIB)(dynspg_ts_jki.o) \ 
    80247522   $(MODEL_LIB)(dynzad.o) \ 
    80257523   $(MODEL_LIB)(dynzdf_exp.o) \ 
    80267524   $(MODEL_LIB)(dynzdf_imp.o) \ 
    8027    $(MODEL_LIB)(dynzdf_imp_jki.o) \ 
    80287525   $(MODEL_LIB)(eosbn2.o) \ 
    80297526   $(MODEL_LIB)(flo4rk.o) \ 
     
    80817578   $(MODEL_LIB)(taumod.o) \ 
    80827579   $(MODEL_LIB)(traadv_cen2.o) \ 
    8083    $(MODEL_LIB)(traadv_cen2_jki.o) \ 
    80847580   $(MODEL_LIB)(traadv_eiv.o) \ 
    80857581   $(MODEL_LIB)(traadv_muscl.o) \ 
     
    80987594   $(MODEL_LIB)(trazdf_exp.o) \ 
    80997595   $(MODEL_LIB)(trazdf_imp.o) \ 
    8100    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    81017596   $(MODEL_LIB)(trc_oce.o) \ 
    81027597   $(MODEL_LIB)(trdicp_oce.o) \ 
     
    81347629   dynadv_cen2.F90 \ 
    81357630   dynadv_ubs.F90 \ 
    8136    dynhpg_jki.F90 \ 
    81377631   dynkeg.F90 \ 
    81387632   dynldf_bilap.F90 \ 
     
    81417635   dynldf_lap.F90 \ 
    81427636   dynspg_exp.F90 \ 
    8143    dynspg_exp_jki.F90 \ 
    81447637   dynspg_flt.F90 \ 
    8145    dynspg_flt_jki.F90 \ 
    81467638   dynspg_oce.F90 \ 
    81477639   dynspg_rl.F90 \ 
    81487640   dynspg_ts.F90 \ 
    8149    dynspg_ts_jki.F90 \ 
    81507641   dynzad.F90 \ 
    81517642   dynzdf_exp.F90 \ 
    81527643   dynzdf_imp.F90 \ 
    8153    dynzdf_imp_jki.F90 \ 
    81547644   eosbn2.F90 \ 
    81557645   flo4rk.F90 \ 
     
    82077697   taumod.F90 \ 
    82087698   traadv_cen2.F90 \ 
    8209    traadv_cen2_jki.F90 \ 
    82107699   traadv_eiv.F90 \ 
    82117700   traadv_muscl.F90 \ 
     
    82247713   trazdf_exp.F90 \ 
    82257714   trazdf_imp.F90 \ 
    8226    trazdf_imp_jki.F90 \ 
    82277715   trc_oce.F90 \ 
    82287716   trdicp_oce.F90 \ 
     
    83197807   $(MODEL_LIB)(zdfric.o) \ 
    83207808   $(MODEL_LIB)(zdftke.o) \ 
    8321    $(MODEL_LIB)(zdftke_jki.o) \ 
    83227809   $(MODEL_LIB)(zpshde.o) \ 
    83237810   agrif_opa_sponge.F90 \ 
     
    84027889   zdfric.F90 \ 
    84037890   zdftke.F90 \ 
    8404    zdftke_jki.F90 \ 
    84057891   zpshde.F90 \ 
    84067892   domzgr_substitute.h90 \ 
     
    84327918   $(MODEL_LIB)(dynzdf_exp.o) \ 
    84337919   $(MODEL_LIB)(dynzdf_imp.o) \ 
    8434    $(MODEL_LIB)(dynzdf_imp_jki.o) \ 
    84357920   $(MODEL_LIB)(eosbn2.o) \ 
    84367921   $(MODEL_LIB)(flx_oce.o) \ 
     
    84697954   $(MODEL_LIB)(trazdf_exp.o) \ 
    84707955   $(MODEL_LIB)(trazdf_imp.o) \ 
    8471    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    84727956   $(MODEL_LIB)(trc_oce.o) \ 
    84737957   $(MODEL_LIB)(trdmld_oce.o) \ 
     
    85027986   dynzdf_exp.F90 \ 
    85037987   dynzdf_imp.F90 \ 
    8504    dynzdf_imp_jki.F90 \ 
    85057988   eosbn2.F90 \ 
    85067989   flx_oce.F90 \ 
     
    85398022   trazdf_exp.F90 \ 
    85408023   trazdf_imp.F90 \ 
    8541    trazdf_imp_jki.F90 \ 
    85428024   trc_oce.F90 \ 
    85438025   trdmld_oce.F90 \ 
     
    88258307   $(MODEL_LIB)(prtctl.o) \ 
    88268308   $(MODEL_LIB)(traadv_cen2.o) \ 
    8827    $(MODEL_LIB)(traadv_cen2_jki.o) \ 
    88288309   $(MODEL_LIB)(traadv_eiv.o) \ 
    88298310   $(MODEL_LIB)(traadv_muscl.o) \ 
     
    88398320   prtctl.F90 \ 
    88408321   traadv_cen2.F90 \ 
    8841    traadv_cen2_jki.F90 \ 
    88428322   traadv_eiv.F90 \ 
    88438323   traadv_muscl.F90 \ 
     
    89328412   KEY_CPP \ 
    89338413   traadv_cen2.F90 
    8934 $(MODEL_LIB)(traadv_cen2_jki.o) :   \ 
     8414$(MODEL_LIB)(traadv_eiv.o) :  \ 
     8415   $(MODEL_LIB)(dom_oce.o) \ 
     8416   $(MODEL_LIB)(in_out_manager.o) \ 
     8417   $(MODEL_LIB)(lbclnk.o) \ 
     8418   $(MODEL_LIB)(ldfdyn_oce.o) \ 
     8419   $(MODEL_LIB)(ldftra_oce.o) \ 
     8420   $(MODEL_LIB)(lib_print.o) \ 
     8421   $(MODEL_LIB)(oce.o) \ 
     8422   $(MODEL_LIB)(par_kind.o) \ 
     8423   $(MODEL_LIB)(par_oce.o) \ 
     8424   $(MODEL_LIB)(phycst.o) \ 
     8425   $(MODEL_LIB)(prtctl.o) \ 
     8426   $(MODEL_LIB)(zdfmxl.o) \ 
     8427   dom_oce.F90 \ 
     8428   in_out_manager.F90 \ 
     8429   lbclnk.F90 \ 
     8430   ldfdyn_oce.F90 \ 
     8431   ldftra_oce.F90 \ 
     8432   lib_print.f90 \ 
     8433   oce.F90 \ 
     8434   par_kind.F90 \ 
     8435   par_oce.F90 \ 
     8436   phycst.F90 \ 
     8437   prtctl.F90 \ 
     8438   zdfmxl.F90 \ 
     8439   $(MODEL_LIB)(dom_oce.o) \ 
     8440   $(MODEL_LIB)(in_out_manager.o) \ 
     8441   $(MODEL_LIB)(ldfslp.o) \ 
     8442   $(MODEL_LIB)(ldftra_oce.o) \ 
     8443   $(MODEL_LIB)(oce.o) \ 
     8444   dom_oce.F90 \ 
     8445   in_out_manager.F90 \ 
     8446   ldfslp.F90 \ 
     8447   ldftra_oce.F90 \ 
     8448   oce.F90 \ 
     8449   domzgr_substitute.h90 \ 
     8450   ldfeiv_substitute.h90 \ 
     8451   ldftra_substitute.h90 \ 
     8452   vectopt_loop_substitute.h90 \ 
     8453   KEY_CPP \ 
     8454   traadv_eiv.F90 
     8455$(MODEL_LIB)(traadv_muscl.o) :   \ 
    89358456   $(MODEL_LIB)(daymod.o) \ 
    89368457   $(MODEL_LIB)(dianam.o) \ 
     
    89868507   $(MODEL_LIB)(dom_oce.o) \ 
    89878508   $(MODEL_LIB)(dynspg_oce.o) \ 
    8988    $(MODEL_LIB)(flxrnf.o) \ 
    8989    $(MODEL_LIB)(in_out_manager.o) \ 
    8990    $(MODEL_LIB)(lbclnk.o) \ 
    8991    $(MODEL_LIB)(lib_mpp.o) \ 
    8992    $(MODEL_LIB)(oce.o) \ 
    8993    $(MODEL_LIB)(ocfzpt.o) \ 
     8509   $(MODEL_LIB)(in_out_manager.o) \ 
     8510   $(MODEL_LIB)(lbclnk.o) \ 
     8511   $(MODEL_LIB)(lib_mpp.o) \ 
     8512   $(MODEL_LIB)(oce.o) \ 
    89948513   $(MODEL_LIB)(prtctl.o) \ 
    89958514   $(MODEL_LIB)(trabbl.o) \ 
     
    89998518   dom_oce.F90 \ 
    90008519   dynspg_oce.F90 \ 
    9001    flxrnf.F90 \ 
    9002    in_out_manager.F90 \ 
    9003    lbclnk.F90 \ 
    9004    lib_mpp.F90 \ 
    9005    oce.F90 \ 
    9006    ocfzpt.F90 \ 
     8520   in_out_manager.F90 \ 
     8521   lbclnk.F90 \ 
     8522   lib_mpp.F90 \ 
     8523   oce.F90 \ 
    90078524   prtctl.F90 \ 
    90088525   trabbl.F90 \ 
     
    90128529   vectopt_loop_substitute.h90 \ 
    90138530   KEY_CPP \ 
    9014    traadv_cen2_jki.F90 
    9015 $(MODEL_LIB)(traadv_eiv.o) :  \ 
    9016    $(MODEL_LIB)(dom_oce.o) \ 
    9017    $(MODEL_LIB)(in_out_manager.o) \ 
    9018    $(MODEL_LIB)(lbclnk.o) \ 
    9019    $(MODEL_LIB)(ldfdyn_oce.o) \ 
    9020    $(MODEL_LIB)(ldftra_oce.o) \ 
    9021    $(MODEL_LIB)(lib_print.o) \ 
    9022    $(MODEL_LIB)(oce.o) \ 
    9023    $(MODEL_LIB)(par_kind.o) \ 
    9024    $(MODEL_LIB)(par_oce.o) \ 
    9025    $(MODEL_LIB)(phycst.o) \ 
    9026    $(MODEL_LIB)(prtctl.o) \ 
    9027    $(MODEL_LIB)(zdfmxl.o) \ 
    9028    dom_oce.F90 \ 
    9029    in_out_manager.F90 \ 
    9030    lbclnk.F90 \ 
    9031    ldfdyn_oce.F90 \ 
    9032    ldftra_oce.F90 \ 
    9033    lib_print.f90 \ 
    9034    oce.F90 \ 
    9035    par_kind.F90 \ 
    9036    par_oce.F90 \ 
    9037    phycst.F90 \ 
    9038    prtctl.F90 \ 
    9039    zdfmxl.F90 \ 
    9040    $(MODEL_LIB)(dom_oce.o) \ 
    9041    $(MODEL_LIB)(in_out_manager.o) \ 
    9042    $(MODEL_LIB)(ldfslp.o) \ 
    9043    $(MODEL_LIB)(ldftra_oce.o) \ 
    9044    $(MODEL_LIB)(oce.o) \ 
    9045    dom_oce.F90 \ 
    9046    in_out_manager.F90 \ 
    9047    ldfslp.F90 \ 
    9048    ldftra_oce.F90 \ 
    9049    oce.F90 \ 
    9050    domzgr_substitute.h90 \ 
    9051    ldfeiv_substitute.h90 \ 
    9052    ldftra_substitute.h90 \ 
    9053    vectopt_loop_substitute.h90 \ 
    9054    KEY_CPP \ 
    9055    traadv_eiv.F90 
    9056 $(MODEL_LIB)(traadv_muscl.o) :   \ 
     8531   traadv_muscl.F90 
     8532$(MODEL_LIB)(traadv_muscl2.o) :  \ 
    90578533   $(MODEL_LIB)(daymod.o) \ 
    90588534   $(MODEL_LIB)(dianam.o) \ 
     
    91308606   vectopt_loop_substitute.h90 \ 
    91318607   KEY_CPP \ 
    9132    traadv_muscl.F90 
    9133 $(MODEL_LIB)(traadv_muscl2.o) :  \ 
     8608   traadv_muscl2.F90 
     8609$(MODEL_LIB)(traadv_qck.o) :  \ 
    91348610   $(MODEL_LIB)(daymod.o) \ 
    91358611   $(MODEL_LIB)(dianam.o) \ 
     
    91858661   $(MODEL_LIB)(dom_oce.o) \ 
    91868662   $(MODEL_LIB)(dynspg_oce.o) \ 
    9187    $(MODEL_LIB)(in_out_manager.o) \ 
    9188    $(MODEL_LIB)(lbclnk.o) \ 
    9189    $(MODEL_LIB)(lib_mpp.o) \ 
    9190    $(MODEL_LIB)(oce.o) \ 
     8663   $(MODEL_LIB)(flxrnf.o) \ 
     8664   $(MODEL_LIB)(in_out_manager.o) \ 
     8665   $(MODEL_LIB)(lbclnk.o) \ 
     8666   $(MODEL_LIB)(lib_mpp.o) \ 
     8667   $(MODEL_LIB)(oce.o) \ 
     8668   $(MODEL_LIB)(ocfzpt.o) \ 
    91918669   $(MODEL_LIB)(prtctl.o) \ 
    91928670   $(MODEL_LIB)(trabbl.o) \ 
     
    91968674   dom_oce.F90 \ 
    91978675   dynspg_oce.F90 \ 
    9198    in_out_manager.F90 \ 
    9199    lbclnk.F90 \ 
    9200    lib_mpp.F90 \ 
    9201    oce.F90 \ 
     8676   flxrnf.F90 \ 
     8677   in_out_manager.F90 \ 
     8678   lbclnk.F90 \ 
     8679   lib_mpp.F90 \ 
     8680   oce.F90 \ 
     8681   ocfzpt.F90 \ 
    92028682   prtctl.F90 \ 
    92038683   trabbl.F90 \ 
     
    92078687   vectopt_loop_substitute.h90 \ 
    92088688   KEY_CPP \ 
    9209    traadv_muscl2.F90 
    9210 $(MODEL_LIB)(traadv_qck.o) :  \ 
     8689   traadv_qck.F90 
     8690$(MODEL_LIB)(traadv_tvd.o) :  \ 
    92118691   $(MODEL_LIB)(daymod.o) \ 
    92128692   $(MODEL_LIB)(dianam.o) \ 
     
    92628742   $(MODEL_LIB)(dom_oce.o) \ 
    92638743   $(MODEL_LIB)(dynspg_oce.o) \ 
    9264    $(MODEL_LIB)(flxrnf.o) \ 
    9265    $(MODEL_LIB)(in_out_manager.o) \ 
    9266    $(MODEL_LIB)(lbclnk.o) \ 
    9267    $(MODEL_LIB)(lib_mpp.o) \ 
    9268    $(MODEL_LIB)(oce.o) \ 
    9269    $(MODEL_LIB)(ocfzpt.o) \ 
    9270    $(MODEL_LIB)(prtctl.o) \ 
    9271    $(MODEL_LIB)(trabbl.o) \ 
    9272    $(MODEL_LIB)(trdmod.o) \ 
    9273    $(MODEL_LIB)(trdmod_oce.o) \ 
    9274    diaptr.F90 \ 
    9275    dom_oce.F90 \ 
    9276    dynspg_oce.F90 \ 
    9277    flxrnf.F90 \ 
    9278    in_out_manager.F90 \ 
    9279    lbclnk.F90 \ 
    9280    lib_mpp.F90 \ 
    9281    oce.F90 \ 
    9282    ocfzpt.F90 \ 
    9283    prtctl.F90 \ 
    9284    trabbl.F90 \ 
    9285    trdmod.F90 \ 
    9286    trdmod_oce.F90 \ 
    9287    domzgr_substitute.h90 \ 
    9288    vectopt_loop_substitute.h90 \ 
    9289    KEY_CPP \ 
    9290    traadv_qck.F90 
    9291 $(MODEL_LIB)(traadv_tvd.o) :  \ 
    9292    $(MODEL_LIB)(daymod.o) \ 
    9293    $(MODEL_LIB)(dianam.o) \ 
    9294    $(MODEL_LIB)(dom_oce.o) \ 
    9295    $(MODEL_LIB)(eosbn2.o) \ 
    9296    $(MODEL_LIB)(in_out_manager.o) \ 
    9297    $(MODEL_LIB)(iom.o) \ 
    9298    $(MODEL_LIB)(lbclnk.o) \ 
    9299    $(MODEL_LIB)(ldftra_oce.o) \ 
    9300    $(MODEL_LIB)(lib_mpp.o) \ 
    9301    $(MODEL_LIB)(lib_print.o) \ 
    9302    $(MODEL_LIB)(oce.o) \ 
    9303    $(MODEL_LIB)(par_kind.o) \ 
    9304    $(MODEL_LIB)(par_oce.o) \ 
    9305    $(MODEL_LIB)(phycst.o) \ 
    9306    $(MODEL_LIB)(prtctl.o) \ 
    9307    $(MODEL_LIB)(taumod.o) \ 
    9308    $(MODEL_LIB)(trdicp.o) \ 
    9309    $(MODEL_LIB)(trdicp_oce.o) \ 
    9310    $(MODEL_LIB)(trdmld.o) \ 
    9311    $(MODEL_LIB)(trdmld_oce.o) \ 
    9312    $(MODEL_LIB)(trdmod.o) \ 
    9313    $(MODEL_LIB)(trdmod_oce.o) \ 
    9314    $(MODEL_LIB)(trdvor.o) \ 
    9315    $(MODEL_LIB)(trdvor_oce.o) \ 
    9316    $(MODEL_LIB)(zdf_oce.o) \ 
    9317    daymod.F90 \ 
    9318    dianam.F90 \ 
    9319    dom_oce.F90 \ 
    9320    eosbn2.F90 \ 
    9321    in_out_manager.F90 \ 
    9322    iom.F90 \ 
    9323    lbclnk.F90 \ 
    9324    ldftra_oce.F90 \ 
    9325    lib_mpp.F90 \ 
    9326    lib_print.f90 \ 
    9327    oce.F90 \ 
    9328    par_kind.F90 \ 
    9329    par_oce.F90 \ 
    9330    phycst.F90 \ 
    9331    prtctl.F90 \ 
    9332    taumod.F90 \ 
    9333    trdicp.F90 \ 
    9334    trdicp_oce.F90 \ 
    9335    trdmld.F90 \ 
    9336    trdmld_oce.F90 \ 
    9337    trdmod.F90 \ 
    9338    trdmod_oce.F90 \ 
    9339    trdvor.F90 \ 
    9340    trdvor_oce.F90 \ 
    9341    zdf_oce.F90 \ 
    9342    $(MODEL_LIB)(diaptr.o) \ 
    9343    $(MODEL_LIB)(dom_oce.o) \ 
    9344    $(MODEL_LIB)(dynspg_oce.o) \ 
    93458744   $(MODEL_LIB)(in_out_manager.o) \ 
    93468745   $(MODEL_LIB)(lbclnk.o) \ 
     
    96709069   $(MODEL_LIB)(trazdf_exp.o) \ 
    96719070   $(MODEL_LIB)(trazdf_imp.o) \ 
    9672    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    96739071   $(MODEL_LIB)(trdicp.o) \ 
    96749072   $(MODEL_LIB)(trdicp_oce.o) \ 
     
    97039101   trazdf_exp.F90 \ 
    97049102   trazdf_imp.F90 \ 
    9705    trazdf_imp_jki.F90 \ 
    97069103   trdicp.F90 \ 
    97079104   trdicp_oce.F90 \ 
     
    105019898   $(MODEL_LIB)(trazdf_exp.o) \ 
    105029899   $(MODEL_LIB)(trazdf_imp.o) \ 
    10503    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    105049900   $(MODEL_LIB)(trdmod.o) \ 
    105059901   $(MODEL_LIB)(trdmod_oce.o) \ 
     
    105199915   trazdf_exp.F90 \ 
    105209916   trazdf_imp.F90 \ 
    10521    trazdf_imp_jki.F90 \ 
    105229917   trdmod.F90 \ 
    105239918   trdmod_oce.F90 \ 
     
    1067010065   KEY_CPP \ 
    1067110066   trazdf_imp.F90 
    10672 $(MODEL_LIB)(trazdf_imp_jki.o) : \ 
    10673    $(MODEL_LIB)(dom_oce.o) \ 
    10674    $(MODEL_LIB)(in_out_manager.o) \ 
    10675    $(MODEL_LIB)(lbclnk.o) \ 
    10676    $(MODEL_LIB)(ldfdyn_oce.o) \ 
    10677    $(MODEL_LIB)(ldftra_oce.o) \ 
    10678    $(MODEL_LIB)(lib_mpp.o) \ 
    10679    $(MODEL_LIB)(lib_print.o) \ 
    10680    $(MODEL_LIB)(oce.o) \ 
    10681    $(MODEL_LIB)(par_kind.o) \ 
    10682    $(MODEL_LIB)(par_oce.o) \ 
    10683    $(MODEL_LIB)(phycst.o) \ 
    10684    $(MODEL_LIB)(prtctl.o) \ 
    10685    $(MODEL_LIB)(taumod.o) \ 
    10686    $(MODEL_LIB)(trdicp.o) \ 
    10687    $(MODEL_LIB)(trdicp_oce.o) \ 
    10688    $(MODEL_LIB)(trdmld.o) \ 
    10689    $(MODEL_LIB)(trdmld_oce.o) \ 
    10690    $(MODEL_LIB)(trdmod_oce.o) \ 
    10691    $(MODEL_LIB)(trdvor.o) \ 
    10692    $(MODEL_LIB)(trdvor_oce.o) \ 
    10693    $(MODEL_LIB)(zdf_oce.o) \ 
    10694    $(MODEL_LIB)(zdfmxl.o) \ 
    10695    dom_oce.F90 \ 
    10696    in_out_manager.F90 \ 
    10697    lbclnk.F90 \ 
    10698    ldfdyn_oce.F90 \ 
    10699    ldftra_oce.F90 \ 
    10700    lib_mpp.F90 \ 
    10701    lib_print.f90 \ 
    10702    oce.F90 \ 
    10703    par_kind.F90 \ 
    10704    par_oce.F90 \ 
    10705    phycst.F90 \ 
    10706    prtctl.F90 \ 
    10707    taumod.F90 \ 
    10708    trdicp.F90 \ 
    10709    trdicp_oce.F90 \ 
    10710    trdmld.F90 \ 
    10711    trdmld_oce.F90 \ 
    10712    trdmod_oce.F90 \ 
    10713    trdvor.F90 \ 
    10714    trdvor_oce.F90 \ 
    10715    zdf_oce.F90 \ 
    10716    zdfmxl.F90 \ 
    10717    $(MODEL_LIB)(dom_oce.o) \ 
    10718    $(MODEL_LIB)(in_out_manager.o) \ 
    10719    $(MODEL_LIB)(lbclnk.o) \ 
    10720    $(MODEL_LIB)(ldfslp.o) \ 
    10721    $(MODEL_LIB)(ldftra_oce.o) \ 
    10722    $(MODEL_LIB)(oce.o) \ 
    10723    $(MODEL_LIB)(prtctl.o) \ 
    10724    $(MODEL_LIB)(trdmod.o) \ 
    10725    $(MODEL_LIB)(trdmod_oce.o) \ 
    10726    $(MODEL_LIB)(zdf_oce.o) \ 
    10727    $(MODEL_LIB)(zdfddm.o) \ 
    10728    dom_oce.F90 \ 
    10729    in_out_manager.F90 \ 
    10730    lbclnk.F90 \ 
    10731    ldfslp.F90 \ 
    10732    ldftra_oce.F90 \ 
    10733    oce.F90 \ 
    10734    prtctl.F90 \ 
    10735    trdmod.F90 \ 
    10736    trdmod_oce.F90 \ 
    10737    zdf_oce.F90 \ 
    10738    zdfddm.F90 \ 
    10739    domzgr_substitute.h90 \ 
    10740    ldftra_substitute.h90 \ 
    10741    zdf.matrixsolver.h90 \ 
    10742    zdfddm_substitute.h90 \ 
    10743    KEY_CPP \ 
    10744    trazdf_imp_jki.F90 
    1074510067$(MODEL_LIB)(trc_oce.o) :  \ 
    1074610068   $(MODEL_LIB)(par_kind.o) \ 
     
    1163010952   KEY_CPP \ 
    1163110953   zdftke.F90 
    11632 $(MODEL_LIB)(zdftke_jki.o) :  \ 
    11633    $(MODEL_LIB)(blk_oce.o) \ 
    11634    $(MODEL_LIB)(cpl_oasis3.o) \ 
    11635    $(MODEL_LIB)(cpl_oasis4.o) \ 
    11636    $(MODEL_LIB)(cpl_oce.o) \ 
    11637    $(MODEL_LIB)(daymod.o) \ 
    11638    $(MODEL_LIB)(dom_oce.o) \ 
    11639    $(MODEL_LIB)(dynzdf_exp.o) \ 
    11640    $(MODEL_LIB)(eosbn2.o) \ 
    11641    $(MODEL_LIB)(geo2ocean.o) \ 
    11642    $(MODEL_LIB)(ice.o) \ 
    11643    $(MODEL_LIB)(ice_oce.o) \ 
    11644    $(MODEL_LIB)(in_out_manager.o) \ 
    11645    $(MODEL_LIB)(ini1d.o) \ 
    11646    $(MODEL_LIB)(iom.o) \ 
    11647    $(MODEL_LIB)(lbclnk.o) \ 
    11648    $(MODEL_LIB)(lib_mpp.o) \ 
    11649    $(MODEL_LIB)(lib_print.o) \ 
    11650    $(MODEL_LIB)(oce.o) \ 
    11651    $(MODEL_LIB)(par_kind.o) \ 
    11652    $(MODEL_LIB)(par_oce.o) \ 
    11653    $(MODEL_LIB)(phycst.o) \ 
    11654    $(MODEL_LIB)(prtctl.o) \ 
    11655    $(MODEL_LIB)(restart.o) \ 
    11656    $(MODEL_LIB)(taumod.o) \ 
    11657    $(MODEL_LIB)(trazdf_exp.o) \ 
    11658    $(MODEL_LIB)(trdmld_oce.o) \ 
    11659    $(MODEL_LIB)(zdf_oce.o) \ 
    11660    $(MODEL_LIB)(zpshde.o) \ 
    11661    blk_oce.F90 \ 
    11662    cpl_oasis3.F90 \ 
    11663    cpl_oasis4.F90 \ 
    11664    cpl_oce.F90 \ 
    11665    daymod.F90 \ 
    11666    dom_oce.F90 \ 
    11667    dynzdf_exp.F90 \ 
    11668    eosbn2.F90 \ 
    11669    geo2ocean.F90 \ 
    11670    ice.F90 \ 
    11671    ice_oce.F90 \ 
    11672    in_out_manager.F90 \ 
    11673    ini1d.F90 \ 
    11674    iom.F90 \ 
    11675    lbclnk.F90 \ 
    11676    lib_mpp.F90 \ 
    11677    lib_print.f90 \ 
    11678    oce.F90 \ 
    11679    par_kind.F90 \ 
    11680    par_oce.F90 \ 
    11681    phycst.F90 \ 
    11682    prtctl.F90 \ 
    11683    restart.F90 \ 
    11684    taumod.F90 \ 
    11685    trazdf_exp.F90 \ 
    11686    trdmld_oce.F90 \ 
    11687    zdf_oce.F90 \ 
    11688    zpshde.F90 \ 
    11689    $(MODEL_LIB)(dom_oce.o) \ 
    11690    $(MODEL_LIB)(in_out_manager.o) \ 
    11691    $(MODEL_LIB)(lbclnk.o) \ 
    11692    $(MODEL_LIB)(oce.o) \ 
    11693    $(MODEL_LIB)(phycst.o) \ 
    11694    $(MODEL_LIB)(prtctl.o) \ 
    11695    $(MODEL_LIB)(restart.o) \ 
    11696    $(MODEL_LIB)(taumod.o) \ 
    11697    $(MODEL_LIB)(zdf_oce.o) \ 
    11698    $(MODEL_LIB)(zdftke.o) \ 
    11699    dom_oce.F90 \ 
    11700    in_out_manager.F90 \ 
    11701    lbclnk.F90 \ 
    11702    oce.F90 \ 
    11703    phycst.F90 \ 
    11704    prtctl.F90 \ 
    11705    restart.F90 \ 
    11706    taumod.F90 \ 
    11707    zdf_oce.F90 \ 
    11708    zdftke.F90 \ 
    11709    domzgr_substitute.h90 \ 
    11710    vectopt_loop_substitute.h90 \ 
    11711    KEY_CPP \ 
    11712    zdftke_jki.F90 
    1171310954$(MODEL_LIB)(zpshde.o) :   \ 
    1171410955   $(MODEL_LIB)(dom_oce.o) \ 
  • trunk/CONFIG/ORCA2_LIM/scripts/BB_make

    r784 r789  
    120120     key_mpp_dyndist \ 
    121121     key_mpp_mpi \ 
    122      key_mpp_omp \ 
    123122     key_mpp_shmem \ 
    124123     key_noslip_accurate \ 
     
    213212      $(MODEL_LIB)(dyncor1d.o)\ 
    214213      $(MODEL_LIB)(dynhpg.o)\ 
    215       $(MODEL_LIB)(dynhpg_jki.o)\ 
    216214      $(MODEL_LIB)(dynkeg.o)\ 
    217215      $(MODEL_LIB)(dynldf.o)\ 
     
    224222      $(MODEL_LIB)(dynspg.o)\ 
    225223      $(MODEL_LIB)(dynspg_exp.o)\ 
    226       $(MODEL_LIB)(dynspg_exp_jki.o)\ 
    227224      $(MODEL_LIB)(dynspg_flt.o)\ 
    228       $(MODEL_LIB)(dynspg_flt_jki.o)\ 
    229225      $(MODEL_LIB)(dynspg_oce.o)\ 
    230226      $(MODEL_LIB)(dynspg_rl.o)\ 
    231227      $(MODEL_LIB)(dynspg_ts.o)\ 
    232       $(MODEL_LIB)(dynspg_ts_jki.o)\ 
    233228      $(MODEL_LIB)(dynvor.o)\ 
    234229      $(MODEL_LIB)(dynzad.o)\ 
     
    236231      $(MODEL_LIB)(dynzdf_exp.o)\ 
    237232      $(MODEL_LIB)(dynzdf_imp.o)\ 
    238       $(MODEL_LIB)(dynzdf_imp_jki.o)\ 
    239233      $(MODEL_LIB)(eosbn2.o)\ 
    240234      $(MODEL_LIB)(flo4rk.o)\ 
     
    330324      $(MODEL_LIB)(traadv.o)\ 
    331325      $(MODEL_LIB)(traadv_cen2.o)\ 
    332       $(MODEL_LIB)(traadv_cen2_jki.o)\ 
    333326      $(MODEL_LIB)(traadv_eiv.o)\ 
    334327      $(MODEL_LIB)(traadv_muscl.o)\ 
     
    352345      $(MODEL_LIB)(trazdf_exp.o)\ 
    353346      $(MODEL_LIB)(trazdf_imp.o)\ 
    354       $(MODEL_LIB)(trazdf_imp_jki.o)\ 
    355347      $(MODEL_LIB)(trc_oce.o)\ 
    356348      $(MODEL_LIB)(trcstp.o)\ 
     
    374366      $(MODEL_LIB)(zdfric.o)\ 
    375367      $(MODEL_LIB)(zdftke.o)\ 
    376       $(MODEL_LIB)(zdftke_jki.o)\ 
    377368      $(MODEL_LIB)(zpshde.o) 
    378369 
     
    27722763   $(MODEL_LIB)(dom_oce.o) \ 
    27732764   $(MODEL_LIB)(in_out_manager.o) \ 
    2774    $(MODEL_LIB)(lbclnk.o) \ 
    27752765   $(MODEL_LIB)(ldftra_oce.o) \ 
    27762766   $(MODEL_LIB)(lib_mpp.o) \ 
     
    27912781   dom_oce.F90 \ 
    27922782   in_out_manager.F90 \ 
    2793    lbclnk.F90 \ 
    27942783   ldftra_oce.F90 \ 
    27952784   lib_mpp.F90 \ 
     
    28092798   zdf_oce.F90 \ 
    28102799   $(MODEL_LIB)(dom_oce.o) \ 
    2811    $(MODEL_LIB)(dynhpg_jki.o) \ 
    28122800   $(MODEL_LIB)(in_out_manager.o) \ 
    28132801   $(MODEL_LIB)(lbclnk.o) \ 
     
    28182806   $(MODEL_LIB)(trdmod_oce.o) \ 
    28192807   dom_oce.F90 \ 
    2820    dynhpg_jki.F90 \ 
    28212808   in_out_manager.F90 \ 
    28222809   lbclnk.F90 \ 
     
    28302817   KEY_CPP \ 
    28312818   dynhpg.F90 
    2832 $(MODEL_LIB)(dynhpg_jki.o) :  \ 
    2833    $(MODEL_LIB)(dom_oce.o) \ 
    2834    $(MODEL_LIB)(in_out_manager.o) \ 
    2835    $(MODEL_LIB)(lib_mpp.o) \ 
    2836    $(MODEL_LIB)(lib_print.o) \ 
    2837    $(MODEL_LIB)(oce.o) \ 
    2838    $(MODEL_LIB)(par_kind.o) \ 
    2839    $(MODEL_LIB)(par_oce.o) \ 
    2840    dom_oce.F90 \ 
    2841    in_out_manager.F90 \ 
    2842    lib_mpp.F90 \ 
    2843    lib_print.f90 \ 
    2844    oce.F90 \ 
    2845    par_kind.F90 \ 
    2846    par_oce.F90 \ 
    2847    $(MODEL_LIB)(dom_oce.o) \ 
    2848    $(MODEL_LIB)(in_out_manager.o) \ 
    2849    $(MODEL_LIB)(lbclnk.o) \ 
    2850    $(MODEL_LIB)(oce.o) \ 
    2851    $(MODEL_LIB)(phycst.o) \ 
    2852    dom_oce.F90 \ 
    2853    in_out_manager.F90 \ 
    2854    lbclnk.F90 \ 
    2855    oce.F90 \ 
    2856    phycst.F90 \ 
    2857    domzgr_substitute.h90 \ 
    2858    vectopt_loop_substitute.h90 \ 
    2859    KEY_CPP \ 
    2860    dynhpg_jki.F90 
    28612819$(MODEL_LIB)(dynkeg.o) :   \ 
    28622820   $(MODEL_LIB)(dom_oce.o) \ 
     
    33583316   $(MODEL_LIB)(dom_oce.o) \ 
    33593317   $(MODEL_LIB)(domvvl.o) \ 
    3360    $(MODEL_LIB)(dynspg_exp.o) \ 
    3361    $(MODEL_LIB)(dynspg_flt.o) \ 
    33623318   $(MODEL_LIB)(dynspg_oce.o) \ 
    3363    $(MODEL_LIB)(dynspg_ts.o) \ 
    33643319   $(MODEL_LIB)(dynvor.o) \ 
    33653320   $(MODEL_LIB)(flxrnf.o) \ 
     
    34043359   dom_oce.F90 \ 
    34053360   domvvl.F90 \ 
    3406    dynspg_exp.F90 \ 
    3407    dynspg_flt.F90 \ 
    34083361   dynspg_oce.F90 \ 
    3409    dynspg_ts.F90 \ 
    34103362   dynvor.F90 \ 
    34113363   flxrnf.F90 \ 
     
    34483400   $(MODEL_LIB)(dom_oce.o) \ 
    34493401   $(MODEL_LIB)(dynspg_exp.o) \ 
    3450    $(MODEL_LIB)(dynspg_exp_jki.o) \ 
    34513402   $(MODEL_LIB)(dynspg_flt.o) \ 
    3452    $(MODEL_LIB)(dynspg_flt_jki.o) \ 
    34533403   $(MODEL_LIB)(dynspg_oce.o) \ 
    34543404   $(MODEL_LIB)(dynspg_rl.o) \ 
    34553405   $(MODEL_LIB)(dynspg_ts.o) \ 
    3456    $(MODEL_LIB)(dynspg_ts_jki.o) \ 
    34573406   $(MODEL_LIB)(in_out_manager.o) \ 
    34583407   $(MODEL_LIB)(obc_oce.o) \ 
     
    34633412   dom_oce.F90 \ 
    34643413   dynspg_exp.F90 \ 
    3465    dynspg_exp_jki.F90 \ 
    34663414   dynspg_flt.F90 \ 
    3467    dynspg_flt_jki.F90 \ 
    34683415   dynspg_oce.F90 \ 
    34693416   dynspg_rl.F90 \ 
    34703417   dynspg_ts.F90 \ 
    3471    dynspg_ts_jki.F90 \ 
    34723418   in_out_manager.F90 \ 
    34733419   obc_oce.F90 \ 
     
    35853531   KEY_CPP \ 
    35863532   dynspg_exp.F90 
    3587 $(MODEL_LIB)(dynspg_exp_jki.o) : \ 
    3588    $(MODEL_LIB)(blk_oce.o) \ 
    3589    $(MODEL_LIB)(cpl_oce.o) \ 
    3590    $(MODEL_LIB)(daymod.o) \ 
    3591    $(MODEL_LIB)(dom_oce.o) \ 
    3592    $(MODEL_LIB)(dtasal.o) \ 
    3593    $(MODEL_LIB)(dtasss.o) \ 
    3594    $(MODEL_LIB)(dtasst.o) \ 
    3595    $(MODEL_LIB)(dtatem.o) \ 
    3596    $(MODEL_LIB)(dynspg_oce.o) \ 
    3597    $(MODEL_LIB)(eosbn2.o) \ 
    3598    $(MODEL_LIB)(flx_oce.o) \ 
    3599    $(MODEL_LIB)(flxmod.o) \ 
    3600    $(MODEL_LIB)(flxrnf.o) \ 
    3601    $(MODEL_LIB)(ice_oce.o) \ 
    3602    $(MODEL_LIB)(in_out_manager.o) \ 
    3603    $(MODEL_LIB)(ini1d.o) \ 
    3604    $(MODEL_LIB)(iom.o) \ 
    3605    $(MODEL_LIB)(lbclnk.o) \ 
    3606    $(MODEL_LIB)(lib_mpp.o) \ 
    3607    $(MODEL_LIB)(lib_print.o) \ 
    3608    $(MODEL_LIB)(obc_oce.o) \ 
    3609    $(MODEL_LIB)(obc_par.o) \ 
    3610    $(MODEL_LIB)(obccli.o) \ 
    3611    $(MODEL_LIB)(obcdta.o) \ 
    3612    $(MODEL_LIB)(oce.o) \ 
    3613    $(MODEL_LIB)(ocesbc.o) \ 
    3614    $(MODEL_LIB)(ocfzpt.o) \ 
    3615    $(MODEL_LIB)(par_kind.o) \ 
    3616    $(MODEL_LIB)(par_oce.o) \ 
    3617    $(MODEL_LIB)(phycst.o) \ 
    3618    $(MODEL_LIB)(prtctl.o) \ 
    3619    $(MODEL_LIB)(restart.o) \ 
    3620    $(MODEL_LIB)(taumod.o) \ 
    3621    $(MODEL_LIB)(tradmp.o) \ 
    3622    $(MODEL_LIB)(trdmld_oce.o) \ 
    3623    $(MODEL_LIB)(zpshde.o) \ 
    3624    blk_oce.F90 \ 
    3625    cpl_oce.F90 \ 
    3626    daymod.F90 \ 
    3627    dom_oce.F90 \ 
    3628    dtasal.F90 \ 
    3629    dtasss.F90 \ 
    3630    dtasst.F90 \ 
    3631    dtatem.F90 \ 
    3632    dynspg_oce.F90 \ 
    3633    eosbn2.F90 \ 
    3634    flx_oce.F90 \ 
    3635    flxmod.F90 \ 
    3636    flxrnf.F90 \ 
    3637    ice_oce.F90 \ 
    3638    in_out_manager.F90 \ 
    3639    ini1d.F90 \ 
    3640    iom.F90 \ 
    3641    lbclnk.F90 \ 
    3642    lib_mpp.F90 \ 
    3643    lib_print.f90 \ 
    3644    obc_oce.F90 \ 
    3645    obc_par.F90 \ 
    3646    obccli.F90 \ 
    3647    obcdta.F90 \ 
    3648    oce.F90 \ 
    3649    ocesbc.F90 \ 
    3650    ocfzpt.F90 \ 
    3651    par_kind.F90 \ 
    3652    par_oce.F90 \ 
    3653    phycst.F90 \ 
    3654    prtctl.F90 \ 
    3655    restart.F90 \ 
    3656    taumod.F90 \ 
    3657    tradmp.F90 \ 
    3658    trdmld_oce.F90 \ 
    3659    zpshde.F90 \ 
    3660    $(MODEL_LIB)(dom_oce.o) \ 
    3661    $(MODEL_LIB)(dynspg_exp.o) \ 
    3662    $(MODEL_LIB)(in_out_manager.o) \ 
    3663    $(MODEL_LIB)(lbclnk.o) \ 
    3664    $(MODEL_LIB)(lib_mpp.o) \ 
    3665    $(MODEL_LIB)(obc_oce.o) \ 
    3666    $(MODEL_LIB)(obc_par.o) \ 
    3667    $(MODEL_LIB)(obcdta.o) \ 
    3668    $(MODEL_LIB)(oce.o) \ 
    3669    $(MODEL_LIB)(ocesbc.o) \ 
    3670    $(MODEL_LIB)(phycst.o) \ 
    3671    $(MODEL_LIB)(prtctl.o) \ 
    3672    $(MODEL_LIB)(restart.o) \ 
    3673    dom_oce.F90 \ 
    3674    dynspg_exp.F90 \ 
    3675    in_out_manager.F90 \ 
    3676    lbclnk.F90 \ 
    3677    lib_mpp.F90 \ 
    3678    obc_oce.F90 \ 
    3679    obc_par.F90 \ 
    3680    obcdta.F90 \ 
    3681    oce.F90 \ 
    3682    ocesbc.F90 \ 
    3683    phycst.F90 \ 
    3684    prtctl.F90 \ 
    3685    restart.F90 \ 
    3686    domzgr_substitute.h90 \ 
    3687    vectopt_loop_substitute.h90 \ 
    3688    KEY_CPP \ 
    3689    dynspg_exp_jki.F90 
    36903533$(MODEL_LIB)(dynspg_flt.o) :  \ 
    36913534   $(MODEL_LIB)(agrif_oce.o) \ 
     
    38403683   KEY_CPP \ 
    38413684   dynspg_flt.F90 
    3842 $(MODEL_LIB)(dynspg_flt_jki.o) : \ 
    3843    $(MODEL_LIB)(agrif_oce.o) \ 
    3844    $(MODEL_LIB)(agrif_opa_interp.o) \ 
    3845    $(MODEL_LIB)(blk_oce.o) \ 
    3846    $(MODEL_LIB)(cla_dynspg.o) \ 
    3847    $(MODEL_LIB)(cpl_oce.o) \ 
    3848    $(MODEL_LIB)(daymod.o) \ 
    3849    $(MODEL_LIB)(dom_oce.o) \ 
    3850    $(MODEL_LIB)(domvvl.o) \ 
    3851    $(MODEL_LIB)(dtasal.o) \ 
    3852    $(MODEL_LIB)(dtasss.o) \ 
    3853    $(MODEL_LIB)(dtasst.o) \ 
    3854    $(MODEL_LIB)(dtatem.o) \ 
    3855    $(MODEL_LIB)(dynspg_oce.o) \ 
    3856    $(MODEL_LIB)(eosbn2.o) \ 
    3857    $(MODEL_LIB)(flx_oce.o) \ 
    3858    $(MODEL_LIB)(flxmod.o) \ 
    3859    $(MODEL_LIB)(flxrnf.o) \ 
    3860    $(MODEL_LIB)(ice_oce.o) \ 
    3861    $(MODEL_LIB)(in_out_manager.o) \ 
    3862    $(MODEL_LIB)(ini1d.o) \ 
    3863    $(MODEL_LIB)(iom.o) \ 
    3864    $(MODEL_LIB)(iom_def.o) \ 
    3865    $(MODEL_LIB)(iom_ioipsl.o) \ 
    3866    $(MODEL_LIB)(iom_nf90.o) \ 
    3867    $(MODEL_LIB)(iom_rstdimg.o) \ 
    3868    $(MODEL_LIB)(lbclnk.o) \ 
    3869    $(MODEL_LIB)(lib_feti.o) \ 
    3870    $(MODEL_LIB)(lib_mpp.o) \ 
    3871    $(MODEL_LIB)(lib_print.o) \ 
    3872    $(MODEL_LIB)(obc_oce.o) \ 
    3873    $(MODEL_LIB)(obc_par.o) \ 
    3874    $(MODEL_LIB)(obccli.o) \ 
    3875    $(MODEL_LIB)(obcdyn.o) \ 
    3876    $(MODEL_LIB)(obcvol.o) \ 
    3877    $(MODEL_LIB)(oce.o) \ 
    3878    $(MODEL_LIB)(ocesbc.o) \ 
    3879    $(MODEL_LIB)(ocfzpt.o) \ 
    3880    $(MODEL_LIB)(par_kind.o) \ 
    3881    $(MODEL_LIB)(par_oce.o) \ 
    3882    $(MODEL_LIB)(phycst.o) \ 
    3883    $(MODEL_LIB)(prtctl.o) \ 
    3884    $(MODEL_LIB)(restart.o) \ 
    3885    $(MODEL_LIB)(sol_oce.o) \ 
    3886    $(MODEL_LIB)(solfet.o) \ 
    3887    $(MODEL_LIB)(solisl.o) \ 
    3888    $(MODEL_LIB)(solmat.o) \ 
    3889    $(MODEL_LIB)(solpcg.o) \ 
    3890    $(MODEL_LIB)(solsor.o) \ 
    3891    $(MODEL_LIB)(solver.o) \ 
    3892    $(MODEL_LIB)(taumod.o) \ 
    3893    $(MODEL_LIB)(tradmp.o) \ 
    3894    $(MODEL_LIB)(trdmld_oce.o) \ 
    3895    $(MODEL_LIB)(zdf_oce.o) \ 
    3896    $(MODEL_LIB)(zpshde.o) \ 
    3897    agrif_oce.F90 \ 
    3898    agrif_opa_interp.F90 \ 
    3899    blk_oce.F90 \ 
    3900    cla_dynspg.F90 \ 
    3901    cpl_oce.F90 \ 
    3902    daymod.F90 \ 
    3903    dom_oce.F90 \ 
    3904    domvvl.F90 \ 
    3905    dtasal.F90 \ 
    3906    dtasss.F90 \ 
    3907    dtasst.F90 \ 
    3908    dtatem.F90 \ 
    3909    dynspg_oce.F90 \ 
    3910    eosbn2.F90 \ 
    3911    flx_oce.F90 \ 
    3912    flxmod.F90 \ 
    3913    flxrnf.F90 \ 
    3914    ice_oce.F90 \ 
    3915    in_out_manager.F90 \ 
    3916    ini1d.F90 \ 
    3917    iom.F90 \ 
    3918    iom_def.F90 \ 
    3919    iom_ioipsl.F90 \ 
    3920    iom_nf90.F90 \ 
    3921    iom_rstdimg.F90 \ 
    3922    lbclnk.F90 \ 
    3923    lib_feti.F90 \ 
    3924    lib_mpp.F90 \ 
    3925    lib_print.f90 \ 
    3926    obc_oce.F90 \ 
    3927    obc_par.F90 \ 
    3928    obccli.F90 \ 
    3929    obcdyn.F90 \ 
    3930    obcvol.F90 \ 
    3931    oce.F90 \ 
    3932    ocesbc.F90 \ 
    3933    ocfzpt.F90 \ 
    3934    par_kind.F90 \ 
    3935    par_oce.F90 \ 
    3936    phycst.F90 \ 
    3937    prtctl.F90 \ 
    3938    restart.F90 \ 
    3939    sol_oce.F90 \ 
    3940    solfet.F90 \ 
    3941    solisl.F90 \ 
    3942    solmat.F90 \ 
    3943    solpcg.F90 \ 
    3944    solsor.F90 \ 
    3945    solver.F90 \ 
    3946    taumod.F90 \ 
    3947    tradmp.F90 \ 
    3948    trdmld_oce.F90 \ 
    3949    zdf_oce.F90 \ 
    3950    zpshde.F90 \ 
    3951    $(MODEL_LIB)(agrif_opa_interp.o) \ 
    3952    $(MODEL_LIB)(cla_dynspg.o) \ 
    3953    $(MODEL_LIB)(dom_oce.o) \ 
    3954    $(MODEL_LIB)(dynspg_flt.o) \ 
    3955    $(MODEL_LIB)(flxrnf.o) \ 
    3956    $(MODEL_LIB)(in_out_manager.o) \ 
    3957    $(MODEL_LIB)(iom.o) \ 
    3958    $(MODEL_LIB)(lbclnk.o) \ 
    3959    $(MODEL_LIB)(lib_mpp.o) \ 
    3960    $(MODEL_LIB)(obc_oce.o) \ 
    3961    $(MODEL_LIB)(obcdyn.o) \ 
    3962    $(MODEL_LIB)(obcvol.o) \ 
    3963    $(MODEL_LIB)(oce.o) \ 
    3964    $(MODEL_LIB)(ocesbc.o) \ 
    3965    $(MODEL_LIB)(phycst.o) \ 
    3966    $(MODEL_LIB)(prtctl.o) \ 
    3967    $(MODEL_LIB)(restart.o) \ 
    3968    $(MODEL_LIB)(sol_oce.o) \ 
    3969    $(MODEL_LIB)(solfet.o) \ 
    3970    $(MODEL_LIB)(solmat.o) \ 
    3971    $(MODEL_LIB)(solpcg.o) \ 
    3972    $(MODEL_LIB)(solsor.o) \ 
    3973    $(MODEL_LIB)(solver.o) \ 
    3974    $(MODEL_LIB)(zdf_oce.o) \ 
    3975    agrif_opa_interp.F90 \ 
    3976    cla_dynspg.F90 \ 
    3977    dom_oce.F90 \ 
    3978    dynspg_flt.F90 \ 
    3979    flxrnf.F90 \ 
    3980    in_out_manager.F90 \ 
    3981    iom.F90 \ 
    3982    lbclnk.F90 \ 
    3983    lib_mpp.F90 \ 
    3984    obc_oce.F90 \ 
    3985    obcdyn.F90 \ 
    3986    obcvol.F90 \ 
    3987    oce.F90 \ 
    3988    ocesbc.F90 \ 
    3989    phycst.F90 \ 
    3990    prtctl.F90 \ 
    3991    restart.F90 \ 
    3992    sol_oce.F90 \ 
    3993    solfet.F90 \ 
    3994    solmat.F90 \ 
    3995    solpcg.F90 \ 
    3996    solsor.F90 \ 
    3997    solver.F90 \ 
    3998    zdf_oce.F90 \ 
    3999    domzgr_substitute.h90 \ 
    4000    $(AGRIF_LIB) \ 
    4001    KEY_CPP \ 
    4002    dynspg_flt_jki.F90 
    40033685$(MODEL_LIB)(dynspg_oce.o) :  \ 
    40043686   $(MODEL_LIB)(par_kind.o) \ 
     
    42373919   KEY_CPP \ 
    42383920   dynspg_ts.F90 
    4239 $(MODEL_LIB)(dynspg_ts_jki.o) :  \ 
    4240    $(MODEL_LIB)(blk_oce.o) \ 
    4241    $(MODEL_LIB)(cpl_oce.o) \ 
    4242    $(MODEL_LIB)(daymod.o) \ 
    4243    $(MODEL_LIB)(dom_oce.o) \ 
    4244    $(MODEL_LIB)(domvvl.o) \ 
    4245    $(MODEL_LIB)(dtasal.o) \ 
    4246    $(MODEL_LIB)(dtasss.o) \ 
    4247    $(MODEL_LIB)(dtasst.o) \ 
    4248    $(MODEL_LIB)(dtatem.o) \ 
    4249    $(MODEL_LIB)(dynadv.o) \ 
    4250    $(MODEL_LIB)(dynspg_oce.o) \ 
    4251    $(MODEL_LIB)(dynvor.o) \ 
    4252    $(MODEL_LIB)(eosbn2.o) \ 
    4253    $(MODEL_LIB)(flx_oce.o) \ 
    4254    $(MODEL_LIB)(flxmod.o) \ 
    4255    $(MODEL_LIB)(flxrnf.o) \ 
    4256    $(MODEL_LIB)(ice_oce.o) \ 
    4257    $(MODEL_LIB)(in_out_manager.o) \ 
    4258    $(MODEL_LIB)(ini1d.o) \ 
    4259    $(MODEL_LIB)(iom.o) \ 
    4260    $(MODEL_LIB)(iom_def.o) \ 
    4261    $(MODEL_LIB)(iom_ioipsl.o) \ 
    4262    $(MODEL_LIB)(iom_nf90.o) \ 
    4263    $(MODEL_LIB)(iom_rstdimg.o) \ 
    4264    $(MODEL_LIB)(lbclnk.o) \ 
    4265    $(MODEL_LIB)(lib_mpp.o) \ 
    4266    $(MODEL_LIB)(lib_print.o) \ 
    4267    $(MODEL_LIB)(obc_oce.o) \ 
    4268    $(MODEL_LIB)(obc_par.o) \ 
    4269    $(MODEL_LIB)(obccli.o) \ 
    4270    $(MODEL_LIB)(obcdta.o) \ 
    4271    $(MODEL_LIB)(obcfla.o) \ 
    4272    $(MODEL_LIB)(oce.o) \ 
    4273    $(MODEL_LIB)(ocesbc.o) \ 
    4274    $(MODEL_LIB)(ocfzpt.o) \ 
    4275    $(MODEL_LIB)(par_kind.o) \ 
    4276    $(MODEL_LIB)(par_oce.o) \ 
    4277    $(MODEL_LIB)(phycst.o) \ 
    4278    $(MODEL_LIB)(prtctl.o) \ 
    4279    $(MODEL_LIB)(restart.o) \ 
    4280    $(MODEL_LIB)(taumod.o) \ 
    4281    $(MODEL_LIB)(tradmp.o) \ 
    4282    $(MODEL_LIB)(trdmld_oce.o) \ 
    4283    $(MODEL_LIB)(trdmod.o) \ 
    4284    $(MODEL_LIB)(trdmod_oce.o) \ 
    4285    $(MODEL_LIB)(zpshde.o) \ 
    4286    blk_oce.F90 \ 
    4287    cpl_oce.F90 \ 
    4288    daymod.F90 \ 
    4289    dom_oce.F90 \ 
    4290    domvvl.F90 \ 
    4291    dtasal.F90 \ 
    4292    dtasss.F90 \ 
    4293    dtasst.F90 \ 
    4294    dtatem.F90 \ 
    4295    dynadv.F90 \ 
    4296    dynspg_oce.F90 \ 
    4297    dynvor.F90 \ 
    4298    eosbn2.F90 \ 
    4299    flx_oce.F90 \ 
    4300    flxmod.F90 \ 
    4301    flxrnf.F90 \ 
    4302    ice_oce.F90 \ 
    4303    in_out_manager.F90 \ 
    4304    ini1d.F90 \ 
    4305    iom.F90 \ 
    4306    iom_def.F90 \ 
    4307    iom_ioipsl.F90 \ 
    4308    iom_nf90.F90 \ 
    4309    iom_rstdimg.F90 \ 
    4310    lbclnk.F90 \ 
    4311    lib_mpp.F90 \ 
    4312    lib_print.f90 \ 
    4313    obc_oce.F90 \ 
    4314    obc_par.F90 \ 
    4315    obccli.F90 \ 
    4316    obcdta.F90 \ 
    4317    obcfla.F90 \ 
    4318    oce.F90 \ 
    4319    ocesbc.F90 \ 
    4320    ocfzpt.F90 \ 
    4321    par_kind.F90 \ 
    4322    par_oce.F90 \ 
    4323    phycst.F90 \ 
    4324    prtctl.F90 \ 
    4325    restart.F90 \ 
    4326    taumod.F90 \ 
    4327    tradmp.F90 \ 
    4328    trdmld_oce.F90 \ 
    4329    trdmod.F90 \ 
    4330    trdmod_oce.F90 \ 
    4331    zpshde.F90 \ 
    4332    $(MODEL_LIB)(dom_oce.o) \ 
    4333    $(MODEL_LIB)(dynspg_oce.o) \ 
    4334    $(MODEL_LIB)(dynspg_ts.o) \ 
    4335    $(MODEL_LIB)(dynvor.o) \ 
    4336    $(MODEL_LIB)(in_out_manager.o) \ 
    4337    $(MODEL_LIB)(iom.o) \ 
    4338    $(MODEL_LIB)(lbclnk.o) \ 
    4339    $(MODEL_LIB)(lib_mpp.o) \ 
    4340    $(MODEL_LIB)(obc_oce.o) \ 
    4341    $(MODEL_LIB)(obc_par.o) \ 
    4342    $(MODEL_LIB)(obcdta.o) \ 
    4343    $(MODEL_LIB)(obcfla.o) \ 
    4344    $(MODEL_LIB)(oce.o) \ 
    4345    $(MODEL_LIB)(ocesbc.o) \ 
    4346    $(MODEL_LIB)(phycst.o) \ 
    4347    $(MODEL_LIB)(prtctl.o) \ 
    4348    $(MODEL_LIB)(restart.o) \ 
    4349    dom_oce.F90 \ 
    4350    dynspg_oce.F90 \ 
    4351    dynspg_ts.F90 \ 
    4352    dynvor.F90 \ 
    4353    in_out_manager.F90 \ 
    4354    iom.F90 \ 
    4355    lbclnk.F90 \ 
    4356    lib_mpp.F90 \ 
    4357    obc_oce.F90 \ 
    4358    obc_par.F90 \ 
    4359    obcdta.F90 \ 
    4360    obcfla.F90 \ 
    4361    oce.F90 \ 
    4362    ocesbc.F90 \ 
    4363    phycst.F90 \ 
    4364    prtctl.F90 \ 
    4365    restart.F90 \ 
    4366    domzgr_substitute.h90 \ 
    4367    vectopt_loop_substitute.h90 \ 
    4368    KEY_CPP \ 
    4369    dynspg_ts_jki.F90 
    43703921$(MODEL_LIB)(dynvor.o) :   \ 
    43713922   $(MODEL_LIB)(dom_oce.o) \ 
     
    45504101   $(MODEL_LIB)(dynzdf_exp.o) \ 
    45514102   $(MODEL_LIB)(dynzdf_imp.o) \ 
    4552    $(MODEL_LIB)(dynzdf_imp_jki.o) \ 
    45534103   $(MODEL_LIB)(in_out_manager.o) \ 
    45544104   $(MODEL_LIB)(ldfdyn_oce.o) \ 
     
    45634113   dynzdf_exp.F90 \ 
    45644114   dynzdf_imp.F90 \ 
    4565    dynzdf_imp_jki.F90 \ 
    45664115   in_out_manager.F90 \ 
    45674116   ldfdyn_oce.F90 \ 
     
    46604209   KEY_CPP \ 
    46614210   dynzdf_imp.F90 
    4662 $(MODEL_LIB)(dynzdf_imp_jki.o) : \ 
    4663    $(MODEL_LIB)(cpl_oasis3.o) \ 
    4664    $(MODEL_LIB)(cpl_oasis4.o) \ 
    4665    $(MODEL_LIB)(daymod.o) \ 
    4666    $(MODEL_LIB)(dom_oce.o) \ 
    4667    $(MODEL_LIB)(geo2ocean.o) \ 
    4668    $(MODEL_LIB)(ice.o) \ 
    4669    $(MODEL_LIB)(in_out_manager.o) \ 
    4670    $(MODEL_LIB)(lbclnk.o) \ 
    4671    $(MODEL_LIB)(lib_print.o) \ 
    4672    $(MODEL_LIB)(par_kind.o) \ 
    4673    $(MODEL_LIB)(par_oce.o) \ 
    4674    $(MODEL_LIB)(phycst.o) \ 
    4675    cpl_oasis3.F90 \ 
    4676    cpl_oasis4.F90 \ 
    4677    daymod.F90 \ 
    4678    dom_oce.F90 \ 
    4679    geo2ocean.F90 \ 
    4680    ice.F90 \ 
    4681    in_out_manager.F90 \ 
    4682    lbclnk.F90 \ 
    4683    lib_print.f90 \ 
    4684    par_kind.F90 \ 
    4685    par_oce.F90 \ 
    4686    phycst.F90 \ 
    4687    $(MODEL_LIB)(dom_oce.o) \ 
    4688    $(MODEL_LIB)(in_out_manager.o) \ 
    4689    $(MODEL_LIB)(oce.o) \ 
    4690    $(MODEL_LIB)(phycst.o) \ 
    4691    $(MODEL_LIB)(taumod.o) \ 
    4692    $(MODEL_LIB)(zdf_oce.o) \ 
    4693    dom_oce.F90 \ 
    4694    in_out_manager.F90 \ 
    4695    oce.F90 \ 
    4696    phycst.F90 \ 
    4697    taumod.F90 \ 
    4698    zdf_oce.F90 \ 
    4699    domzgr_substitute.h90 \ 
    4700    vectopt_loop_substitute.h90 \ 
    4701    KEY_CPP \ 
    4702    dynzdf_imp_jki.F90 
    47034211$(MODEL_LIB)(eosbn2.o) :   \ 
    47044212   $(MODEL_LIB)(dom_oce.o) \ 
     
    56775185   $(MODEL_LIB)(domvvl.o) \ 
    56785186   $(MODEL_LIB)(dynspg_exp.o) \ 
    5679    $(MODEL_LIB)(dynspg_exp_jki.o) \ 
    56805187   $(MODEL_LIB)(dynspg_flt.o) \ 
    5681    $(MODEL_LIB)(dynspg_flt_jki.o) \ 
    56825188   $(MODEL_LIB)(dynspg_oce.o) \ 
    56835189   $(MODEL_LIB)(dynspg_rl.o) \ 
    56845190   $(MODEL_LIB)(dynspg_ts.o) \ 
    5685    $(MODEL_LIB)(dynspg_ts_jki.o) \ 
    56865191   $(MODEL_LIB)(dynvor.o) \ 
    56875192   $(MODEL_LIB)(eosbn2.o) \ 
     
    57315236   domvvl.F90 \ 
    57325237   dynspg_exp.F90 \ 
    5733    dynspg_exp_jki.F90 \ 
    57345238   dynspg_flt.F90 \ 
    5735    dynspg_flt_jki.F90 \ 
    57365239   dynspg_oce.F90 \ 
    57375240   dynspg_rl.F90 \ 
    57385241   dynspg_ts.F90 \ 
    5739    dynspg_ts_jki.F90 \ 
    57405242   dynvor.F90 \ 
    57415243   eosbn2.F90 \ 
     
    77407242   $(MODEL_LIB)(zdfric.o) \ 
    77417243   $(MODEL_LIB)(zdftke.o) \ 
    7742    $(MODEL_LIB)(zdftke_jki.o) \ 
    77437244   $(MODEL_LIB)(zpshde.o) \ 
    77447245   agrif_opa_sponge.F90 \ 
     
    78617362   zdfric.F90 \ 
    78627363   zdftke.F90 \ 
    7863    zdftke_jki.F90 \ 
    78647364   zpshde.F90 \ 
    78657365   $(MODEL_LIB)(cpl.o) \ 
     
    83207820   $(MODEL_LIB)(dynadv_cen2.o) \ 
    83217821   $(MODEL_LIB)(dynadv_ubs.o) \ 
    8322    $(MODEL_LIB)(dynhpg_jki.o) \ 
    83237822   $(MODEL_LIB)(dynkeg.o) \ 
    83247823   $(MODEL_LIB)(dynldf_bilap.o) \ 
     
    83277826   $(MODEL_LIB)(dynldf_lap.o) \ 
    83287827   $(MODEL_LIB)(dynspg_exp.o) \ 
    8329    $(MODEL_LIB)(dynspg_exp_jki.o) \ 
    83307828   $(MODEL_LIB)(dynspg_flt.o) \ 
    8331    $(MODEL_LIB)(dynspg_flt_jki.o) \ 
    83327829   $(MODEL_LIB)(dynspg_oce.o) \ 
    83337830   $(MODEL_LIB)(dynspg_rl.o) \ 
    83347831   $(MODEL_LIB)(dynspg_ts.o) \ 
    8335    $(MODEL_LIB)(dynspg_ts_jki.o) \ 
    83367832   $(MODEL_LIB)(dynzad.o) \ 
    83377833   $(MODEL_LIB)(dynzdf_exp.o) \ 
    83387834   $(MODEL_LIB)(dynzdf_imp.o) \ 
    8339    $(MODEL_LIB)(dynzdf_imp_jki.o) \ 
    83407835   $(MODEL_LIB)(eosbn2.o) \ 
    83417836   $(MODEL_LIB)(flo4rk.o) \ 
     
    83937888   $(MODEL_LIB)(taumod.o) \ 
    83947889   $(MODEL_LIB)(traadv_cen2.o) \ 
    8395    $(MODEL_LIB)(traadv_cen2_jki.o) \ 
    83967890   $(MODEL_LIB)(traadv_eiv.o) \ 
    83977891   $(MODEL_LIB)(traadv_muscl.o) \ 
     
    84107904   $(MODEL_LIB)(trazdf_exp.o) \ 
    84117905   $(MODEL_LIB)(trazdf_imp.o) \ 
    8412    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    84137906   $(MODEL_LIB)(trc_oce.o) \ 
    84147907   $(MODEL_LIB)(trdicp_oce.o) \ 
     
    84477940   dynadv_cen2.F90 \ 
    84487941   dynadv_ubs.F90 \ 
    8449    dynhpg_jki.F90 \ 
    84507942   dynkeg.F90 \ 
    84517943   dynldf_bilap.F90 \ 
     
    84547946   dynldf_lap.F90 \ 
    84557947   dynspg_exp.F90 \ 
    8456    dynspg_exp_jki.F90 \ 
    84577948   dynspg_flt.F90 \ 
    8458    dynspg_flt_jki.F90 \ 
    84597949   dynspg_oce.F90 \ 
    84607950   dynspg_rl.F90 \ 
    84617951   dynspg_ts.F90 \ 
    8462    dynspg_ts_jki.F90 \ 
    84637952   dynzad.F90 \ 
    84647953   dynzdf_exp.F90 \ 
    84657954   dynzdf_imp.F90 \ 
    8466    dynzdf_imp_jki.F90 \ 
    84677955   eosbn2.F90 \ 
    84687956   flo4rk.F90 \ 
     
    85208008   taumod.F90 \ 
    85218009   traadv_cen2.F90 \ 
    8522    traadv_cen2_jki.F90 \ 
    85238010   traadv_eiv.F90 \ 
    85248011   traadv_muscl.F90 \ 
     
    85378024   trazdf_exp.F90 \ 
    85388025   trazdf_imp.F90 \ 
    8539    trazdf_imp_jki.F90 \ 
    85408026   trc_oce.F90 \ 
    85418027   trdicp_oce.F90 \ 
     
    86328118   $(MODEL_LIB)(zdfric.o) \ 
    86338119   $(MODEL_LIB)(zdftke.o) \ 
    8634    $(MODEL_LIB)(zdftke_jki.o) \ 
    86358120   $(MODEL_LIB)(zpshde.o) \ 
    86368121   agrif_opa_sponge.F90 \ 
     
    87158200   zdfric.F90 \ 
    87168201   zdftke.F90 \ 
    8717    zdftke_jki.F90 \ 
    87188202   zpshde.F90 \ 
    87198203   domzgr_substitute.h90 \ 
     
    87458229   $(MODEL_LIB)(dynzdf_exp.o) \ 
    87468230   $(MODEL_LIB)(dynzdf_imp.o) \ 
    8747    $(MODEL_LIB)(dynzdf_imp_jki.o) \ 
    87488231   $(MODEL_LIB)(eosbn2.o) \ 
    87498232   $(MODEL_LIB)(flx_oce.o) \ 
     
    87828265   $(MODEL_LIB)(trazdf_exp.o) \ 
    87838266   $(MODEL_LIB)(trazdf_imp.o) \ 
    8784    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    87858267   $(MODEL_LIB)(trc_oce.o) \ 
    87868268   $(MODEL_LIB)(trdmld_oce.o) \ 
     
    88158297   dynzdf_exp.F90 \ 
    88168298   dynzdf_imp.F90 \ 
    8817    dynzdf_imp_jki.F90 \ 
    88188299   eosbn2.F90 \ 
    88198300   flx_oce.F90 \ 
     
    88528333   trazdf_exp.F90 \ 
    88538334   trazdf_imp.F90 \ 
    8854    trazdf_imp_jki.F90 \ 
    88558335   trc_oce.F90 \ 
    88568336   trdmld_oce.F90 \ 
     
    91388618   $(MODEL_LIB)(prtctl.o) \ 
    91398619   $(MODEL_LIB)(traadv_cen2.o) \ 
    9140    $(MODEL_LIB)(traadv_cen2_jki.o) \ 
    91418620   $(MODEL_LIB)(traadv_eiv.o) \ 
    91428621   $(MODEL_LIB)(traadv_muscl.o) \ 
     
    91528631   prtctl.F90 \ 
    91538632   traadv_cen2.F90 \ 
    9154    traadv_cen2_jki.F90 \ 
    91558633   traadv_eiv.F90 \ 
    91568634   traadv_muscl.F90 \ 
     
    92458723   KEY_CPP \ 
    92468724   traadv_cen2.F90 
    9247 $(MODEL_LIB)(traadv_cen2_jki.o) :   \ 
     8725$(MODEL_LIB)(traadv_eiv.o) :  \ 
     8726   $(MODEL_LIB)(dom_oce.o) \ 
     8727   $(MODEL_LIB)(in_out_manager.o) \ 
     8728   $(MODEL_LIB)(lbclnk.o) \ 
     8729   $(MODEL_LIB)(ldfdyn_oce.o) \ 
     8730   $(MODEL_LIB)(ldftra_oce.o) \ 
     8731   $(MODEL_LIB)(lib_print.o) \ 
     8732   $(MODEL_LIB)(oce.o) \ 
     8733   $(MODEL_LIB)(par_kind.o) \ 
     8734   $(MODEL_LIB)(par_oce.o) \ 
     8735   $(MODEL_LIB)(phycst.o) \ 
     8736   $(MODEL_LIB)(prtctl.o) \ 
     8737   $(MODEL_LIB)(zdfmxl.o) \ 
     8738   dom_oce.F90 \ 
     8739   in_out_manager.F90 \ 
     8740   lbclnk.F90 \ 
     8741   ldfdyn_oce.F90 \ 
     8742   ldftra_oce.F90 \ 
     8743   lib_print.f90 \ 
     8744   oce.F90 \ 
     8745   par_kind.F90 \ 
     8746   par_oce.F90 \ 
     8747   phycst.F90 \ 
     8748   prtctl.F90 \ 
     8749   zdfmxl.F90 \ 
     8750   $(MODEL_LIB)(dom_oce.o) \ 
     8751   $(MODEL_LIB)(in_out_manager.o) \ 
     8752   $(MODEL_LIB)(ldfslp.o) \ 
     8753   $(MODEL_LIB)(ldftra_oce.o) \ 
     8754   $(MODEL_LIB)(oce.o) \ 
     8755   dom_oce.F90 \ 
     8756   in_out_manager.F90 \ 
     8757   ldfslp.F90 \ 
     8758   ldftra_oce.F90 \ 
     8759   oce.F90 \ 
     8760   domzgr_substitute.h90 \ 
     8761   ldfeiv_substitute.h90 \ 
     8762   ldftra_substitute.h90 \ 
     8763   vectopt_loop_substitute.h90 \ 
     8764   KEY_CPP \ 
     8765   traadv_eiv.F90 
     8766$(MODEL_LIB)(traadv_muscl.o) :   \ 
    92488767   $(MODEL_LIB)(daymod.o) \ 
    92498768   $(MODEL_LIB)(dianam.o) \ 
     
    92998818   $(MODEL_LIB)(dom_oce.o) \ 
    93008819   $(MODEL_LIB)(dynspg_oce.o) \ 
    9301    $(MODEL_LIB)(flxrnf.o) \ 
    9302    $(MODEL_LIB)(in_out_manager.o) \ 
    9303    $(MODEL_LIB)(lbclnk.o) \ 
    9304    $(MODEL_LIB)(lib_mpp.o) \ 
    9305    $(MODEL_LIB)(oce.o) \ 
    9306    $(MODEL_LIB)(ocfzpt.o) \ 
     8820   $(MODEL_LIB)(in_out_manager.o) \ 
     8821   $(MODEL_LIB)(lbclnk.o) \ 
     8822   $(MODEL_LIB)(lib_mpp.o) \ 
     8823   $(MODEL_LIB)(oce.o) \ 
    93078824   $(MODEL_LIB)(prtctl.o) \ 
    93088825   $(MODEL_LIB)(trabbl.o) \ 
     
    93128829   dom_oce.F90 \ 
    93138830   dynspg_oce.F90 \ 
    9314    flxrnf.F90 \ 
    9315    in_out_manager.F90 \ 
    9316    lbclnk.F90 \ 
    9317    lib_mpp.F90 \ 
    9318    oce.F90 \ 
    9319    ocfzpt.F90 \ 
     8831   in_out_manager.F90 \ 
     8832   lbclnk.F90 \ 
     8833   lib_mpp.F90 \ 
     8834   oce.F90 \ 
    93208835   prtctl.F90 \ 
    93218836   trabbl.F90 \ 
     
    93258840   vectopt_loop_substitute.h90 \ 
    93268841   KEY_CPP \ 
    9327    traadv_cen2_jki.F90 
    9328 $(MODEL_LIB)(traadv_eiv.o) :  \ 
    9329    $(MODEL_LIB)(dom_oce.o) \ 
    9330    $(MODEL_LIB)(in_out_manager.o) \ 
    9331    $(MODEL_LIB)(lbclnk.o) \ 
    9332    $(MODEL_LIB)(ldfdyn_oce.o) \ 
    9333    $(MODEL_LIB)(ldftra_oce.o) \ 
    9334    $(MODEL_LIB)(lib_print.o) \ 
    9335    $(MODEL_LIB)(oce.o) \ 
    9336    $(MODEL_LIB)(par_kind.o) \ 
    9337    $(MODEL_LIB)(par_oce.o) \ 
    9338    $(MODEL_LIB)(phycst.o) \ 
    9339    $(MODEL_LIB)(prtctl.o) \ 
    9340    $(MODEL_LIB)(zdfmxl.o) \ 
    9341    dom_oce.F90 \ 
    9342    in_out_manager.F90 \ 
    9343    lbclnk.F90 \ 
    9344    ldfdyn_oce.F90 \ 
    9345    ldftra_oce.F90 \ 
    9346    lib_print.f90 \ 
    9347    oce.F90 \ 
    9348    par_kind.F90 \ 
    9349    par_oce.F90 \ 
    9350    phycst.F90 \ 
    9351    prtctl.F90 \ 
    9352    zdfmxl.F90 \ 
    9353    $(MODEL_LIB)(dom_oce.o) \ 
    9354    $(MODEL_LIB)(in_out_manager.o) \ 
    9355    $(MODEL_LIB)(ldfslp.o) \ 
    9356    $(MODEL_LIB)(ldftra_oce.o) \ 
    9357    $(MODEL_LIB)(oce.o) \ 
    9358    dom_oce.F90 \ 
    9359    in_out_manager.F90 \ 
    9360    ldfslp.F90 \ 
    9361    ldftra_oce.F90 \ 
    9362    oce.F90 \ 
    9363    domzgr_substitute.h90 \ 
    9364    ldfeiv_substitute.h90 \ 
    9365    ldftra_substitute.h90 \ 
    9366    vectopt_loop_substitute.h90 \ 
    9367    KEY_CPP \ 
    9368    traadv_eiv.F90 
    9369 $(MODEL_LIB)(traadv_muscl.o) :   \ 
     8842   traadv_muscl.F90 
     8843$(MODEL_LIB)(traadv_muscl2.o) :  \ 
    93708844   $(MODEL_LIB)(daymod.o) \ 
    93718845   $(MODEL_LIB)(dianam.o) \ 
     
    94438917   vectopt_loop_substitute.h90 \ 
    94448918   KEY_CPP \ 
    9445    traadv_muscl.F90 
    9446 $(MODEL_LIB)(traadv_muscl2.o) :  \ 
     8919   traadv_muscl2.F90 
     8920$(MODEL_LIB)(traadv_qck.o) :  \ 
    94478921   $(MODEL_LIB)(daymod.o) \ 
    94488922   $(MODEL_LIB)(dianam.o) \ 
     
    94988972   $(MODEL_LIB)(dom_oce.o) \ 
    94998973   $(MODEL_LIB)(dynspg_oce.o) \ 
    9500    $(MODEL_LIB)(in_out_manager.o) \ 
    9501    $(MODEL_LIB)(lbclnk.o) \ 
    9502    $(MODEL_LIB)(lib_mpp.o) \ 
    9503    $(MODEL_LIB)(oce.o) \ 
     8974   $(MODEL_LIB)(flxrnf.o) \ 
     8975   $(MODEL_LIB)(in_out_manager.o) \ 
     8976   $(MODEL_LIB)(lbclnk.o) \ 
     8977   $(MODEL_LIB)(lib_mpp.o) \ 
     8978   $(MODEL_LIB)(oce.o) \ 
     8979   $(MODEL_LIB)(ocfzpt.o) \ 
    95048980   $(MODEL_LIB)(prtctl.o) \ 
    95058981   $(MODEL_LIB)(trabbl.o) \ 
     
    95098985   dom_oce.F90 \ 
    95108986   dynspg_oce.F90 \ 
    9511    in_out_manager.F90 \ 
    9512    lbclnk.F90 \ 
    9513    lib_mpp.F90 \ 
    9514    oce.F90 \ 
     8987   flxrnf.F90 \ 
     8988   in_out_manager.F90 \ 
     8989   lbclnk.F90 \ 
     8990   lib_mpp.F90 \ 
     8991   oce.F90 \ 
     8992   ocfzpt.F90 \ 
    95158993   prtctl.F90 \ 
    95168994   trabbl.F90 \ 
     
    95208998   vectopt_loop_substitute.h90 \ 
    95218999   KEY_CPP \ 
    9522    traadv_muscl2.F90 
    9523 $(MODEL_LIB)(traadv_qck.o) :  \ 
     9000   traadv_qck.F90 
     9001$(MODEL_LIB)(traadv_tvd.o) :  \ 
    95249002   $(MODEL_LIB)(daymod.o) \ 
    95259003   $(MODEL_LIB)(dianam.o) \ 
     
    95759053   $(MODEL_LIB)(dom_oce.o) \ 
    95769054   $(MODEL_LIB)(dynspg_oce.o) \ 
    9577    $(MODEL_LIB)(flxrnf.o) \ 
    9578    $(MODEL_LIB)(in_out_manager.o) \ 
    9579    $(MODEL_LIB)(lbclnk.o) \ 
    9580    $(MODEL_LIB)(lib_mpp.o) \ 
    9581    $(MODEL_LIB)(oce.o) \ 
    9582    $(MODEL_LIB)(ocfzpt.o) \ 
    9583    $(MODEL_LIB)(prtctl.o) \ 
    9584    $(MODEL_LIB)(trabbl.o) \ 
    9585    $(MODEL_LIB)(trdmod.o) \ 
    9586    $(MODEL_LIB)(trdmod_oce.o) \ 
    9587    diaptr.F90 \ 
    9588    dom_oce.F90 \ 
    9589    dynspg_oce.F90 \ 
    9590    flxrnf.F90 \ 
    9591    in_out_manager.F90 \ 
    9592    lbclnk.F90 \ 
    9593    lib_mpp.F90 \ 
    9594    oce.F90 \ 
    9595    ocfzpt.F90 \ 
    9596    prtctl.F90 \ 
    9597    trabbl.F90 \ 
    9598    trdmod.F90 \ 
    9599    trdmod_oce.F90 \ 
    9600    domzgr_substitute.h90 \ 
    9601    vectopt_loop_substitute.h90 \ 
    9602    KEY_CPP \ 
    9603    traadv_qck.F90 
    9604 $(MODEL_LIB)(traadv_tvd.o) :  \ 
    9605    $(MODEL_LIB)(daymod.o) \ 
    9606    $(MODEL_LIB)(dianam.o) \ 
    9607    $(MODEL_LIB)(dom_oce.o) \ 
    9608    $(MODEL_LIB)(eosbn2.o) \ 
    9609    $(MODEL_LIB)(in_out_manager.o) \ 
    9610    $(MODEL_LIB)(iom.o) \ 
    9611    $(MODEL_LIB)(lbclnk.o) \ 
    9612    $(MODEL_LIB)(ldftra_oce.o) \ 
    9613    $(MODEL_LIB)(lib_mpp.o) \ 
    9614    $(MODEL_LIB)(lib_print.o) \ 
    9615    $(MODEL_LIB)(oce.o) \ 
    9616    $(MODEL_LIB)(par_kind.o) \ 
    9617    $(MODEL_LIB)(par_oce.o) \ 
    9618    $(MODEL_LIB)(phycst.o) \ 
    9619    $(MODEL_LIB)(prtctl.o) \ 
    9620    $(MODEL_LIB)(taumod.o) \ 
    9621    $(MODEL_LIB)(trdicp.o) \ 
    9622    $(MODEL_LIB)(trdicp_oce.o) \ 
    9623    $(MODEL_LIB)(trdmld.o) \ 
    9624    $(MODEL_LIB)(trdmld_oce.o) \ 
    9625    $(MODEL_LIB)(trdmod.o) \ 
    9626    $(MODEL_LIB)(trdmod_oce.o) \ 
    9627    $(MODEL_LIB)(trdvor.o) \ 
    9628    $(MODEL_LIB)(trdvor_oce.o) \ 
    9629    $(MODEL_LIB)(zdf_oce.o) \ 
    9630    daymod.F90 \ 
    9631    dianam.F90 \ 
    9632    dom_oce.F90 \ 
    9633    eosbn2.F90 \ 
    9634    in_out_manager.F90 \ 
    9635    iom.F90 \ 
    9636    lbclnk.F90 \ 
    9637    ldftra_oce.F90 \ 
    9638    lib_mpp.F90 \ 
    9639    lib_print.f90 \ 
    9640    oce.F90 \ 
    9641    par_kind.F90 \ 
    9642    par_oce.F90 \ 
    9643    phycst.F90 \ 
    9644    prtctl.F90 \ 
    9645    taumod.F90 \ 
    9646    trdicp.F90 \ 
    9647    trdicp_oce.F90 \ 
    9648    trdmld.F90 \ 
    9649    trdmld_oce.F90 \ 
    9650    trdmod.F90 \ 
    9651    trdmod_oce.F90 \ 
    9652    trdvor.F90 \ 
    9653    trdvor_oce.F90 \ 
    9654    zdf_oce.F90 \ 
    9655    $(MODEL_LIB)(diaptr.o) \ 
    9656    $(MODEL_LIB)(dom_oce.o) \ 
    9657    $(MODEL_LIB)(dynspg_oce.o) \ 
    96589055   $(MODEL_LIB)(in_out_manager.o) \ 
    96599056   $(MODEL_LIB)(lbclnk.o) \ 
     
    99839380   $(MODEL_LIB)(trazdf_exp.o) \ 
    99849381   $(MODEL_LIB)(trazdf_imp.o) \ 
    9985    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    99869382   $(MODEL_LIB)(trdicp.o) \ 
    99879383   $(MODEL_LIB)(trdicp_oce.o) \ 
     
    100169412   trazdf_exp.F90 \ 
    100179413   trazdf_imp.F90 \ 
    10018    trazdf_imp_jki.F90 \ 
    100199414   trdicp.F90 \ 
    100209415   trdicp_oce.F90 \ 
     
    1082410219   $(MODEL_LIB)(trazdf_exp.o) \ 
    1082510220   $(MODEL_LIB)(trazdf_imp.o) \ 
    10826    $(MODEL_LIB)(trazdf_imp_jki.o) \ 
    1082710221   $(MODEL_LIB)(trdmod.o) \ 
    1082810222   $(MODEL_LIB)(trdmod_oce.o) \ 
     
    1084210236   trazdf_exp.F90 \ 
    1084310237   trazdf_imp.F90 \ 
    10844    trazdf_imp_jki.F90 \ 
    1084510238   trdmod.F90 \ 
    1084610239   trdmod_oce.F90 \ 
     
    1099310386   KEY_CPP \ 
    1099410387   trazdf_imp.F90 
    10995 $(MODEL_LIB)(trazdf_imp_jki.o) : \ 
    10996    $(MODEL_LIB)(dom_oce.o) \ 
    10997    $(MODEL_LIB)(in_out_manager.o) \ 
    10998    $(MODEL_LIB)(lbclnk.o) \ 
    10999    $(MODEL_LIB)(ldfdyn_oce.o) \ 
    11000    $(MODEL_LIB)(ldftra_oce.o) \ 
    11001    $(MODEL_LIB)(lib_mpp.o) \ 
    11002    $(MODEL_LIB)(lib_print.o) \ 
    11003    $(MODEL_LIB)(oce.o) \ 
    11004    $(MODEL_LIB)(par_kind.o) \ 
    11005    $(MODEL_LIB)(par_oce.o) \ 
    11006    $(MODEL_LIB)(phycst.o) \ 
    11007    $(MODEL_LIB)(prtctl.o) \ 
    11008    $(MODEL_LIB)(taumod.o) \ 
    11009    $(MODEL_LIB)(trdicp.o) \ 
    11010    $(MODEL_LIB)(trdicp_oce.o) \ 
    11011    $(MODEL_LIB)(trdmld.o) \ 
    11012    $(MODEL_LIB)(trdmld_oce.o) \ 
    11013    $(MODEL_LIB)(trdmod_oce.o) \ 
    11014    $(MODEL_LIB)(trdvor.o) \ 
    11015    $(MODEL_LIB)(trdvor_oce.o) \ 
    11016    $(MODEL_LIB)(zdf_oce.o) \ 
    11017    $(MODEL_LIB)(zdfmxl.o) \ 
    11018    dom_oce.F90 \ 
    11019    in_out_manager.F90 \ 
    11020    lbclnk.F90 \ 
    11021    ldfdyn_oce.F90 \ 
    11022    ldftra_oce.F90 \ 
    11023    lib_mpp.F90 \ 
    11024    lib_print.f90 \ 
    11025    oce.F90 \ 
    11026    par_kind.F90 \ 
    11027    par_oce.F90 \ 
    11028    phycst.F90 \ 
    11029    prtctl.F90 \ 
    11030    taumod.F90 \ 
    11031    trdicp.F90 \ 
    11032    trdicp_oce.F90 \ 
    11033    trdmld.F90 \ 
    11034    trdmld_oce.F90 \ 
    11035    trdmod_oce.F90 \ 
    11036    trdvor.F90 \ 
    11037    trdvor_oce.F90 \ 
    11038    zdf_oce.F90 \ 
    11039    zdfmxl.F90 \ 
    11040    $(MODEL_LIB)(dom_oce.o) \ 
    11041    $(MODEL_LIB)(in_out_manager.o) \ 
    11042    $(MODEL_LIB)(lbclnk.o) \ 
    11043    $(MODEL_LIB)(ldfslp.o) \ 
    11044    $(MODEL_LIB)(ldftra_oce.o) \ 
    11045    $(MODEL_LIB)(oce.o) \ 
    11046    $(MODEL_LIB)(prtctl.o) \ 
    11047    $(MODEL_LIB)(trdmod.o) \ 
    11048    $(MODEL_LIB)(trdmod_oce.o) \ 
    11049    $(MODEL_LIB)(zdf_oce.o) \ 
    11050    $(MODEL_LIB)(zdfddm.o) \ 
    11051    dom_oce.F90 \ 
    11052    in_out_manager.F90 \ 
    11053    lbclnk.F90 \ 
    11054    ldfslp.F90 \ 
    11055    ldftra_oce.F90 \ 
    11056    oce.F90 \ 
    11057    prtctl.F90 \ 
    11058    trdmod.F90 \ 
    11059    trdmod_oce.F90 \ 
    11060    zdf_oce.F90 \ 
    11061    zdfddm.F90 \ 
    11062    domzgr_substitute.h90 \ 
    11063    ldftra_substitute.h90 \ 
    11064    zdf.matrixsolver.h90 \ 
    11065    zdfddm_substitute.h90 \ 
    11066    KEY_CPP \ 
    11067    trazdf_imp_jki.F90 
    1106810388$(MODEL_LIB)(trc_oce.o) :  \ 
    1106910389   $(MODEL_LIB)(par_kind.o) \ 
     
    1195311273   KEY_CPP \ 
    1195411274   zdftke.F90 
    11955 $(MODEL_LIB)(zdftke_jki.o) :  \ 
    11956    $(MODEL_LIB)(blk_oce.o) \ 
    11957    $(MODEL_LIB)(cpl_oasis3.o) \ 
    11958    $(MODEL_LIB)(cpl_oasis4.o) \ 
    11959    $(MODEL_LIB)(cpl_oce.o) \ 
    11960    $(MODEL_LIB)(daymod.o) \ 
    11961    $(MODEL_LIB)(dom_oce.o) \ 
    11962    $(MODEL_LIB)(dynzdf_exp.o) \ 
    11963    $(MODEL_LIB)(eosbn2.o) \ 
    11964    $(MODEL_LIB)(geo2ocean.o) \ 
    11965    $(MODEL_LIB)(ice.o) \ 
    11966    $(MODEL_LIB)(ice_oce.o) \ 
    11967    $(MODEL_LIB)(in_out_manager.o) \ 
    11968    $(MODEL_LIB)(ini1d.o) \ 
    11969    $(MODEL_LIB)(iom.o) \ 
    11970    $(MODEL_LIB)(lbclnk.o) \ 
    11971    $(MODEL_LIB)(lib_mpp.o) \ 
    11972    $(MODEL_LIB)(lib_print.o) \ 
    11973    $(MODEL_LIB)(oce.o) \ 
    11974    $(MODEL_LIB)(par_kind.o) \ 
    11975    $(MODEL_LIB)(par_oce.o) \ 
    11976    $(MODEL_LIB)(phycst.o) \ 
    11977    $(MODEL_LIB)(prtctl.o) \ 
    11978    $(MODEL_LIB)(restart.o) \ 
    11979    $(MODEL_LIB)(taumod.o) \ 
    11980    $(MODEL_LIB)(trazdf_exp.o) \ 
    11981    $(MODEL_LIB)(trdmld_oce.o) \ 
    11982    $(MODEL_LIB)(zdf_oce.o) \ 
    11983    $(MODEL_LIB)(zpshde.o) \ 
    11984    blk_oce.F90 \ 
    11985    cpl_oasis3.F90 \ 
    11986    cpl_oasis4.F90 \ 
    11987    cpl_oce.F90 \ 
    11988    daymod.F90 \ 
    11989    dom_oce.F90 \ 
    11990    dynzdf_exp.F90 \ 
    11991    eosbn2.F90 \ 
    11992    geo2ocean.F90 \ 
    11993    ice.F90 \ 
    11994    ice_oce.F90 \ 
    11995    in_out_manager.F90 \ 
    11996    ini1d.F90 \ 
    11997    iom.F90 \ 
    11998    lbclnk.F90 \ 
    11999    lib_mpp.F90 \ 
    12000    lib_print.f90 \ 
    12001    oce.F90 \ 
    12002    par_kind.F90 \ 
    12003    par_oce.F90 \ 
    12004    phycst.F90 \ 
    12005    prtctl.F90 \ 
    12006    restart.F90 \ 
    12007    taumod.F90 \ 
    12008    trazdf_exp.F90 \ 
    12009    trdmld_oce.F90 \ 
    12010    zdf_oce.F90 \ 
    12011    zpshde.F90 \ 
    12012    $(MODEL_LIB)(dom_oce.o) \ 
    12013    $(MODEL_LIB)(in_out_manager.o) \ 
    12014    $(MODEL_LIB)(lbclnk.o) \ 
    12015    $(MODEL_LIB)(oce.o) \ 
    12016    $(MODEL_LIB)(phycst.o) \ 
    12017    $(MODEL_LIB)(prtctl.o) \ 
    12018    $(MODEL_LIB)(restart.o) \ 
    12019    $(MODEL_LIB)(taumod.o) \ 
    12020    $(MODEL_LIB)(zdf_oce.o) \ 
    12021    $(MODEL_LIB)(zdftke.o) \ 
    12022    dom_oce.F90 \ 
    12023    in_out_manager.F90 \ 
    12024    lbclnk.F90 \ 
    12025    oce.F90 \ 
    12026    phycst.F90 \ 
    12027    prtctl.F90 \ 
    12028    restart.F90 \ 
    12029    taumod.F90 \ 
    12030    zdf_oce.F90 \ 
    12031    zdftke.F90 \ 
    12032    domzgr_substitute.h90 \ 
    12033    vectopt_loop_substitute.h90 \ 
    12034    KEY_CPP \ 
    12035    zdftke_jki.F90 
    1203611275$(MODEL_LIB)(zpshde.o) :   \ 
    1203711276   $(MODEL_LIB)(dom_oce.o) \ 
  • trunk/NEMO/OPA_SRC/DYN/dynhpg.F90

    r719 r789  
    1818   !!   dyn_hpg      : update the momentum trend with the now horizontal 
    1919   !!                  gradient of the hydrostatic pressure 
    20    !!                  default case : k-j-i loops (vector opt. available) 
    2120   !!       hpg_ctl  : initialisation and control of options 
    2221   !!       hpg_zco  : z-coordinate scheme 
     
    3029   USE oce             ! ocean dynamics and tracers 
    3130   USE dom_oce         ! ocean space and time domain 
    32    USE dynhpg_jki      ! 
    3331   USE phycst          ! physical constants 
    3432   USE in_out_manager  ! I/O manager 
     
    4240 
    4341   PUBLIC   dyn_hpg    ! routine called by step module 
    44  
    45 #if defined key_mpp_omp 
    46    !!---------------------------------------------------------------------- 
    47    !!   'key_mpp_omp' :                                 j-k-i loop (j-slab) 
    48    !!---------------------------------------------------------------------- 
    49    LOGICAL, PUBLIC, PARAMETER ::   lk_dynhpg_jki = .TRUE.    !: OpenMP hpg flag 
    50    LOGICAL, PUBLIC, PARAMETER ::   lk_dynhpg     = .FALSE.   !: vector hpg flag 
    51 #else 
    52    !!---------------------------------------------------------------------- 
    53    !!   default case :                             k-j-i loop (vector opt.) 
    54    !!----------------------------------------------------------------------    
    55    LOGICAL, PUBLIC, PARAMETER ::   lk_dynhpg_jki = .FALSE.   !: OpenMP hpg flag 
    56    LOGICAL, PUBLIC, PARAMETER ::   lk_dynhpg     = .TRUE.    !: vector hpg flag 
    57 #endif 
    5842 
    5943   !!* Namelist nam_dynhpg : Choice of horizontal pressure gradient computation 
     
    11195      CASE (  5 )   ;   CALL hpg_djc    ( kt )      ! s-coordinate (Density Jacobian with Cubic polynomial) 
    11296      CASE (  6 )   ;   CALL hpg_rot    ( kt )      ! s-coordinate (ROTated axes scheme) 
    113       CASE ( 10 )   ;   CALL hpg_zco_jki( kt )      ! z-coordinate (k-j-i) 
    114       CASE ( 11 )   ;   CALL hpg_zps_jki( kt )      ! z-coordinate plus partial steps (interpolation) (k-j-i) 
    115       CASE ( 12 )   ;   CALL hpg_sco_jki( kt )      ! s-coordinate (standard jacobian formulation) (k-j-i) 
    11697      END SELECT 
    11798 
     
    186167      IF ( ioptio /= 1 )   CALL ctl_stop( ' NO or several hydrostatic pressure gradient options used' ) 
    187168 
    188       IF( lk_dynhpg_jki ) THEN 
    189          nhpg = nhpg + 10 
    190          IF(lwp) WRITE(numout,*) 
    191          IF(lwp) WRITE(numout,*) '          Autotasking or OPENMP: use j-k-i loops (i.e. _jki routines)' 
    192       ENDIF 
    193169      ! 
    194170   END SUBROUTINE hpg_ctl 
  • trunk/NEMO/OPA_SRC/DYN/dynspg.F90

    r719 r789  
    2020   USE dynspg_flt     ! surface pressure gradient     (dyn_spg_flt routine) 
    2121   USE dynspg_rl      ! surface pressure gradient     (dyn_spg_rl  routine) 
    22    USE dynspg_exp_jki ! surface pressure gradient (dyn_spg_exp_jki routine) 
    23    USE dynspg_ts_jki  ! surface pressure gradient (dyn_spg_ts_jki  routine) 
    24    USE dynspg_flt_jki ! surface pressure gradient (dyn_spg_flt_jki routine) 
    2522   USE trdmod         ! ocean dynamics trends 
    2623   USE trdmod_oce     ! ocean variables trends 
     
    6865 
    6966      SELECT CASE ( nspg )                       ! compute surf. pressure gradient trend and add it to the general trend 
    70       !                                                      ! k-j-i loops 
     67      !                                                      
    7168      CASE (  0 )   ;   CALL dyn_spg_exp    ( kt )              ! explicit 
    7269      CASE (  1 )   ;   CALL dyn_spg_ts     ( kt )              ! time-splitting 
    7370      CASE (  2 )   ;   CALL dyn_spg_flt    ( kt, kindic )      ! filtered 
    7471      CASE (  3 )   ;   CALL dyn_spg_rl     ( kt, kindic )      ! rigid lid 
    75       !                                                      ! j-k-i loops 
    76       CASE ( 10 )   ;   CALL dyn_spg_exp_jki( kt )              ! explicit with j-k-i loop 
    77       CASE ( 11 )   ;   CALL dyn_spg_ts_jki ( kt )              ! time-splitting with j-k-i loop 
    78       CASE ( 12 )   ;   CALL dyn_spg_flt_jki( kt, kindic )      ! filtered with j-k-i loop 
    79       ! 
     72      !                                                     
    8073      CASE ( -1 )                                       ! esopa: test all possibility with control print 
    8174         ;              CALL dyn_spg_exp    ( kt ) 
     
    8780         ;              CALL dyn_spg_flt  ( kt, kindic ) 
    8881         ;              CALL prt_ctl( tab3d_1=ua, clinfo1=' spg2 - Ua: ', mask1=umask, & 
    89             &                         tab3d_2=va, clinfo2=       ' Va: ', mask2=vmask, clinfo3='dyn' ) 
    90          ;              CALL dyn_spg_exp_jki( kt ) 
    91          ;              CALL prt_ctl( tab3d_1=ua, clinfo1=' spg10- Ua: ', mask1=umask, & 
    92             &                         tab3d_2=va, clinfo2=       ' Va: ', mask2=vmask, clinfo3='dyn' ) 
    93          ;              CALL dyn_spg_ts_jki ( kt ) 
    94          ;              CALL prt_ctl( tab3d_1=ua, clinfo1=' spg12- Ua: ', mask1=umask, & 
    95             &                         tab3d_2=va, clinfo2=       ' Va: ', mask2=vmask, clinfo3='dyn' ) 
    96          ;              CALL dyn_spg_flt_jki( kt, kindic ) 
    97          ;              CALL prt_ctl( tab3d_1=ua, clinfo1=' spg13- Ua: ', mask1=umask, & 
    9882            &                         tab3d_2=va, clinfo2=       ' Va: ', mask2=vmask, clinfo3='dyn' ) 
    9983      END SELECT 
     
    159143      IF( lk_dynspg_flt)   nspg =  2 
    160144      IF( lk_dynspg_rl )   nspg =  3 
    161       IF( lk_jki       )   nspg =  nspg + 10 
    162145      IF( nspg == 13   )   nspg =  3 
    163146 
     
    171154         IF( nspg ==  2 )   WRITE(numout,*) '     filtered free surface' 
    172155         IF( nspg ==  3 )   WRITE(numout,*) '     rigid-lid' 
    173          IF( nspg == 10 )   WRITE(numout,*) '     explicit free surface with j-k-i loop' 
    174          IF( nspg == 11 )   WRITE(numout,*) '     time splitting free surface with j-k-i loop' 
    175          IF( nspg == 12 )   WRITE(numout,*) '     filtered free surface with j-k-i loop' 
    176156      ENDIF 
    177157 
  • trunk/NEMO/OPA_SRC/DYN/dynspg_exp.F90

    r746 r789  
    3333   !! * Accessibility 
    3434   PUBLIC dyn_spg_exp  ! routine called by step.F90 
    35    PUBLIC exp_rst      ! routine called j-k-i subroutine 
    3635 
    3736   !! * Substitutions 
  • trunk/NEMO/OPA_SRC/DYN/dynspg_flt.F90

    r784 r789  
    5151 
    5252   PUBLIC dyn_spg_flt  ! routine called by step.F90 
    53    PUBLIC flt_rst      ! routine called by j-k-i subroutine 
    5453 
    5554   !! * Substitutions 
  • trunk/NEMO/OPA_SRC/DYN/dynspg_ts.F90

    r788 r789  
    4141 
    4242   PUBLIC dyn_spg_ts  ! routine called by step.F90 
    43    PUBLIC ts_rst      ! routine called by j-k-i subroutine 
    4443 
    4544   REAL(wp), DIMENSION(jpi,jpj) ::  ftnw, ftne,   &  ! triad of coriolis parameter 
  • trunk/NEMO/OPA_SRC/DYN/dynvor.F90

    r719 r789  
    226226 
    227227!CDIR PARALLEL DO PRIVATE( zwx, zwy, zwz ) 
    228 !$OMP PARALLEL DO PRIVATE( zwx, zwy, zwz ) 
    229228      !                                                ! =============== 
    230229      DO jk = 1, jpkm1                                 ! Horizontal slab 
     
    333332 
    334333!CDIR PARALLEL DO PRIVATE( zwx, zwy, zwz, zww ) 
    335 !$OMP PARALLEL DO PRIVATE( zwx, zwy, zwz, zww ) 
    336334      !                                                ! =============== 
    337335      DO jk = 1, jpkm1                                 ! Horizontal slab 
     
    444442 
    445443!CDIR PARALLEL DO PRIVATE( zwx, zwy, zwz ) 
    446 !$OMP PARALLEL DO PRIVATE( zwx, zwy, zwz ) 
    447444      !                                                ! =============== 
    448445      DO jk = 1, jpkm1                                 ! Horizontal slab 
     
    567564       
    568565!CDIR PARALLEL DO PRIVATE( zwx, zwy, zwz, ztnw, ztne, ztsw, ztse ) 
    569 !$OMP PARALLEL DO PRIVATE( zwx, zwy, zwz, ztnw, ztne, ztsw, ztse ) 
    570566      !                                                ! =============== 
    571567      DO jk = 1, jpkm1                                 ! Horizontal slab 
  • trunk/NEMO/OPA_SRC/DYN/dynzad.F90

    r719 r789  
    3838CONTAINS 
    3939 
    40 #if defined key_mpp_omp 
    41    !!---------------------------------------------------------------------- 
    42    !!   'key_mpp_omp'        OpenMP / NEC autotasking: j-k-i loops (j-slab) 
    43    !!---------------------------------------------------------------------- 
    44  
    45    SUBROUTINE dyn_zad( kt ) 
    46       !!---------------------------------------------------------------------- 
    47       !!                  ***  ROUTINE dynzad  *** 
    48       !! 
    49       !! ** Purpose :   Compute the now vertical momentum advection trend and  
    50       !!      add it to the general trend of momentum equation. 
    51       !! 
    52       !! ** Method  :   Use j-slab (j-k-i loops) for OpenMP / NEC autotasking 
    53       !!      The now vertical advection of momentum is given by: 
    54       !!         w dz(u) = ua + 1/(e1u*e2u*e3u) mk+1[ mi(e1t*e2t*wn) dk(un) ] 
    55       !!         w dz(v) = va + 1/(e1v*e2v*e3v) mk+1[ mj(e1t*e2t*wn) dk(vn) ] 
    56       !!      Add this trend to the general trend (ua,va): 
    57       !!         (ua,va) = (ua,va) + w dz(u,v) 
    58       !! 
    59       !! ** Action  : - Update (ua,va) with the vert. momentum advection trends 
    60       !!              - Save the trends in (ztrdu,ztrdv) ('key_trddyn') 
    61       !!---------------------------------------------------------------------- 
    62       USE oce, ONLY:   zwuw => ta   ! use ta as 3D workspace 
    63       USE oce, ONLY:   zwvw => sa   ! use sa as 3D workspace 
    64       !! 
    65       INTEGER, INTENT(in) ::   kt   ! ocean time-step inedx 
    66       !! 
    67       INTEGER  ::   ji, jj, jk      ! dummy loop indices 
    68       REAL(wp) ::   zvn, zua, zva   ! temporary scalars 
    69       REAL(wp), DIMENSION(jpi)         ::   zww            ! 1D workspace 
    70       REAL(wp), DIMENSION(jpi,jpj,jpk) ::   ztrdu, ztrdv   ! 3D workspace 
    71       !!---------------------------------------------------------------------- 
    72        
    73       IF( kt == nit000 ) THEN 
    74          IF(lwp) WRITE(numout,*) 
    75          IF(lwp) WRITE(numout,*) 'dyn_zad : arakawa advection scheme' 
    76          IF(lwp) WRITE(numout,*) '~~~~~~~   Auto-tasking case, j-slab, no vector opt.' 
    77       ENDIF 
    78  
    79       IF( l_trddyn )   THEN         ! Save ua and va trends 
    80          ztrdu(:,:,:) = ua(:,:,:)  
    81          ztrdv(:,:,:) = va(:,:,:)  
    82       ENDIF 
    83  
    84       !                                                ! =============== 
    85       DO jj = 2, jpjm1                                 !  Vertical slab 
    86          !                                             ! =============== 
    87          DO jk = 2, jpkm1         ! Vertical momentum advection at uw and vw-pts 
    88             DO ji = 2, jpi              ! vertical fluxes  
    89                zww(ji) = 0.25 * e1t(ji,jj) * e2t(ji,jj) * wn(ji,jj,jk) 
    90             END DO 
    91             DO ji = 2, jpim1            ! vertical momentum advection at w-point 
    92                zvn = 0.25 * e1t(ji,jj+1) * e2t(ji,jj+1) * wn(ji,jj+1,jk) 
    93                zwuw(ji,jj,jk) = ( zww(ji+1) + zww(ji) ) * ( un(ji,jj,jk-1)-un(ji,jj,jk) ) 
    94                zwvw(ji,jj,jk) = ( zvn       + zww(ji) ) * ( vn(ji,jj,jk-1)-vn(ji,jj,jk) ) 
    95             END DO   
    96          END DO    
    97          DO ji = 2, jpim1               ! Surface and bottom values set to zero 
    98             zwuw(ji,jj, 1 ) = 0.e0 
    99             zwvw(ji,jj, 1 ) = 0.e0 
    100             zwuw(ji,jj,jpk) = 0.e0 
    101             zwvw(ji,jj,jpk) = 0.e0 
    102          END DO   
    103          ! 
    104          DO jk = 1, jpkm1         ! Vertical momentum advection at u- and v-points 
    105             DO ji = 2, jpim1 
    106                !                        ! vertical momentum advective trends 
    107                zua = - ( zwuw(ji,jj,jk) + zwuw(ji,jj,jk+1) ) / ( e1u(ji,jj) * e2u(ji,jj) * fse3u(ji,jj,jk) ) 
    108                zva = - ( zwvw(ji,jj,jk) + zwvw(ji,jj,jk+1) ) / ( e1v(ji,jj) * e2v(ji,jj) * fse3v(ji,jj,jk) ) 
    109                !                        ! add the trends to the general momentum trends 
    110                ua(ji,jj,jk) = ua(ji,jj,jk) + zua 
    111                va(ji,jj,jk) = va(ji,jj,jk) + zva 
    112             END DO   
    113          END DO   
    114          !                                             ! =============== 
    115       END DO                                           !   End of slab 
    116       !                                                ! =============== 
    117       ! 
    118       IF( l_trddyn ) THEN         ! save the vertical advection trends for diagnostic 
    119          ztrdu(:,:,:) = ua(:,:,:) - ztrdu(:,:,:) 
    120          ztrdv(:,:,:) = va(:,:,:) - ztrdv(:,:,:) 
    121          CALL trd_mod( ztrdu, ztrdv, jpdyn_trd_zad, 'DYN', kt ) 
    122       ENDIF 
    123       !                           ! Control print 
    124       IF(ln_ctl)   CALL prt_ctl( tab3d_1=ua, clinfo1=' zad  - Ua: ', mask1=umask,   & 
    125          &                       tab3d_2=va, clinfo2=' Va: ', mask2=vmask, clinfo3='dyn' ) 
    126       ! 
    127    END SUBROUTINE dyn_zad 
    128  
    129 #else 
    130    !!---------------------------------------------------------------------- 
    131    !!   Default option                             k-j-i loop (vector opt.) 
    132    !!---------------------------------------------------------------------- 
    133  
    13440   SUBROUTINE dyn_zad ( kt ) 
    13541      !!---------------------------------------------------------------------- 
     
    16268         IF(lwp)WRITE(numout,*) 
    16369         IF(lwp)WRITE(numout,*) 'dyn_zad : arakawa advection scheme' 
    164          IF(lwp)WRITE(numout,*) '~~~~~~~   vector optimization k-j-i loop' 
    16570      ENDIF 
    16671 
     
    215120      ! 
    216121   END SUBROUTINE dyn_zad 
    217 #endif 
    218122 
    219123   !!====================================================================== 
  • trunk/NEMO/OPA_SRC/DYN/dynzdf.F90

    r719 r789  
    1717   USE dynzdf_exp      ! vertical diffusion: explicit (dyn_zdf_exp     routine) 
    1818   USE dynzdf_imp      ! vertical diffusion: implicit (dyn_zdf_imp     routine) 
    19    USE dynzdf_imp_jki  ! vertical diffusion  implicit (dyn_zdf_imp_jki routine) 
    2019 
    2120   USE ldfdyn_oce      ! ocean dynamics: lateral physics 
     
    7473      ! 
    7574      CASE ( 0 )   ;   CALL dyn_zdf_exp    ( kt, r2dt )      ! explicit scheme 
    76       CASE ( 1 )   ;   CALL dyn_zdf_imp    ( kt, r2dt )      ! implicit scheme (k-j-i loop) 
    77       CASE ( 2 )   ;   CALL dyn_zdf_imp_jki( kt, r2dt )      ! implicit scheme (j-k-i loop) 
     75      CASE ( 1 )   ;   CALL dyn_zdf_imp    ( kt, r2dt )      ! implicit scheme 
    7876      ! 
    7977      CASE ( -1 )                                      ! esopa: test all possibility with control print 
     
    8381                       CALL dyn_zdf_imp    ( kt, r2dt ) 
    8482                       CALL prt_ctl( tab3d_1=ua, clinfo1=' zdf1 - Ua: ', mask1=umask,               & 
    85             &                        tab3d_2=va, clinfo2=       ' Va: ', mask2=vmask, clinfo3='dyn' ) 
    86                        CALL dyn_zdf_imp_jki( kt, r2dt ) 
    87                        CALL prt_ctl( tab3d_1=ua, clinfo1=' zdf2 - Ua: ', mask1=umask,               & 
    8883            &                        tab3d_2=va, clinfo2=       ' Va: ', mask2=vmask, clinfo3='dyn' ) 
    8984      END SELECT 
     
    109104      !! ** Method  :   implicit (euler backward) scheme (default) 
    110105      !!                explicit (time-splitting) scheme if ln_zdfexp=T 
    111       !!                OpenMP / NEC autotasking: use j-k-i loops 
    112106      !!---------------------------------------------------------------------- 
    113107      USE zdftke 
     
    125119      IF( ln_dynldf_hor .AND. ln_sco )   nzdf = 1   ! horizontal lateral physics in s-coordinate 
    126120 
    127       ! OpenMP / NEC autotasking 
    128 #if defined key_mpp_omp 
    129       IF( nzdf == 1 )   nzdf = 2                    ! j-k-i loop 
    130 #endif 
    131  
    132121      IF( lk_esopa )    nzdf = -1                   ! Esopa key: All schemes used 
    133122 
     
    139128         IF( nzdf ==  0 )   WRITE(numout,*) '              Explicit time-splitting scheme' 
    140129         IF( nzdf ==  1 )   WRITE(numout,*) '              Implicit (euler backward) scheme' 
    141          IF( nzdf ==  2 )   WRITE(numout,*) '              Implicit (euler backward) scheme with j-k-i loops' 
    142130      ENDIF 
    143131      ! 
  • trunk/NEMO/OPA_SRC/DYN/wzvmod.F90

    r719 r789  
    3636 
    3737CONTAINS 
    38  
    39 #if defined key_mpp_omp 
    40    !!---------------------------------------------------------------------- 
    41    !!   'key_mpp_omp'                                   j-k-i loop (j-slab) 
    42    !!---------------------------------------------------------------------- 
    43  
    44    SUBROUTINE wzv( kt ) 
    45       !!---------------------------------------------------------------------- 
    46       !!                    ***  ROUTINE wzv  *** 
    47       !!                      
    48       !! ** Purpose :   Compute the now vertical velocity after the array swap 
    49       !! 
    50       !! ** Method  :   Using the incompressibility hypothesis, the vertical 
    51       !!     velocity is computed by integrating the horizontal divergence  
    52       !!     from the bottom to the surface. 
    53       !!     The boundary conditions are w=0 at the bottom (no flux) and, 
    54       !!     in rigid-lid case, w=0 at the sea surface. 
    55       !! 
    56       !! ** action  :    wn array : the now vertical velocity 
    57       !!---------------------------------------------------------------------- 
    58       !! * Arguments 
    59       INTEGER, INTENT( in ) ::   kt      ! ocean time-step index 
    60  
    61       !! * Local declarations 
    62       INTEGER ::   jj, jk      ! dummy loop indices 
    63       !!---------------------------------------------------------------------- 
    64  
    65       IF( kt == nit000 ) THEN 
    66          IF(lwp) WRITE(numout,*) 
    67          IF(lwp) WRITE(numout,*) 'wzv     : vertical velocity from continuity eq.' 
    68          IF(lwp) WRITE(numout,*) '~~~~~~~                     j-k-i loops' 
    69  
    70          ! bottom boundary condition: w=0 (set once for all) 
    71          wn(:,:,jpk) = 0.e0 
    72       ENDIF 
    73  
    74       !                                                ! =============== 
    75       DO jj = 1, jpj                                   !  Vertical slab 
    76          !                                             ! =============== 
    77          ! Computation from the bottom 
    78          DO jk = jpkm1, 1, -1 
    79             wn(:,jj,jk) = wn(:,jj,jk+1) - fse3t(:,jj,jk) * hdivn(:,jj,jk) 
    80          END DO 
    81          !                                             ! =============== 
    82       END DO                                           !   End of slab 
    83       !                                                ! =============== 
    84  
    85       IF(ln_ctl)   CALL prt_ctl(tab3d_1=wn, clinfo1=' w**2 -   : ', mask1=wn) 
    86  
    87    END SUBROUTINE wzv 
    88  
    89 #else 
    90    !!---------------------------------------------------------------------- 
    91    !!   Default option                                           k-j-i loop 
    92    !!---------------------------------------------------------------------- 
    9338 
    9439   SUBROUTINE wzv( kt ) 
     
    189134 
    190135   END SUBROUTINE wzv 
    191 #endif 
    192136 
    193137   !!====================================================================== 
  • trunk/NEMO/OPA_SRC/LDF/ldfeiv.F90

    r719 r789  
    1010   !!---------------------------------------------------------------------- 
    1111   !!   ldf_eiv      : compute the eddy induced velocity coefficients 
    12    !!                  Same results but not same routine if 'key_mpp_omp' 
    13    !!                  is defined or not 
    1412   !!---------------------------------------------------------------------- 
    1513   !! * Modules used 
     
    4038 
    4139CONTAINS 
    42  
    43 # if defined key_mpp_omp 
    44    !!---------------------------------------------------------------------- 
    45    !!   'key_mpp_omp' :                  OpenMP /  NEC autotasking (j-slab) 
    46    !!---------------------------------------------------------------------- 
    47  
    48    SUBROUTINE ldf_eiv( kt ) 
    49       !!---------------------------------------------------------------------- 
    50       !!                  ***  ROUTINE ldf_eiv  *** 
    51       !! 
    52       !! ** Purpose :   Compute the eddy induced velocity coefficient from the 
    53       !!      growth rate of baroclinic instability. 
    54       !! 
    55       !! ** Method : 
    56       !! 
    57       !! ** Action :   uslp(),   : i- and j-slopes of neutral surfaces 
    58       !!               vslp()      at u- and v-points, resp. 
    59       !!               wslpi(),  : i- and j-slopes of neutral surfaces 
    60       !!               wslpj()     at w-points.  
    61       !! 
    62       !! History : 
    63       !!   8.1  !  99-03  (G. Madec, A. Jouzeau)  Original code 
    64       !!   8.5  !  02-06  (G. Madec)  Free form, F90 
    65       !!---------------------------------------------------------------------- 
    66       !! * Arguments 
    67       INTEGER, INTENT( in ) ::   kt     ! ocean time-step inedx 
    68        
    69       !! * Local declarations 
    70       INTEGER ::   ji, jj, jk           ! dummy loop indices 
    71       REAL(wp) ::   & 
    72          zfw, ze3w, zn2, zf20,       &  ! temporary scalars 
    73          zaht, zaht_min 
    74       REAL(wp), DIMENSION(jpi,jpj) ::   & 
    75          zn, zah, zhw, zross            ! workspace 
    76       !!---------------------------------------------------------------------- 
    77  
    78       IF( kt == nit000 ) THEN 
    79          IF(lwp) WRITE(numout,*) 
    80          IF(lwp) WRITE(numout,*) 'ldf_eiv : eddy induced velocity coefficients' 
    81          IF(lwp) WRITE(numout,*) '~~~~~~~   NEC autotasking / OpenMP : j-slab' 
    82       ENDIF 
    83        
    84       !                                                ! =============== 
    85       DO jj = 2, jpjm1                                 !  Vertical slab 
    86          !                                             ! =============== 
    87           
    88          ! 0. Local initialization 
    89          ! ----------------------- 
    90          zn   (:,jj) = 0.e0 
    91          zhw  (:,jj) = 5.e0 
    92          zah  (:,jj) = 0.e0 
    93          zross(:,jj) = 0.e0 
    94           
    95          ! 1. Compute lateral diffusive coefficient  
    96          ! ---------------------------------------- 
    97  
    98 !CDIR NOVERRCHK  
    99          DO jk = 1, jpk 
    100 !CDIR NOVERRCHK  
    101             DO ji = 2, jpim1 
    102                ! Take the max of N^2 and zero then take the vertical sum  
    103                ! of the square root of the resulting N^2 ( required to compute  
    104                ! internal Rossby radius Ro = .5 * sum_jpk(N) / f  
    105                zn2 = MAX( rn2(ji,jj,jk), 0.e0 ) 
    106                ze3w = fse3w(ji,jj,jk) * tmask(ji,jj,jk) 
    107                zn(ji,jj) = zn(ji,jj) + SQRT( zn2 ) * fse3w(ji,jj,jk) 
    108                ! Compute elements required for the inverse time scale of baroclinic 
    109                ! eddies using the isopycnal slopes calculated in ldfslp.F :  
    110                ! T^-1 = sqrt(m_jpk(N^2*(r1^2+r2^2)*e3w)) 
    111                zah(ji,jj) = zah(ji,jj) + zn2   & 
    112                               * ( wslpi(ji,jj,jk) * wslpi(ji,jj,jk)    & 
    113                                 + wslpj(ji,jj,jk) * wslpj(ji,jj,jk) )   & 
    114                               * ze3w 
    115                zhw(ji,jj) = zhw(ji,jj) + ze3w 
    116             END DO  
    117          END DO  
    118   
    119 !CDIR NOVERRCHK  
    120          DO ji = 2, jpim1 
    121             zfw = MAX( ABS( 2. * omega * SIN( rad * gphit(ji,jj) ) ) , 1.e-10 ) 
    122             ! Rossby radius at w-point taken < 40km and  > 2km 
    123             zross(ji,jj) = MAX( MIN( .4 * zn(ji,jj) / zfw, 40.e3 ), 2.e3 ) 
    124             ! Compute aeiw by multiplying Ro^2 and T^-1 
    125             aeiw(ji,jj) = zross(ji,jj) * zross(ji,jj) * SQRT( zah(ji,jj) / zhw(ji,jj) ) * tmask(ji,jj,1) 
    126             IF( cp_cfg == "orca" .AND. jp_cfg == 2 ) THEN   ! ORCA R02 
    127                ! Take the minimum between aeiw and aeiv0 for depth levels 
    128                ! lower than 20 (21 in w- point) 
    129                IF( mbathy(ji,jj) <= 21. ) aeiw(ji,jj) = MIN( aeiw(ji,jj), 1000. ) 
    130             ENDIF 
    131          END DO 
    132  
    133          ! Decrease the coefficient in the tropics (20N-20S)  
    134          zf20 = 2. * omega * sin( rad * 20. ) 
    135          DO ji = 2, jpim1 
    136             aeiw(ji,jj) = MIN( 1., ABS( ff(ji,jj) / zf20 ) ) * aeiw(ji,jj) 
    137          END DO 
    138    
    139          ! ORCA R05: Take the minimum between aeiw and aeiv0 
    140          IF( cp_cfg == "orca" .AND. jp_cfg == 05 ) THEN   ! ORCA R05 
    141             DO ji = 2, jpim1 
    142                aeiw(ji,jj) = MIN( aeiw(ji,jj), aeiv0 ) 
    143             END DO 
    144          ENDIF 
    145          !                                             ! =============== 
    146       END DO                                           !   End of slab 
    147       !                                                ! =============== 
    148  
    149       !,,,,,,,,,,,,,,,,,,,,,,,,,,,,,synchro,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, 
    150  
    151       ! lateral boundary condition on aeiw  
    152       CALL lbc_lnk( aeiw, 'W', 1. ) 
    153  
    154       ! Average the diffusive coefficient at u- v- points  
    155       DO jj = 2, jpjm1 
    156          DO ji = fs_2, fs_jpim1   ! vector opt. 
    157             aeiu(ji,jj) = .5 * (aeiw(ji,jj) + aeiw(ji+1,jj  )) 
    158             aeiv(ji,jj) = .5 * (aeiw(ji,jj) + aeiw(ji  ,jj+1)) 
    159          END DO  
    160       END DO  
    161       !,,,,,,,,,,,,,,,,,,,,,,,,,,,,,synchro,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, 
    162  
    163       ! lateral boundary condition on aeiu, aeiv  
    164       CALL lbc_lnk( aeiu, 'U', 1. ) 
    165       CALL lbc_lnk( aeiv, 'V', 1. ) 
    166  
    167       IF(ln_ctl)   THEN 
    168          CALL prt_ctl(tab2d_1=aeiu, clinfo1=' eiv  - u: ', ovlap=1) 
    169          CALL prt_ctl(tab2d_1=aeiv, clinfo1=' eiv  - v: ', ovlap=1) 
    170       ENDIF 
    171        
    172       ! ORCA R05: add a space variation on aht (=aeiv except at the equator and river mouth) 
    173       IF( cp_cfg == "orca" .AND. jp_cfg == 05 ) THEN 
    174          zf20     = 2. * omega * SIN( rad * 20. ) 
    175          zaht_min = 100.                              ! minimum value for aht 
    176          DO jj = 1, jpj 
    177             DO ji = 1, jpi 
    178                zaht      = ( 1. -  MIN( 1., ABS( ff(ji,jj) / zf20 ) ) ) * ( aht0 - zaht_min )  & 
    179                   &      + aht0 * upsrnfh(ji,jj)                          ! enhanced near river mouths 
    180                ahtu(ji,jj) = MAX( MAX( zaht_min, aeiu(ji,jj) ) + zaht, aht0 ) 
    181                ahtv(ji,jj) = MAX( MAX( zaht_min, aeiv(ji,jj) ) + zaht, aht0 ) 
    182                ahtw(ji,jj) = MAX( MAX( zaht_min, aeiw(ji,jj) ) + zaht, aht0 ) 
    183             END DO 
    184          END DO 
    185          IF(ln_ctl) THEN 
    186             CALL prt_ctl(tab2d_1=ahtu, clinfo1=' aht  - u: ', ovlap=1) 
    187             CALL prt_ctl(tab2d_1=ahtv, clinfo1=' aht  - v: ', ovlap=1) 
    188             CALL prt_ctl(tab2d_1=ahtw, clinfo1=' aht  - w: ', ovlap=1) 
    189          ENDIF 
    190       ENDIF 
    191  
    192       IF( aeiv0 == 0.e0 ) THEN 
    193          aeiu(:,:) = 0.e0 
    194          aeiv(:,:) = 0.e0 
    195          aeiw(:,:) = 0.e0 
    196       ENDIF 
    197  
    198    END SUBROUTINE ldf_eiv 
    199  
    200 # else 
    201    !!---------------------------------------------------------------------- 
    202    !!   Default key                                             k-j-i loops 
    203    !!---------------------------------------------------------------------- 
    20440 
    20541   SUBROUTINE ldf_eiv( kt ) 
     
    25187 
    25288      DO jk = 1, jpk 
    253 #  if defined key_vectopt_loop  &&  ! defined key_mpp_omp 
     89#  if defined key_vectopt_loop   
    25490!CDIR NOVERRCHK  
    25591         DO ji = 1, jpij   ! vector opt. 
     
    373209   END SUBROUTINE ldf_eiv 
    374210 
    375 # endif 
    376  
    377211#else 
    378212   !!---------------------------------------------------------------------- 
  • trunk/NEMO/OPA_SRC/LDF/ldfslp.F90

    r719 r789  
    139139 
    140140      IF( ln_zps ) THEN      ! partial steps correction at the bottom ocean level (zps_hde routine) 
    141 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     141# if defined key_vectopt_loop   
    142142         jj = 1 
    143143         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    151151               zgru(ji,jj,iku) = gru(ji,jj)  
    152152               zgrv(ji,jj,ikv) = grv(ji,jj)                
    153 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     153# if ! defined key_vectopt_loop  
    154154            END DO 
    155155# endif 
     
    490490      ! mask for mixed layer 
    491491      DO jk = 1, jpk 
    492 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     492# if defined key_vectopt_loop 
    493493         jj = 1 
    494494         DO ji = 1, jpij   ! vector opt. (forced unrolling) 
     
    504504                  omlmask(ji,jj,jk) = 0.e0 
    505505               ENDIF 
    506 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     506# if ! defined key_vectopt_loop 
    507507            END DO 
    508508# endif 
     
    522522      zwy(:,jpj) = 0.e0 
    523523      zwy(jpi,:) = 0.e0 
    524 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     524# if defined key_vectopt_loop 
    525525      jj = 1 
    526526      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    535535               &             * ( pn2(ji,jj,ik) + pn2(ji,jj,ik+1) )   & 
    536536               &             / MAX( tmask(ji,jj,ik) + tmask (ji,jj,ik+1), 1. ) 
    537 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     537# if ! defined key_vectopt_loop 
    538538         END DO 
    539539# endif 
     
    543543 
    544544      ! Slope at u points 
    545 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     545# if defined key_vectopt_loop 
    546546      jj = 1 
    547547      DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    560560            ! uslpml 
    561561            uslpml (ji,jj) = zau / ( zbu - zeps ) * umask (ji,jj,ik) 
    562 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     562# if ! defined key_vectopt_loop 
    563563         END DO 
    564564# endif 
     
    572572      zwy ( :, jpj) = 0.e0 
    573573      zwy ( jpi, :) = 0.e0 
    574 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     574# if defined key_vectopt_loop 
    575575      jj = 1 
    576576      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    584584               &             * ( pn2(ji,jj,ik) + pn2(ji,jj,ik+1) )   & 
    585585               &             / MAX( tmask(ji,jj,ik) + tmask (ji,jj,ik+1), 1. ) 
    586 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     586# if ! defined key_vectopt_loop 
    587587         END DO 
    588588# endif 
     
    593593 
    594594      ! Slope at v points 
    595 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     595# if defined key_vectopt_loop 
    596596      jj = 1 
    597597      DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    610610            ! vslpml 
    611611            vslpml (ji,jj) = zav / ( zbv - zeps ) * vmask (ji,jj,ik) 
    612 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     612# if ! defined key_vectopt_loop 
    613613         END DO 
    614614# endif 
     
    624624      ! Local vertical density gradient evaluated from N^2 
    625625      ! zwy = d/dz(prd)= - mk ( prd ) / grav * pn2 -- at w point 
    626 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     626# if defined key_vectopt_loop 
    627627      jj = 1 
    628628      DO ji = 1, jpij   ! vector opt. (forced unrolling) 
     
    636636            zwy (ji,jj) = zm05g * pn2 (ji,jj,ik) *     & 
    637637               &             ( prd (ji,jj,ik) + prd (ji,jj,ikm1) + 2. ) 
    638 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     638# if ! defined key_vectopt_loop 
    639639         END DO 
    640640# endif 
     
    642642 
    643643      ! Slope at w point 
    644 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     644# if defined key_vectopt_loop 
    645645      jj = 1 
    646646      DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    672672            wslpiml (ji,jj) = zai / ( zbi - zeps) * tmask (ji,jj,ik) 
    673673            wslpjml (ji,jj) = zaj / ( zbj - zeps) * tmask (ji,jj,ik) 
    674 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     674# if ! defined key_vectopt_loop 
    675675         END DO 
    676676# endif 
  • trunk/NEMO/OPA_SRC/SBC/flxblk.F90

    r719 r789  
    412412 
    413413      DO jt = 1, jpintsr  
    414 #   if defined key_vectopt_loop && ! defined key_mpp_omp 
     414#   if defined key_vectopt_loop  
    415415         DO ji = 1, jpij   
    416416            zalbocsd(ji,1) = zalbocsd(ji,1) + zdlha   (ji,1) * zalbocs(ji,1,jt)   & 
  • trunk/NEMO/OPA_SRC/TRA/traadv.F90

    r719 r789  
    1414   USE dom_oce         ! ocean space and time domain 
    1515   USE traadv_cen2     ! 2nd order centered scheme (tra_adv_cen2   routine) 
    16    USE traadv_cen2_jki ! 2nd order centered scheme (tra_adv_cen2   routine) 
    1716   USE traadv_tvd      ! TVD      scheme           (tra_adv_tvd    routine) 
    1817   USE traadv_muscl    ! MUSCL    scheme           (tra_adv_muscl  routine) 
     
    8887 
    8988      SELECT CASE ( nadv )                           ! compute advection trend and add it to general trend 
    90       CASE ( 0 )   ;   CALL tra_adv_cen2    ( kt, zun, zvn, zwn )    ! 2nd order centered scheme k-j-i loops 
    91       CASE ( 1 )   ;   CALL tra_adv_cen2_jki( kt, zun, zvn, zwn )    ! 2nd order centered scheme 
     89      CASE ( 1 )   ;   CALL tra_adv_cen2    ( kt, zun, zvn, zwn )    ! 2nd order centered scheme 
    9290      CASE ( 2 )   ;   CALL tra_adv_tvd     ( kt, zun, zvn, zwn )    ! TVD      scheme 
    9391      CASE ( 3 )   ;   CALL tra_adv_muscl   ( kt, zun, zvn, zwn )    ! MUSCL    scheme 
     
    9997                       CALL tra_adv_cen2    ( kt, zun, zvn, zwn ) 
    10098                       CALL prt_ctl( tab3d_1=ta, clinfo1=' adv0 - Ta: ', mask1=tmask,               & 
    101             &                        tab3d_2=sa, clinfo2=       ' Sa: ', mask2=tmask, clinfo3='tra' ) 
    102                        CALL tra_adv_cen2_jki( kt, zun, zvn, zwn ) 
    103                        CALL prt_ctl( tab3d_1=ta, clinfo1=' adv1 - Ta: ', mask1=tmask,               & 
    10499            &                        tab3d_2=sa, clinfo2=       ' Sa: ', mask2=tmask, clinfo3='tra' ) 
    105100                       CALL tra_adv_tvd     ( kt, zun, zvn, zwn ) 
     
    171166 
    172167      !                              ! Set nadv 
    173       IF( ln_traadv_cen2   )   nadv =  0 
    174 #if defined key_mpp_omp 
    175168      IF( ln_traadv_cen2   )   nadv =  1 
    176 #endif 
    177169      IF( ln_traadv_tvd    )   nadv =  2 
    178170      IF( ln_traadv_muscl  )   nadv =  3 
     
    184176      IF(lwp) THEN                   ! Print the choice 
    185177         WRITE(numout,*) 
    186          IF( nadv ==  0 )   WRITE(numout,*) '         2nd order scheme is used' 
    187          IF( nadv ==  1 )   WRITE(numout,*) '         2nd order scheme is usedi, k-j-i case' 
     178         IF( nadv ==  1 )   WRITE(numout,*) '         2nd order scheme is used' 
    188179         IF( nadv ==  2 )   WRITE(numout,*) '         TVD       scheme is used' 
    189180         IF( nadv ==  3 )   WRITE(numout,*) '         MUSCL     scheme is used' 
    190181         IF( nadv ==  4 )   WRITE(numout,*) '         MUSCL2    scheme is used' 
    191182         IF( nadv ==  5 )   WRITE(numout,*) '         UBS       scheme is used' 
    192          IF( nadv ==  6 )   WRITE(numout,*) '         PPM       scheme is used' 
    193          IF( nadv ==  7 )   WRITE(numout,*) '         QUICKEST  scheme is used' 
     183         IF( nadv ==  6 )   WRITE(numout,*) '         QUICKEST  scheme is used' 
    194184         IF( nadv == -1 )   WRITE(numout,*) '         esopa test: use all advection scheme' 
    195185      ENDIF 
  • trunk/NEMO/OPA_SRC/TRA/traadv_cen2.F90

    r719 r789  
    1313   !!   tra_adv_cen2 : update the tracer trend with the horizontal and 
    1414   !!                  vertical advection trends using a seconder order 
    15    !!                  centered scheme. (k-j-i loops) 
    1615   !!---------------------------------------------------------------------- 
    1716   USE oce             ! ocean dynamics and active tracers 
  • trunk/NEMO/OPA_SRC/TRA/traadv_qck.F90

    r719 r789  
    5252 
    5353CONTAINS 
    54  
    55 #if ! defined key_mpp_omp 
    56    !!---------------------------------------------------------------------- 
    57    !!   Default option :             quickest advection scheme (k-j-i loop) 
    58    !!---------------------------------------------------------------------- 
    5954 
    6055   SUBROUTINE tra_adv_qck( kt, pun, pvn, pwn ) 
     
    581576   END FUNCTION 
    582577 
    583 #else 
    584    !!---------------------------------------------------------------------- 
    585    !!   'key_mpp_omp' :      quickest advection (k- and j-slabs) 
    586    !!---------------------------------------------------------------------- 
    587    SUBROUTINE tra_adv_qck( kt, pun, pvn, pwn  ) 
    588       !!---------------------------------------------------------------------- 
    589       !! * Arguments 
    590       INTEGER, INTENT( in ) ::   kt             ! ocean time-step index 
    591       REAL(wp), INTENT(in), DIMENSION(jpi,jpj,jpk) ::  pun   ! effective ocean velocity, u_component 
    592       REAL(wp), INTENT(in), DIMENSION(jpi,jpj,jpk) ::  pvn   ! effective ocean velocity, v_component 
    593       REAL(wp), INTENT(in), DIMENSION(jpi,jpj,jpk) ::  pwn   ! effective ocean velocity, w_component 
    594       !!----------------------------------------------------------------------   
    595          IF(lwp) WRITE(numout,*) 
    596          IF(lwp) WRITE(numout,*) 'tra_adv_ qck:3st order quickest advection scheme'  
    597          IF(lwp) WRITE(numout,*) '~~~~~~~~~~~~   Vector optimization case' 
    598          IF(lwp) WRITE(numout,*) 'WITH AUTOTASKING =>this routine doesn t exist for the moment' 
    599     IF(lwp) WRITE(numout,*) ' EMPTY ROUTINE!!!!!!'       
    600  
    601    END SUBROUTINE tra_adv_qck 
    602  
    603 #endif 
    604  
    605578   !!====================================================================== 
    606579END MODULE traadv_qck 
  • trunk/NEMO/OPA_SRC/TRA/trabbc.F90

    r719 r789  
    7575      INTEGER, INTENT( in ) ::   kt   ! ocean time-step index 
    7676      !! 
    77 #if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     77#if defined key_vectopt_loop 
    7878      INTEGER ::   ji       ! dummy loop indices 
    7979#else 
     
    9595      ! 
    9696      CASE ( 1:2 )                !  geothermal heat flux 
    97 #if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     97#if defined key_vectopt_loop 
    9898         DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
    9999            zqgh_trd = ro0cpr * qgh_trd0(ji,1) / fse3t(ji,1,nbotlevt(ji,1) ) 
  • trunk/NEMO/OPA_SRC/TRA/trabbl.F90

    r719 r789  
    154154      ! ----------------------------------------------------------------- 
    155155      ! mbathy= number of w-level, minimum value=1 (cf dommsk.F) 
    156 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     156#  if defined key_vectopt_loop 
    157157      jj = 1 
    158158      DO ji = 1, jpij   ! vector opt. (forced unrolling) 
     
    167167            zsbb(ji,jj) = sb(ji,jj,ik) * tmask(ji,jj,1) 
    168168            zdep(ji,jj) = fsdept(ji,jj,ik)                ! depth of the ocean bottom T-level 
    169 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     169#  if ! defined key_vectopt_loop 
    170170         END DO 
    171171#  endif 
     
    173173 
    174174      IF( ln_zps ) THEN      ! partial steps correction  
    175 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     175# if defined key_vectopt_loop 
    176176         jj = 1 
    177177         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    188188               zahu(ji,jj) = atrbbl * e2u(ji,jj) * ze3u / e1u(ji,jj) * umask(ji,jj,1) 
    189189               zahv(ji,jj) = atrbbl * e1v(ji,jj) * ze3v / e2v(ji,jj) * vmask(ji,jj,1) 
    190 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     190# if ! defined key_vectopt_loop 
    191191            END DO 
    192192# endif 
    193193         END DO 
    194194      ELSE                    ! z-coordinate - full steps or s-coordinate 
    195 #   if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     195#   if defined key_vectopt_loop 
    196196         jj = 1 
    197197         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    204204               zahu(ji,jj) = atrbbl * e2u(ji,jj) * fse3u(ji,jj,iku) / e1u(ji,jj) * umask(ji,jj,1) 
    205205               zahv(ji,jj) = atrbbl * e1v(ji,jj) * fse3v(ji,jj,ikv) / e2v(ji,jj) * vmask(ji,jj,1) 
    206 #   if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     206#   if ! defined key_vectopt_loop 
    207207            END DO 
    208208#   endif 
     
    219219      CASE ( 0 )                 ! Jackett and McDougall (1994) formulation 
    220220 
    221 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     221#  if defined key_vectopt_loop 
    222222      jj = 1 
    223223      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    238238            zsign = SIGN( 0.5, - zgdrho * ( zdep(ji+1,jj) - zdep(ji,jj) ) ) 
    239239            zki(ji,jj) = ( 0.5 - zsign ) * zahu(ji,jj) 
    240 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
    241          END DO 
    242 #  endif 
    243       END DO 
    244  
    245 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     240#  if ! defined key_vectopt_loop 
     241         END DO 
     242#  endif 
     243      END DO 
     244 
     245#  if defined key_vectopt_loop 
    246246      jj = 1 
    247247      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    262262            zsign = sign( 0.5, -zgdrho * ( zdep(ji,jj+1) - zdep(ji,jj) ) ) 
    263263            zkj(ji,jj) = ( 0.5 - zsign ) * zahv(ji,jj) 
    264 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     264#  if ! defined key_vectopt_loop 
    265265         END DO 
    266266#  endif 
     
    269269      CASE ( 1 )               ! Linear formulation function of temperature only 
    270270                               !  
    271 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     271#  if defined key_vectopt_loop 
    272272      jj = 1 
    273273      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    281281            zsign = SIGN( 0.5, - zgdrho * ( zdep(ji+1,jj) - zdep(ji,jj) ) ) 
    282282            zki(ji,jj) = ( 0.5 - zsign ) * zahu(ji,jj) 
    283 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
    284          END DO 
    285 #  endif 
    286       END DO 
    287  
    288 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     283#  if ! defined key_vectopt_loop 
     284         END DO 
     285#  endif 
     286      END DO 
     287 
     288#  if defined key_vectopt_loop 
    289289      jj = 1 
    290290      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    298298            zsign = sign( 0.5, -zgdrho * ( zdep(ji,jj+1) - zdep(ji,jj) ) ) 
    299299            zkj(ji,jj) = ( 0.5 - zsign ) * zahv(ji,jj) 
    300 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     300#  if ! defined key_vectopt_loop 
    301301         END DO 
    302302#  endif 
     
    305305      CASE ( 2 )               ! Linear formulation function of temperature and salinity 
    306306 
    307 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     307#  if defined key_vectopt_loop 
    308308      jj = 1 
    309309      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    318318            zsign = SIGN( 0.5, - zgdrho * ( zdep(ji+1,jj) - zdep(ji,jj) ) ) 
    319319            zki(ji,jj) = ( 0.5 - zsign ) * zahu(ji,jj) 
    320 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
    321          END DO 
    322 #  endif 
    323       END DO 
    324  
    325 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     320#  if ! defined key_vectopt_loop 
     321         END DO 
     322#  endif 
     323      END DO 
     324 
     325#  if defined key_vectopt_loop 
    326326      jj = 1 
    327327      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    336336            zsign = sign( 0.5, -zgdrho * ( zdep(ji,jj+1) - zdep(ji,jj) ) ) 
    337337            zkj(ji,jj) = ( 0.5 - zsign ) * zahv(ji,jj) 
    338 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     338#  if ! defined key_vectopt_loop 
    339339         END DO 
    340340#  endif 
     
    352352 
    353353      ! first derivative (gradient) 
    354 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     354#  if defined key_vectopt_loop 
    355355      jj = 1 
    356356      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    364364            zky(ji,jj) = zkj(ji,jj) * ( ztbb(ji,jj+1) - ztbb(ji,jj) ) 
    365365            zkw(ji,jj) = zkj(ji,jj) * ( zsbb(ji,jj+1) - zsbb(ji,jj) ) 
    366 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     366#  if ! defined key_vectopt_loop 
    367367         END DO 
    368368#  endif 
     
    402402 
    403403      ! second derivative (divergence) and add to the general tracer trend 
    404 #  if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     404#  if defined key_vectopt_loop 
    405405      jj = 1 
    406406      DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    417417            ta(ji,jj,ik) = ta(ji,jj,ik) + zta 
    418418            sa(ji,jj,ik) = sa(ji,jj,ik) + zsa 
    419 #  if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     419#  if ! defined key_vectopt_loop 
    420420         END DO 
    421421#  endif 
  • trunk/NEMO/OPA_SRC/TRA/trabbl_adv.h90

    r719 r789  
    9999      ! mbathy= number of w-level, minimum value=1 (cf dommsk.F) 
    100100 
    101 #if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     101#if defined key_vectopt_loop 
    102102      jj = 1 
    103103      DO ji = 1, jpij   ! vector opt. (forced unrolling) 
     
    115115            zunb(ji,jj) = un(ji,jj,mbku(ji,jj))  
    116116            zvnb(ji,jj) = vn(ji,jj,mbkv(ji,jj))  
    117 #if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     117#if ! defined key_vectopt_loop 
    118118         END DO 
    119119#endif 
     
    229229      IF( ln_zps ) THEN     ! partial steps correction    
    230230       
    231 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     231# if defined key_vectopt_loop 
    232232         jj = 1 
    233233         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    249249                  v_bbl(ji,jj,ikv) = zalphay(ji,jj) * vn(ji,jj,ikv) * ze3v / fse3v(ji,jj,ikv)        
    250250               ENDIF 
    251 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     251# if ! defined key_vectopt_loop 
    252252            END DO 
    253253# endif 
     
    259259      ELSE       ! if not partial step loop over the whole domain no lbc call 
    260260 
    261 #if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     261#if defined key_vectopt_loop 
    262262         jj = 1 
    263263         DO ji = 1, jpij   ! vector opt. (forced unrolling) 
     
    272272                  v_bbl(ji,jj,ikv) = zalphay(ji,jj) * vn(ji,jj,ikv)        
    273273               ENDIF 
    274 #if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     274#if ! defined key_vectopt_loop 
    275275            END DO 
    276276#endif 
     
    284284      ! ... Second order centered tracer flux at u and v-points 
    285285 
    286 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     286# if defined key_vectopt_loop 
    287287      jj = 1 
    288288      DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    309309            zwz(ji,jj) = ( ( zfvj + ABS( zfvj ) ) * zsbb(ji  ,jj  )   & 
    310310               &          +( zfvj - ABS( zfvj ) ) * zsbb(ji  ,jj+1) ) * 0.5 
    311 #if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     311#if ! defined key_vectopt_loop 
    312312         END DO 
    313313#endif 
    314314        END DO 
    315 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     315# if defined key_vectopt_loop 
    316316      jj = 1 
    317317      DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    331331            ta(ji,jj,ik) = ta(ji,jj,ik) + zta 
    332332            sa(ji,jj,ik) = sa(ji,jj,ik) + zsa 
    333 #if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     333#if ! defined key_vectopt_loop 
    334334         END DO 
    335335#endif 
     
    365365      IF( ln_zps ) THEN 
    366366      
    367 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     367# if defined key_vectopt_loop 
    368368         jj = 1 
    369369         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    383383               zwu(ji,jj) = zalphax(ji,jj) * e2u(ji,jj) * ze3u   
    384384               zwv(ji,jj) = zalphay(ji,jj) * e1v(ji,jj) * ze3v 
    385 #if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     385#if ! defined key_vectopt_loop 
    386386            END DO 
    387387#endif 
     
    390390      ELSE 
    391391 
    392 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     392# if defined key_vectopt_loop 
    393393         jj = 1 
    394394         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolling) 
     
    401401               zwu(ji,jj) = zalphax(ji,jj) * e2u(ji,jj) * fse3u(ji,jj,iku)  
    402402               zwv(ji,jj) = zalphay(ji,jj) * e1v(ji,jj) * fse3v(ji,jj,ikv)  
    403 #if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     403#if ! defined key_vectopt_loop 
    404404            END DO 
    405405#endif 
     
    409409  
    410410 
    411 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     411# if defined key_vectopt_loop 
    412412      jj = 1 
    413413      DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    425425               &   ) / zbt 
    426426 
    427 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     427# if ! defined key_vectopt_loop 
    428428         END DO 
    429429# endif 
  • trunk/NEMO/OPA_SRC/TRA/traldf_iso.F90

    r719 r789  
    1818   !!                  and with the vertical part of 
    1919   !!                  the isopycnal or geopotential s-coord. operator  
    20    !!                  vector optimization, use k-j-i loops. 
    2120   !!---------------------------------------------------------------------- 
    2221   USE oce             ! ocean dynamics and active tracers 
     
    151150       
    152151!CDIR PARALLEL DO PRIVATE( zdk1t, zdk1s, zftu, zfsu )  
    153 !$OMP PARALLEL DO PRIVATE( zdk1t, zdk1s, zftu, zfsu ) 
    154152      !                                                ! =============== 
    155153      DO jk = 1, jpkm1                                 ! Horizontal slab 
  • trunk/NEMO/OPA_SRC/TRA/trazdf.F90

    r719 r789  
    1717   USE trazdf_exp      ! vertical diffusion: explicit (tra_zdf_exp     routine) 
    1818   USE trazdf_imp      ! vertical diffusion: implicit (tra_zdf_imp     routine) 
    19    USE trazdf_imp_jki  ! vertical diffusion  implicit (tra_zdf_imp_jki routine) 
    2019 
    2120   USE ldftra_oce      ! ocean active tracers: lateral physics 
     
    9089         CALL prt_ctl( tab3d_1=ta, clinfo1=' zdf1 - Ta: ', mask1=tmask,               & 
    9190            &          tab3d_2=sa, clinfo2=       ' Sa: ', mask2=tmask, clinfo3='tra' ) 
    92          CALL tra_zdf_imp_jki( kt, r2dt ) 
    93          CALL prt_ctl( tab3d_1=ta, clinfo1=' zdf2 - Ta: ', mask1=tmask,               & 
    94             &          tab3d_2=sa, clinfo2=       ' Sa: ', mask2=tmask, clinfo3='tra' ) 
    9591 
    9692      CASE ( 0 )                                       ! explicit scheme 
     
    10298         ENDIF 
    10399 
    104       CASE ( 1 )                                       ! implicit scheme (k-j-i loop) 
     100      CASE ( 1 )                                       ! implicit scheme  
    105101         CALL tra_zdf_imp    ( kt, r2dt ) 
    106          IF( l_trdtra )   THEN                         ! save the vertical diffusive trends for further diagnostics 
    107             DO jk = 1, jpkm1 
    108                ztrdt(:,:,jk) = ( ( ta(:,:,jk) - tb(:,:,jk) ) / r2dt(jk) ) - ztrdt(:,:,jk) 
    109                ztrds(:,:,jk) = ( ( sa(:,:,jk) - sb(:,:,jk) ) / r2dt(jk) ) - ztrds(:,:,jk) 
    110             END DO 
    111             CALL trd_mod( ztrdt, ztrds, jptra_trd_zdf, 'TRA', kt ) 
    112          ENDIF 
    113  
    114       CASE ( 2 )                                       ! implicit scheme (j-k-i loop) 
    115          CALL tra_zdf_imp_jki( kt, r2dt ) 
    116102         IF( l_trdtra )   THEN                         ! save the vertical diffusive trends for further diagnostics 
    117103            DO jk = 1, jpkm1 
     
    137123      !! ** Purpose :   Choose the vertical mixing scheme 
    138124      !! 
    139       !! ** Method  :   Set nzdf from ln_zdfexp and 'key_mpp_omp'. 
     125      !! ** Method  :   Set nzdf from ln_zdfexp 
    140126      !!      nzdf = 0   explicit (time-splitting) scheme (ln_zdfexp=T) 
    141127      !!           = 1   implicit (euler backward) scheme (ln_zdfexp=F) 
    142       !!           = 2   implicit (euler backward) scheme with j-k-i loops 
    143       !!                 (ln_zdfexp=T and 'key_mpp_omp') 
    144128      !!      NB: rotation of lateral mixing operator or TKE or KPP scheme, 
    145129      !!      the implicit scheme is required. 
     
    169153      ENDIF 
    170154 
    171       ! NEC autotasking / OpenMP 
    172 #if defined key_mpp_omp 
    173       IF( nzdf == 1 )   nzdf = 2                       ! j-k-i loop 
    174 #endif 
    175  
    176155      ! Test: esopa 
    177156      IF( lk_esopa )    nzdf = -1                      ! All schemes used 
     
    184163         IF( nzdf ==  0 )   WRITE(numout,*) '              Explicit time-splitting scheme' 
    185164         IF( nzdf ==  1 )   WRITE(numout,*) '              Implicit (euler backward) scheme' 
    186          IF( nzdf ==  2 )   WRITE(numout,*) '              Implicit (euler backward) scheme with j-k-i loops' 
    187165      ENDIF 
    188166 
  • trunk/NEMO/OPA_SRC/TRA/trazdf_exp.F90

    r719 r789  
    8585      IF( kt == nit000 ) THEN 
    8686         IF(lwp) WRITE(numout,*) 
    87          IF(lwp) WRITE(numout,*) 'tra_zdf_exp : explicit vertical mixing (j-k-i loops)' 
     87         IF(lwp) WRITE(numout,*) 'tra_zdf_exp : explicit vertical mixing' 
    8888         IF(lwp) WRITE(numout,*) '~~~~~~~~~~~' 
    8989      ENDIF 
  • trunk/NEMO/OPA_SRC/TRA/trazdf_imp.F90

    r719 r789  
    1717   !!   tra_zdf_imp : Update the tracer trend with the diagonal vertical   
    1818   !!                 part of the mixing tensor. 
    19    !!                 Vector optimization, use k-j-i loops. 
    2019   !!---------------------------------------------------------------------- 
    2120   !! * Modules used 
     
    106105      IF( kt == nit000 ) THEN 
    107106         IF(lwp)WRITE(numout,*) 
    108          IF(lwp)WRITE(numout,*) 'tra_zdf_imp : implicit vertical mixing (k-j-i loops)' 
     107         IF(lwp)WRITE(numout,*) 'tra_zdf_imp : implicit vertical mixing' 
    109108         IF(lwp)WRITE(numout,*) '~~~~~~~~~~~ ' 
    110109         zavi = 0.e0      ! avoid warning at compilation phase when lk_ldfslp=F 
  • trunk/NEMO/OPA_SRC/TRA/zpshde.F90

    r719 r789  
    130130 
    131131      ! Interpolation of T and S at the last ocean level 
    132 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     132# if defined key_vectopt_loop 
    133133         jj = 1 
    134134         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolled) 
     
    193193               pgsv(ji,jj) = vmask(ji,jj,1) * ( psal(ji,jj+1,ikv) - zsj(ji,jj) ) 
    194194            ENDIF 
    195 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     195# if ! defined key_vectopt_loop 
    196196         END DO 
    197197# endif 
     
    205205 
    206206      ! Gradient of density at the last level  
    207 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     207# if defined key_vectopt_loop 
    208208         jj = 1 
    209209         DO ji = 1, jpij-jpi   ! vector opt. (forced unrolled) 
     
    226226               pgrv(ji,jj) = vmask(ji,jj,1) * ( prd(ji,jj+1,ikv) - zrj(ji,jj) ) 
    227227            ENDIF 
    228 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     228# if ! defined key_vectopt_loop 
    229229         END DO 
    230230# endif 
  • trunk/NEMO/OPA_SRC/ZDF/zdfbfr.F90

    r719 r789  
    8080 
    8181      CASE( 0 )                 ! no-slip boundary condition 
    82 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     82# if defined key_vectopt_loop 
    8383         jj = 1 
    8484         DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    9393               avmu(ji,jj,ikbu) = 2. * avmu(ji,jj,ikbum1) 
    9494               avmv(ji,jj,ikbv) = 2. * avmv(ji,jj,ikbvm1) 
    95 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     95# if ! defined key_vectopt_loop 
    9696            END DO 
    9797# endif 
     
    9999 
    100100      CASE( 1 )                 ! linear botton friction 
    101 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     101# if defined key_vectopt_loop 
    102102         jj = 1 
    103103         DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    110110               avmu(ji,jj,ikbu) = bfri1 * fse3uw(ji,jj,ikbu) 
    111111               avmv(ji,jj,ikbv) = bfri1 * fse3vw(ji,jj,ikbv) 
    112 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     112# if ! defined key_vectopt_loop 
    113113            END DO 
    114114# endif 
     
    116116 
    117117      CASE( 2 )                 ! quadratic botton friction 
    118 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     118# if defined key_vectopt_loop 
    119119         jj = 1 
    120120!CDIR NOVERRCHK 
     
    142142               avmu(ji,jj,ikbu) = bfri2 * zecu * fse3uw(ji,jj,ikbu) 
    143143               avmv(ji,jj,ikbv) = bfri2 * zecv * fse3vw(ji,jj,ikbv) 
    144 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     144# if ! defined key_vectopt_loop 
    145145            END DO 
    146146# endif 
     
    148148 
    149149      CASE( 3 )                 ! free-slip boundary condition 
    150 # if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     150# if defined key_vectopt_loop 
    151151         jj = 1 
    152152         DO ji = jpi+2, jpij-jpi-1   ! vector opt. (forced unrolling) 
     
    159159               avmu(ji,jj,ikbu) = 0.e0 
    160160               avmv(ji,jj,ikbv) = 0.e0 
    161 # if ! defined key_vectopt_loop   ||   defined key_mpp_omp 
     161# if ! defined key_vectopt_loop 
    162162            END DO 
    163163# endif 
  • trunk/NEMO/OPA_SRC/ZDF/zdfevd.F90

    r719 r789  
    7979         DO jk = 1, jpkm1                                 ! Horizontal slab 
    8080            !                                             ! =============== 
    81 #   if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     81#   if defined key_vectopt_loop 
    8282!!!         WHERE( rn2(:,:,jk) <= -1.e-12 ) avt(:,:,jk) = tmask(:,:,jk) * avevd   ! agissant sur T SEUL! 
    8383            jj = 1                     ! big loop forced 
     
    129129            !                                             ! =============== 
    130130!!!         WHERE( rn2(:,:,jk) <= -1.e-12 ) avt(:,:,jk) = tmask(:,:,jk) * avevd   ! agissant sur T SEUL!  
    131 #   if defined key_vectopt_loop   &&   ! defined key_mpp_omp 
     131#   if defined key_vectopt_loop 
    132132            jj = 1                     ! big loop forced 
    133133            DO ji = 1, jpij    
  • trunk/NEMO/OPA_SRC/ZDF/zdfmxl.F90

    r719 r789  
    4444 
    4545CONTAINS 
    46  
    47 # if defined key_mpp_omp 
    48    !!---------------------------------------------------------------------- 
    49    !!   'key_mpp_omp'                                   j-k-i loop (j-slab) 
    50    !!---------------------------------------------------------------------- 
    51  
    52    SUBROUTINE zdf_mxl( kt ) 
    53       !!---------------------------------------------------------------------- 
    54       !!                    ***  ROUTINE zdfmxl  *** 
    55       !!                    
    56       !! ** Purpose :   Compute the turbocline depth and the mixed layer depth 
    57       !!      with a density criteria. 
    58       !! 
    59       !! ** Method  :   The turbocline depth is the depth at which the vertical  
    60       !!      eddy diffusivity coefficient (resulting from the vertical physics 
    61       !!      alone, not the isopycnal part, see trazdf.F) fall below a given 
    62       !!      value defined locally (avt_c here taken equal to 5 cm/s2) 
    63       !! 
    64       !! ** Action  : 
    65       !! 
    66       !!---------------------------------------------------------------------- 
    67       !! * Arguments 
    68       INTEGER, INTENT( in ) ::   kt         ! ocean time-step index 
    69  
    70       !! * Local declarations 
    71       INTEGER ::   ji, jj, jk     ! dummy loop indices 
    72       INTEGER ::   ik             ! temporary integer 
    73       INTEGER, DIMENSION(jpi,jpj) ::   & 
    74          imld                     ! temporary workspace 
    75       !!---------------------------------------------------------------------- 
    76  
    77       IF( kt == nit000 ) THEN 
    78          IF(lwp) WRITE(numout,*) 
    79          IF(lwp) WRITE(numout,*) 'zdf_mxl : mixed layer depth, j-k-i loops' 
    80          IF(lwp) WRITE(numout,*) '~~~~~~~' 
    81       ENDIF 
    82  
    83       !                                                ! =============== 
    84       DO jj = 1, jpj                                   !  Vertical slab 
    85          !                                             ! =============== 
    86  
    87          ! 1. Turbocline depth 
    88          ! ------------------- 
    89          ! last w-level at which avt<avt_c (starting from the bottom jk=jpk) 
    90          ! (since avt(.,.,jpk)=0, we have jpk=< imld =< 2 ) 
    91          DO jk = jpk, 2, -1 
    92             DO ji = 1, jpi 
    93                IF( avt(ji,jj,jk) < avt_c ) imld(ji,jj) = jk  
    94             END DO 
    95          END DO 
    96  
    97          ! Turbocline depth and sub-turbocline temperature 
    98          DO ji = 1, jpi 
    99             ik = imld(ji,jj) 
    100             hmld (ji,jj) = fsdepw(ji,jj,ik) * tmask(ji,jj,1) 
    101          END DO 
    102  
    103 !!gm idea 
    104 !!    
    105 !!gm     DO jk = jpk, 2, -1 
    106 !!gm        DO ji = 1, jpi 
    107 !!gm           IF( avt(ji,jj,jk) < avt_c ) hmld(ji,jj) = fsdepw(ji,jj,jk) * tmask(ji,jj,1) 
    108 !!gm        END DO 
    109 !!gm     END DO 
    110 !!gm 
    111  
    112          ! 2. Mixed layer depth 
    113          ! -------------------- 
    114          ! Initialization to the number of w ocean point mbathy 
    115          nmln(:,jj) = mbathy(:,jj) 
    116  
    117          ! Last w-level at which rhop>=rho surf+rho_c (starting from jpk-1) 
    118          ! (rhop defined at t-point, thus jk-1 for w-level just above) 
    119          DO jk = jpkm1, 2, -1 
    120             DO ji = 1, jpi 
    121                IF( rhop(ji,jj,jk) > rhop(ji,jj,1) + rho_c )   nmln(ji,jj) = jk 
    122             END DO 
    123          END DO 
    124  
    125          ! Mixed layer depth 
    126          DO ji = 1, jpi 
    127             ik = nmln(ji,jj) 
    128             hmlp (ji,jj) = fsdepw(ji,jj,ik) * tmask(ji,jj,1) 
    129             hmlpt(ji,jj) = fsdept(ji,jj,ik-1) 
    130          END DO 
    131          !                                             ! =============== 
    132       END DO                                           !   End of slab 
    133       !                                                ! =============== 
    134  
    135       IF(ln_ctl)   CALL prt_ctl( tab2d_1=REAL(nmln,wp), clinfo1=' nmln : ', tab2d_2=hmld, clinfo2=' hmld : ', ovlap=1 ) 
    136  
    137    END SUBROUTINE zdf_mxl 
    138  
    139 # else 
    140    !!---------------------------------------------------------------------- 
    141    !!   Default option :                                         k-j-i loop 
    142    !!---------------------------------------------------------------------- 
    14346 
    14447   SUBROUTINE zdf_mxl( kt ) 
     
    237140 
    238141   END SUBROUTINE zdf_mxl 
    239 #endif 
    240142 
    241143   !!====================================================================== 
  • trunk/NEMO/OPA_SRC/ZDF/zdftke.F90

    r746 r789  
    4343 
    4444   PUBLIC   zdf_tke        ! routine called in step module 
    45    PUBLIC   zdf_tke_init   ! routine also called in zdftke_jki module 
    46    PUBLIC   tke_rst        ! routine also called in zdftke_jki module 
    4745 
    4846   LOGICAL , PUBLIC, PARAMETER              ::   lk_zdftke = .TRUE.  !: TKE vertical mixing flag 
  • trunk/NEMO/OPA_SRC/eosbn2.F90

    r719 r789  
    488488         DO jj = 1, jpjm1 
    489489!CDIR NOVERRCHK 
    490 #if defined key_mpp_omp 
    491             DO ji = 1, jpim1 
    492 #else 
    493490            DO ji = 1, fs_jpim1   ! vector opt. 
    494 #endif 
    495491               zws(ji,jj) = SQRT( ABS( psal(ji,jj) ) ) 
    496492            END DO 
     
    500496         DO jj = 1, jpjm1                                 ! Horizontal slab 
    501497            !                                             ! =============== 
    502 #if defined key_mpp_omp 
    503             DO ji = 1, jpim1 
    504 #else 
    505498            DO ji = 1, fs_jpim1   ! vector opt. 
    506 #endif 
    507499 
    508500               zmask = tmask(ji,jj,1)      ! land/sea bottom mask = surf. mask 
     
    555547         DO jj = 1, jpjm1                                 ! Horizontal slab 
    556548            !                                             ! =============== 
    557 #if defined key_mpp_omp 
    558             DO ji = 1, jpim1 
    559 #else 
    560549            DO ji = 1, fs_jpim1   ! vector opt. 
    561 #endif 
    562550               prd(ji,jj) = ( 0.0285 - ralpha * ptem(ji,jj) ) * tmask(ji,jj,1) 
    563551            END DO 
     
    572560         DO jj = 1, jpjm1                                 ! Horizontal slab 
    573561            !                                             ! =============== 
    574 #if defined key_mpp_omp 
    575             DO ji = 1, jpim1 
    576 #else 
    577562            DO ji = 1, fs_jpim1   ! vector opt. 
    578 #endif 
    579563               prd(ji,jj) = ( rbeta * psal(ji,jj) - ralpha * ptem(ji,jj) ) * tmask(ji,jj,1)  
    580564            END DO 
  • trunk/NEMO/OPA_SRC/par_oce.F90

    r719 r789  
    219219#endif 
    220220 
    221 #if defined key_mpp_omp 
    222    LOGICAL, PUBLIC, PARAMETER ::   lk_jki = .TRUE.   !: j-k-i loop flag 
    223 #else 
    224    LOGICAL, PUBLIC, PARAMETER ::   lk_jki = .FALSE.  !: k-j-i loop flag 
    225 #endif 
    226  
    227221   !!====================================================================== 
    228222END MODULE par_oce 
  • trunk/NEMO/OPA_SRC/step.F90

    r782 r789  
    8888   USE zdfbfr          ! bottom friction                  (zdf_bfr routine) 
    8989   USE zdftke          ! TKE vertical mixing              (zdf_tke routine) 
    90    USE zdftke_jki      ! TKE vertical mixing              (zdf_tke routine) 
    9190   USE zdfkpp          ! KPP vertical mixing              (zdf_kpp routine) 
    9291   USE zdfddm          ! double diffusion mixing          (zdf_ddm routine) 
     
    248247      !                                                     ! Vertical eddy viscosity and diffusivity coefficients 
    249248      IF( lk_zdfric )   CALL zdf_ric( kstp )                       ! Richardson number dependent Kz 
    250 #if defined key_mpp_omp 
    251       IF( lk_zdftke )   CALL zdf_tke_jki( kstp )                   ! TKE closure scheme for Kz - j-k-i loops 
    252 #else 
     249 
    253250      IF( lk_zdftke )   CALL zdf_tke( kstp )                       ! TKE closure scheme for Kz 
    254 #endif 
     251 
    255252      IF( lk_zdfkpp )   CALL zdf_kpp( kstp )                       ! KPP closure scheme for Kz 
    256253 
Note: See TracChangeset for help on using the changeset viewer.