/[MITgcm]/MITgcm/adjoint/tamc_code_ecco_ad.prot_without_gmredi_kpp
ViewVC logotype

Annotation of /MITgcm/adjoint/tamc_code_ecco_ad.prot_without_gmredi_kpp

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.2 - (hide annotations) (download)
Fri Jul 13 13:25:45 2001 UTC (22 years, 9 months ago) by heimbach
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +0 -0 lines
FILE REMOVED
o Updated makefile to incorporate new routines and flow directives
o Added "make adtaf" for usage of TAF instead of TAMC.
o Bug fix in adjoint_ecco_sed.com
o Removed some adjoint prototype code

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 ( 5): tendency_forcing
171     derivative common block ( 4): adtendency_forcing
172    
173     =========================================
174     generate adjoint routines
175     =========================================
176     begin generate adjoint computations of : the_main_loop
177     begin generate adjoint computations of : cost_final
178     end generate adjoint computations of : cost_final
179     begin generate adjoint computations of : cost_test
180     end generate adjoint computations of : cost_test
181     begin generate adjoint computations of : do_fields_blocking_exchanges
182     end generate adjoint computations of : do_fields_blocking_exchanges
183     begin generate adjoint computations of : the_correction_step
184     begin generate adjoint computations of : convective_adjustment
185     begin generate adjoint computations of : convect
186     end generate adjoint computations of : convect
187     begin generate adjoint computations of : find_rho
188     end generate adjoint computations of : find_rho
189     end generate adjoint computations of : convective_adjustment
190     begin generate adjoint computations of : cycle_tracer
191     end generate adjoint computations of : cycle_tracer
192     begin generate adjoint computations of : correction_step
193     end generate adjoint computations of : correction_step
194     begin generate adjoint computations of : calc_grad_phi_surf
195     end generate adjoint computations of : calc_grad_phi_surf
196     end generate adjoint computations of : the_correction_step
197     begin generate adjoint computations of : solve_for_pressure
198     TAMC INFO tamc_code_ecco.f:126533 : subroutine cg2d is self adjoint
199     TAMC WARNING tamc_code_ecco.f:126533 : self adjoint routine has more than one active input
200     TAMC WARNING tamc_code_ecco.f:126533 : adjoint input variable adcg2d_x will be reset
201     begin generate adjoint computations of : calc_div_ghat
202     end generate adjoint computations of : calc_div_ghat
203     end generate adjoint computations of : solve_for_pressure
204     begin generate adjoint computations of : dynamics
205     begin generate adjoint computations of : impldiff
206     end generate adjoint computations of : impldiff
207     begin generate adjoint computations of : timestep
208     end generate adjoint computations of : timestep
209     begin generate adjoint computations of : calc_mom_rhs
210     begin generate adjoint computations of : external_forcing_v
211     end generate adjoint computations of : external_forcing_v
212     begin generate adjoint computations of : external_forcing_u
213     end generate adjoint computations of : external_forcing_u
214     end generate adjoint computations of : calc_mom_rhs
215     begin generate adjoint computations of : calc_phi_hyd
216     end generate adjoint computations of : calc_phi_hyd
217     begin generate adjoint computations of : freeze
218     end generate adjoint computations of : freeze
219     begin generate adjoint computations of : timestep_tracer
220     end generate adjoint computations of : timestep_tracer
221     begin generate adjoint computations of : calc_gs
222     begin generate adjoint computations of : external_forcing_s
223     end generate adjoint computations of : external_forcing_s
224     end generate adjoint computations of : calc_gs
225     begin generate adjoint computations of : calc_gt
226     begin generate adjoint computations of : external_forcing_t
227     end generate adjoint computations of : external_forcing_t
228     end generate adjoint computations of : calc_gt
229     begin generate adjoint computations of : calc_common_factors
230     end generate adjoint computations of : calc_common_factors
231     begin generate adjoint computations of : external_forcing_surf
232     end generate adjoint computations of : external_forcing_surf
233     begin generate adjoint computations of : integrate_for_w
234     end generate adjoint computations of : integrate_for_w
235     end generate adjoint computations of : dynamics
236     TAMC INFO tamc_code_ecco.f:135410 : tape computations inserted
237     TAMC INFO tamc_code_ecco.f:135410 : tape computations inserted
238     TAMC INFO tamc_code_ecco.f:135386 : tape computations inserted
239     begin generate adjoint computations of : ctrl_map_forcing
240     end generate adjoint computations of : ctrl_map_forcing
241     begin generate adjoint computations of : initialise_varia
242     begin generate adjoint computations of : packages_init_variables
243     begin generate adjoint computations of : ctrl_map_ini
244     end generate adjoint computations of : ctrl_map_ini
245     end generate adjoint computations of : packages_init_variables
246     end generate adjoint computations of : initialise_varia
247     TAMC INFO tamc_code_ecco.f:135410 : tape computations inserted
248     TAMC INFO tamc_code_ecco.f:135410 : tape computations inserted
249     TAMC INFO tamc_code_ecco.f:135386 : tape computations inserted
250     TAMC INFO avoiding recomputation of : max_lev2
251     TAMC INFO avoiding recomputation of : max_lev3
252     TAMC INFO avoiding recomputation of : empmr,fu,fv,qnet
253     TAMC INFO avoiding recomputation of : niter0,sss,sst
254     TAMC INFO tamc_code_ecco.f:135314 : function and tape computations inserted
255     TAMC WARNING tamc_code_ecco.f:135410 : tape comlev1 not used
256     TAMC WARNING tamc_code_ecco.f:47658 : storing of variable theta(:,:,:,bi,bj) not necessary
257     TAMC WARNING tamc_code_ecco.f:47659 : storing of variable salt(:,:,:,bi,bj) not necessary
258     TAMC WARNING tamc_code_ecco.f:47660 : storing of variable uvel(:,:,:,bi,bj) not necessary
259     TAMC WARNING tamc_code_ecco.f:47661 : storing of variable vvel(:,:,:,bi,bj) not necessary
260     TAMC WARNING tamc_code_ecco.f:47743 : storing of variable surfacetendencyu(:,:,bi,bj) not necessary
261     TAMC WARNING tamc_code_ecco.f:47745 : storing of variable surfacetendencyv(:,:,bi,bj) not necessary
262     TAMC WARNING tamc_code_ecco.f:47747 : storing of variable surfacetendencys(:,:,bi,bj) not necessary
263     TAMC WARNING tamc_code_ecco.f:47749 : storing of variable surfacetendencyt(:,:,bi,bj) not necessary
264     TAMC WARNING tamc_code_ecco.f:47871 : storing of variable gtnm1(:,:,:,bi,bj) not necessary
265     TAMC WARNING tamc_code_ecco.f:47883 : storing of variable gsnm1(:,:,:,bi,bj) not necessary
266     TAMC WARNING tamc_code_ecco.f:47979 : storing of variable gunm1(:,:,:,bi,bj) not necessary
267     TAMC WARNING tamc_code_ecco.f:47988 : storing of variable gvnm1(:,:,:,bi,bj) not necessary
268     TAMC WARNING tamc_code_ecco.f:48001 : storing of variable vveld(:,:,:,bi,bj) not necessary
269     TAMC WARNING tamc_code_ecco.f:48010 : storing of variable uveld(:,:,:,bi,bj) not necessary
270     TAMC WARNING tamc_code_ecco.f:47673 : storing of variable rhokm1(:,:) not necessary
271     TAMC WARNING tamc_code_ecco.f:47674 : storing of variable rhok(:,:) not necessary
272     TAMC WARNING tamc_code_ecco.f:135414 : tape comlev1_kpp not used
273     TAMC WARNING tamc_code_ecco.f:135417 : tape comlev1_kpp_sm not used
274     TAMC WARNING tamc_code_ecco.f:135314 : tape dummytape not used
275     TAMC WARNING tamc_code_ecco.f:38432 : tape tapelev_ini_bibj_k not used
276     end generate adjoint computations of : the_main_loop
277    
278     =========================================
279     generate auxiliary routines
280     =========================================
281     generate initialization of global adjoint variables
282     TAMC INFO adjoint of common block variable fc not initialized
283     TAMC INFO adjoint of common block variable xx_theta_dummy not initialized
284     TAMC INFO adjoint of common block variable xx_salt_dummy not initialized
285     TAMC INFO adjoint of common block variable xx_hflux_dummy not initialized
286     TAMC INFO adjoint of common block variable xx_sflux_dummy not initialized
287     TAMC INFO adjoint of common block variable xx_tauu_dummy not initialized
288     TAMC INFO adjoint of common block variable xx_tauv_dummy not initialized
289    
290     =========================================
291     Fortran dialect transformations
292     =========================================
293    
294     =========================================
295     write modified and adjoint code
296     =========================================
297     tamc_code_ecco_ad.f:
298     writing subroutine ** adcalc_common_factors **
299     writing subroutine ** adcalc_div_ghat **
300     writing subroutine ** adcalc_grad_phi_surf **
301     writing subroutine ** adcalc_gs **
302     writing subroutine ** adcalc_gt **
303     writing subroutine ** adcalc_mom_rhs **
304     writing subroutine ** mdcalc_phi_hyd **
305     writing subroutine ** adcalc_phi_hyd **
306     writing subroutine ** adconvect **
307     writing subroutine ** mdconvective_adjustment **
308     writing subroutine ** adconvective_adjustment **
309     writing subroutine ** adcorrection_step **
310     writing subroutine ** adcost_final **
311     writing subroutine ** adcost_test **
312     writing subroutine ** adctrl_map_forcing **
313     writing subroutine ** adctrl_map_ini **
314     writing subroutine ** adcycle_tracer **
315     writing subroutine ** addo_fields_blocking_exchanges **
316     writing subroutine ** mddynamics **
317     writing subroutine ** addynamics **
318     writing subroutine ** adexternal_forcing_s **
319     writing subroutine ** adexternal_forcing_surf **
320     writing subroutine ** adexternal_forcing_t **
321     writing subroutine ** adexternal_forcing_u **
322     writing subroutine ** adexternal_forcing_v **
323     writing subroutine ** adfind_rho **
324     writing subroutine ** adfreeze **
325     writing subroutine ** adimpldiff **
326     writing subroutine ** mdinitialise_varia **
327     writing subroutine ** adinitialise_varia **
328     writing subroutine ** adintegrate_for_w **
329     writing subroutine ** adpackages_init_variables **
330     writing subroutine ** adsolve_for_pressure **
331     writing subroutine ** mdthe_correction_step **
332     writing subroutine ** adthe_correction_step **
333     writing subroutine ** adthe_main_loop **
334     writing subroutine ** adtimestep **
335     writing subroutine ** adtimestep_tracer **
336     writing subroutine ** adzero **

  ViewVC Help
Powered by ViewVC 1.1.22