/[MITgcm]/MITgcm/pkg/autodiff/mdsio.flow
ViewVC logotype

Contents of /MITgcm/pkg/autodiff/mdsio.flow

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

Revision 1.2 - (show annotations) (download)
Thu Feb 7 20:00:09 2002 UTC (22 years, 3 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint46n_post, checkpoint47j_post, checkpoint48d_pre, checkpoint44b_post, branch-exfmods-tag, checkpoint47e_post, checkpoint44h_pre, checkpoint47i_post, checkpoint44e_post, checkpoint47f_post, checkpoint47c_post, checkpoint50e_post, checkpoint50c_post, checkpoint46i_post, checkpoint47d_post, checkpoint44f_pre, checkpoint47a_post, checkpoint46f_post, checkpoint46d_pre, checkpoint48e_post, checkpoint46e_post, checkpoint48d_post, checkpoint50g_post, checkpoint46c_post, checkpoint44g_post, checkpoint44h_post, checkpoint46k_post, checkpoint46e_pre, checkpoint48f_post, checkpoint45d_post, checkpoint46j_pre, checkpoint45b_post, checkpoint48c_post, release1_final_v1, checkpoint47d_pre, checkpoint47, checkpoint45, checkpoint48, checkpoint49, c49_autodiff, checkpoint47b_post, checkpoint46l_post, checkpoint48i_post, checkpoint46l_pre, checkpoint48h_post, checkpoint50d_pre, chkpt44d_post, checkpoint46h_pre, checkpoint50, checkpoint47h_post, checkpoint50d_post, checkpoint46g_pre, checkpoint46a_post, checkpoint47g_post, chkpt44c_post, checkpoint46m_post, checkpoint46j_post, checkpoint46a_pre, checkpoint50c_pre, checkpoint45c_post, checkpoint50b_pre, checkpoint44e_pre, checkpoint46b_pre, checkpoint46b_post, checkpoint46d_post, checkpoint48b_post, checkpoint50b_post, checkpoint46g_post, checkpoint45a_post, checkpoint50f_post, checkpoint50a_post, checkpoint46c_pre, checkpoint50f_pre, checkpoint48c_pre, checkpoint46, checkpoint50h_post, checkpoint46h_post, checkpoint50e_pre, checkpoint50i_post, checkpoint48g_post, chkpt44c_pre, checkpoint48a_post, checkpoint44f_post
Branch point for: branch-exfmods-curt, release1_final
Changes since 1.1: +25 -0 lines 
o merge of relevant stuff from the ecco-branch:
  - genmake: removed $S64 overwrite for case SunOS
  - pkg/exf: update and corrections for field swapping and obcs
  - pkg/ecco: parameter lists for the_model_main, the_main_loop
              harmonized between ECCO and MITgcm
  - pkg/autodiff: added flow directives for obcs, mdsio_gl_slice
                  updated checkpointing_lev... lists for obcs
  - model/src: minor changes in forward_step, plot_field
               added directive for divided adjoint in the_main_loop
  - pkg/mdsio: added mdsio_gl_slice
1
2 C----------------------------------------
3 C subroutine mdsfindunit
4 C----------------------------------------
5 CADJ SUBROUTINE mdsfindunit INPUT = 2
6 CADJ SUBROUTINE mdsfindunit OUTPUT = 1
7
8 C----------------------------------------
9 C subroutine mdsreadfield
10 C----------------------------------------
11 CADJ SUBROUTINE mdsreadfield INPUT = 1,2,3,4, 6,7
12 CADJ SUBROUTINE mdsreadfield OUTPUT = 5
13
14 C----------------------------------------
15 C subroutine mdswritefield
16 C----------------------------------------
17 CADJ SUBROUTINE mdswritefield INPUT = 1,2,3,4,5,6,7,8,9
18 CADJ SUBROUTINE mdswritefield OUTPUT =
19
20 C----------------------------------------
21 C subroutine mdsreadvector
22 C----------------------------------------
23 CADJ SUBROUTINE mdsreadvector INPUT = 1,2,3,4, 6,7,8,9
24 CADJ SUBROUTINE mdsreadvector OUTPUT = 5
25
26 C----------------------------------------
27 C subroutine mdswritevector
28 C----------------------------------------
29 CADJ SUBROUTINE mdswritevector INPUT = 1,2,3,4,5,6,7,8,9,10,11
30 CADJ SUBROUTINE mdswritevector OUTPUT =
31
32 C----------------------------------------
33 C subroutine mds_byteswapr8
34 C----------------------------------------
35 CADJ SUBROUTINE mds_byteswapr8 INPUT = 1,2
36 CADJ SUBROUTINE mds_byteswapr8 OUTPUT = 2
37
38 C----------------------------------------
39 C subroutine mds_byteswapr4
40 C----------------------------------------
41 CADJ SUBROUTINE mds_byteswapr4 INPUT = 1,2
42 CADJ SUBROUTINE mds_byteswapr4 OUTPUT = 2
43
44 C----------------------------------------
45 C subroutine mdsreadfieldxz
46 C----------------------------------------
47 CADJ SUBROUTINE mdsreadfieldxz INPUT = 1,2,3,4, 6,7
48 CADJ SUBROUTINE mdsreadfieldxz OUTPUT = 5
49
50 C----------------------------------------
51 C subroutine mdswritefieldxz
52 C----------------------------------------
53 CADJ SUBROUTINE mdswritefieldxz INPUT = 1,2,3,4,5,6,7,8,9
54 CADJ SUBROUTINE mdswritefieldxz OUTPUT =
55
56 C----------------------------------------
57 C subroutine mdsreadfieldyz
58 C----------------------------------------
59 CADJ SUBROUTINE mdsreadfieldyz INPUT = 1,2,3,4, 6,7
60 CADJ SUBROUTINE mdsreadfieldyz OUTPUT = 5
61
62 C----------------------------------------
63 C subroutine mdswritefield
64 C----------------------------------------
65 CADJ SUBROUTINE mdswritefieldyz INPUT = 1,2,3,4,5,6,7,8,9
66 CADJ SUBROUTINE mdswritefieldyz OUTPUT =
  ViewVC Help
Powered by ViewVC 1.1.22