/[MITgcm]/MITgcm/pkg/autodiff/adjoint_model.F
ViewVC logotype

Contents of /MITgcm/pkg/autodiff/adjoint_model.F

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

Revision 1.5 - (show annotations) (download)
Fri Sep 28 15:56:14 2001 UTC (22 years, 7 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint46b_post, checkpoint46n_post, ecco_c44_e18, checkpoint47j_post, ecco_c44_e16, checkpoint48d_pre, checkpoint44b_post, checkpoint51j_post, branch-exfmods-tag, checkpoint47e_post, checkpoint43a-release1mods, checkpoint44h_pre, checkpoint47i_post, ecco_c44_e19, release1_p12, release1_p13, release1_p10, release1_p11, release1_p16, release1_p17, release1_p14, release1_p15, ecco_c44_e17, checkpoint47f_post, checkpoint47c_post, checkpoint50e_post, release1_p13_pre, checkpoint50c_post, checkpoint46i_post, checkpoint47d_post, ecco_c44_e21, ecco_c44_e26, ecco_c44_e24, ecco_c44_e25, checkpoint44f_pre, checkpoint47a_post, icebear2, checkpoint46f_post, checkpoint46d_pre, release1_beta1, checkpoint48e_post, checkpoint46e_post, checkpoint48d_post, checkpoint50c_pre, release1-branch_tutorials, checkpoint46c_post, checkpoint44g_post, branchpoint-genmake2, checkpoint44h_post, checkpoint46l_post, checkpoint46k_post, ecco-branch-mod1, checkpoint46e_pre, ecco-branch-mod3, ecco-branch-mod4, ecco-branch-mod5, checkpoint48f_post, checkpoint45d_post, checkpoint46j_pre, checkpoint45b_post, checkpoint48c_post, chkpt44a_pre, release1-branch-end, release1_final_v1, checkpoint51e_post, checkpoint51b_post, release1_p12_pre, checkpoint47d_pre, checkpoint47, checkpoint44, checkpoint45, checkpoint48, checkpoint49, checkpoint50i_post, checkpoint47b_post, checkpoint48i_post, checkpoint46l_pre, checkpoint51f_pre, release1_b1, checkpoint48h_post, checkpoint50d_pre, chkpt44d_post, release1_p9, checkpoint46h_pre, checkpoint51, checkpoint50, checkpoint47h_post, release1_p8, checkpoint50d_post, checkpoint46g_pre, release1_p2, release1_p3, release1_p4, checkpoint51b_pre, release1_p6, release1_p7, checkpoint46a_post, checkpoint47g_post, chkpt44a_post, checkpoint44b_pre, checkpoint44e_post, release1_p1, checkpoint46m_post, checkpoint46j_post, checkpoint51h_pre, checkpoint46a_pre, checkpoint50g_post, checkpoint45c_post, checkpoint50b_pre, release1_p5, checkpoint44e_pre, checkpoint51g_post, checkpoint46b_pre, ecco_ice2, ecco_ice1, checkpoint51f_post, checkpoint46d_post, ecco-branch-mod2, checkpoint48b_post, checkpoint50b_post, checkpoint46g_post, checkpoint45a_post, checkpoint51c_post, checkpoint50f_post, checkpoint50a_post, checkpoint46c_pre, checkpoint50f_pre, checkpoint43, checkpoint51d_post, checkpoint48c_pre, release1-branch_branchpoint, ecco_c44_e22, ecco_c44_e23, checkpoint46, ecco_c44_e20, checkpoint50h_post, checkpoint51a_post, checkpoint46h_post, checkpoint50e_pre, c49_autodiff, release1_chkpt44d_post, checkpoint48g_post, checkpoint51i_pre, chkpt44c_pre, checkpoint48a_post, checkpoint44f_post, chkpt44c_post
Branch point for: c24_e25_ice, ecco-branch, branch-genmake2, release1, branch-exfmods-curt, release1_coupled, release1_final, release1-branch, release1_50yr
Changes since 1.4: +1 -1 lines 
Bug fix for protex command (CBOI - CEOI).
1
2 CBOI
3 C
4 C !TITLE: ADJOINT CODE
5 C !AUTHORS: mitgcm developers ( support@mitgcm.org )
6 C !AFFILIATION: Massachussetts Institute of Technology
7 C !DATE:
8 C !INTRODUCTION: adjoint code collection
9 c \bv
10 c Top level routine for adjoint code generation is the_main_loop.
11 c Adjoint code is generated via the makefile in adjoint/
12 c 0. make restore:
13 c Re-instate header or adjoint_model.F from template
14 c 1. make:
15 c All .f files are concatenated into one file
16 c tamc_code_ecco.f
17 c 2. make adtaf:
18 c This makefiles contains a list of all routines which must be
19 c differentiated (i.e. analyzed by TAMC/TAF) and those which
20 c must not be differentiated. For the latter, files containing
21 c flow directives are given.
22 c The code generated by TAMC/TAF is written to
23 c tamc_code_ecco_ad.f
24 c 3. make adchange:
25 c To maintain the multi-threading index mythid,
26 c the adjoint code must be post-processed.
27 c All parameter lists of active I/O routines
28 c (active read/write open/close) are augmented by mythid.
29 c The resulting code is copied to
30 c tamc_code_ecco_sed_ad.f
31 c and concatenated to adjoint_model.F
32 c
33 c Documentation:
34 c ==============
35 c For a documentation of TAMC see:
36 c http://puddle.mit.edu/~ralf/tamc/tamc.html
37 c For more info on TAF see:
38 c http://www.fastopt.de
39 C \ev
40 CBOI
41
42 #include "CPP_OPTIONS.h"
43
44 CBOP
45 C !ROUTINE: adjoint_model
46 C !INTERFACE:
47 subroutine adjoint_model(mythid )
48
49 C !DESCRIPTION: \bv
50 c ==================================================================
51 c SUBROUTINE adjoint_model
52 c ==================================================================
53 c o This is just a place holder for the TAMC generated adjoint code
54 c of the MITgcmuv and related routines. Below you find a short
55 c description of some topics pertaining to the adjoint model.
56 c This routine will be overwritten as soon as TAMC will have
57 c generated the adjoint model. If you want to keep it copy it
58 c to another place.
59 c started: Christian Eckert eckert@mit.edu 21-Jul-1999
60 c ==================================================================
61 c SUBROUTINE adjoint_model
62 c ==================================================================
63 C \ev
64
65 C !USES:
66 implicit none
67
68 c == routine arguments ==
69
70 integer mythid
71
72 c == end of interface ==
73 CEOP
74
75 return
76 end
  ViewVC Help
Powered by ViewVC 1.1.22