Changeset 247 for trunk/NEMO/TOP_SRC/TRP
- Timestamp:
- 2005-03-27T20:35:47+02:00 (19 years ago)
- Location:
- trunk/NEMO/TOP_SRC/TRP
- Files:
-
- 27 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/TOP_SRC/TRP/trcadv_cen2.F90
r204 r247 24 24 # include "passivetrc_substitute.h90" 25 25 !!---------------------------------------------------------------------- 26 !! OPA 9.0 , LODYC-IPSL (2003) 26 !! TOP 1.0 , LOCEAN-IPSL (2005) 27 !! $Header$ 28 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 27 29 !!---------------------------------------------------------------------- 28 30 -
trunk/NEMO/TOP_SRC/TRP/trcadv_muscl.F90
r204 r247 28 28 # include "passivetrc_substitute.h90" 29 29 !!---------------------------------------------------------------------- 30 !! OPA 9.0 , LODYC-IPSL (2003) 30 !! TOP 1.0 , LOCEAN-IPSL (2005) 31 !! $Header$ 32 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 31 33 !!---------------------------------------------------------------------- 32 34 -
trunk/NEMO/TOP_SRC/TRP/trcadv_muscl2.F90
r204 r247 28 28 # include "passivetrc_substitute.h90" 29 29 !!---------------------------------------------------------------------- 30 !! OPA 9.0 , LODYC-IPSL (2003) 30 !! TOP 1.0 , LOCEAN-IPSL (2005) 31 !! $Header$ 32 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 31 33 !!---------------------------------------------------------------------- 32 34 -
trunk/NEMO/TOP_SRC/TRP/trcadv_smolar.F90
r204 r247 29 29 # include "passivetrc_substitute.h90" 30 30 !!---------------------------------------------------------------------- 31 !! OPA 9.0 , LODYC-IPSL (2003) 31 !! TOP 1.0 , LOCEAN-IPSL (2005) 32 !! $Header$ 33 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 32 34 !!---------------------------------------------------------------------- 33 35 CONTAINS -
trunk/NEMO/TOP_SRC/TRP/trcadv_tvd.F90
r204 r247 26 26 # include "passivetrc_substitute.h90" 27 27 !!---------------------------------------------------------------------- 28 !! OPA 9.0 , LODYC-IPSL (2003) 28 !! TOP 1.0 , LOCEAN-IPSL (2005) 29 !! $Header$ 30 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 29 31 !!---------------------------------------------------------------------- 30 32 -
trunk/NEMO/TOP_SRC/TRP/trcbbc.F90
r202 r247 39 39 # include "passivetrc_substitute.h90" 40 40 !!---------------------------------------------------------------------- 41 !! OPA 9.0 , LODYC-IPSL (2003) 41 !! TOP 1.0 , LOCEAN-IPSL (2005) 42 !! $Header$ 43 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 42 44 !!---------------------------------------------------------------------- 43 45 -
trunk/NEMO/TOP_SRC/TRP/trcbbl.F90
r202 r247 48 48 # include "passivetrc_substitute.h90" 49 49 !!---------------------------------------------------------------------- 50 !! OPA 9.0 , LODYC-IPSL (2003) 50 !! TOP 1.0 , LOCEAN-IPSL (2005) 51 !! $Header$ 52 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 51 53 !!---------------------------------------------------------------------- 52 54 -
trunk/NEMO/TOP_SRC/TRP/trcbbl_adv.h90
r202 r247 4 4 5 5 !!---------------------------------------------------------------------- 6 !! OPA 9.0 , LODYC-IPSL (2003) 6 !! TOP 1.0 , LOCEAN-IPSL (2005) 7 !! $Header$ 8 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 7 9 !!---------------------------------------------------------------------- 8 10 -
trunk/NEMO/TOP_SRC/TRP/trcdmp.F90
r202 r247 34 34 # include "passivetrc_substitute.h90" 35 35 !!---------------------------------------------------------------------- 36 !! OPA 9.0 , LODYC-IPSL (2003) 36 !! TOP 1.0 , LOCEAN-IPSL (2005) 37 !! $Header$ 38 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 37 39 !!---------------------------------------------------------------------- 38 40 -
trunk/NEMO/TOP_SRC/TRP/trcldf_bilap.F90
r202 r247 23 23 # include "passivetrc_substitute.h90" 24 24 !!---------------------------------------------------------------------- 25 !! OPA 9.0 , LODYC-IPSL (2003) 25 !! TOP 1.0 , LOCEAN-IPSL (2005) 26 !! $Header$ 27 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 26 28 !!---------------------------------------------------------------------- 27 29 -
trunk/NEMO/TOP_SRC/TRP/trcldf_bilapg.F90
r202 r247 26 26 # include "passivetrc_substitute.h90" 27 27 !!---------------------------------------------------------------------- 28 !! OPA 9.0 , LODYC-IPSL (2003) 28 !! TOP 1.0 , LOCEAN-IPSL (2005) 29 !! $Header$ 30 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 29 31 !!---------------------------------------------------------------------- 30 32 -
trunk/NEMO/TOP_SRC/TRP/trcldf_iso.F90
r202 r247 25 25 # include "passivetrc_substitute.h90" 26 26 !!---------------------------------------------------------------------- 27 27 !!---------------------------------------------------------------------- 28 !! TOP 1.0 , LOCEAN-IPSL (2005) 29 !! $Header$ 30 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 31 !!---------------------------------------------------------------------- 28 32 CONTAINS 29 33 -
trunk/NEMO/TOP_SRC/TRP/trcldf_iso_zps.F90
r202 r247 24 24 # include "passivetrc_substitute.h90" 25 25 !!---------------------------------------------------------------------- 26 !! OPA 9.0 , LODYC-IPSL (2003) 26 !! TOP 1.0 , LOCEAN-IPSL (2005) 27 !! $Header$ 28 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 27 29 !!---------------------------------------------------------------------- 28 30 -
trunk/NEMO/TOP_SRC/TRP/trcldf_lap.F90
r202 r247 22 22 # include "passivetrc_substitute.h90" 23 23 !!---------------------------------------------------------------------- 24 !! OPA 9.0 , LODYC-IPSL (2003) 24 !! TOP 1.0 , LOCEAN-IPSL (2005) 25 !! $Header$ 26 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 25 27 !!---------------------------------------------------------------------- 26 28 -
trunk/NEMO/TOP_SRC/TRP/trcnxt.F90
r202 r247 20 20 PUBLIC trc_nxt ! routine called by step.F90 21 21 !!---------------------------------------------------------------------- 22 !! OPA 9.0 , LODYC-IPSL (2003) 22 !! TOP 1.0 , LOCEAN-IPSL (2005) 23 !! $Header$ 24 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 23 25 !!---------------------------------------------------------------------- 24 26 -
trunk/NEMO/TOP_SRC/TRP/trcrad.F90
r202 r247 20 20 # include "passivetrc_substitute.h90" 21 21 !!---------------------------------------------------------------------- 22 !! OPA 9.0 , LODYC-IPSL (2003) 22 !! TOP 1.0 , LOCEAN-IPSL (2005) 23 !! $Header$ 24 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 23 25 !!---------------------------------------------------------------------- 24 26 CONTAINS -
trunk/NEMO/TOP_SRC/TRP/trcsbc.F90
r202 r247 21 21 # include "passivetrc_substitute.h90" 22 22 !!---------------------------------------------------------------------- 23 !! OPA 9.0 , LODYC-IPSL (2003) 23 !! TOP 1.0 , LOCEAN-IPSL (2005) 24 !! $Header$ 25 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 24 26 !!---------------------------------------------------------------------- 25 27 -
trunk/NEMO/TOP_SRC/TRP/trcstp.F90
r202 r247 19 19 PUBLIC trc_stp ! called by step 20 20 !!---------------------------------------------------------------------- 21 !! OPA 9.0 , LODYC-IPSL (2003) 21 !! TOP 1.0 , LOCEAN-IPSL (2005) 22 !! $Header$ 23 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 22 24 !!---------------------------------------------------------------------- 23 25 -
trunk/NEMO/TOP_SRC/TRP/trctrp.F90
r202 r247 50 50 # include "domzgr_substitute.h90" 51 51 !!---------------------------------------------------------------------- 52 !! OPA 9.0 , LODYC-IPSL (2003) 52 !! TOP 1.0 , LOCEAN-IPSL (2005) 53 !! $Header$ 54 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 53 55 !!---------------------------------------------------------------------- 54 56 -
trunk/NEMO/TOP_SRC/TRP/trctrp_ctl.F90
r202 r247 27 27 28 28 !!---------------------------------------------------------------------- 29 !! OPA 9.0 , LODYC-IPSL (2003) 29 !! TOP 1.0 , LOCEAN-IPSL (2005) 30 !! $Header$ 31 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 30 32 !!---------------------------------------------------------------------- 31 33 -
trunk/NEMO/TOP_SRC/TRP/trctrp_lec.F90
r202 r247 70 70 #endif 71 71 !!---------------------------------------------------------------------- 72 !! OPA 9.0 , LODYC-IPSL (2003) 72 !! TOP 1.0 , LOCEAN-IPSL (2005) 73 !! $Header$ 74 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 73 75 !!---------------------------------------------------------------------- 74 76 -
trunk/NEMO/TOP_SRC/TRP/trczdf_exp.F90
r202 r247 28 28 # include "passivetrc_substitute.h90" 29 29 !!---------------------------------------------------------------------- 30 !! OPA 9.0, LODYC-IPSL (2003) 30 !! TOP 1.0 , LOCEAN-IPSL (2005) 31 !! $Header$ 32 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 31 33 !!---------------------------------------------------------------------- 32 34 -
trunk/NEMO/TOP_SRC/TRP/trczdf_imp.F90
r202 r247 27 27 # include "passivetrc_substitute.h90" 28 28 !!---------------------------------------------------------------------- 29 !! OPA 9.0 , LODYC-IPSL (2003) 29 !! TOP 1.0 , LOCEAN-IPSL (2005) 30 !! $Header$ 31 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 30 32 !!---------------------------------------------------------------------- 31 33 -
trunk/NEMO/TOP_SRC/TRP/trczdf_imp.F90_vopt
r186 r247 27 27 # include "passivetrc_substitute.h90" 28 28 !!---------------------------------------------------------------------- 29 !! OPA 9.0 , LODYC-IPSL (2003) 29 !! TOP 1.0 , LOCEAN-IPSL (2005) 30 !! $Header$ 31 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 30 32 !!---------------------------------------------------------------------- 31 33 -
trunk/NEMO/TOP_SRC/TRP/trczdf_iso.F90
r202 r247 31 31 # include "passivetrc_substitute.h90" 32 32 !!---------------------------------------------------------------------- 33 33 !!---------------------------------------------------------------------- 34 !! TOP 1.0 , LOCEAN-IPSL (2005) 35 !! $Header$ 36 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 37 !!---------------------------------------------------------------------- 34 38 CONTAINS 35 39 … … 141 145 zuwki, zvwki 142 146 #endif 143 !!---------------------------------------------------------------------144 !! OPA 8.5, LODYC-IPSL (2002)145 !!---------------------------------------------------------------------146 147 147 148 IF( kt == nittrc000 ) THEN -
trunk/NEMO/TOP_SRC/TRP/trczdf_iso_vopt.F90
r202 r247 34 34 # include "passivetrc_substitute.h90" 35 35 !!---------------------------------------------------------------------- 36 36 !!---------------------------------------------------------------------- 37 !! TOP 1.0 , LOCEAN-IPSL (2005) 38 !! $Header$ 39 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 40 !!---------------------------------------------------------------------- 37 41 CONTAINS 38 42 … … 51 55 !! * Arguments 52 56 INTEGER, INTENT( in ) :: kt ! ocean time-step index 53 !!---------------------------------------------------------------------54 !! OPA 8.5, LODYC-IPSL (2002)55 !!---------------------------------------------------------------------56 57 57 58 IF( kt == nittrc000 ) THEN … … 150 151 zwi, zwt, zavsi ! temporary workspace arrays 151 152 REAL(wp) :: ztra !temporary scalars 152 !!---------------------------------------------------------------------153 !! OPA 8.5, LODYC-IPSL (2002)154 !!---------------------------------------------------------------------155 153 156 154 … … 402 400 zwz, zwt, ztfw ! temporary workspace arrays 403 401 REAL(wp) :: ztra !temporary scalars 404 !!--------------------------------------------------------------------- 405 !! OPA 8.5, LODYC-IPSL (2002) 406 !!--------------------------------------------------------------------- 402 407 403 408 404 DO jn = 1, jptra -
trunk/NEMO/TOP_SRC/TRP/zpshde_trc.F90
r202 r247 29 29 # include "passivetrc_substitute.h90" 30 30 !!---------------------------------------------------------------------- 31 31 !!---------------------------------------------------------------------- 32 !! TOP 1.0 , LOCEAN-IPSL (2005) 33 !! $Header$ 34 !! This software is governed by the CeCILL licence see modipsl/doc/NEMO_CeCILL.txt 35 !!---------------------------------------------------------------------- 32 36 CONTAINS 33 37 … … 95 99 zmaxu1, zmaxu2, & ! " " 96 100 zmaxv1, zmaxv2 ! " " 97 !!----------------------------------------------------------------------98 !! OPA 8.5, LODYC-IPSL (2002)99 !!----------------------------------------------------------------------100 101 101 102 ! Initialization (first time-step only): compute mbatu and mbatv
Note: See TracChangeset
for help on using the changeset viewer.