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 >>>>>> !!!!!! SPECIAL SEAICE FLAG FOR TESTING !!!!!! <<<<<< |
cph >>>>>> !!!!!! SPECIAL SEAICE FLAG FOR TESTING !!!!!! <<<<<< |
23 |
cph#define SEAICE_EXCLUDE_FOR_EXACT_AD_TESTING |
cph#define SEAICE_EXCLUDE_FOR_EXACT_AD_TESTING |
24 |
cph >>>>>> !!!!!! SPECIAL SEAICE FLAG FOR TESTING !!!!!! <<<<<< |
cph >>>>>> !!!!!! SPECIAL SEAICE FLAG FOR TESTING !!!!!! <<<<<< |
29 |
C >>> Do a long protocol. |
C >>> Do a long protocol. |
30 |
#undef ECCO_VERBOSE |
#undef ECCO_VERBOSE |
31 |
|
|
|
#define ALLOW_ECCO_EVOLUTION |
|
|
|
|
32 |
C ******************************************************************** |
C ******************************************************************** |
33 |
C *** Adjoint Support Package *** |
C *** Adjoint Support Package *** |
34 |
C ******************************************************************** |
C ******************************************************************** |
124 |
# define ALLOW_OBCS_COST_CONTRIBUTION |
# define ALLOW_OBCS_COST_CONTRIBUTION |
125 |
# endif |
# endif |
126 |
|
|
|
c >>> Sea-ice volume |
|
|
# undef ALLOW_COST_ICE |
|
|
|
|
|
c >>> Sea-ice misfit to obs |
|
|
# define ALLOW_SEAICE_COST_SMR_AREA |
|
|
|
|
127 |
C ******************************************************************** |
C ******************************************************************** |
128 |
C *** Control vector Package *** |
C *** Control vector Package *** |
129 |
C ******************************************************************** |
C ******************************************************************** |