MITgcm/adjoint/tamc_code_ecco_ad.prot_with_gmredi_kpp

_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
_/                                                      _/
_/   T angent linear and                                _/
_/    A djoint                         Version 5.2.14   _/
_/     M odel                                           _/
_/      C ompiler                                       _/
_/                                                      _/
_/   Copyright (c) 1995-2000           Ralf Giering     _/
_/                                                      _/
_/   only for use at MIT EAPS Phys. Ocean., Cambridge   _/
_/                                                      _/
_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

tamc_code_ecco.f:
 parsing subroutine ** grad_sigma **
 parsing subroutine ** calc_buoyancy **
 parsing subroutine ** calc_common_factors **
 parsing subroutine ** calc_diffusivity **
 parsing subroutine ** calc_div_ghat **
 parsing subroutine ** calc_grad_phi_surf **
 parsing subroutine ** calc_gs **
 parsing subroutine ** calc_gt **
 parsing subroutine ** calc_ivdc **
 parsing subroutine ** calc_mom_rhs **
 parsing subroutine ** calc_phi_hyd **
 parsing subroutine ** comm_stats **
 parsing subroutine ** convect **
 parsing subroutine ** convective_adjustment **
 parsing subroutine ** convective_adjustment_ini **
 parsing subroutine ** correction_step **
 parsing subroutine ** cycle_tracer **
 parsing function   ** different_multiple **
 parsing subroutine ** do_fields_blocking_exchanges **
 parsing subroutine ** do_the_model_io **
 parsing subroutine ** dynamics **
 parsing subroutine ** external_forcing_u **
 parsing subroutine ** external_forcing_v **
 parsing subroutine ** external_forcing_t **
 parsing subroutine ** external_forcing_s **
 parsing subroutine ** external_forcing_surf **
 parsing subroutine ** find_alpha **
 parsing subroutine ** find_beta **
 parsing subroutine ** find_rho **
 parsing subroutine ** freeze **
 parsing subroutine ** get_offline_fields **
 parsing subroutine ** impldiff **
 parsing subroutine ** ini_cartesian_grid **
 parsing subroutine ** ini_cg2d **
 parsing subroutine ** ini_communication_patterns **
 parsing subroutine ** ini_cori **
 parsing subroutine ** ini_depths **
 parsing subroutine ** ini_fields **
 parsing subroutine ** ini_forcing **
 parsing subroutine ** ini_grid **
 parsing subroutine ** ini_masks_etc **
 parsing subroutine ** ini_procs **
 parsing subroutine ** ini_psurf **
 parsing subroutine ** ini_salt **
 parsing subroutine ** ini_spherical_polar_grid **
 parsing subroutine ** ini_theta **
 parsing subroutine ** ini_uvel **
 parsing subroutine ** ini_vertical_grid **
 parsing subroutine ** ini_vvel **
 parsing subroutine ** ini_wvel **
 parsing subroutine ** initialise_varia **
 parsing subroutine ** integrate_for_w **
 parsing subroutine ** modeldata_example **
 parsing subroutine ** nml_filter **
 parsing subroutine ** packages_init_variables **
 parsing subroutine ** plot_field_xyrs **
 parsing subroutine ** plot_field_xyrl **
 parsing subroutine ** plot_field_xyzrs **
 parsing subroutine ** plot_field_xyzrl **
 parsing subroutine ** solve_for_pressure **
 parsing subroutine ** state_summary **
 parsing subroutine ** timestep **
 parsing subroutine ** the_correction_step **
 parsing subroutine ** the_main_loop **
 parsing subroutine ** timestep_tracer **
 parsing subroutine ** swfrac **
 parsing subroutine ** kpp_calc **
 parsing subroutine ** kpp_calc_dummy **
 parsing subroutine ** kpp_calc_diff **
 parsing subroutine ** kpp_do_diags **
 parsing subroutine ** kpp_init **
 parsing subroutine ** kpp_open_diags **
 parsing subroutine ** kppmix **
 parsing subroutine ** bldepth **
 parsing subroutine ** wscale **
 parsing subroutine ** ri_iwmix **
 parsing subroutine ** z121 **
 parsing subroutine ** kpp_smooth_horiz **
 parsing subroutine ** smooth_horiz **
 parsing subroutine ** blmix **
 parsing subroutine ** enhance **
 parsing subroutine ** statekpp **
 parsing subroutine ** kpp_transport_s **
 parsing subroutine ** kpp_transport_t **
 parsing subroutine ** gmredi_calc_diff **
 parsing subroutine ** gmredi_calc_tensor **
 parsing subroutine ** gmredi_calc_tensor_dummy **
 parsing subroutine ** gmredi_diags **
 parsing subroutine ** gmredi_init **
 parsing subroutine ** gmredi_rtransport **
 parsing subroutine ** gmredi_slope_limit **
 parsing subroutine ** gmredi_xtransport **
 parsing subroutine ** gmredi_ytransport **
 parsing subroutine ** ctrl_map_ini **
 parsing subroutine ** ctrl_map_forcing **
 parsing subroutine ** cost_final **
 parsing subroutine ** cost_init **
 parsing subroutine ** cost_test **

