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	_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
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