1 |
C $Header: /u/gcmpack/MITgcm/pkg/autodiff/checkpoint.flow,v 1.7 2007/10/08 23:50:53 jmc Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
C---------------------------------------- |
5 |
C subroutine read_pickup |
6 |
C---------------------------------------- |
7 |
cphCADJ SUBROUTINE read_pickup INPUT = 1,2 |
8 |
cphCADJ SUBROUTINE read_pickup OUTPUT = |
9 |
cphCADJ SUBROUTINE read_pickup DEPEND = 1,2 |
10 |
cphCADJ SUBROUTINE read_pickup REQUIRED |
11 |
|
12 |
C---------------------------------------- |
13 |
C subroutine do_write_pickup |
14 |
C---------------------------------------- |
15 |
CADJ SUBROUTINE do_write_pickup INPUT = 1,2,3,4 |
16 |
CADJ SUBROUTINE do_write_pickup OUTPUT = |
17 |
CADJ SUBROUTINE do_write_pickup DEPEND = 1,2,3,4 |
18 |
CADJ SUBROUTINE do_write_pickup REQUIRED |
19 |
|
20 |
C---------------------------------------- |
21 |
C subroutine write_pickup |
22 |
C---------------------------------------- |
23 |
CADJ SUBROUTINE write_pickup INPUT = 1,2,3,4 |
24 |
CADJ SUBROUTINE write_pickup OUTPUT = |
25 |
CADJ SUBROUTINE write_pickup DEPEND = 1,2,3,4 |
26 |
CADJ SUBROUTINE write_pickup REQUIRED |
27 |
|
28 |
C---------------------------------------- |
29 |
C subroutine packages_write_pickup |
30 |
C---------------------------------------- |
31 |
CADJ SUBROUTINE packages_write_pickup INPUT = 1,2,3,4 |
32 |
CADJ SUBROUTINE packages_write_pickup OUTPUT = |
33 |
CADJ SUBROUTINE packages_write_pickup DEPEND = 1,2,3,4 |
34 |
CADJ SUBROUTINE packages_write_pickup REQUIRED |
35 |
|
36 |
C---------------------------------------- |
37 |
C subroutine write_checkpoint |
38 |
C---------------------------------------- |
39 |
CADJ SUBROUTINE write_checkpoint INPUT = 1,2,3,4 |
40 |
CADJ SUBROUTINE write_checkpoint OUTPUT = |
41 |
CADJ SUBROUTINE write_checkpoint DEPEND = 1,2,3,4 |
42 |
CADJ SUBROUTINE write_checkpoint REQUIRED |
43 |
|
44 |
C---------------------------------------- |
45 |
C subroutine check_pickup |
46 |
C---------------------------------------- |
47 |
CADJ SUBROUTINE check_pickup INPUT = 1,2,3,4,5 |
48 |
CADJ SUBROUTINE check_pickup OUTPUT = |