=========================================
 semantic analysis
=========================================

=========================================
 normalization
=========================================

=========================================
 control flow analysis
=========================================
control flow analysis of subroutine nml_filter
 ==> irreducible control flow graph

=========================================
 data dependence analysis
=========================================

=========================================
 global data flow analysis
=========================================
 determine required routines and statements for subroutine : the_main_loop
 dependent variable(s) = 
 fc

 the cost function does not depend on the variable(s) :
 xx_sss_dummy xx_sst_dummy

 determine dependent routines and statements :
 independent variable(s) = 
 xx_hflux_dummy xx_salt_dummy xx_sflux_dummy xx_tauu_dummy xx_tauv_dummy xx_theta_dummy

 the independent variable(s) are :
 xx_hflux_dummy xx_salt_dummy xx_sflux_dummy xx_tauu_dummy xx_tauv_dummy xx_theta_dummy

 the dependent variable(s) are   :
 fc

TAMC WARNING: toplevel routine overwrites the input variables:
 niter0

=========================================
 generate adjoint common blocks
=========================================
 original   common block (    2): controlvars_r
 derivative common block (    2): adcontrolvars_r
 original   common block (   14): cost_r
 derivative common block (    2): adcost_r
 original   common block (   10): ctrl_dummy
 derivative common block (    6): adctrl_dummy
 original   common block (    7): dynvars_cd
 derivative common block (    7): addynvars_cd
 original   common block (   14): dynvars_r
 derivative common block (   14): addynvars_r
 original   common block (    7): ffields
 derivative common block (    4): adffields
 original   common block (    3): gm_wtensor
 derivative common block (    3): adgm_wtensor
 original   common block (    5): kpp
 derivative common block (    5): adkpp
 original   common block (    1): kpp_short
 derivative common block (    1): adkpp_short
 original   common block (    5): tendency_forcing
 derivative common block (    4): adtendency_forcing

=========================================
 generate adjoint routines
=========================================
 begin generate adjoint computations of : the_main_loop
 begin generate adjoint computations of : cost_final
 end   generate adjoint computations of : cost_final
 begin generate adjoint computations of : cost_test
 end   generate adjoint computations of : cost_test
 begin generate adjoint computations of : do_fields_blocking_exchanges
 end   generate adjoint computations of : do_fields_blocking_exchanges
 begin generate adjoint computations of : the_correction_step
 begin generate adjoint computations of : convective_adjustment
 begin generate adjoint computations of : convect
 end   generate adjoint computations of : convect
 begin generate adjoint computations of : find_rho
 end   generate adjoint computations of : find_rho
 end   generate adjoint computations of : convective_adjustment
 begin generate adjoint computations of : cycle_tracer
 end   generate adjoint computations of : cycle_tracer
 begin generate adjoint computations of : correction_step
 end   generate adjoint computations of : correction_step
 begin generate adjoint computations of : calc_grad_phi_surf
 end   generate adjoint computations of : calc_grad_phi_surf
 end   generate adjoint computations of : the_correction_step
 begin generate adjoint computations of : solve_for_pressure
TAMC INFO    tamc_code_ecco.f:126891 : subroutine cg2d is self adjoint
TAMC WARNING tamc_code_ecco.f:126891 : self adjoint routine has more than one active input
TAMC WARNING tamc_code_ecco.f:126891 : adjoint input variable adcg2d_x will be reset
 begin generate adjoint computations of : calc_div_ghat
 end   generate adjoint computations of : calc_div_ghat
 end   generate adjoint computations of : solve_for_pressure
 begin generate adjoint computations of : dynamics
 begin generate adjoint computations of : impldiff
TAMC INFO DOLOOP_STMT tamc_code_ecco.f:71247 in impldiff
 handled as sequential loop, only flow dependencies for : gynm1
TAMC INFO DOLOOP_STMT tamc_code_ecco.f:71235 in impldiff
 handled as sequential loop, only flow dependencies for : gynm1
