source:
branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/OBC/obc_oce_ftrans.h90
@
4467
Last change on this file since 4467 was 3211, checked in by spickles2, 13 years ago | |
---|---|
|
|
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.