16 |
C *** ECCO Package *** |
C *** ECCO Package *** |
17 |
C ******************************************************************** |
C ******************************************************************** |
18 |
|
|
19 |
|
C allow use of legacy ecco/ctrl codes |
20 |
|
#define ECCO_CTRL_DEPRECATED |
21 |
|
|
22 |
cph#define ALLOW_ECCO_FORWARD_RUN |
cph#define ALLOW_ECCO_FORWARD_RUN |
23 |
#define ALLOW_ECCO_OPTIMIZATION |
#define ALLOW_ECCO_OPTIMIZATION |
24 |
|
|
25 |
C >>> Do a long protocol. |
C >>> Do a long protocol. |
26 |
#undef ECCO_VERBOSE |
#undef ECCO_VERBOSE |
27 |
|
|
|
#define ALLOW_ECCO_EVOLUTION |
|
|
|
|
28 |
C ******************************************************************** |
C ******************************************************************** |
29 |
C *** Adjoint Support Package *** |
C *** Adjoint Support Package *** |
30 |
C ******************************************************************** |
C ******************************************************************** |
121 |
# endif |
# endif |
122 |
CMM |
CMM |
123 |
# undef ALLOW_IESTAU_COST_CONTRIBUTION |
# undef ALLOW_IESTAU_COST_CONTRIBUTION |
|
c >>> Sea-ice volume |
|
|
# undef ALLOW_COST_ICE |
|
|
|
|
|
c >>> Sea-ice misfit to obs |
|
|
# undef ALLOW_SEAICE_COST_SMR_AREA |
|
124 |
|
|
125 |
C ******************************************************************** |
C ******************************************************************** |
126 |
C *** Control vector Package *** |
C *** Control vector Package *** |