TAMC INFO DOLOOP_STMT tamc_code_ecco.f:71214 in impldiff
 handled as sequential loop, only flow dependencies for : bet
 end   generate adjoint computations of : impldiff
 begin generate adjoint computations of : timestep
 end   generate adjoint computations of : timestep
 begin generate adjoint computations of : calc_mom_rhs
 begin generate adjoint computations of : external_forcing_v
 end   generate adjoint computations of : external_forcing_v
 begin generate adjoint computations of : external_forcing_u
 end   generate adjoint computations of : external_forcing_u
 end   generate adjoint computations of : calc_mom_rhs
 begin generate adjoint computations of : calc_phi_hyd
 end   generate adjoint computations of : calc_phi_hyd
 begin generate adjoint computations of : freeze
 end   generate adjoint computations of : freeze
 begin generate adjoint computations of : timestep_tracer
 end   generate adjoint computations of : timestep_tracer
 begin generate adjoint computations of : calc_gs
 begin generate adjoint computations of : external_forcing_s
 end   generate adjoint computations of : external_forcing_s
 begin generate adjoint computations of : kpp_transport_s
 end   generate adjoint computations of : kpp_transport_s
 begin generate adjoint computations of : gmredi_rtransport
 end   generate adjoint computations of : gmredi_rtransport
 begin generate adjoint computations of : gmredi_ytransport
 end   generate adjoint computations of : gmredi_ytransport
 begin generate adjoint computations of : gmredi_xtransport
 end   generate adjoint computations of : gmredi_xtransport
 end   generate adjoint computations of : calc_gs
 begin generate adjoint computations of : calc_gt
 begin generate adjoint computations of : external_forcing_t
 end   generate adjoint computations of : external_forcing_t
 begin generate adjoint computations of : kpp_transport_t
 end   generate adjoint computations of : kpp_transport_t
 end   generate adjoint computations of : calc_gt
 begin generate adjoint computations of : calc_diffusivity
 begin generate adjoint computations of : kpp_calc_diff
 end   generate adjoint computations of : kpp_calc_diff
 begin generate adjoint computations of : gmredi_calc_diff
 end   generate adjoint computations of : gmredi_calc_diff
 end   generate adjoint computations of : calc_diffusivity
 begin generate adjoint computations of : calc_common_factors
 end   generate adjoint computations of : calc_common_factors
 begin generate adjoint computations of : kpp_calc
 begin generate adjoint computations of : swfrac
 end   generate adjoint computations of : swfrac
 begin generate adjoint computations of : kppmix
 begin generate adjoint computations of : enhance
 end   generate adjoint computations of : enhance
 begin generate adjoint computations of : blmix
 begin generate adjoint computations of : wscale
 end   generate adjoint computations of : wscale
 end   generate adjoint computations of : blmix
 begin generate adjoint computations of : bldepth
 end   generate adjoint computations of : bldepth
 begin generate adjoint computations of : ri_iwmix
 end   generate adjoint computations of : ri_iwmix
 end   generate adjoint computations of : kppmix
 begin generate adjoint computations of : kpp_smooth_horiz
 end   generate adjoint computations of : kpp_smooth_horiz
 begin generate adjoint computations of : statekpp
 begin generate adjoint computations of : find_beta
 end   generate adjoint computations of : find_beta
 begin generate adjoint computations of : find_alpha
 end   generate adjoint computations of : find_alpha
 end   generate adjoint computations of : statekpp
 end   generate adjoint computations of : kpp_calc
 begin generate adjoint computations of : kpp_calc_dummy
 end   generate adjoint computations of : kpp_calc_dummy
 begin generate adjoint computations of : gmredi_calc_tensor
 begin generate adjoint computations of : gmredi_slope_limit
 end   generate adjoint computations of : gmredi_slope_limit
 end   generate adjoint computations of : gmredi_calc_tensor
 begin generate adjoint computations of : gmredi_calc_tensor_dummy
 end   generate adjoint computations of : gmredi_calc_tensor_dummy
 begin generate adjoint computations of : external_forcing_surf
 end   generate adjoint computations of : external_forcing_surf
 begin generate adjoint computations of : calc_ivdc
 end   generate adjoint computations of : calc_ivdc
 begin generate adjoint computations of : grad_sigma
 end   generate adjoint computations of : grad_sigma
TAMC INFO     avoiding recomputation of : help_h
 begin generate adjoint computations of : integrate_for_w
 end   generate adjoint computations of : integrate_for_w
 end   generate adjoint computations of : dynamics
TAMC INFO    tamc_code_ecco.f:135776 : tape computations inserted
TAMC INFO    tamc_code_ecco.f:135776 : tape computations inserted
TAMC INFO    tamc_code_ecco.f:135752 : tape computations inserted
 begin generate adjoint computations of : ctrl_map_forcing
 end   generate adjoint computations of : ctrl_map_forcing
 begin generate adjoint computations of : initialise_varia
 begin generate adjoint computations of : packages_init_variables
 begin generate adjoint computations of : ctrl_map_ini
 end   generate adjoint computations of : ctrl_map_ini
 end   generate adjoint computations of : packages_init_variables
 end   generate adjoint computations of : initialise_varia
