New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
obc_oce_ftrans.h90 in branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/OBC – NEMO

source: branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/OBC/obc_oce_ftrans.h90 @ 4400

Last change on this file since 4400 was 3211, checked in by spickles2, 12 years ago

Stephen Pickles, 11 Dec 2011

Commit to bring the rest of the DCSE NEMO development branch
in line with the latest development version. This includes
array index re-ordering of all OPA_SRC/.

  • Property svn:keywords set to Id
File size: 2.3 KB
Line 
1   !!----------------------------------------------------------------------
2   !!                   ***  obc_oce_ftrans  ***
3   !!----------------------------------------------------------------------
4   !! ** purpose : Directives to control permutation of array indices
5   !!   for multi-dimensional arrays with a z-dimension declared in module
6   !!   oce.  It should be included wherever the module is used,
7   !!   and updated whenever a new array is added to the module.
8   !!----------------------------------------------------------------------
9   !!----------------------------------------------------------------------
10   !! NEMO/OPA 3.3 , NEMO Consortium (2011)
11   !! $Id$
12   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt)
13   !!----------------------------------------------------------------------
14
15#if defined key_z_first
16!FTRANS assert :z :I
17#else
18!FTRANS assert :I :z
19#endif
20
21!! East open boundary
22!FTRANS ufoe :I :z
23!FTRANS vfoe :I :z
24!FTRANS tfoe :I :z
25!FTRANS sfoe :I :z
26!FTRANS uclie :I :z
27!! Arrays for radiative East OBC
28!FTRANS uebnd :I :z : :
29!FTRANS vebnd :I :z : :
30!FTRANS tebnd :I :z : :
31!FTRANS sebnd :I :z : :
32!FTRANS u_cxebnd :I :z
33!FTRANS v_cxebnd :I :z
34!FTRANS uemsk :I :z
35!FTRANS vemsk :I :z
36!FTRANS temsk :I :z
37!! West open boundary
38!FTRANS ufow :I :z
39!FTRANS vfow :I :z
40!FTRANS tfow :I :z
41!FTRANS sfow :I :z
42!FTRANS ucliw :I :z
43!! Arrays for radiative West OBC
44!FTRANS uwbnd :I :z : :
45!FTRANS vwbnd :I :z : :
46!FTRANS twbnd :I :z : :
47!FTRANS swbnd :I :z : :
48!FTRANS u_cxwbnd :I :z
49!FTRANS v_cxwbnd :I :z
50!FTRANS uwmsk :I :z
51!FTRANS vwmsk :I :z
52!FTRANS twmsk :I :z
53!! North open boundary
54!FTRANS ufon :I :z
55!FTRANS vfon :I :z
56!FTRANS tfon :I :z
57!FTRANS sfon :I :z
58!FTRANS vclin :I :z
59!! Arrays for radiative North OBC
60!FTRANS unbnd :I :z : :
61!FTRANS vnbnd :I :z : :
62!FTRANS tnbnd :I :z : :
63!FTRANS snbnd :I :z : :
64!FTRANS u_cynbnd :I :z
65!FTRANS v_cynbnd :I :z
66!FTRANS unmsk :I :z
67!FTRANS vnmsk :I :z
68!FTRANS tnmsk :I :z
69!! South open boundary
70!FTRANS ufos :I :z
71!FTRANS vfos :I :z
72!FTRANS tfos :I :z
73!FTRANS sfos :I :z
74!FTRANS vclis :I :z
75!! Arrays for radiative South OBC
76!FTRANS usbnd :I :z : :
77!FTRANS vsbnd :I :z : :
78!FTRANS tsbnd :I :z : :
79!FTRANS ssbnd :I :z : :
80!FTRANS u_cysbnd :I :z
81!FTRANS v_cysbnd :I :z
82!FTRANS usmsk :I :z
83!FTRANS vsmsk :I :z
84!FTRANS tsmsk :I :z
85
86
Note: See TracBrowser for help on using the repository browser.