1 |
jmc |
1.2 |
C $Header: $ |
2 |
|
|
C $Name: $ |
3 |
heimbach |
1.1 |
|
4 |
|
|
c ================================================================== |
5 |
|
|
c HEADER ECCO |
6 |
|
|
c ================================================================== |
7 |
|
|
c |
8 |
|
|
c o Header for the ECCO project. |
9 |
|
|
c |
10 |
|
|
c started: Christian Eckert eckert@mit.edu 23-Feb-1999 |
11 |
|
|
c |
12 |
|
|
c changed: Christian Eckert eckert@mit.edu |
13 |
|
|
c |
14 |
|
|
c |
15 |
|
|
c ================================================================== |
16 |
|
|
c HEADER ECCO |
17 |
|
|
c ================================================================== |
18 |
|
|
|
19 |
|
|
c Version of the release and versions of used packages: |
20 |
|
|
c ===================================================== |
21 |
|
|
c |
22 |
|
|
c eccoVersion - ecco release version. |
23 |
|
|
c usesCalendarVersion - version of the calendar that has to |
24 |
|
|
c be used. |
25 |
|
|
c usesExternalForcingVersion - version of the external forcing that |
26 |
|
|
c has to be used. |
27 |
|
|
c usesAdjointSupportVersion - version of the adjoint support routines |
28 |
|
|
c that have to be used. |
29 |
|
|
c usesOptimizationVersion - version of the oof-line optimization |
30 |
|
|
c that has to be used. |
31 |
|
|
|
32 |
|
|
character*(5) eccoVersion |
33 |
|
|
character*(5) eccoUsesCalVersion |
34 |
|
|
character*(5) eccoUsesExfVersion |
35 |
|
|
character*(5) eccoUsesAdsuppVersion |
36 |
|
|
character*(5) eccoUsesOptimVersion |
37 |
|
|
|
38 |
|
|
parameter( eccoVersion = '0.1.0' ) |
39 |
|
|
parameter( eccoUsesCalVersion = '0.1.4' ) |
40 |
|
|
parameter( eccoUsesExfVersion = '0.1.1' ) |
41 |
|
|
parameter( eccoUsesAdsuppVersion = '0.1.0' ) |
42 |
|
|
parameter( eccoUsesOptimVersion = '2.1.0' ) |
43 |
|
|
|
44 |
|
|
|
45 |
|
|
c Experiment name: |
46 |
|
|
c ================ |
47 |
|
|
|
48 |
|
|
common /ecco_c/ |
49 |
|
|
& expId |
50 |
|
|
character*(10) expId |
51 |
|
|
|
52 |
|
|
|
53 |
|
|
c Integration information: |
54 |
|
|
c ======================== |
55 |
|
|
c |
56 |
|
|
c nyears - number of calendar years that are affected by the |
57 |
|
|
c current integration. |
58 |
|
|
|
59 |
|
|
common /ecco_i/ |
60 |
|
|
& nyears, nmonths, ndays, numsteps, |
61 |
|
|
& ecco_prevcall |
62 |
|
|
integer nyears |
63 |
|
|
integer nmonths |
64 |
|
|
integer ndays |
65 |
|
|
integer numsteps |
66 |
|
|
|
67 |
|
|
integer ecco_prevcall |
68 |
|
|
|
69 |
|
|
c ================================================================== |
70 |
|
|
c END OF HEADER ECCO |
71 |
|
|
c ================================================================== |
72 |
|
|
|
73 |
|
|
|