TAMC INFO    tamc_code_ecco.f:135776 : tape computations inserted
TAMC INFO    tamc_code_ecco.f:135776 : tape computations inserted
TAMC INFO    tamc_code_ecco.f:135752 : tape computations inserted
TAMC INFO     avoiding recomputation of : max_lev2
TAMC INFO     avoiding recomputation of : max_lev3
TAMC INFO     avoiding recomputation of : empmr,fu,fv,qnet
TAMC INFO     avoiding recomputation of : kmixcbm2,kmixcws1,kmixcws2,kmixcws3,kmixcws4,kpp_bldepth15,kpp_i1,kpp_r11,kpp_r12,kpp_r13,niter0,qsw,sss,sst
TAMC INFO    tamc_code_ecco.f:135680 : function and tape computations inserted
TAMC WARNING tamc_code_ecco.f:135783 : tape comlev1_kpp_sm not used
TAMC WARNING tamc_code_ecco.f:135680 : tape dummytape not used
TAMC WARNING tamc_code_ecco.f:38527 : tape tapelev_ini_bibj_k not used
TAMC WARNING tamc_code_ecco.f:157338 : tape z121tape not used
 end   generate adjoint computations of : the_main_loop

=========================================
 generate auxiliary routines
=========================================
 generate initialization of global adjoint variables
TAMC INFO      adjoint of common block variable fc not initialized
TAMC INFO      adjoint of common block variable xx_theta_dummy not initialized
TAMC INFO      adjoint of common block variable xx_salt_dummy not initialized
TAMC INFO      adjoint of common block variable xx_hflux_dummy not initialized
TAMC INFO      adjoint of common block variable xx_sflux_dummy not initialized
TAMC INFO      adjoint of common block variable xx_tauu_dummy not initialized
TAMC INFO      adjoint of common block variable xx_tauv_dummy not initialized

=========================================
 Fortran dialect transformations
=========================================

=========================================
 write modified and adjoint code
=========================================
tamc_code_ecco_ad.f:
 writing subroutine ** mdbldepth **
 writing subroutine ** adbldepth **
 writing subroutine ** mdblmix **
 writing subroutine ** adblmix **
 writing subroutine ** adcalc_common_factors **
 writing subroutine ** adcalc_diffusivity **
 writing subroutine ** adcalc_div_ghat **
 writing subroutine ** adcalc_grad_phi_surf **
 writing subroutine ** adcalc_gs **
 writing subroutine ** adcalc_gt **
 writing subroutine ** adcalc_ivdc **
 writing subroutine ** adcalc_mom_rhs **
 writing subroutine ** mdcalc_phi_hyd **
 writing subroutine ** adcalc_phi_hyd **
 writing subroutine ** adconvect **
 writing subroutine ** mdconvective_adjustment **
 writing subroutine ** adconvective_adjustment **
 writing subroutine ** adcorrection_step **
 writing subroutine ** adcost_final **
 writing subroutine ** adcost_test **
 writing subroutine ** adctrl_map_forcing **
 writing subroutine ** adctrl_map_ini **
 writing subroutine ** adcycle_tracer **
 writing subroutine ** addo_fields_blocking_exchanges **
 writing subroutine ** mddynamics **
 writing subroutine ** addynamics **
 writing subroutine ** adenhance **
 writing subroutine ** adexternal_forcing_s **
 writing subroutine ** adexternal_forcing_surf **
 writing subroutine ** adexternal_forcing_t **
 writing subroutine ** adexternal_forcing_u **
 writing subroutine ** adexternal_forcing_v **
 writing subroutine ** adfind_alpha **
 writing subroutine ** adfind_beta **
 writing subroutine ** adfind_rho **
 writing subroutine ** adfreeze **
 writing subroutine ** adgmredi_calc_diff **
 writing subroutine ** adgmredi_calc_tensor **
 writing subroutine ** adgmredi_calc_tensor_dummy **
 writing subroutine ** adgmredi_rtransport **
 writing subroutine ** adgmredi_slope_limit **
 writing subroutine ** adgmredi_xtransport **
 writing subroutine ** adgmredi_ytransport **
 writing subroutine ** adgrad_sigma **
 writing subroutine ** adimpldiff **
 writing subroutine ** mdinitialise_varia **
 writing subroutine ** adinitialise_varia **
 writing subroutine ** adintegrate_for_w **
 writing subroutine ** mdkpp_calc **
 writing subroutine ** adkpp_calc **
 writing subroutine ** adkpp_calc_diff **
 writing subroutine ** adkpp_calc_dummy **
 writing subroutine ** adkpp_smooth_horiz **
 writing subroutine ** adkpp_transport_s **
 writing subroutine ** adkpp_transport_t **
 writing subroutine ** mdkppmix **
 writing subroutine ** adkppmix **
 writing subroutine ** adpackages_init_variables **
 writing subroutine ** adri_iwmix **
 writing subroutine ** adsolve_for_pressure **
 writing subroutine ** adstatekpp **
 writing subroutine ** adswfrac **
 writing subroutine ** mdthe_correction_step **
 writing subroutine ** adthe_correction_step **
 writing subroutine ** adthe_main_loop **
 writing subroutine ** adtimestep **
 writing subroutine ** adtimestep_tracer **
 writing subroutine ** adwscale **
 writing subroutine ** adzero **
