17"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
18" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
19" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" "
20" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" "
21" ",
" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" "
22" ",
" ",
" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" "
23" ",
" ",
" ",
" ",
" ",
" ",
"OO",
" ",
" ",
" "
24" ",
" ",
" ",
" ",
" ",
" ",
" ",
"OO",
" ",
" "
25" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
"OO",
" "
26" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
"OO"
30call setMatInit(mat,
dia, vdia
= 'OO', ndia
= minval(
shape(mat,
IK),
1), roff
= 0_IK, coff
= 0_IK)
32"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
33" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
34" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" "
35" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" "
36" ",
" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" "
37" ",
" ",
" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" "
38" ",
" ",
" ",
" ",
" ",
" ",
"OO",
" ",
" ",
" "
39" ",
" ",
" ",
" ",
" ",
" ",
" ",
"OO",
" ",
" "
40" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
"OO",
" "
41" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
"OO"
45call setMatInit(mat,
dia, vdia
= 'OO', ndia
= 5_IK, roff
= 3_IK, coff
= 0_IK)
47" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
48" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
49" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
50"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
51" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
52" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" "
53" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" "
54" ",
" ",
" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" "
55" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
56" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
60call setMatInit(mat,
dia, vdia
= [
'OO',
'YY',
'WW',
'XX'], roff
= 3_IK, coff
= 2_IK)
62" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
63" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
64" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
65" ",
" ",
"OO",
" ",
" ",
" ",
" ",
" ",
" ",
" "
66" ",
" ",
" ",
"YY",
" ",
" ",
" ",
" ",
" ",
" "
67" ",
" ",
" ",
" ",
"WW",
" ",
" ",
" ",
" ",
" "
68" ",
" ",
" ",
" ",
" ",
"XX",
" ",
" ",
" ",
" "
69" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
70" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
71" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
82-2,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
83+0,
-2,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
84+0,
+0,
-2,
+0,
+0,
+0,
+0,
+0,
+0,
+0
85+0,
+0,
+0,
-2,
+0,
+0,
+0,
+0,
+0,
+0
86+0,
+0,
+0,
+0,
-2,
+0,
+0,
+0,
+0,
+0
87+0,
+0,
+0,
+0,
+0,
-2,
+0,
+0,
+0,
+0
88+0,
+0,
+0,
+0,
+0,
+0,
-2,
+0,
+0,
+0
89+0,
+0,
+0,
+0,
+0,
+0,
+0,
-2,
+0,
+0
90+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
-2,
+0
91+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
-2
95call setMatInit(mat,
dia, vdia
= -2, ndia
= minval(
shape(mat,
IK),
1), roff
= 0_IK, coff
= 0_IK)
97-2,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
98+0,
-2,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
99+0,
+0,
-2,
+0,
+0,
+0,
+0,
+0,
+0,
+0
100+0,
+0,
+0,
-2,
+0,
+0,
+0,
+0,
+0,
+0
101+0,
+0,
+0,
+0,
-2,
+0,
+0,
+0,
+0,
+0
102+0,
+0,
+0,
+0,
+0,
-2,
+0,
+0,
+0,
+0
103+0,
+0,
+0,
+0,
+0,
+0,
-2,
+0,
+0,
+0
104+0,
+0,
+0,
+0,
+0,
+0,
+0,
-2,
+0,
+0
105+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
-2,
+0
106+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
-2
112+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
113+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
114+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
115+0,
+0,
+0,
+1,
+0,
+0,
+0,
+0,
+0,
+0
116+0,
+0,
+0,
+0,
+2,
+0,
+0,
+0,
+0,
+0
117+0,
+0,
+0,
+0,
+0,
+3,
+0,
+0,
+0,
+0
118+0,
+0,
+0,
+0,
+0,
+0,
+4,
+0,
+0,
+0
119+0,
+0,
+0,
+0,
+0,
+0,
+0,
+5,
+0,
+0
120+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+6,
+0
121+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+7
130call setMatInit(mat,
dia, vdia
= .true., ndia
= minval(
shape(mat,
IK),
1))
132T, F, F, F, F, F, F, F, F, F
133F, T, F, F, F, F, F, F, F, F
134F, F, T, F, F, F, F, F, F, F
135F, F, F, T, F, F, F, F, F, F
136F, F, F, F, T, F, F, F, F, F
137F, F, F, F, F, T, F, F, F, F
138F, F, F, F, F, F, T, F, F, F
139F, F, F, F, F, F, F, T, F, F
140F, F, F, F, F, F, F, F, T, F
141F, F, F, F, F, F, F, F, F, T
145call setMatInit(mat,
dia, vdia
= .true., ndia
= minval(
shape(mat,
IK),
1), roff
= 0_IK, coff
= 0_IK)
147T, F, F, F, F, F, F, F, F, F
148F, T, F, F, F, F, F, F, F, F
149F, F, T, F, F, F, F, F, F, F
150F, F, F, T, F, F, F, F, F, F
151F, F, F, F, T, F, F, F, F, F
152F, F, F, F, F, T, F, F, F, F
153F, F, F, F, F, F, T, F, F, F
154F, F, F, F, F, F, F, T, F, F
155F, F, F, F, F, F, F, F, T, F
156F, F, F, F, F, F, F, F, F, T
160call setMatInit(mat,
dia, vdia
= [
.true.,
.false.,
.true.,
.false.], roff
= 3_IK, coff
= 3_IK)
162F, F, F, F, F, F, F, F, F, F
163F, F, F, F, F, F, F, F, F, F
164F, F, F, F, F, F, F, F, F, F
165F, F, F, T, F, F, F, F, F, F
166F, F, F, F, F, F, F, F, F, F
167F, F, F, F, F, T, F, F, F, F
168F, F, F, F, F, F, F, F, F, F
169F, F, F, F, F, F, F, F, F, F
170F, F, F, F, F, F, F, F, F, F
171F, F, F, F, F, F, F, F, F, F
182-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
183+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
184+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
185+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
186+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
187+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
188+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000
189+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000
190+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000
191+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000
195call setMatInit(mat,
dia, vdia
= -2., ndia
= size(mat,
1,
IK), roff
= 0_IK, coff
= 0_IK)
197-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
198+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
199+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
200+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
201+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
202+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
203+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000,
+0.00000000
204+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000,
+0.00000000
205+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000,
+0.00000000
206+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-2.00000000
210call setMatInit(mat,
dia, vdia
= -4., ndia
= 7_IK, roff
= 0_IK, coff
= 3_IK)
212+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
213+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
214+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
215+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000
216+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+0.00000000,
+0.00000000
217+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+0.00000000
218+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000
219+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
220+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
221+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
236call setMatInit(mat,
uppDia, vupp
= 'AA', vdia
= 'ZZ', nrow
= 4_IK, ncol
= 7_IK, roff
= 3_IK, coff
= 0_IK)
238" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
239" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
240" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
241"ZZ",
"AA",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
242" ",
"ZZ",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
243" ",
" ",
"ZZ",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
244" ",
" ",
" ",
"ZZ",
"AA",
"AA",
"AA",
" ",
" ",
" "
245" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
246" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
247" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
250call setMatInit(mat,
uppDia, vupp
= 'AA', vdia
= [
'ZZ',
'YY',
'WW',
'XX'], nrow
= 4_IK, ncol
= 7_IK, roff
= 3_IK, coff
= 0_IK)
252" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
253" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
254" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
255"ZZ",
"AA",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
256" ",
"YY",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
257" ",
" ",
"WW",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
258" ",
" ",
" ",
"XX",
"AA",
"AA",
"AA",
" ",
" ",
" "
259" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
260" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
261" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
264call setMatInit(mat,
uppDia, vupp
= 'BB', vdia
= 'YY', nrow
= 4_IK, ncol
= 7_IK, roff
= 2_IK, coff
= 3_IK)
266" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
267" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
268" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
269" ",
" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB",
"BB",
"BB"
270" ",
" ",
" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB",
"BB"
271" ",
" ",
" ",
" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB"
272" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
273" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
274" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
275" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
278call setMatInit(mat,
uppDia, vupp
= 'BB', vdia
= 'YY', nrow
= 5_IK, ncol
= 7_IK, roff
= 1_IK, coff
= 3_IK, doff
= -1_IK)
280" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
281" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
282" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
283" ",
" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB",
"BB",
"BB"
284" ",
" ",
" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB",
"BB"
285" ",
" ",
" ",
" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB"
286" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
287" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
288" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
289" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
292call setMatInit(mat,
uppDia, vupp
= 'BB', vdia
= 'YY', nrow
= 5_IK, ncol
= 7_IK, roff
= 2_IK, coff
= 3_IK, doff
= -4_IK)
294" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
295" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
296" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
297" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
298" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
299" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
300" ",
" ",
" ",
"YY",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
301" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
302" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
303" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
311call setMatInit(mat,
uppDia, vupp
= -3, vdia
= -4, nrow
= 4_IK, ncol
= 7_IK, roff
= 3_IK, coff
= 3_IK)
313+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
314+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
315+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
316+0,
+0,
+0,
-4,
-3,
-3,
-3,
-3,
-3,
-3
317+0,
+0,
+0,
+0,
-4,
-3,
-3,
-3,
-3,
-3
318+0,
+0,
+0,
+0,
+0,
-4,
-3,
-3,
-3,
-3
319+0,
+0,
+0,
+0,
+0,
+0,
-4,
-3,
-3,
-3
320+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
321+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
322+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
330call setMatInit(mat,
uppDia, vupp
= .true., vdia
= .true., nrow
= 4_IK, ncol
= 7_IK, roff
= 3_IK, coff
= 3_IK)
332F, F, F, F, F, F, F, F, F, F
333F, F, F, F, F, F, F, F, F, F
334F, F, F, F, F, F, F, F, F, F
335F, F, F, T, T, T, T, T, T, T
336F, F, F, F, T, T, T, T, T, T
337F, F, F, F, F, T, T, T, T, T
338F, F, F, F, F, F, T, T, T, T
339F, F, F, F, F, F, F, F, F, F
340F, F, F, F, F, F, F, F, F, F
341F, F, F, F, F, F, F, F, F, F
349call setMatInit(mat,
uppDia, vupp
= -3., vdia
= -4., nrow
= 3_IK, ncol
= 7_IK, roff
= 0_IK, coff
= 3_IK)
351+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
-3.00000000
352+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
-3.00000000
353+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
-3.00000000
354+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
355+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
356+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
357+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
358+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
359+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
360+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
375call setMatInit(mat,
lowDia, vlow
= 'AA', vdia
= 'ZZ', nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK)
377" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
378" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
379" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
380"ZZ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
381"AA",
"ZZ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
382"AA",
"AA",
"ZZ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
383"AA",
"AA",
"AA",
"ZZ",
" ",
" ",
" ",
" ",
" ",
" "
384"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
385"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
386"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
389call setMatInit(mat,
lowDia, vlow
= 'AA', vdia
= [
'ZZ',
'YY',
'WW',
'XX'], nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK)
391" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
392" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
393" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
394"ZZ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
395"AA",
"YY",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
396"AA",
"AA",
"WW",
" ",
" ",
" ",
" ",
" ",
" ",
" "
397"AA",
"AA",
"AA",
"XX",
" ",
" ",
" ",
" ",
" ",
" "
398"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
399"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
400"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
403call setMatInit(mat,
lowDia, vlow
= 'BB', vdia
= 'YY', nrow
= 7_IK, ncol
= 4_IK, roff
= 2_IK, coff
= 3_IK)
405" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
406" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
407" ",
" ",
" ",
"YY",
" ",
" ",
" ",
" ",
" ",
" "
408" ",
" ",
" ",
"BB",
"YY",
" ",
" ",
" ",
" ",
" "
409" ",
" ",
" ",
"BB",
"BB",
"YY",
" ",
" ",
" ",
" "
410" ",
" ",
" ",
"BB",
"BB",
"BB",
"YY",
" ",
" ",
" "
411" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
412" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
413" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
414" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
417call setMatInit(mat,
lowDia, vlow
= 'BB', vdia
= 'YY', nrow
= 5_IK, ncol
= 6_IK, roff
= 1_IK, coff
= 3_IK, doff
= +1_IK)
419" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
420" ",
" ",
" ",
"BB",
"YY",
" ",
" ",
" ",
" ",
" "
421" ",
" ",
" ",
"BB",
"BB",
"YY",
" ",
" ",
" ",
" "
422" ",
" ",
" ",
"BB",
"BB",
"BB",
"YY",
" ",
" ",
" "
423" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"YY",
" ",
" "
424" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"YY",
" "
425" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
426" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
427" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
428" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
431call setMatInit(mat,
lowDia, vlow
= 'BB', vdia
= 'YY', nrow
= 4_IK, ncol
= 7_IK, roff
= 2_IK, coff
= 3_IK, doff
= +4_IK)
433" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
434" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
435" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"YY",
" ",
" "
436" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"YY",
" "
437" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"YY"
438" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
439" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
440" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
441" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
442" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
450call setMatInit(mat,
lowDia, vlow
= -3, vdia
= -4, nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 3_IK)
452+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
453+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
454+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
455+0,
+0,
+0,
-4,
+0,
+0,
+0,
+0,
+0,
+0
456+0,
+0,
+0,
-3,
-4,
+0,
+0,
+0,
+0,
+0
457+0,
+0,
+0,
-3,
-3,
-4,
+0,
+0,
+0,
+0
458+0,
+0,
+0,
-3,
-3,
-3,
-4,
+0,
+0,
+0
459+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
460+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
461+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
469call setMatInit(mat,
lowDia, vlow
= .true., vdia
= .true., nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 3_IK)
471F, F, F, F, F, F, F, F, F, F
472F, F, F, F, F, F, F, F, F, F
473F, F, F, F, F, F, F, F, F, F
474F, F, F, T, F, F, F, F, F, F
475F, F, F, T, T, F, F, F, F, F
476F, F, F, T, T, T, F, F, F, F
477F, F, F, T, T, T, T, F, F, F
478F, F, F, T, T, T, T, F, F, F
479F, F, F, T, T, T, T, F, F, F
480F, F, F, T, T, T, T, F, F, F
488call setMatInit(mat,
lowDia, vlow
= -3., vdia
= -4., nrow
= 7_IK, ncol
= 3_IK, roff
= 0_IK, coff
= 3_IK)
490+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
491+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
492+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
493+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
494+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
495+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
496+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
497+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
498+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
499+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
514call setMatInit(mat,
uppLow, vupp
= 'AA', vlow
= 'HH', nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK)
516" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
517" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
518" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
519" ",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
520"HH",
" ",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
521"HH",
"HH",
" ",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
522"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" ",
" "
523"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
524"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
525"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
528call setMatInit(mat,
uppLow, vupp
= 'AA', vlow
= 'HH', nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK)
530" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
531" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
532" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
533" ",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
534"HH",
" ",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
535"HH",
"HH",
" ",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
536"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" ",
" "
537"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
538"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
539"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
542call setMatInit(mat,
uppLow, vupp
= 'AA', vlow
= 'HH', nrow
= 4_IK, ncol
= 7_IK, roff
= 3_IK, coff
= 0_IK)
544" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
545" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
546" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
547" ",
"AA",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
548"HH",
" ",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
549"HH",
"HH",
" ",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
550"HH",
"HH",
"HH",
" ",
"AA",
"AA",
"AA",
" ",
" ",
" "
551" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
552" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
553" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
556call setMatInit(mat,
uppLow, vupp
= 'AA', vlow
= 'HH', nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK, doff
= -3_IK)
558" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
559" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
560" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
561"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
562"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
563"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
564" ",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
565"HH",
" ",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
566"HH",
"HH",
" ",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
567"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" ",
" "
570call setMatInit(mat,
uppLow, vupp
= 'AA', vlow
= 'BB', nrow
= 7_IK, ncol
= 4_IK, roff
= 2_IK, coff
= 3_IK)
572" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
573" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
574" ",
" ",
" ",
" ",
"AA",
"AA",
"AA",
" ",
" ",
" "
575" ",
" ",
" ",
"BB",
" ",
"AA",
"AA",
" ",
" ",
" "
576" ",
" ",
" ",
"BB",
"BB",
" ",
"AA",
" ",
" ",
" "
577" ",
" ",
" ",
"BB",
"BB",
"BB",
" ",
" ",
" ",
" "
578" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
579" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
580" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
581" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
584call setMatInit(mat,
uppLow, vupp
= 'AA', vlow
= 'BB', nrow
= 5_IK, ncol
= 6_IK, roff
= 1_IK, coff
= 3_IK, doff
= +1_IK)
586" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
587" ",
" ",
" ",
"BB",
" ",
"AA",
"AA",
"AA",
"AA",
" "
588" ",
" ",
" ",
"BB",
"BB",
" ",
"AA",
"AA",
"AA",
" "
589" ",
" ",
" ",
"BB",
"BB",
"BB",
" ",
"AA",
"AA",
" "
590" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
"AA",
" "
591" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
" ",
" "
592" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
593" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
594" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
595" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
598call setMatInit(mat,
uppLow, vupp
= 'AA', vlow
= 'BB', nrow
= 4_IK, ncol
= 7_IK, roff
= 2_IK, coff
= 3_IK, doff
= +4_IK)
600" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
601" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
602" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
"AA",
"AA"
603" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
" ",
"AA"
604" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
" "
605" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
606" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
607" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
608" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
609" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
617call setMatInit(mat,
uppLow, vupp
= +1, vlow
= -3, nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 3_IK)
619+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
620+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
621+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
622+0,
+0,
+0,
+0,
+1,
+1,
+1,
+0,
+0,
+0
623+0,
+0,
+0,
-3,
+0,
+1,
+1,
+0,
+0,
+0
624+0,
+0,
+0,
-3,
-3,
+0,
+1,
+0,
+0,
+0
625+0,
+0,
+0,
-3,
-3,
-3,
+0,
+0,
+0,
+0
626+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
627+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
628+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
636call setMatInit(mat,
uppLow, vupp
= .true., vlow
= .true., nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 3_IK)
638F, F, F, F, F, F, F, F, F, F
639F, F, F, F, F, F, F, F, F, F
640F, F, F, F, F, F, F, F, F, F
641F, F, F, F, T, T, T, F, F, F
642F, F, F, T, F, T, T, F, F, F
643F, F, F, T, T, F, T, F, F, F
644F, F, F, T, T, T, F, F, F, F
645F, F, F, T, T, T, T, F, F, F
646F, F, F, T, T, T, T, F, F, F
647F, F, F, T, T, T, T, F, F, F
655call setMatInit(mat,
uppLow, vupp
= +1., vlow
= -3., nrow
= 7_IK, ncol
= 3_IK, roff
= 0_IK, coff
= 3_IK)
657+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+1.00000000,
+1.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
658+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
+0.00000000,
+1.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
659+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
660+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
661+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
662+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
663+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
664+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
665+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
666+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
681call setMatInit(mat,
uppLowDia, vupp
= 'AA', vlow
= 'HH', vdia
= 'OO', nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK)
683" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
684" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
685" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
686"OO",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
687"HH",
"OO",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
688"HH",
"HH",
"OO",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
689"HH",
"HH",
"HH",
"OO",
" ",
" ",
" ",
" ",
" ",
" "
690"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
691"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
692"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
695call setMatInit(mat,
uppLowDia, vupp
= 'AA', vlow
= 'HH', vdia
= [
'OO',
'YY',
'WW',
'XX'], nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK)
697" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
698" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
699" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
700"OO",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
701"HH",
"YY",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
702"HH",
"HH",
"WW",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
703"HH",
"HH",
"HH",
"XX",
" ",
" ",
" ",
" ",
" ",
" "
704"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
705"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
706"HH",
"HH",
"HH",
"HH",
" ",
" ",
" ",
" ",
" ",
" "
709call setMatInit(mat,
uppLowDia, vupp
= 'AA', vlow
= 'HH', vdia
= [
'OO',
'YY',
'WW',
'XX'], nrow
= 4_IK, ncol
= 7_IK, roff
= 3_IK, coff
= 0_IK)
711" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
712" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
713" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
714"OO",
"AA",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
715"HH",
"YY",
"AA",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
716"HH",
"HH",
"WW",
"AA",
"AA",
"AA",
"AA",
" ",
" ",
" "
717"HH",
"HH",
"HH",
"XX",
"AA",
"AA",
"AA",
" ",
" ",
" "
718" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
719" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
720" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
723call setMatInit(mat,
uppLowDia, vupp
= 'AA', vlow
= 'HH', vdia
= [
'OO',
'YY',
'WW',
'XX'], nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 0_IK, doff
= -3_IK)
725" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
726" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
727" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
728"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
729"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
730"AA",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
731"OO",
"AA",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
732"HH",
"YY",
"AA",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
733"HH",
"HH",
"WW",
"AA",
" ",
" ",
" ",
" ",
" ",
" "
734"HH",
"HH",
"HH",
"XX",
" ",
" ",
" ",
" ",
" ",
" "
737call setMatInit(mat,
uppLowDia, vupp
= 'AA', vlow
= 'BB', vdia
= 'YY', nrow
= 7_IK, ncol
= 4_IK, roff
= 2_IK, coff
= 3_IK)
739" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
740" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
741" ",
" ",
" ",
"YY",
"AA",
"AA",
"AA",
" ",
" ",
" "
742" ",
" ",
" ",
"BB",
"YY",
"AA",
"AA",
" ",
" ",
" "
743" ",
" ",
" ",
"BB",
"BB",
"YY",
"AA",
" ",
" ",
" "
744" ",
" ",
" ",
"BB",
"BB",
"BB",
"YY",
" ",
" ",
" "
745" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
746" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
747" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
" ",
" ",
" "
748" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
751call setMatInit(mat,
uppLowDia, vupp
= 'AA', vlow
= 'BB', vdia
= 'YY', nrow
= 5_IK, ncol
= 6_IK, roff
= 1_IK, coff
= 3_IK, doff
= +1_IK)
753" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
754" ",
" ",
" ",
"BB",
"YY",
"AA",
"AA",
"AA",
"AA",
" "
755" ",
" ",
" ",
"BB",
"BB",
"YY",
"AA",
"AA",
"AA",
" "
756" ",
" ",
" ",
"BB",
"BB",
"BB",
"YY",
"AA",
"AA",
" "
757" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"YY",
"AA",
" "
758" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"YY",
" "
759" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
760" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
761" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
762" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
765call setMatInit(mat,
uppLowDia, vupp
= 'AA', vlow
= 'BB', vdia
= 'YY', nrow
= 4_IK, ncol
= 7_IK, roff
= 2_IK, coff
= 3_IK, doff
= +4_IK)
767" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
768" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
769" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"YY",
"AA",
"AA"
770" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"YY",
"AA"
771" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"YY"
772" ",
" ",
" ",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB",
"BB"
773" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
774" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
775" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
776" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" ",
" "
784call setMatInit(mat,
uppLowDia, vupp
= +1, vlow
= -3, vdia
= -4, nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 3_IK)
786+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
787+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
788+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0,
+0
789+0,
+0,
+0,
-4,
+1,
+1,
+1,
+0,
+0,
+0
790+0,
+0,
+0,
-3,
-4,
+1,
+1,
+0,
+0,
+0
791+0,
+0,
+0,
-3,
-3,
-4,
+1,
+0,
+0,
+0
792+0,
+0,
+0,
-3,
-3,
-3,
-4,
+0,
+0,
+0
793+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
794+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
795+0,
+0,
+0,
-3,
-3,
-3,
-3,
+0,
+0,
+0
803call setMatInit(mat,
uppLowDia, vupp
= .true., vlow
= .true., vdia
= .false., nrow
= 7_IK, ncol
= 4_IK, roff
= 3_IK, coff
= 3_IK)
805F, F, F, F, F, F, F, F, F, F
806F, F, F, F, F, F, F, F, F, F
807F, F, F, F, F, F, F, F, F, F
808F, F, F, F, T, T, T, F, F, F
809F, F, F, T, F, T, T, F, F, F
810F, F, F, T, T, F, T, F, F, F
811F, F, F, T, T, T, F, F, F, F
812F, F, F, T, T, T, T, F, F, F
813F, F, F, T, T, T, T, F, F, F
814F, F, F, T, T, T, T, F, F, F
822call setMatInit(mat,
uppLowDia, vupp
= +1., vlow
= -3., vdia
= -4., nrow
= 7_IK, ncol
= 3_IK, roff
= 0_IK, coff
= 3_IK)
824+0.00000000,
+0.00000000,
+0.00000000,
-4.00000000,
+1.00000000,
+1.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
825+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-4.00000000,
+1.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
826+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-4.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
827+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
828+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
829+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
830+0.00000000,
+0.00000000,
+0.00000000,
-3.00000000,
-3.00000000,
-3.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
831+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
832+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000
833+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000,
+0.00000000