Changeset 10007 for branches/UKMO
- Timestamp:
- 2018-07-26T17:13:32+02:00 (6 years ago)
- Location:
- branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC
- Files:
-
- 12 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/air_sea.F90
r10004 r10007 63 63 zchd, zchn, zdin, zsil 64 64 USE dom_oce, ONLY: e3t_0, gphit, tmask, mig, mjg 65 # if defined key_vvl 66 USE dom_oce, ONLY: e3t_n 67 # endif 65 68 USE iom, ONLY: lk_iomput 66 69 USE in_out_manager, ONLY: lwp, numout -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_med_diag_iomput.F90
r10004 r10007 32 32 USE bio_medusa_mod 33 33 USE dom_oce, ONLY: e3t_0, mbathy, tmask 34 # if defined key_vvl 35 USE dom_oce, ONLY: e3t_n 36 # endif 34 37 USE in_out_manager, ONLY: lwp, numout 35 38 USE par_oce, ONLY: jpim1, jpjm1 -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_diag.F90
r10004 r10007 33 33 USE bio_medusa_mod 34 34 USE dom_oce, ONLY: e3t_0, gdepw_0, tmask 35 # if defined key_vvl 36 USE dom_oce, ONLY: e3t_n, gdepw_n 37 # endif 35 38 USE in_out_manager, ONLY: lwp, numout 36 39 USE iom, ONLY: lk_iomput -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_update.F90
r10004 r10007 72 72 zpds, zphd, zphn 73 73 USE dom_oce, ONLY: e3t_0, gphit, mbathy, tmask 74 # if defined key_vvl 75 USE dom_oce, ONLY: e3t_n 76 # endif 74 77 USE in_out_manager, ONLY: lwp, numout 75 78 USE lib_mpp, ONLY: ctl_stop -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/carb_chem.F90
r10004 r10007 41 41 zalk, zdic, zsal, zsil, ztmp 42 42 USE dom_oce, ONLY: gdept_0, gdepw_0, gphit, mbathy, tmask 43 # if defined key_vvl 44 USE dom_oce, ONLY: gdept_n, gdepw_n 45 # endif 43 46 USE in_out_manager, ONLY: lwp, numout 44 47 USE oce, ONLY: PCO2a_in_cpl, tsb, tsn -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/detritus.F90
r10004 r10007 46 46 USE detritus_fast_sink_mod, ONLY: detritus_fast_sink 47 47 USE dom_oce, ONLY: mbathy, e3t_0, gphit, tmask 48 # if defined key_vvl 49 USE dom_oce, ONLY: e3t_n 50 # endif 48 51 USE in_out_manager, ONLY: lwp, numout 49 52 USE par_oce, ONLY: jpim1, jpjm1 -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/detritus_fast_sink.F90
r10004 r10007 67 67 zdet, zdtc 68 68 USE dom_oce, ONLY: e3t_0, gdepw_0, gphit, mbathy, tmask 69 # if defined key_vvl 70 USE dom_oce, ONLY: e3t_n, gdepw_n 71 # endif 69 72 USE in_out_manager, ONLY: lwp, numout 70 73 USE oce, ONLY: tsn -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/iron_chem_scav.F90
r10004 r10007 36 36 idf, idfval 37 37 USE dom_oce, ONLY: e3t_0, gdepw_0, mbathy, tmask 38 #if defined key_vvl 39 USE dom_oce, ONLY: e3t_n, gdepw_n 40 #endif 38 41 USE par_kind, ONLY: wp 39 42 USE in_out_manager, ONLY: lwp, numout -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/phytoplankton.F90
r10004 r10007 45 45 zzme, zzmi, fchl_ml 46 46 USE dom_oce, ONLY: e3t_0, gdepw_0, tmask 47 #if defined key_vvl 48 USE dom_oce, ONLY: e3t_n, gdepw_n 49 #endif 47 50 USE in_out_manager, ONLY: lwp, numout 48 51 USE oce, ONLY: tsn -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcbio_medusa.F90
r10004 r10007 78 78 zfer, zpds, zphd, zphn, zsil, & 79 79 zzme, zzmi 80 USE dom_oce, ONLY: e3t_0, & 81 gdept_0, & 82 gdepw_0, & 83 nday_year, nsec_day, & 80 USE dom_oce, ONLY: e3t_0, gdept_0, gdepw_0, & 81 nday_year, nsec_day, & 84 82 nyear, nyear_len, ndastp, & 85 83 nsec_month, & 86 84 rdt, tmask, mig, mjg, nimpp, & 87 85 njmpp 86 #if defined key_vvl 87 USE dom_oce, ONLY: e3t_n, gdept_n, gdepw_n 88 #endif 89 88 90 USE in_out_manager, ONLY: lwp, numout, nn_date0 89 91 USE iom, ONLY: lk_iomput -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/zooplankton.F90
r10004 r10007 42 42 zdet, zdtc, zphd, zphn, zzme, zzmi 43 43 USE dom_oce, ONLY: e3t_0, tmask 44 #if defined key_vvl 45 USE dom_oce, ONLY: e3t_n 46 #endif 44 47 USE par_kind, ONLY: wp 45 48 USE in_out_manager, ONLY: lwp, numout -
branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/trcstat.F90
r10004 r10007 29 29 USE par_trc, ONLY: jptra 30 30 USE dom_oce, ONLY: e3t_0, gdepw_0, tmask, e1e2t 31 #if defined key_vvl 32 USE dom_oce, ONLY: e3t_a, e3t_n, gdepw_n 33 #endif 31 34 !* MPP library 32 35 USE lib_mpp
Note: See TracChangeset
for help on using the changeset viewer.