1	heimbach	1.1	_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
2			_/ _/
3			_/ T angent linear and _/
4			_/ A djoint Version 5.2.14 _/
5			_/ M odel _/
6			_/ C ompiler _/
7			_/ _/
8			_/ Copyright (c) 1995-2000 Ralf Giering _/
9			_/ _/
10			_/ only for use at MIT EAPS Phys. Ocean., Cambridge _/
11			_/ _/
12			_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
13
14			tamc_code_ecco.f:
15			parsing subroutine grad_sigma
16			parsing subroutine calc_buoyancy
17			parsing subroutine calc_common_factors
18			parsing subroutine calc_diffusivity
19			parsing subroutine calc_div_ghat
20			parsing subroutine calc_grad_phi_surf
21			parsing subroutine calc_gs
22			parsing subroutine calc_gt
23			parsing subroutine calc_ivdc
24			parsing subroutine calc_mom_rhs
25			parsing subroutine calc_phi_hyd
26			parsing subroutine comm_stats
27			parsing subroutine convect
28			parsing subroutine convective_adjustment
29			parsing subroutine convective_adjustment_ini
30			parsing subroutine correction_step
31			parsing subroutine cycle_tracer
32			parsing function different_multiple
33			parsing subroutine do_fields_blocking_exchanges
34			parsing subroutine do_the_model_io
35			parsing subroutine dynamics
36			parsing subroutine external_forcing_u
37			parsing subroutine external_forcing_v
38			parsing subroutine external_forcing_t
39			parsing subroutine external_forcing_s
40			parsing subroutine external_forcing_surf
41			parsing subroutine find_alpha
42			parsing subroutine find_beta
43			parsing subroutine find_rho
44			parsing subroutine freeze
45			parsing subroutine get_offline_fields
46			parsing subroutine impldiff
47			parsing subroutine ini_cartesian_grid
48			parsing subroutine ini_cg2d
49			parsing subroutine ini_communication_patterns
50			parsing subroutine ini_cori
51			parsing subroutine ini_depths
52			parsing subroutine ini_fields
53			parsing subroutine ini_forcing
54			parsing subroutine ini_grid
55			parsing subroutine ini_masks_etc
56			parsing subroutine ini_procs
57			parsing subroutine ini_psurf
58			parsing subroutine ini_salt
59			parsing subroutine ini_spherical_polar_grid
60			parsing subroutine ini_theta
61			parsing subroutine ini_uvel
62			parsing subroutine ini_vertical_grid
63			parsing subroutine ini_vvel
64			parsing subroutine ini_wvel
65			parsing subroutine initialise_varia
66			parsing subroutine integrate_for_w
67			parsing subroutine modeldata_example
68			parsing subroutine nml_filter
69			parsing subroutine packages_init_variables
70			parsing subroutine plot_field_xyrs
71			parsing subroutine plot_field_xyrl
72			parsing subroutine plot_field_xyzrs
73			parsing subroutine plot_field_xyzrl
74			parsing subroutine solve_for_pressure
75			parsing subroutine state_summary
76			parsing subroutine timestep
77			parsing subroutine the_correction_step
78			parsing subroutine the_main_loop
79			parsing subroutine timestep_tracer
80			parsing subroutine swfrac
81			parsing subroutine kpp_calc
82			parsing subroutine kpp_calc_dummy
83			parsing subroutine kpp_calc_diff
84			parsing subroutine kpp_do_diags
85			parsing subroutine kpp_init
86			parsing subroutine kpp_open_diags
87			parsing subroutine kppmix
88			parsing subroutine bldepth
89			parsing subroutine wscale
90			parsing subroutine ri_iwmix
91			parsing subroutine z121
92			parsing subroutine kpp_smooth_horiz
93			parsing subroutine smooth_horiz
94			parsing subroutine blmix
95			parsing subroutine enhance
96			parsing subroutine statekpp
97			parsing subroutine kpp_transport_s
98			parsing subroutine kpp_transport_t
99			parsing subroutine gmredi_calc_diff
100			parsing subroutine gmredi_calc_tensor
101			parsing subroutine gmredi_calc_tensor_dummy
102			parsing subroutine gmredi_diags
103			parsing subroutine gmredi_init
104			parsing subroutine gmredi_rtransport
105			parsing subroutine gmredi_slope_limit
106			parsing subroutine gmredi_xtransport
107			parsing subroutine gmredi_ytransport
108			parsing subroutine ctrl_map_ini
109			parsing subroutine ctrl_map_forcing
110			parsing subroutine cost_final
111			parsing subroutine cost_init
112			parsing subroutine cost_test
113
114			=========================================
115			semantic analysis
116			=========================================
117
118			=========================================
119			normalization
120			=========================================
121
122			=========================================
123			control flow analysis
124			=========================================
125			control flow analysis of subroutine nml_filter
126			==> irreducible control flow graph
127
128			=========================================
129			data dependence analysis
130			=========================================
131
132			=========================================
133			global data flow analysis
134			=========================================
135			determine required routines and statements for subroutine : the_main_loop
136			dependent variable(s) =
137			fc
138
139			the cost function does not depend on the variable(s) :
140			xx_sss_dummy xx_sst_dummy
141
142			determine dependent routines and statements :
143			independent variable(s) =
144			xx_hflux_dummy xx_salt_dummy xx_sflux_dummy xx_tauu_dummy xx_tauv_dummy xx_theta_dummy
145
146			the independent variable(s) are :
147			xx_hflux_dummy xx_salt_dummy xx_sflux_dummy xx_tauu_dummy xx_tauv_dummy xx_theta_dummy
148
149			the dependent variable(s) are :
150			fc
151
152			TAMC WARNING: toplevel routine overwrites the input variables:
153			niter0
154
155			=========================================
156			generate adjoint common blocks
157			=========================================
158			original common block ( 2): controlvars_r
159			derivative common block ( 2): adcontrolvars_r
160			original common block ( 14): cost_r
161			derivative common block ( 2): adcost_r
162			original common block ( 10): ctrl_dummy
163			derivative common block ( 6): adctrl_dummy
164			original common block ( 7): dynvars_cd
165			derivative common block ( 7): addynvars_cd
166			original common block ( 14): dynvars_r
167			derivative common block ( 14): addynvars_r
168			original common block ( 7): ffields
169			derivative common block ( 4): adffields
170			original common block ( 3): gm_wtensor
171			derivative common block ( 3): adgm_wtensor
172			original common block ( 5): kpp
173			derivative common block ( 5): adkpp
174			original common block ( 1): kpp_short
175			derivative common block ( 1): adkpp_short
176			original common block ( 5): tendency_forcing
177			derivative common block ( 4): adtendency_forcing
178
179			=========================================
180			generate adjoint routines
181			=========================================
182			begin generate adjoint computations of : the_main_loop
183			begin generate adjoint computations of : cost_final
184			end generate adjoint computations of : cost_final
185			begin generate adjoint computations of : cost_test
186			end generate adjoint computations of : cost_test
187			begin generate adjoint computations of : do_fields_blocking_exchanges
188			end generate adjoint computations of : do_fields_blocking_exchanges
189			begin generate adjoint computations of : the_correction_step
190			begin generate adjoint computations of : convective_adjustment
191			begin generate adjoint computations of : convect
192			end generate adjoint computations of : convect
193			begin generate adjoint computations of : find_rho
194			end generate adjoint computations of : find_rho
195			end generate adjoint computations of : convective_adjustment
196			begin generate adjoint computations of : cycle_tracer
197			end generate adjoint computations of : cycle_tracer
198			begin generate adjoint computations of : correction_step
199			end generate adjoint computations of : correction_step
200			begin generate adjoint computations of : calc_grad_phi_surf
201			end generate adjoint computations of : calc_grad_phi_surf
202			end generate adjoint computations of : the_correction_step
203			begin generate adjoint computations of : solve_for_pressure
204			TAMC INFO tamc_code_ecco.f:126891 : subroutine cg2d is self adjoint
205			TAMC WARNING tamc_code_ecco.f:126891 : self adjoint routine has more than one active input
206			TAMC WARNING tamc_code_ecco.f:126891 : adjoint input variable adcg2d_x will be reset
207			begin generate adjoint computations of : calc_div_ghat
208			end generate adjoint computations of : calc_div_ghat
209			end generate adjoint computations of : solve_for_pressure
210			begin generate adjoint computations of : dynamics
211			begin generate adjoint computations of : impldiff
212			TAMC INFO DOLOOP_STMT tamc_code_ecco.f:71247 in impldiff
213			handled as sequential loop, only flow dependencies for : gynm1
214			TAMC INFO DOLOOP_STMT tamc_code_ecco.f:71235 in impldiff
215			handled as sequential loop, only flow dependencies for : gynm1
216			TAMC INFO DOLOOP_STMT tamc_code_ecco.f:71214 in impldiff
217			handled as sequential loop, only flow dependencies for : bet
218			end generate adjoint computations of : impldiff
219			begin generate adjoint computations of : timestep
220			end generate adjoint computations of : timestep
221			begin generate adjoint computations of : calc_mom_rhs
222			begin generate adjoint computations of : external_forcing_v
223			end generate adjoint computations of : external_forcing_v
224			begin generate adjoint computations of : external_forcing_u
225			end generate adjoint computations of : external_forcing_u
226			end generate adjoint computations of : calc_mom_rhs
227			begin generate adjoint computations of : calc_phi_hyd
228			end generate adjoint computations of : calc_phi_hyd
229			begin generate adjoint computations of : freeze
230			end generate adjoint computations of : freeze
231			begin generate adjoint computations of : timestep_tracer
232			end generate adjoint computations of : timestep_tracer
233			begin generate adjoint computations of : calc_gs
234			begin generate adjoint computations of : external_forcing_s
235			end generate adjoint computations of : external_forcing_s
236			begin generate adjoint computations of : kpp_transport_s
237			end generate adjoint computations of : kpp_transport_s
238			begin generate adjoint computations of : gmredi_rtransport
239			end generate adjoint computations of : gmredi_rtransport
240			begin generate adjoint computations of : gmredi_ytransport
241			end generate adjoint computations of : gmredi_ytransport
242			begin generate adjoint computations of : gmredi_xtransport
243			end generate adjoint computations of : gmredi_xtransport
244			end generate adjoint computations of : calc_gs
245			begin generate adjoint computations of : calc_gt
246			begin generate adjoint computations of : external_forcing_t
247			end generate adjoint computations of : external_forcing_t
248			begin generate adjoint computations of : kpp_transport_t
249			end generate adjoint computations of : kpp_transport_t
250			end generate adjoint computations of : calc_gt
251			begin generate adjoint computations of : calc_diffusivity
252			begin generate adjoint computations of : kpp_calc_diff
253			end generate adjoint computations of : kpp_calc_diff
254			begin generate adjoint computations of : gmredi_calc_diff
255			end generate adjoint computations of : gmredi_calc_diff
256			end generate adjoint computations of : calc_diffusivity
257			begin generate adjoint computations of : calc_common_factors
258			end generate adjoint computations of : calc_common_factors
259			begin generate adjoint computations of : kpp_calc
260			begin generate adjoint computations of : swfrac
261			end generate adjoint computations of : swfrac
262			begin generate adjoint computations of : kppmix
263			begin generate adjoint computations of : enhance
264			end generate adjoint computations of : enhance
265			begin generate adjoint computations of : blmix
266			begin generate adjoint computations of : wscale
267			end generate adjoint computations of : wscale
268			end generate adjoint computations of : blmix
269			begin generate adjoint computations of : bldepth
270			end generate adjoint computations of : bldepth
271			begin generate adjoint computations of : ri_iwmix
272			end generate adjoint computations of : ri_iwmix
273			end generate adjoint computations of : kppmix
274			begin generate adjoint computations of : kpp_smooth_horiz
275			end generate adjoint computations of : kpp_smooth_horiz
276			begin generate adjoint computations of : statekpp
277			begin generate adjoint computations of : find_beta
278			end generate adjoint computations of : find_beta
279			begin generate adjoint computations of : find_alpha
280			end generate adjoint computations of : find_alpha
281			end generate adjoint computations of : statekpp
282			end generate adjoint computations of : kpp_calc
283			begin generate adjoint computations of : kpp_calc_dummy
284			end generate adjoint computations of : kpp_calc_dummy
285			begin generate adjoint computations of : gmredi_calc_tensor
286			begin generate adjoint computations of : gmredi_slope_limit
287			end generate adjoint computations of : gmredi_slope_limit
288			end generate adjoint computations of : gmredi_calc_tensor
289			begin generate adjoint computations of : gmredi_calc_tensor_dummy
290			end generate adjoint computations of : gmredi_calc_tensor_dummy
291			begin generate adjoint computations of : external_forcing_surf
292			end generate adjoint computations of : external_forcing_surf
293			begin generate adjoint computations of : calc_ivdc
294			end generate adjoint computations of : calc_ivdc
295			begin generate adjoint computations of : grad_sigma
296			end generate adjoint computations of : grad_sigma
297			TAMC INFO avoiding recomputation of : help_h
298			begin generate adjoint computations of : integrate_for_w
299			end generate adjoint computations of : integrate_for_w
300			end generate adjoint computations of : dynamics
301			TAMC INFO tamc_code_ecco.f:135776 : tape computations inserted
302			TAMC INFO tamc_code_ecco.f:135776 : tape computations inserted
303			TAMC INFO tamc_code_ecco.f:135752 : tape computations inserted
304			begin generate adjoint computations of : ctrl_map_forcing
305			end generate adjoint computations of : ctrl_map_forcing
306			begin generate adjoint computations of : initialise_varia
307			begin generate adjoint computations of : packages_init_variables
308			begin generate adjoint computations of : ctrl_map_ini
309			end generate adjoint computations of : ctrl_map_ini
310			end generate adjoint computations of : packages_init_variables
311			end generate adjoint computations of : initialise_varia
312			TAMC INFO tamc_code_ecco.f:135776 : tape computations inserted
313			TAMC INFO tamc_code_ecco.f:135776 : tape computations inserted
314			TAMC INFO tamc_code_ecco.f:135752 : tape computations inserted
315			TAMC INFO avoiding recomputation of : max_lev2
316			TAMC INFO avoiding recomputation of : max_lev3
317			TAMC INFO avoiding recomputation of : empmr,fu,fv,qnet
318			TAMC INFO avoiding recomputation of : kmixcbm2,kmixcws1,kmixcws2,kmixcws3,kmixcws4,kpp_bldepth15,kpp_i1,kpp_r11,kpp_r12,kpp_r13,niter0,qsw,sss,sst
319			TAMC INFO tamc_code_ecco.f:135680 : function and tape computations inserted
320			TAMC WARNING tamc_code_ecco.f:135783 : tape comlev1_kpp_sm not used
321			TAMC WARNING tamc_code_ecco.f:135680 : tape dummytape not used
322			TAMC WARNING tamc_code_ecco.f:38527 : tape tapelev_ini_bibj_k not used
323			TAMC WARNING tamc_code_ecco.f:157338 : tape z121tape not used
324			end generate adjoint computations of : the_main_loop
325
326			=========================================
327			generate auxiliary routines
328			=========================================
329			generate initialization of global adjoint variables
330			TAMC INFO adjoint of common block variable fc not initialized
331			TAMC INFO adjoint of common block variable xx_theta_dummy not initialized
332			TAMC INFO adjoint of common block variable xx_salt_dummy not initialized
333			TAMC INFO adjoint of common block variable xx_hflux_dummy not initialized
334			TAMC INFO adjoint of common block variable xx_sflux_dummy not initialized
335			TAMC INFO adjoint of common block variable xx_tauu_dummy not initialized
336			TAMC INFO adjoint of common block variable xx_tauv_dummy not initialized
337
338			=========================================
339			Fortran dialect transformations
340			=========================================
341
342			=========================================
343			write modified and adjoint code
344			=========================================
345			tamc_code_ecco_ad.f:
346			writing subroutine mdbldepth
347			writing subroutine adbldepth
348			writing subroutine mdblmix
349			writing subroutine adblmix
350			writing subroutine adcalc_common_factors
351			writing subroutine adcalc_diffusivity
352			writing subroutine adcalc_div_ghat
353			writing subroutine adcalc_grad_phi_surf
354			writing subroutine adcalc_gs
355			writing subroutine adcalc_gt
356			writing subroutine adcalc_ivdc
357			writing subroutine adcalc_mom_rhs
358			writing subroutine mdcalc_phi_hyd
359			writing subroutine adcalc_phi_hyd
360			writing subroutine adconvect
361			writing subroutine mdconvective_adjustment
362			writing subroutine adconvective_adjustment
363			writing subroutine adcorrection_step
364			writing subroutine adcost_final
365			writing subroutine adcost_test
366			writing subroutine adctrl_map_forcing
367			writing subroutine adctrl_map_ini
368			writing subroutine adcycle_tracer
369			writing subroutine addo_fields_blocking_exchanges
370			writing subroutine mddynamics
371			writing subroutine addynamics
372			writing subroutine adenhance
373			writing subroutine adexternal_forcing_s
374			writing subroutine adexternal_forcing_surf
375			writing subroutine adexternal_forcing_t
376			writing subroutine adexternal_forcing_u
377			writing subroutine adexternal_forcing_v
378			writing subroutine adfind_alpha
379			writing subroutine adfind_beta
380			writing subroutine adfind_rho
381			writing subroutine adfreeze
382			writing subroutine adgmredi_calc_diff
383			writing subroutine adgmredi_calc_tensor
384			writing subroutine adgmredi_calc_tensor_dummy
385			writing subroutine adgmredi_rtransport
386			writing subroutine adgmredi_slope_limit
387			writing subroutine adgmredi_xtransport
388			writing subroutine adgmredi_ytransport
389			writing subroutine adgrad_sigma
390			writing subroutine adimpldiff
391			writing subroutine mdinitialise_varia
392			writing subroutine adinitialise_varia
393			writing subroutine adintegrate_for_w
394			writing subroutine mdkpp_calc
395			writing subroutine adkpp_calc
396			writing subroutine adkpp_calc_diff
397			writing subroutine adkpp_calc_dummy
398			writing subroutine adkpp_smooth_horiz
399			writing subroutine adkpp_transport_s
400			writing subroutine adkpp_transport_t
401			writing subroutine mdkppmix
402			writing subroutine adkppmix
403			writing subroutine adpackages_init_variables
404			writing subroutine adri_iwmix
405			writing subroutine adsolve_for_pressure
406			writing subroutine adstatekpp
407			writing subroutine adswfrac
408			writing subroutine mdthe_correction_step
409			writing subroutine adthe_correction_step
410			writing subroutine adthe_main_loop
411			writing subroutine adtimestep
412			writing subroutine adtimestep_tracer
413			writing subroutine adwscale
414			writing subroutine adzero