Warning, /pkg/rw/rw_ad.flow is written in an unsupported language. File is not indexed.
view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC
b2edc54f38 Patr*0001 C----------------------------------------
0002 C subroutine set_write_global_fld
0003 C----------------------------------------
0004 CADJ SUBROUTINE set_write_global_fld INPUT = 1
0005 CADJ SUBROUTINE set_write_global_fld OUTPUT =
0006
0007 C----------------------------------------
0008 C subroutine write_fld_xy_rs
0009 C----------------------------------------
0010 CADJ SUBROUTINE write_fld_xy_rs INPUT = 1,2,3,4,5
0011 CADJ SUBROUTINE write_fld_xy_rs OUTPUT =
0012
0013 C----------------------------------------
0014 C subroutine write_fld_xy_rl
0015 C----------------------------------------
0016 CADJ SUBROUTINE write_fld_xy_rl INPUT = 1,2,3,4,5
0017 CADJ SUBROUTINE write_fld_xy_rl OUTPUT =
0018
0019 C----------------------------------------
0020 C subroutine write_fld_xyz_rs
0021 C----------------------------------------
0022 CADJ SUBROUTINE write_fld_xyz_rs INPUT = 1,2,3,4,5
0023 CADJ SUBROUTINE write_fld_xyz_rs OUTPUT =
0024
0025 C----------------------------------------
0026 C subroutine write_fld_xyz_rl
0027 C----------------------------------------
0028 CADJ SUBROUTINE write_fld_xyz_rl INPUT = 1,2,3,4,5
0029 CADJ SUBROUTINE write_fld_xyz_rl OUTPUT =
0030
0031 C----------------------------------------
0032 C subroutine write_local_rl
0033 C----------------------------------------
0034 CADJ SUBROUTINE write_local_rl INPUT = 1,2,3,4,5,6,7,8,9
0035 CADJ SUBROUTINE write_local_rl OUTPUT =
0036
0037 C----------------------------------------
0038 C subroutine write_local_rs
0039 C----------------------------------------
0040 CADJ SUBROUTINE write_local_rs INPUT = 1,2,3,4,5,6,7,8,9
0041 CADJ SUBROUTINE write_local_rs OUTPUT =
0042
0043 C----------------------------------------
0044 C subroutine set_write_global_rec
0045 C----------------------------------------
0046 CADJ SUBROUTINE set_write_global_rec INPUT = 1
0047 CADJ SUBROUTINE set_write_global_rec OUTPUT =
0048
0049 C----------------------------------------
0050 C subroutine write_rec_xy_rl
0051 C----------------------------------------
0052 CADJ SUBROUTINE write_rec_xy_rl INPUT = 1,2,3,4,5
0053 CADJ SUBROUTINE write_rec_xy_rl OUTPUT =
0054
0055 C----------------------------------------
0056 C subroutine write_rec_xyz_rs
0057 C----------------------------------------
0058 CADJ SUBROUTINE write_rec_xyz_rs INPUT = 1,2,3,4,5
0059 CADJ SUBROUTINE write_rec_xyz_rs OUTPUT =
0060
0061 C----------------------------------------
0062 C subroutine write_rec_xyz_rl
0063 C----------------------------------------
0064 CADJ SUBROUTINE write_rec_xyz_rl INPUT = 1,2,3,4,5
0065 CADJ SUBROUTINE write_rec_xyz_rl OUTPUT =
0066
6c887c1f10 Patr*0067 C----------------------------------------
827db6a998 Jean*0068 C subroutine write_rec_3d_rs
0069 C----------------------------------------
0070 CADJ SUBROUTINE write_rec_3d_rs INPUT = 1,2,3,4,5,6,7
0071 CADJ SUBROUTINE write_rec_3d_rs OUTPUT =
0072
0073 C----------------------------------------
0074 C subroutine write_rec_3d_rl
0075 C----------------------------------------
0076 CADJ SUBROUTINE write_rec_3d_rl INPUT = 1,2,3,4,5,6,7
0077 CADJ SUBROUTINE write_rec_3d_rl OUTPUT =
0078
0079 C----------------------------------------
0080 C subroutine write_rec_lev_rs
0081 C----------------------------------------
0082 CADJ SUBROUTINE write_rec_lev_rs INPUT = 1,2,3,4,5,6,7,8,9
0083 CADJ SUBROUTINE write_rec_lev_rs OUTPUT =
0084
0085 C----------------------------------------
0086 C subroutine write_rec_lev_rl
0087 C----------------------------------------
0088 CADJ SUBROUTINE write_rec_lev_rl INPUT = 1,2,3,4,5,6,7,8,9
0089 CADJ SUBROUTINE write_rec_lev_rl OUTPUT =
0090
0091 C----------------------------------------
d12faa672c Jean*0092 C subroutine set_write_global_sec
0093 C----------------------------------------
0094 CADJ SUBROUTINE set_write_global_sec INPUT = 1
0095 CADJ SUBROUTINE set_write_global_sec OUTPUT =
0096
0097 C----------------------------------------
827db6a998 Jean*0098 C subroutine write_rec_xz_rs
0099 C----------------------------------------
0100 CADJ SUBROUTINE write_rec_xz_rs INPUT = 1,2,3,4,5,6,7
0101 CADJ SUBROUTINE write_rec_xz_rs OUTPUT =
0102
0103 C----------------------------------------
0104 C subroutine write_rec_xz_rl
0105 C----------------------------------------
0106 CADJ SUBROUTINE write_rec_xz_rl INPUT = 1,2,3,4,5,6,7
0107 CADJ SUBROUTINE write_rec_xz_rl OUTPUT =
0108
0109 C----------------------------------------
0110 C subroutine write_rec_yz_rs
0111 C----------------------------------------
0112 CADJ SUBROUTINE write_rec_yz_rs INPUT = 1,2,3,4,5,6,7
0113 CADJ SUBROUTINE write_rec_yz_rs OUTPUT =
0114
0115 C----------------------------------------
0116 C subroutine write_rec_yz_rl
0117 C----------------------------------------
0118 CADJ SUBROUTINE write_rec_yz_rl INPUT = 1,2,3,4,5,6,7
0119 CADJ SUBROUTINE write_rec_yz_rl OUTPUT =
0120
0121 C----------------------------------------
909a03e208 Jean*0122 C subroutine WRITE_GLVEC_RS
0123 C----------------------------------------
0124 CADJ SUBROUTINE WRITE_GLVEC_RS INPUT = 1,2,3,4,5,6
0125 CADJ SUBROUTINE WRITE_GLVEC_RS OUTPUT =
0126
0127 C----------------------------------------
0128 C subroutine WRITE_GLVEC_RL
0129 C----------------------------------------
0130 CADJ SUBROUTINE WRITE_GLVEC_RL INPUT = 1,2,3,4,5,6
0131 CADJ SUBROUTINE WRITE_GLVEC_RL OUTPUT =
0132
0133 C----------------------------------------
a46ff7f681 Jean*0134 C subroutine READ_GLVEC_RS
6c887c1f10 Patr*0135 C----------------------------------------
a46ff7f681 Jean*0136 CADJ SUBROUTINE READ_GLVEC_RS INPUT = 1,2, 4,5,6
0137 CADJ SUBROUTINE READ_GLVEC_RS OUTPUT = 3
0138
0139 C----------------------------------------
0140 C subroutine READ_GLVEC_RL
0141 C----------------------------------------
0142 CADJ SUBROUTINE READ_GLVEC_RL INPUT = 1,2, 4,5,6
0143 CADJ SUBROUTINE READ_GLVEC_RL OUTPUT = 3
6c887c1f10 Patr*0144
0145 C----------------------------------------
0146 C subroutine READ_MFLDS_INIT
0147 C----------------------------------------
0148 CADJ SUBROUTINE READ_MFLDS_INIT INPUT = 1
0149 CADJ SUBROUTINE READ_MFLDS_INIT OUTPUT =
0150
0151 C----------------------------------------
0152 C subroutine READ_MFLDS_SET
0153 C----------------------------------------
0154 CADJ SUBROUTINE READ_MFLDS_SET INPUT = 1, 4,5,6
0155 CADJ SUBROUTINE READ_MFLDS_SET OUTPUT = 2,3
0156
0157 C----------------------------------------
0158 C subroutine READ_MFLDS_3D_RL
0159 C----------------------------------------
0160 CADJ SUBROUTINE READ_MFLDS_3D_RL INPUT = 1, 3,4,5,6,7
88ad23a048 Patr*0161 CADJ SUBROUTINE READ_MFLDS_3D_RL OUTPUT = 2,3
6c887c1f10 Patr*0162
79bad69582 Jean*0163 C----------------------------------------
0164 C subroutine READ_MFLDS_LEV_RL
0165 C----------------------------------------
0166 CADJ SUBROUTINE READ_MFLDS_LEV_RL INPUT = 1, 3,4,5,6,7,8,9
0167 CADJ SUBROUTINE READ_MFLDS_LEV_RL OUTPUT = 2,3
6c887c1f10 Patr*0168
5151e843d2 Jean*0169 C----------------------------------------
5bc5177bde Jean*0170 C subroutine READ_MFLDS_LEV_RS
0171 C----------------------------------------
0172 CADJ SUBROUTINE READ_MFLDS_LEV_RS INPUT = 1, 3,4,5,6,7,8,9
0173 CADJ SUBROUTINE READ_MFLDS_LEV_RS OUTPUT = 2,3
0174
0175 C----------------------------------------
a46ff7f681 Jean*0176 C subroutine READ_MFLDS_CHECK
5151e843d2 Jean*0177 C----------------------------------------
a46ff7f681 Jean*0178 CADJ SUBROUTINE READ_MFLDS_CHECK INPUT = 2,3,4
0179 CADJ SUBROUTINE READ_MFLDS_CHECK OUTPUT = 1,2
5151e843d2 Jean*0180
0181 C----------------------------------------
a46ff7f681 Jean*0182 C subroutine READ_MFLDS_RENAME
5151e843d2 Jean*0183 C----------------------------------------
a46ff7f681 Jean*0184 CADJ SUBROUTINE READ_MFLDS_RENAME INPUT = 1,2, 4
0185 CADJ SUBROUTINE READ_MFLDS_RENAME OUTPUT = 3
5151e843d2 Jean*0186
746054ac44 Jean*0187 C----------------------------------------
0188 C subroutine RW_GET_SUFFIX
0189 C----------------------------------------
0190 CADJ SUBROUTINE RW_GET_SUFFIX INPUT = 2,3,4
0191 CADJ SUBROUTINE RW_GET_SUFFIX OUTPUT = 1
