GCC Code Coverage Report


Directory: ./
File: rad/rrtm_kgb7.f90
Date: 2022-01-11 19:19:34
Exec Total Coverage
Lines: 1908 1908 100.0%
Branches: 3670 3706 99.0%

Line Branch Exec Source
1 !OCL SCALAR
2 !pgi$r opt=0
3 1 SUBROUTINE RRTM_KGB7
4
5 ! Originally by Eli J. Mlawer, Atmospheric & Environmental Research.
6 ! BAND 7: 980-1080 cm-1 (low - H2O,O3; high - O3)
7 ! Reformatted for F90 by JJMorcrette, ECMWF
8 ! R. Elkhatib 12-10-2005 Split for faster and more robust compilation.
9
10 ! ------------------------------------------------------------------
11
12 USE PARKIND1 ,ONLY : JPRB
13 USE YOMHOOK ,ONLY : LHOOK, DR_HOOK
14
15 USE YOERRTO7 , ONLY : KAO ,KBO ,SELFREFO ,FRACREFAO ,&
16 & FRACREFBO ,ABSCO2O
17 USE YOERRTA7 , ONLY : STRRAT
18
19 ! ------------------------------------------------------------------
20
21 IMPLICIT NONE
22 REAL(KIND=JPRB) :: ZHOOK_HANDLE
23
24
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7',0,ZHOOK_HANDLE)
25
26 1 CALL PART1
27 1 CALL PART2
28 1 CALL PART3
29 1 CALL PART4
30 1 CALL PART5
31 1 CALL PART6
32 1 CALL PART7
33 1 CALL PART8
34 1 CALL PART9
35 1 CALL PART10
36 1 CALL PART11
37 1 CALL PART12
38 1 CALL PART13
39 1 CALL PART14
40 1 CALL PART15
41 1 CALL PART16
42 1 CALL PART17
43
44
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7',1,ZHOOK_HANDLE)
45
46 ! -----------------------------------------------------------------
47
48 CONTAINS
49
50
51 1 SUBROUTINE PART1
52
53 REAL(KIND=JPRB) :: ZHOOK_HANDLE
54
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART1',0,ZHOOK_HANDLE)
55
56
57 FRACREFBO( :) = (/&
58 & 0.15355594_JPRB,0.15310939_JPRB,0.14274909_JPRB,0.13129812_JPRB,&
59 & 0.11736792_JPRB,0.10118213_JPRB,0.08215259_JPRB,0.06165591_JPRB,&
60 & 0.04164486_JPRB,0.00451141_JPRB,0.00372837_JPRB,0.00294095_JPRB,&
61 1 & 0.00215259_JPRB,0.00136792_JPRB,0.00051233_JPRB,0.00007075_JPRB/)
62
63 ABSCO2O( :) = (/&
64 & 9.30038E-05_JPRB, 1.74061E-04_JPRB, 2.09293E-04_JPRB, 2.52360E-04_JPRB,&
65 & 3.13404E-04_JPRB, 4.16619E-04_JPRB, 6.27394E-04_JPRB, 1.29386E-03_JPRB,&
66 & 4.05192E-03_JPRB, 3.97050E-03_JPRB, 7.00634E-04_JPRB, 6.06617E-04_JPRB,&
67 1 & 7.66978E-04_JPRB, 6.70661E-04_JPRB, 7.89971E-04_JPRB, 7.55709E-04_JPRB/)
68
69 1 STRRAT = 8.21104E+04_JPRB
70
71 ! ------------------------------------------------------------------
72
73 ! The array KAO contains absorption coefs at the 16 chosen g-values
74 ! for a range of pressure levels> ~100mb, temperatures, and binary
75 ! species parameters (see taumol.f for definition). The first
76 ! index in the array, JS, runs from 1 to 9, and corresponds to
77 ! different values of the binary species parameter. For instance,
78 ! JS=1 refers to dry air, JS = 2 corresponds to the paramter value 1/8,
79 ! JS = 3 corresponds to the parameter value 2/8, etc. The second index
80 ! in the array, JT, which runs from 1 to 5, corresponds to different
81 ! temperatures. More specifically, JT = 3 means that the data are for
82 ! the reference temperature TREF for this pressure level, JT = 2 refers
83 ! to TREF-15, JT = 1 is for TREF-30, JT = 4 is for TREF+15, and JT = 5
84 ! is for TREF+30. The third index, JP, runs from 1 to 13 and refers
85 ! to the JPth reference pressure level (see taumol.f for these levels
86 ! in mb). The fourth index, IG, goes from 1 to 16, and indicates
87 ! which g-interval the absorption coefficients are for.
88
89 KAO( :, 1, 1, 1) = (/&
90 & 2.2177E-05_JPRB,2.0513E-05_JPRB,1.8414E-05_JPRB,1.6282E-05_JPRB,1.4597E-05_JPRB,1.7000E-05_JPRB,&
91
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1783E-05_JPRB,2.9548E-05_JPRB,2.0326E-05_JPRB/)
92 KAO( :, 2, 1, 1) = (/&
93 & 2.9476E-05_JPRB,2.7495E-05_JPRB,2.4720E-05_JPRB,2.1727E-05_JPRB,1.8690E-05_JPRB,1.6642E-05_JPRB,&
94
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2418E-05_JPRB,3.4177E-05_JPRB,1.9700E-05_JPRB/)
95 KAO( :, 3, 1, 1) = (/&
96 & 3.7965E-05_JPRB,3.5737E-05_JPRB,3.2254E-05_JPRB,2.8364E-05_JPRB,2.4321E-05_JPRB,2.0140E-05_JPRB,&
97
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9338E-05_JPRB,3.5856E-05_JPRB,1.9799E-05_JPRB/)
98 KAO( :, 4, 1, 1) = (/&
99 & 4.7589E-05_JPRB,4.5238E-05_JPRB,4.1024E-05_JPRB,3.6253E-05_JPRB,3.0918E-05_JPRB,2.5365E-05_JPRB,&
100
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0061E-05_JPRB,3.1406E-05_JPRB,1.8985E-05_JPRB/)
101 KAO( :, 5, 1, 1) = (/&
102 & 5.8133E-05_JPRB,5.5835E-05_JPRB,5.0877E-05_JPRB,4.5058E-05_JPRB,3.8486E-05_JPRB,3.1429E-05_JPRB,&
103
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4355E-05_JPRB,2.3465E-05_JPRB,1.9414E-05_JPRB/)
104 KAO( :, 1, 2, 1) = (/&
105 & 1.7361E-05_JPRB,1.6018E-05_JPRB,1.4350E-05_JPRB,1.2700E-05_JPRB,1.2303E-05_JPRB,1.7164E-05_JPRB,&
106
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1474E-05_JPRB,2.4947E-05_JPRB,1.4706E-05_JPRB/)
107 KAO( :, 2, 2, 1) = (/&
108 & 2.3361E-05_JPRB,2.1726E-05_JPRB,1.9465E-05_JPRB,1.7053E-05_JPRB,1.4815E-05_JPRB,1.4858E-05_JPRB,&
109
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3603E-05_JPRB,2.7767E-05_JPRB,1.5833E-05_JPRB/)
110 KAO( :, 3, 2, 1) = (/&
111 & 3.0408E-05_JPRB,2.8494E-05_JPRB,2.5606E-05_JPRB,2.2430E-05_JPRB,1.9084E-05_JPRB,1.6104E-05_JPRB,&
112
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8012E-05_JPRB,3.1460E-05_JPRB,1.6197E-05_JPRB/)
113 KAO( :, 4, 2, 1) = (/&
114 & 3.8408E-05_JPRB,3.6296E-05_JPRB,3.2790E-05_JPRB,2.8865E-05_JPRB,2.4498E-05_JPRB,1.9967E-05_JPRB,&
115
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6925E-05_JPRB,3.2098E-05_JPRB,1.4117E-05_JPRB/)
116 KAO( :, 5, 2, 1) = (/&
117 & 4.7278E-05_JPRB,4.5107E-05_JPRB,4.0996E-05_JPRB,3.6211E-05_JPRB,3.0776E-05_JPRB,2.4989E-05_JPRB,&
118
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9312E-05_JPRB,2.3551E-05_JPRB,1.4164E-05_JPRB/)
119 KAO( :, 1, 3, 1) = (/&
120 & 1.2199E-05_JPRB,1.1359E-05_JPRB,1.0200E-05_JPRB,9.6275E-06_JPRB,1.2031E-05_JPRB,1.8466E-05_JPRB,&
121
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2967E-05_JPRB,2.1740E-05_JPRB,1.1424E-05_JPRB/)
122 KAO( :, 2, 3, 1) = (/&
123 & 1.6733E-05_JPRB,1.5628E-05_JPRB,1.3980E-05_JPRB,1.2308E-05_JPRB,1.1642E-05_JPRB,1.5244E-05_JPRB,&
124
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7219E-05_JPRB,2.2185E-05_JPRB,1.1890E-05_JPRB/)
125 KAO( :, 3, 3, 1) = (/&
126 & 2.2207E-05_JPRB,2.0825E-05_JPRB,1.8647E-05_JPRB,1.6328E-05_JPRB,1.4051E-05_JPRB,1.3615E-05_JPRB,&
127
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0537E-05_JPRB,2.5366E-05_JPRB,1.0328E-05_JPRB/)
128 KAO( :, 4, 3, 1) = (/&
129 & 2.8575E-05_JPRB,2.6953E-05_JPRB,2.4203E-05_JPRB,2.1170E-05_JPRB,1.7963E-05_JPRB,1.5129E-05_JPRB,&
130
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6245E-05_JPRB,2.7906E-05_JPRB,8.9114E-06_JPRB/)
131 KAO( :, 5, 3, 1) = (/&
132 & 3.5718E-05_JPRB,3.3927E-05_JPRB,3.0634E-05_JPRB,2.6847E-05_JPRB,2.2736E-05_JPRB,1.8593E-05_JPRB,&
133
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5444E-05_JPRB,2.7715E-05_JPRB,7.5424E-06_JPRB/)
134 KAO( :, 1, 4, 1) = (/&
135 & 8.2740E-06_JPRB,7.8120E-06_JPRB,7.3229E-06_JPRB,7.9409E-06_JPRB,1.1817E-05_JPRB,2.0000E-05_JPRB,&
136
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7036E-05_JPRB,1.6859E-05_JPRB,8.3202E-06_JPRB/)
137 KAO( :, 2, 4, 1) = (/&
138 & 1.1549E-05_JPRB,1.0930E-05_JPRB,9.8917E-06_JPRB,9.2790E-06_JPRB,1.0972E-05_JPRB,1.6368E-05_JPRB,&
139
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0889E-05_JPRB,1.9211E-05_JPRB,7.1922E-06_JPRB/)
140 KAO( :, 3, 4, 1) = (/&
141 & 1.5581E-05_JPRB,1.4791E-05_JPRB,1.3288E-05_JPRB,1.1769E-05_JPRB,1.1067E-05_JPRB,1.3703E-05_JPRB,&
142
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3763E-05_JPRB,1.9912E-05_JPRB,5.4002E-06_JPRB/)
143 KAO( :, 4, 4, 1) = (/&
144 & 2.0367E-05_JPRB,1.9416E-05_JPRB,1.7464E-05_JPRB,1.5301E-05_JPRB,1.3238E-05_JPRB,1.2747E-05_JPRB,&
145
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8197E-05_JPRB,2.2927E-05_JPRB,4.7781E-06_JPRB/)
146 KAO( :, 5, 4, 1) = (/&
147 & 2.5890E-05_JPRB,2.4787E-05_JPRB,2.2347E-05_JPRB,1.9553E-05_JPRB,1.6603E-05_JPRB,1.3957E-05_JPRB,&
148
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4873E-05_JPRB,2.4745E-05_JPRB,6.3734E-06_JPRB/)
149 KAO( :, 1, 5, 1) = (/&
150 & 5.5869E-06_JPRB,5.3398E-06_JPRB,5.3975E-06_JPRB,7.5444E-06_JPRB,1.2793E-05_JPRB,1.5045E-05_JPRB,&
151
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3730E-05_JPRB,1.2376E-05_JPRB,4.7266E-06_JPRB/)
152 KAO( :, 2, 5, 1) = (/&
153 & 7.8874E-06_JPRB,7.5569E-06_JPRB,7.0693E-06_JPRB,7.4130E-06_JPRB,1.0864E-05_JPRB,1.7853E-05_JPRB,&
154
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5643E-05_JPRB,1.6221E-05_JPRB,3.5143E-06_JPRB/)
155 KAO( :, 3, 5, 1) = (/&
156 & 1.0780E-05_JPRB,1.0380E-05_JPRB,9.4898E-06_JPRB,8.8724E-06_JPRB,9.9994E-06_JPRB,1.4704E-05_JPRB,&
157
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8972E-05_JPRB,1.7347E-05_JPRB,2.8694E-06_JPRB/)
158 KAO( :, 4, 5, 1) = (/&
159 & 1.4284E-05_JPRB,1.3812E-05_JPRB,1.2569E-05_JPRB,1.1246E-05_JPRB,1.0513E-05_JPRB,1.2455E-05_JPRB,&
160
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1138E-05_JPRB,1.8036E-05_JPRB,3.9174E-06_JPRB/)
161 KAO( :, 5, 5, 1) = (/&
162 & 1.8381E-05_JPRB,1.7863E-05_JPRB,1.6238E-05_JPRB,1.4332E-05_JPRB,1.2479E-05_JPRB,1.1807E-05_JPRB,&
163
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6766E-05_JPRB,2.0636E-05_JPRB,5.6357E-06_JPRB/)
164 KAO( :, 1, 6, 1) = (/&
165 & 3.7614E-06_JPRB,3.6612E-06_JPRB,4.2770E-06_JPRB,7.9260E-06_JPRB,1.2929E-05_JPRB,1.1264E-05_JPRB,&
166
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2098E-05_JPRB,9.0224E-06_JPRB,2.4844E-06_JPRB/)
167 KAO( :, 2, 6, 1) = (/&
168 & 5.3574E-06_JPRB,5.1717E-06_JPRB,5.1909E-06_JPRB,6.9736E-06_JPRB,1.1707E-05_JPRB,1.3896E-05_JPRB,&
169
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2589E-05_JPRB,1.2103E-05_JPRB,1.8407E-06_JPRB/)
170 KAO( :, 3, 6, 1) = (/&
171 & 7.3957E-06_JPRB,7.1617E-06_JPRB,6.7263E-06_JPRB,7.0062E-06_JPRB,1.0148E-05_JPRB,1.6269E-05_JPRB,&
172
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4268E-05_JPRB,1.5386E-05_JPRB,2.1237E-06_JPRB/)
173 KAO( :, 4, 6, 1) = (/&
174 & 9.9154E-06_JPRB,9.6620E-06_JPRB,8.9048E-06_JPRB,8.3244E-06_JPRB,9.2342E-06_JPRB,1.3655E-05_JPRB,&
175
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7166E-05_JPRB,1.5743E-05_JPRB,3.1741E-06_JPRB/)
176 KAO( :, 5, 6, 1) = (/&
177 & 1.2917E-05_JPRB,1.2663E-05_JPRB,1.1620E-05_JPRB,1.0475E-05_JPRB,9.8347E-06_JPRB,1.1480E-05_JPRB,&
178
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8999E-05_JPRB,1.6296E-05_JPRB,4.8288E-06_JPRB/)
179 KAO( :, 1, 7, 1) = (/&
180 & 2.5698E-06_JPRB,2.6225E-06_JPRB,4.3229E-06_JPRB,9.1260E-06_JPRB,9.6331E-06_JPRB,9.4890E-06_JPRB,&
181
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.7898E-06_JPRB,6.9652E-06_JPRB,1.3336E-06_JPRB/)
182 KAO( :, 2, 7, 1) = (/&
183 & 3.6949E-06_JPRB,3.6079E-06_JPRB,4.1418E-06_JPRB,7.5616E-06_JPRB,1.2142E-05_JPRB,1.0521E-05_JPRB,&
184
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1728E-05_JPRB,8.9866E-06_JPRB,1.2052E-06_JPRB/)
185 KAO( :, 3, 7, 1) = (/&
186 & 5.1506E-06_JPRB,5.0082E-06_JPRB,4.9832E-06_JPRB,6.5372E-06_JPRB,1.0639E-05_JPRB,1.2818E-05_JPRB,&
187
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1491E-05_JPRB,1.1845E-05_JPRB,1.7476E-06_JPRB/)
188 KAO( :, 4, 7, 1) = (/&
189 & 6.9721E-06_JPRB,6.8111E-06_JPRB,6.4221E-06_JPRB,6.6314E-06_JPRB,9.5364E-06_JPRB,1.4735E-05_JPRB,&
190
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3056E-05_JPRB,1.4613E-05_JPRB,2.7527E-06_JPRB/)
191 KAO( :, 5, 7, 1) = (/&
192 & 9.1741E-06_JPRB,9.0313E-06_JPRB,8.3715E-06_JPRB,7.8432E-06_JPRB,8.4495E-06_JPRB,1.2715E-05_JPRB,&
193
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5629E-05_JPRB,1.4305E-05_JPRB,4.3096E-06_JPRB/)
194 KAO( :, 1, 8, 1) = (/&
195 & 1.7756E-06_JPRB,2.0634E-06_JPRB,5.0880E-06_JPRB,8.2373E-06_JPRB,7.8177E-06_JPRB,7.9286E-06_JPRB,&
196
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3775E-06_JPRB,5.4113E-06_JPRB,9.3762E-07_JPRB/)
197 KAO( :, 2, 8, 1) = (/&
198 & 2.5589E-06_JPRB,2.6026E-06_JPRB,4.1994E-06_JPRB,8.7611E-06_JPRB,9.1501E-06_JPRB,8.9485E-06_JPRB,&
199
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.8743E-06_JPRB,7.1784E-06_JPRB,1.1824E-06_JPRB/)
200 KAO( :, 3, 8, 1) = (/&
201 & 3.5966E-06_JPRB,3.5351E-06_JPRB,4.0408E-06_JPRB,7.3057E-06_JPRB,1.1311E-05_JPRB,9.8836E-06_JPRB,&
202
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0943E-05_JPRB,9.1050E-06_JPRB,1.7854E-06_JPRB/)
203 KAO( :, 4, 8, 1) = (/&
204 & 4.9051E-06_JPRB,4.8155E-06_JPRB,4.7641E-06_JPRB,6.2802E-06_JPRB,1.0233E-05_JPRB,1.1811E-05_JPRB,&
205
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0660E-05_JPRB,1.1545E-05_JPRB,2.8335E-06_JPRB/)
206 KAO( :, 5, 8, 1) = (/&
207 & 6.5079E-06_JPRB,6.4275E-06_JPRB,6.0806E-06_JPRB,6.2850E-06_JPRB,8.9855E-06_JPRB,1.3690E-05_JPRB,&
208
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2091E-05_JPRB,1.3991E-05_JPRB,4.4905E-06_JPRB/)
209 KAO( :, 1, 9, 1) = (/&
210 & 1.2486E-06_JPRB,2.0772E-06_JPRB,6.3261E-06_JPRB,6.5239E-06_JPRB,6.7379E-06_JPRB,5.7685E-06_JPRB,&
211
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7923E-06_JPRB,4.4775E-06_JPRB,2.0431E-06_JPRB/)
212 KAO( :, 2, 9, 1) = (/&
213 & 1.8028E-06_JPRB,2.0516E-06_JPRB,4.9892E-06_JPRB,7.9160E-06_JPRB,7.4534E-06_JPRB,8.0589E-06_JPRB,&
214
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6119E-06_JPRB,5.7051E-06_JPRB,2.4856E-06_JPRB/)
215 KAO( :, 3, 9, 1) = (/&
216 & 2.5445E-06_JPRB,2.5819E-06_JPRB,4.1305E-06_JPRB,8.3727E-06_JPRB,8.7276E-06_JPRB,8.5620E-06_JPRB,&
217
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.8118E-06_JPRB,7.4196E-06_JPRB,3.4314E-06_JPRB/)
218 KAO( :, 4, 9, 1) = (/&
219 & 3.4959E-06_JPRB,3.4634E-06_JPRB,3.9749E-06_JPRB,7.0571E-06_JPRB,1.0574E-05_JPRB,9.2822E-06_JPRB,&
220
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0319E-05_JPRB,9.2300E-06_JPRB,5.1599E-06_JPRB/)
221 KAO( :, 5, 9, 1) = (/&
222 & 4.6733E-06_JPRB,4.6321E-06_JPRB,4.5821E-06_JPRB,6.0749E-06_JPRB,9.9333E-06_JPRB,1.0979E-05_JPRB,&
223
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0111E-05_JPRB,1.1271E-05_JPRB,8.0274E-06_JPRB/)
224 KAO( :, 1,10, 1) = (/&
225 & 9.1025E-07_JPRB,2.4528E-06_JPRB,5.5726E-06_JPRB,5.5107E-06_JPRB,5.1975E-06_JPRB,4.4519E-06_JPRB,&
226
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8745E-06_JPRB,3.7574E-06_JPRB,7.2814E-06_JPRB/)
227 KAO( :, 2,10, 1) = (/&
228 & 1.3156E-06_JPRB,2.0527E-06_JPRB,6.2782E-06_JPRB,6.4430E-06_JPRB,6.8843E-06_JPRB,6.1546E-06_JPRB,&
229
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1800E-06_JPRB,4.8780E-06_JPRB,8.0238E-06_JPRB/)
230 KAO( :, 3,10, 1) = (/&
231 & 1.8603E-06_JPRB,2.0830E-06_JPRB,5.0693E-06_JPRB,7.7258E-06_JPRB,7.2719E-06_JPRB,8.2740E-06_JPRB,&
232
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.9520E-06_JPRB,6.2927E-06_JPRB,9.9400E-06_JPRB/)
233 KAO( :, 4,10, 1) = (/&
234 & 2.5643E-06_JPRB,2.6119E-06_JPRB,4.1284E-06_JPRB,8.2194E-06_JPRB,8.3768E-06_JPRB,8.2923E-06_JPRB,&
235
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.9244E-06_JPRB,7.7919E-06_JPRB,1.3755E-05_JPRB/)
236 KAO( :, 5,10, 1) = (/&
237 & 3.4396E-06_JPRB,3.4402E-06_JPRB,3.9520E-06_JPRB,6.9781E-06_JPRB,9.9688E-06_JPRB,8.9208E-06_JPRB,&
238
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0073E-05_JPRB,9.4585E-06_JPRB,2.0482E-05_JPRB/)
239 KAO( :, 1,11, 1) = (/&
240 & 7.9990E-07_JPRB,2.6784E-06_JPRB,5.0182E-06_JPRB,5.2703E-06_JPRB,4.7427E-06_JPRB,4.1219E-06_JPRB,&
241
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7030E-06_JPRB,3.7980E-06_JPRB,1.0212E-05_JPRB/)
242 KAO( :, 2,11, 1) = (/&
243 & 1.1506E-06_JPRB,2.1675E-06_JPRB,6.1676E-06_JPRB,5.9511E-06_JPRB,6.4671E-06_JPRB,5.5707E-06_JPRB,&
244
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8102E-06_JPRB,4.7946E-06_JPRB,1.1170E-05_JPRB/)
245 KAO( :, 3,11, 1) = (/&
246 & 1.6161E-06_JPRB,1.9795E-06_JPRB,5.4689E-06_JPRB,6.8567E-06_JPRB,6.9277E-06_JPRB,7.3643E-06_JPRB,&
247
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3255E-06_JPRB,6.0154E-06_JPRB,1.3679E-05_JPRB/)
248 KAO( :, 4,11, 1) = (/&
249 & 2.2097E-06_JPRB,2.3135E-06_JPRB,4.4934E-06_JPRB,8.2433E-06_JPRB,7.5005E-06_JPRB,8.0757E-06_JPRB,&
250
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.0043E-06_JPRB,7.4062E-06_JPRB,1.8725E-05_JPRB/)
251 KAO( :, 5,11, 1) = (/&
252 & 2.9383E-06_JPRB,2.9710E-06_JPRB,3.8010E-06_JPRB,7.4323E-06_JPRB,8.7355E-06_JPRB,8.0970E-06_JPRB,&
253
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.6640E-06_JPRB,8.8290E-06_JPRB,2.7664E-05_JPRB/)
254 KAO( :, 1,12, 1) = (/&
255 & 7.0941E-07_JPRB,2.6297E-06_JPRB,4.5700E-06_JPRB,4.9667E-06_JPRB,4.3747E-06_JPRB,3.8263E-06_JPRB,&
256
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4506E-06_JPRB,3.6352E-06_JPRB,1.0764E-05_JPRB/)
257 KAO( :, 2,12, 1) = (/&
258 & 1.0191E-06_JPRB,2.0344E-06_JPRB,5.5461E-06_JPRB,5.4627E-06_JPRB,5.8842E-06_JPRB,5.0801E-06_JPRB,&
259
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4391E-06_JPRB,4.4109E-06_JPRB,1.1741E-05_JPRB/)
260 KAO( :, 3,12, 1) = (/&
261 & 1.4279E-06_JPRB,1.8013E-06_JPRB,5.3154E-06_JPRB,6.1728E-06_JPRB,6.3556E-06_JPRB,6.6152E-06_JPRB,&
262
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7465E-06_JPRB,5.5323E-06_JPRB,1.4320E-05_JPRB/)
263 KAO( :, 4,12, 1) = (/&
264 & 1.9430E-06_JPRB,2.0642E-06_JPRB,4.3928E-06_JPRB,7.3526E-06_JPRB,6.7817E-06_JPRB,7.5948E-06_JPRB,&
265
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.1609E-06_JPRB,6.7682E-06_JPRB,1.9523E-05_JPRB/)
266 KAO( :, 5,12, 1) = (/&
267 & 2.5711E-06_JPRB,2.6172E-06_JPRB,3.5411E-06_JPRB,7.1217E-06_JPRB,7.7996E-06_JPRB,7.3436E-06_JPRB,&
268
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.5622E-06_JPRB,7.9225E-06_JPRB,2.8755E-05_JPRB/)
269 KAO( :, 1,13, 1) = (/&
270 & 6.2420E-07_JPRB,2.5595E-06_JPRB,4.1789E-06_JPRB,4.5948E-06_JPRB,4.0362E-06_JPRB,3.5472E-06_JPRB,&
271
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2436E-06_JPRB,3.4107E-06_JPRB,9.1608E-06_JPRB/)
272 KAO( :, 2,13, 1) = (/&
273 & 8.9615E-07_JPRB,1.9079E-06_JPRB,4.9940E-06_JPRB,5.0423E-06_JPRB,5.3353E-06_JPRB,4.6287E-06_JPRB,&
274
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1017E-06_JPRB,4.1244E-06_JPRB,9.9901E-06_JPRB/)
275 KAO( :, 3,13, 1) = (/&
276 & 1.2529E-06_JPRB,1.6490E-06_JPRB,5.1498E-06_JPRB,5.5689E-06_JPRB,5.8865E-06_JPRB,5.9318E-06_JPRB,&
277
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1860E-06_JPRB,5.1003E-06_JPRB,1.2178E-05_JPRB/)
278 KAO( :, 4,13, 1) = (/&
279 & 1.6987E-06_JPRB,1.8380E-06_JPRB,4.2684E-06_JPRB,6.5744E-06_JPRB,6.1601E-06_JPRB,7.0815E-06_JPRB,&
280
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.4247E-06_JPRB,6.1421E-06_JPRB,1.6600E-05_JPRB/)
281 KAO( :, 5,13, 1) = (/&
282 & 2.2352E-06_JPRB,2.2950E-06_JPRB,3.3070E-06_JPRB,6.8297E-06_JPRB,6.9887E-06_JPRB,6.7633E-06_JPRB,&
283
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.6284E-06_JPRB,7.1420E-06_JPRB,2.4442E-05_JPRB/)
284 KAO( :, 1, 1, 2) = (/&
285 & 5.4151E-05_JPRB,5.1620E-05_JPRB,4.7151E-05_JPRB,4.1642E-05_JPRB,3.5398E-05_JPRB,2.6235E-05_JPRB,&
286
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1071E-05_JPRB,5.8698E-05_JPRB,2.4321E-05_JPRB/)
287 KAO( :, 2, 1, 2) = (/&
288 & 6.7514E-05_JPRB,6.4760E-05_JPRB,5.9233E-05_JPRB,5.2524E-05_JPRB,4.5074E-05_JPRB,3.6408E-05_JPRB,&
289
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4335E-05_JPRB,5.6829E-05_JPRB,2.7514E-05_JPRB/)
290 KAO( :, 3, 1, 2) = (/&
291 & 8.2149E-05_JPRB,7.9291E-05_JPRB,7.2593E-05_JPRB,6.4606E-05_JPRB,5.5728E-05_JPRB,4.6152E-05_JPRB,&
292
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4241E-05_JPRB,4.5420E-05_JPRB,2.4336E-05_JPRB/)
293 KAO( :, 4, 1, 2) = (/&
294 & 9.7723E-05_JPRB,9.4880E-05_JPRB,8.7232E-05_JPRB,7.7947E-05_JPRB,6.7833E-05_JPRB,5.6842E-05_JPRB,&
295
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4766E-05_JPRB,2.6532E-05_JPRB,2.9870E-05_JPRB/)
296 KAO( :, 5, 1, 2) = (/&
297 & 1.1394E-04_JPRB,1.1139E-04_JPRB,1.0299E-04_JPRB,9.2684E-05_JPRB,8.1155E-05_JPRB,6.8389E-05_JPRB,&
298
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3823E-05_JPRB,3.3217E-05_JPRB,2.3434E-05_JPRB/)
299 KAO( :, 1, 2, 2) = (/&
300 & 4.2753E-05_JPRB,4.0882E-05_JPRB,3.7362E-05_JPRB,3.3159E-05_JPRB,2.7615E-05_JPRB,1.8637E-05_JPRB,&
301
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2134E-05_JPRB,5.3399E-05_JPRB,1.8302E-05_JPRB/)
302 KAO( :, 2, 2, 2) = (/&
303 & 5.3879E-05_JPRB,5.1846E-05_JPRB,4.7574E-05_JPRB,4.2472E-05_JPRB,3.6451E-05_JPRB,2.8399E-05_JPRB,&
304
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9335E-05_JPRB,5.2953E-05_JPRB,1.7179E-05_JPRB/)
305 KAO( :, 3, 2, 2) = (/&
306 & 6.6088E-05_JPRB,6.4132E-05_JPRB,5.9087E-05_JPRB,5.2832E-05_JPRB,4.5668E-05_JPRB,3.7676E-05_JPRB,&
307
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6673E-05_JPRB,4.9047E-05_JPRB,2.0200E-05_JPRB/)
308 KAO( :, 4, 2, 2) = (/&
309 & 7.9313E-05_JPRB,7.7493E-05_JPRB,7.1541E-05_JPRB,6.4098E-05_JPRB,5.5769E-05_JPRB,4.6664E-05_JPRB,&
310
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6034E-05_JPRB,2.7239E-05_JPRB,1.9971E-05_JPRB/)
311 KAO( :, 5, 2, 2) = (/&
312 & 9.3172E-05_JPRB,9.1802E-05_JPRB,8.4933E-05_JPRB,7.6462E-05_JPRB,6.6920E-05_JPRB,5.6293E-05_JPRB,&
313
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4283E-05_JPRB,2.5633E-05_JPRB,1.6128E-05_JPRB/)
314 KAO( :, 1, 3, 2) = (/&
315 & 3.1637E-05_JPRB,3.0177E-05_JPRB,2.7541E-05_JPRB,2.3988E-05_JPRB,1.7787E-05_JPRB,1.3073E-05_JPRB,&
316
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0575E-05_JPRB,4.8194E-05_JPRB,1.2505E-05_JPRB/)
317 KAO( :, 2, 3, 2) = (/&
318 & 4.0410E-05_JPRB,3.8878E-05_JPRB,3.5667E-05_JPRB,3.1901E-05_JPRB,2.6742E-05_JPRB,1.8595E-05_JPRB,&
319
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9446E-05_JPRB,5.0395E-05_JPRB,1.3203E-05_JPRB/)
320 KAO( :, 3, 3, 2) = (/&
321 & 5.0197E-05_JPRB,4.8688E-05_JPRB,4.4913E-05_JPRB,4.0333E-05_JPRB,3.4912E-05_JPRB,2.7673E-05_JPRB,&
322
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8085E-05_JPRB,4.8586E-05_JPRB,1.3602E-05_JPRB/)
323 KAO( :, 4, 3, 2) = (/&
324 & 6.0782E-05_JPRB,5.9537E-05_JPRB,5.5167E-05_JPRB,4.9672E-05_JPRB,4.3304E-05_JPRB,3.6088E-05_JPRB,&
325
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5607E-05_JPRB,4.2696E-05_JPRB,1.2094E-05_JPRB/)
326 KAO( :, 5, 3, 2) = (/&
327 & 7.2122E-05_JPRB,7.1291E-05_JPRB,6.6301E-05_JPRB,5.9947E-05_JPRB,5.2623E-05_JPRB,4.4244E-05_JPRB,&
328
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4126E-05_JPRB,2.2584E-05_JPRB,1.6766E-05_JPRB/)
329 KAO( :, 1, 4, 2) = (/&
330 & 2.3214E-05_JPRB,2.2012E-05_JPRB,1.9759E-05_JPRB,1.6356E-05_JPRB,1.1177E-05_JPRB,1.3102E-05_JPRB,&
331
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4531E-05_JPRB,4.5521E-05_JPRB,8.5704E-06_JPRB/)
332 KAO( :, 2, 4, 2) = (/&
333 & 2.9987E-05_JPRB,2.8729E-05_JPRB,2.6188E-05_JPRB,2.2885E-05_JPRB,1.7414E-05_JPRB,1.2331E-05_JPRB,&
334
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4914E-05_JPRB,4.5109E-05_JPRB,8.5816E-06_JPRB/)
335 KAO( :, 3, 4, 2) = (/&
336 & 3.7737E-05_JPRB,3.6418E-05_JPRB,3.3481E-05_JPRB,2.9943E-05_JPRB,2.5212E-05_JPRB,1.8076E-05_JPRB,&
337
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7776E-05_JPRB,4.6705E-05_JPRB,7.7341E-06_JPRB/)
338 KAO( :, 4, 4, 2) = (/&
339 & 4.6237E-05_JPRB,4.5035E-05_JPRB,4.1706E-05_JPRB,3.7594E-05_JPRB,3.2675E-05_JPRB,2.6052E-05_JPRB,&
340
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7191E-05_JPRB,4.4501E-05_JPRB,1.1430E-05_JPRB/)
341 KAO( :, 5, 4, 2) = (/&
342 & 5.5394E-05_JPRB,5.4566E-05_JPRB,5.0800E-05_JPRB,4.6060E-05_JPRB,4.0396E-05_JPRB,3.3727E-05_JPRB,&
343
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3835E-05_JPRB,3.7336E-05_JPRB,1.6242E-05_JPRB/)
344 KAO( :, 1, 5, 2) = (/&
345 & 1.7110E-05_JPRB,1.6145E-05_JPRB,1.4165E-05_JPRB,1.0426E-05_JPRB,7.9870E-06_JPRB,2.4744E-05_JPRB,&
346
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 5.4612E-05_JPRB,4.2211E-05_JPRB,5.8558E-06_JPRB/)
347
348
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART1',1,ZHOOK_HANDLE)
349 1 END SUBROUTINE PART1
350
351
352 1 SUBROUTINE PART2
353
354 REAL(KIND=JPRB) :: ZHOOK_HANDLE
355
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART2',0,ZHOOK_HANDLE)
356
357
358 KAO( :, 2, 5, 2) = (/&
359 & 2.2350E-05_JPRB,2.1312E-05_JPRB,1.9197E-05_JPRB,1.6194E-05_JPRB,1.1081E-05_JPRB,1.1593E-05_JPRB,&
360
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7643E-05_JPRB,4.2913E-05_JPRB,4.4739E-06_JPRB/)
361 KAO( :, 3, 5, 2) = (/&
362 & 2.8416E-05_JPRB,2.7289E-05_JPRB,2.4884E-05_JPRB,2.1811E-05_JPRB,1.7120E-05_JPRB,1.1847E-05_JPRB,&
363
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1141E-05_JPRB,4.2424E-05_JPRB,6.9636E-06_JPRB/)
364 KAO( :, 4, 5, 2) = (/&
365 & 3.5202E-05_JPRB,3.4084E-05_JPRB,3.1336E-05_JPRB,2.8012E-05_JPRB,2.3757E-05_JPRB,1.7453E-05_JPRB,&
366
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5962E-05_JPRB,4.2655E-05_JPRB,1.0597E-05_JPRB/)
367 KAO( :, 5, 5, 2) = (/&
368 & 4.2592E-05_JPRB,4.1680E-05_JPRB,3.8616E-05_JPRB,3.4875E-05_JPRB,3.0427E-05_JPRB,2.4423E-05_JPRB,&
369
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5902E-05_JPRB,4.0629E-05_JPRB,1.5906E-05_JPRB/)
370 KAO( :, 1, 6, 2) = (/&
371 & 1.2522E-05_JPRB,1.1758E-05_JPRB,9.8897E-06_JPRB,6.3513E-06_JPRB,1.0585E-05_JPRB,4.0712E-05_JPRB,&
372
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0160E-05_JPRB,4.0760E-05_JPRB,3.1679E-06_JPRB/)
373 KAO( :, 2, 6, 2) = (/&
374 & 1.6573E-05_JPRB,1.5756E-05_JPRB,1.3865E-05_JPRB,1.0569E-05_JPRB,7.4971E-06_JPRB,2.3617E-05_JPRB,&
375
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0226E-05_JPRB,4.0741E-05_JPRB,3.5969E-06_JPRB/)
376 KAO( :, 3, 6, 2) = (/&
377 & 2.1308E-05_JPRB,2.0432E-05_JPRB,1.8454E-05_JPRB,1.5643E-05_JPRB,1.0753E-05_JPRB,1.1262E-05_JPRB,&
378
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2958E-05_JPRB,3.9589E-05_JPRB,5.9975E-06_JPRB/)
379 KAO( :, 4, 6, 2) = (/&
380 & 2.6653E-05_JPRB,2.5731E-05_JPRB,2.3505E-05_JPRB,2.0714E-05_JPRB,1.6401E-05_JPRB,1.1347E-05_JPRB,&
381
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9347E-05_JPRB,3.9364E-05_JPRB,9.7407E-06_JPRB/)
382 KAO( :, 5, 6, 2) = (/&
383 & 3.2562E-05_JPRB,3.1730E-05_JPRB,2.9223E-05_JPRB,2.6148E-05_JPRB,2.2224E-05_JPRB,1.6477E-05_JPRB,&
384
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5448E-05_JPRB,3.9356E-05_JPRB,1.5151E-05_JPRB/)
385 KAO( :, 1, 7, 2) = (/&
386 & 9.2632E-06_JPRB,8.5835E-06_JPRB,6.2688E-06_JPRB,5.7491E-06_JPRB,2.0750E-05_JPRB,4.7549E-05_JPRB,&
387
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9746E-05_JPRB,4.3221E-05_JPRB,1.9173E-06_JPRB/)
388 KAO( :, 2, 7, 2) = (/&
389 & 1.2411E-05_JPRB,1.1741E-05_JPRB,9.9384E-06_JPRB,6.3308E-06_JPRB,9.8932E-06_JPRB,3.7604E-05_JPRB,&
390
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5915E-05_JPRB,3.8224E-05_JPRB,3.1404E-06_JPRB/)
391 KAO( :, 3, 7, 2) = (/&
392 & 1.6131E-05_JPRB,1.5426E-05_JPRB,1.3668E-05_JPRB,1.0538E-05_JPRB,7.5655E-06_JPRB,2.2395E-05_JPRB,&
393
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5385E-05_JPRB,3.8777E-05_JPRB,5.5259E-06_JPRB/)
394 KAO( :, 4, 7, 2) = (/&
395 & 2.0394E-05_JPRB,1.9668E-05_JPRB,1.7772E-05_JPRB,1.5135E-05_JPRB,1.0480E-05_JPRB,1.1695E-05_JPRB,&
396
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8455E-05_JPRB,3.6049E-05_JPRB,9.3488E-06_JPRB/)
397 KAO( :, 5, 7, 2) = (/&
398 & 2.5104E-05_JPRB,2.4438E-05_JPRB,2.2345E-05_JPRB,1.9724E-05_JPRB,1.5920E-05_JPRB,1.0909E-05_JPRB,&
399
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7780E-05_JPRB,3.6976E-05_JPRB,1.5076E-05_JPRB/)
400 KAO( :, 1, 8, 2) = (/&
401 & 6.9226E-06_JPRB,6.1974E-06_JPRB,3.6925E-06_JPRB,9.7107E-06_JPRB,3.1400E-05_JPRB,5.1217E-05_JPRB,&
402
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1133E-05_JPRB,4.7405E-05_JPRB,1.8023E-06_JPRB/)
403 KAO( :, 2, 8, 2) = (/&
404 & 9.3730E-06_JPRB,8.7696E-06_JPRB,6.5222E-06_JPRB,5.5338E-06_JPRB,2.0725E-05_JPRB,4.5311E-05_JPRB,&
405
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6330E-05_JPRB,3.9950E-05_JPRB,3.2574E-06_JPRB/)
406 KAO( :, 3, 8, 2) = (/&
407 & 1.2271E-05_JPRB,1.1705E-05_JPRB,9.9611E-06_JPRB,6.4477E-06_JPRB,1.0502E-05_JPRB,3.6242E-05_JPRB,&
408
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2814E-05_JPRB,3.6156E-05_JPRB,5.9101E-06_JPRB/)
409 KAO( :, 4, 8, 2) = (/&
410 & 1.5653E-05_JPRB,1.5070E-05_JPRB,1.3408E-05_JPRB,1.0377E-05_JPRB,7.4564E-06_JPRB,2.3003E-05_JPRB,&
411
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1378E-05_JPRB,3.6628E-05_JPRB,1.0378E-05_JPRB/)
412 KAO( :, 5, 8, 2) = (/&
413 & 1.9451E-05_JPRB,1.8892E-05_JPRB,1.7102E-05_JPRB,1.4623E-05_JPRB,1.0332E-05_JPRB,1.2287E-05_JPRB,&
414
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5601E-05_JPRB,3.3798E-05_JPRB,1.7377E-05_JPRB/)
415 KAO( :, 1, 9, 2) = (/&
416 & 5.2610E-06_JPRB,4.1633E-06_JPRB,4.0647E-06_JPRB,1.6473E-05_JPRB,4.2753E-05_JPRB,5.1385E-05_JPRB,&
417
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7611E-05_JPRB,4.8409E-05_JPRB,3.6172E-06_JPRB/)
418 KAO( :, 2, 9, 2) = (/&
419 & 7.1572E-06_JPRB,6.5056E-06_JPRB,3.9269E-06_JPRB,9.8251E-06_JPRB,3.2469E-05_JPRB,4.6277E-05_JPRB,&
420
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7279E-05_JPRB,4.4658E-05_JPRB,6.1285E-06_JPRB/)
421 KAO( :, 3, 9, 2) = (/&
422 & 9.4513E-06_JPRB,8.9266E-06_JPRB,6.7478E-06_JPRB,5.5531E-06_JPRB,2.0823E-05_JPRB,4.1922E-05_JPRB,&
423
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3117E-05_JPRB,3.6857E-05_JPRB,1.1095E-05_JPRB/)
424 KAO( :, 4, 9, 2) = (/&
425 & 1.2144E-05_JPRB,1.1656E-05_JPRB,9.9211E-06_JPRB,6.5681E-06_JPRB,1.1366E-05_JPRB,3.4298E-05_JPRB,&
426
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9570E-05_JPRB,3.4386E-05_JPRB,2.0048E-05_JPRB/)
427 KAO( :, 5, 9, 2) = (/&
428 & 1.5214E-05_JPRB,1.4744E-05_JPRB,1.3136E-05_JPRB,1.0200E-05_JPRB,7.5939E-06_JPRB,2.3119E-05_JPRB,&
429
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7419E-05_JPRB,3.3965E-05_JPRB,3.4968E-05_JPRB/)
430 KAO( :, 1,10, 2) = (/&
431 & 4.1564E-06_JPRB,2.6079E-06_JPRB,6.9218E-06_JPRB,2.7859E-05_JPRB,4.8834E-05_JPRB,5.2686E-05_JPRB,&
432
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6389E-05_JPRB,4.9087E-05_JPRB,1.0652E-05_JPRB/)
433 KAO( :, 2,10, 2) = (/&
434 & 5.6598E-06_JPRB,4.6524E-06_JPRB,4.2303E-06_JPRB,1.7606E-05_JPRB,4.1116E-05_JPRB,4.7567E-05_JPRB,&
435
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5264E-05_JPRB,4.6736E-05_JPRB,1.6225E-05_JPRB/)
436 KAO( :, 3,10, 2) = (/&
437 & 7.4935E-06_JPRB,6.8980E-06_JPRB,4.2539E-06_JPRB,1.0638E-05_JPRB,3.2709E-05_JPRB,4.2416E-05_JPRB,&
438
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4544E-05_JPRB,4.1212E-05_JPRB,2.8258E-05_JPRB/)
439 KAO( :, 4,10, 2) = (/&
440 & 9.6635E-06_JPRB,9.2067E-06_JPRB,7.0228E-06_JPRB,5.8835E-06_JPRB,2.2271E-05_JPRB,3.9179E-05_JPRB,&
441
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0535E-05_JPRB,3.4910E-05_JPRB,5.1242E-05_JPRB/)
442 KAO( :, 5,10, 2) = (/&
443 & 1.2158E-05_JPRB,1.1756E-05_JPRB,1.0040E-05_JPRB,6.8113E-06_JPRB,1.2737E-05_JPRB,3.2445E-05_JPRB,&
444
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6666E-05_JPRB,3.2986E-05_JPRB,9.1455E-05_JPRB/)
445 KAO( :, 1,11, 2) = (/&
446 & 3.8505E-06_JPRB,2.2272E-06_JPRB,9.0452E-06_JPRB,3.3373E-05_JPRB,4.6563E-05_JPRB,5.1119E-05_JPRB,&
447
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6293E-05_JPRB,4.7828E-05_JPRB,1.4850E-05_JPRB/)
448 KAO( :, 2,11, 2) = (/&
449 & 5.1974E-06_JPRB,4.0087E-06_JPRB,5.3940E-06_JPRB,2.3158E-05_JPRB,4.1599E-05_JPRB,4.6146E-05_JPRB,&
450
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2299E-05_JPRB,4.6208E-05_JPRB,2.2452E-05_JPRB/)
451 KAO( :, 3,11, 2) = (/&
452 & 6.8266E-06_JPRB,6.1648E-06_JPRB,4.0224E-06_JPRB,1.4825E-05_JPRB,3.4779E-05_JPRB,4.0817E-05_JPRB,&
453
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2127E-05_JPRB,4.1473E-05_JPRB,3.8968E-05_JPRB/)
454 KAO( :, 4,11, 2) = (/&
455 & 8.7559E-06_JPRB,8.2911E-06_JPRB,5.8154E-06_JPRB,8.1179E-06_JPRB,2.7292E-05_JPRB,3.7470E-05_JPRB,&
456
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8829E-05_JPRB,3.4450E-05_JPRB,7.0589E-05_JPRB/)
457 KAO( :, 5,11, 2) = (/&
458 & 1.0954E-05_JPRB,1.0574E-05_JPRB,8.7742E-06_JPRB,6.0446E-06_JPRB,1.8157E-05_JPRB,3.3048E-05_JPRB,&
459
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5168E-05_JPRB,3.1159E-05_JPRB,1.2578E-04_JPRB/)
460 KAO( :, 1,12, 2) = (/&
461 & 3.5781E-06_JPRB,2.0859E-06_JPRB,9.5195E-06_JPRB,3.1787E-05_JPRB,4.2342E-05_JPRB,4.6653E-05_JPRB,&
462
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2689E-05_JPRB,4.4370E-05_JPRB,1.5650E-05_JPRB/)
463 KAO( :, 2,12, 2) = (/&
464 & 4.8068E-06_JPRB,3.6887E-06_JPRB,5.7939E-06_JPRB,2.3796E-05_JPRB,3.7779E-05_JPRB,4.1997E-05_JPRB,&
465
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8426E-05_JPRB,4.2634E-05_JPRB,2.3652E-05_JPRB/)
466 KAO( :, 3,12, 2) = (/&
467 & 6.2948E-06_JPRB,5.6556E-06_JPRB,3.7630E-06_JPRB,1.5847E-05_JPRB,3.2542E-05_JPRB,3.7297E-05_JPRB,&
468
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8083E-05_JPRB,3.7879E-05_JPRB,4.1024E-05_JPRB/)
469 KAO( :, 4,12, 2) = (/&
470 & 8.0397E-06_JPRB,7.5827E-06_JPRB,5.0870E-06_JPRB,9.0305E-06_JPRB,2.6555E-05_JPRB,3.3515E-05_JPRB,&
471
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5502E-05_JPRB,3.1529E-05_JPRB,7.4223E-05_JPRB/)
472 KAO( :, 5,12, 2) = (/&
473 & 1.0028E-05_JPRB,9.6397E-06_JPRB,7.9012E-06_JPRB,5.7864E-06_JPRB,1.8461E-05_JPRB,3.0406E-05_JPRB,&
474
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2113E-05_JPRB,2.8581E-05_JPRB,1.3214E-04_JPRB/)
475 KAO( :, 1,13, 2) = (/&
476 & 3.3027E-06_JPRB,1.9849E-06_JPRB,1.0579E-05_JPRB,3.0102E-05_JPRB,3.8661E-05_JPRB,4.2078E-05_JPRB,&
477
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9451E-05_JPRB,4.0882E-05_JPRB,1.3351E-05_JPRB/)
478 KAO( :, 2,13, 2) = (/&
479 & 4.4219E-06_JPRB,3.3751E-06_JPRB,6.3222E-06_JPRB,2.3724E-05_JPRB,3.3992E-05_JPRB,3.8161E-05_JPRB,&
480
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4651E-05_JPRB,3.8910E-05_JPRB,2.0209E-05_JPRB/)
481 KAO( :, 3,13, 2) = (/&
482 & 5.7740E-06_JPRB,5.1371E-06_JPRB,3.6294E-06_JPRB,1.6612E-05_JPRB,3.0054E-05_JPRB,3.4084E-05_JPRB,&
483
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4363E-05_JPRB,3.4522E-05_JPRB,3.5082E-05_JPRB/)
484 KAO( :, 4,13, 2) = (/&
485 & 7.3436E-06_JPRB,6.8959E-06_JPRB,4.5387E-06_JPRB,1.0066E-05_JPRB,2.5028E-05_JPRB,3.0345E-05_JPRB,&
486
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2120E-05_JPRB,2.8785E-05_JPRB,6.3433E-05_JPRB/)
487 KAO( :, 5,13, 2) = (/&
488 & 9.1271E-06_JPRB,8.7491E-06_JPRB,7.0983E-06_JPRB,6.0072E-06_JPRB,1.8622E-05_JPRB,2.7834E-05_JPRB,&
489
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8936E-05_JPRB,2.5906E-05_JPRB,1.1287E-04_JPRB/)
490 KAO( :, 1, 1, 3) = (/&
491 & 1.0561E-04_JPRB,9.9580E-05_JPRB,9.1881E-05_JPRB,8.2381E-05_JPRB,7.1375E-05_JPRB,5.7989E-05_JPRB,&
492
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5664E-05_JPRB,6.4412E-05_JPRB,3.1092E-05_JPRB/)
493 KAO( :, 2, 1, 3) = (/&
494 & 1.2338E-04_JPRB,1.1773E-04_JPRB,1.0902E-04_JPRB,9.8327E-05_JPRB,8.5823E-05_JPRB,7.1198E-05_JPRB,&
495
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2267E-05_JPRB,4.7983E-05_JPRB,3.3217E-05_JPRB/)
496 KAO( :, 3, 1, 3) = (/&
497 & 1.4195E-04_JPRB,1.3687E-04_JPRB,1.2720E-04_JPRB,1.1513E-04_JPRB,1.0071E-04_JPRB,8.3744E-05_JPRB,&
498
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.2834E-05_JPRB,3.3890E-05_JPRB,3.3867E-05_JPRB/)
499 KAO( :, 4, 1, 3) = (/&
500 & 1.6072E-04_JPRB,1.5621E-04_JPRB,1.4581E-04_JPRB,1.3254E-04_JPRB,1.1572E-04_JPRB,9.6056E-05_JPRB,&
501
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.3269E-05_JPRB,4.4619E-05_JPRB,2.4444E-05_JPRB/)
502 KAO( :, 5, 1, 3) = (/&
503 & 1.7870E-04_JPRB,1.7588E-04_JPRB,1.6519E-04_JPRB,1.5017E-04_JPRB,1.3146E-04_JPRB,1.0980E-04_JPRB,&
504
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.4775E-05_JPRB,5.5831E-05_JPRB,2.9607E-05_JPRB/)
505 KAO( :, 1, 2, 3) = (/&
506 & 9.0935E-05_JPRB,8.5722E-05_JPRB,7.8558E-05_JPRB,6.9752E-05_JPRB,5.9712E-05_JPRB,4.7385E-05_JPRB,&
507
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8063E-05_JPRB,6.1629E-05_JPRB,2.1541E-05_JPRB/)
508 KAO( :, 2, 2, 3) = (/&
509 & 1.0613E-04_JPRB,1.0109E-04_JPRB,9.2923E-05_JPRB,8.2896E-05_JPRB,7.1836E-05_JPRB,5.9001E-05_JPRB,&
510
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0531E-05_JPRB,5.4238E-05_JPRB,2.6282E-05_JPRB/)
511 KAO( :, 3, 2, 3) = (/&
512 & 1.2220E-04_JPRB,1.1726E-04_JPRB,1.0800E-04_JPRB,9.6883E-05_JPRB,8.4549E-05_JPRB,7.0132E-05_JPRB,&
513
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2211E-05_JPRB,3.5371E-05_JPRB,2.0831E-05_JPRB/)
514 KAO( :, 4, 2, 3) = (/&
515 & 1.3840E-04_JPRB,1.3383E-04_JPRB,1.2384E-04_JPRB,1.1185E-04_JPRB,9.7762E-05_JPRB,8.1196E-05_JPRB,&
516
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.1844E-05_JPRB,3.5901E-05_JPRB,1.8797E-05_JPRB/)
517 KAO( :, 5, 2, 3) = (/&
518 & 1.5419E-04_JPRB,1.5072E-04_JPRB,1.4069E-04_JPRB,1.2749E-04_JPRB,1.1156E-04_JPRB,9.3151E-05_JPRB,&
519
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.1896E-05_JPRB,4.6407E-05_JPRB,2.8564E-05_JPRB/)
520 KAO( :, 1, 3, 3) = (/&
521 & 7.5234E-05_JPRB,7.0905E-05_JPRB,6.4619E-05_JPRB,5.6937E-05_JPRB,4.7925E-05_JPRB,3.4057E-05_JPRB,&
522
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9471E-05_JPRB,6.0714E-05_JPRB,1.5353E-05_JPRB/)
523 KAO( :, 2, 3, 3) = (/&
524 & 8.8054E-05_JPRB,8.3720E-05_JPRB,7.6548E-05_JPRB,6.7694E-05_JPRB,5.7920E-05_JPRB,4.6422E-05_JPRB,&
525
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6506E-05_JPRB,5.8794E-05_JPRB,1.3222E-05_JPRB/)
526 KAO( :, 3, 3, 3) = (/&
527 & 1.0142E-04_JPRB,9.7129E-05_JPRB,8.9011E-05_JPRB,7.9094E-05_JPRB,6.8344E-05_JPRB,5.6044E-05_JPRB,&
528
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9469E-05_JPRB,4.5819E-05_JPRB,1.2529E-05_JPRB/)
529 KAO( :, 4, 3, 3) = (/&
530 & 1.1514E-04_JPRB,1.1089E-04_JPRB,1.0189E-04_JPRB,9.1196E-05_JPRB,7.9328E-05_JPRB,6.5564E-05_JPRB,&
531
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9536E-05_JPRB,2.9992E-05_JPRB,2.0006E-05_JPRB/)
532 KAO( :, 5, 3, 3) = (/&
533 & 1.2867E-04_JPRB,1.2511E-04_JPRB,1.1573E-04_JPRB,1.0413E-04_JPRB,9.0747E-05_JPRB,7.5488E-05_JPRB,&
534
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8137E-05_JPRB,3.3705E-05_JPRB,2.9649E-05_JPRB/)
535 KAO( :, 1, 4, 3) = (/&
536 & 6.1778E-05_JPRB,5.8294E-05_JPRB,5.2798E-05_JPRB,4.6202E-05_JPRB,3.7473E-05_JPRB,2.1169E-05_JPRB,&
537
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9527E-05_JPRB,6.1900E-05_JPRB,9.6628E-06_JPRB/)
538 KAO( :, 2, 4, 3) = (/&
539 & 7.2880E-05_JPRB,6.9141E-05_JPRB,6.2841E-05_JPRB,5.5219E-05_JPRB,4.6442E-05_JPRB,3.4307E-05_JPRB,&
540
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4540E-05_JPRB,5.8099E-05_JPRB,8.2774E-06_JPRB/)
541 KAO( :, 3, 4, 3) = (/&
542 & 8.4189E-05_JPRB,8.0422E-05_JPRB,7.3326E-05_JPRB,6.4671E-05_JPRB,5.5214E-05_JPRB,4.4201E-05_JPRB,&
543
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5763E-05_JPRB,5.4305E-05_JPRB,1.4320E-05_JPRB/)
544 KAO( :, 4, 4, 3) = (/&
545 & 9.5731E-05_JPRB,9.1993E-05_JPRB,8.4010E-05_JPRB,7.4439E-05_JPRB,6.4080E-05_JPRB,5.2536E-05_JPRB,&
546
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7772E-05_JPRB,4.0812E-05_JPRB,2.1667E-05_JPRB/)
547 KAO( :, 5, 4, 3) = (/&
548 & 1.0722E-04_JPRB,1.0376E-04_JPRB,9.5138E-05_JPRB,8.4789E-05_JPRB,7.3585E-05_JPRB,6.0982E-05_JPRB,&
549
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6442E-05_JPRB,2.6775E-05_JPRB,3.0897E-05_JPRB/)
550 KAO( :, 1, 5, 3) = (/&
551 & 5.0693E-05_JPRB,4.7899E-05_JPRB,4.3078E-05_JPRB,3.7149E-05_JPRB,2.7343E-05_JPRB,1.8823E-05_JPRB,&
552
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3113E-05_JPRB,6.4247E-05_JPRB,5.8413E-06_JPRB/)
553 KAO( :, 2, 5, 3) = (/&
554 & 6.0292E-05_JPRB,5.7244E-05_JPRB,5.1699E-05_JPRB,4.5062E-05_JPRB,3.6934E-05_JPRB,2.2807E-05_JPRB,&
555
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5085E-05_JPRB,5.8430E-05_JPRB,9.0461E-06_JPRB/)
556 KAO( :, 3, 5, 3) = (/&
557 & 7.0130E-05_JPRB,6.6900E-05_JPRB,6.0628E-05_JPRB,5.3145E-05_JPRB,4.4673E-05_JPRB,3.3772E-05_JPRB,&
558
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2961E-05_JPRB,5.4725E-05_JPRB,1.4542E-05_JPRB/)
559 KAO( :, 4, 5, 3) = (/&
560 & 7.9880E-05_JPRB,7.6664E-05_JPRB,6.9684E-05_JPRB,6.1301E-05_JPRB,5.2150E-05_JPRB,4.1916E-05_JPRB,&
561
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5438E-05_JPRB,4.9130E-05_JPRB,2.2207E-05_JPRB/)
562 KAO( :, 5, 5, 3) = (/&
563 & 8.9549E-05_JPRB,8.6422E-05_JPRB,7.8834E-05_JPRB,6.9694E-05_JPRB,5.9898E-05_JPRB,4.9265E-05_JPRB,&
564
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5529E-05_JPRB,3.7520E-05_JPRB,3.2469E-05_JPRB/)
565 KAO( :, 1, 6, 3) = (/&
566 & 4.1241E-05_JPRB,3.8825E-05_JPRB,3.4760E-05_JPRB,2.8889E-05_JPRB,1.6124E-05_JPRB,2.3998E-05_JPRB,&
567
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.9344E-05_JPRB,6.4810E-05_JPRB,4.4340E-06_JPRB/)
568 KAO( :, 2, 6, 3) = (/&
569 & 4.9399E-05_JPRB,4.6917E-05_JPRB,4.2198E-05_JPRB,3.6346E-05_JPRB,2.7704E-05_JPRB,1.8853E-05_JPRB,&
570
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8135E-05_JPRB,6.0892E-05_JPRB,8.2681E-06_JPRB/)
571 KAO( :, 3, 6, 3) = (/&
572 & 5.7861E-05_JPRB,5.5206E-05_JPRB,4.9718E-05_JPRB,4.3299E-05_JPRB,3.5690E-05_JPRB,2.2202E-05_JPRB,&
573
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1528E-05_JPRB,5.5484E-05_JPRB,1.3906E-05_JPRB/)
574 KAO( :, 4, 6, 3) = (/&
575 & 6.6294E-05_JPRB,6.3463E-05_JPRB,5.7396E-05_JPRB,5.0239E-05_JPRB,4.2302E-05_JPRB,3.1945E-05_JPRB,&
576
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0634E-05_JPRB,5.2274E-05_JPRB,2.1920E-05_JPRB/)
577 KAO( :, 5, 6, 3) = (/&
578 & 7.4664E-05_JPRB,7.1784E-05_JPRB,6.5151E-05_JPRB,5.7238E-05_JPRB,4.8740E-05_JPRB,3.9314E-05_JPRB,&
579
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3437E-05_JPRB,4.4846E-05_JPRB,3.3007E-05_JPRB/)
580 KAO( :, 1, 7, 3) = (/&
581 & 3.3565E-05_JPRB,3.1356E-05_JPRB,2.7729E-05_JPRB,1.9350E-05_JPRB,1.4415E-05_JPRB,3.7753E-05_JPRB,&
582
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.9102E-05_JPRB,6.2223E-05_JPRB,4.1072E-06_JPRB/)
583 KAO( :, 2, 7, 3) = (/&
584 & 4.0432E-05_JPRB,3.8210E-05_JPRB,3.4263E-05_JPRB,2.8707E-05_JPRB,1.6576E-05_JPRB,2.4516E-05_JPRB,&
585
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.1614E-05_JPRB,6.3419E-05_JPRB,8.0365E-06_JPRB/)
586 KAO( :, 3, 7, 3) = (/&
587 & 4.7650E-05_JPRB,4.5423E-05_JPRB,4.0777E-05_JPRB,3.5184E-05_JPRB,2.7131E-05_JPRB,1.8290E-05_JPRB,&
588
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3600E-05_JPRB,5.7557E-05_JPRB,1.3883E-05_JPRB/)
589 KAO( :, 4, 7, 3) = (/&
590 & 5.4916E-05_JPRB,5.2553E-05_JPRB,4.7306E-05_JPRB,4.1198E-05_JPRB,3.3969E-05_JPRB,2.0841E-05_JPRB,&
591
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8970E-05_JPRB,5.2203E-05_JPRB,2.2718E-05_JPRB/)
592 KAO( :, 5, 7, 3) = (/&
593 & 6.2191E-05_JPRB,5.9624E-05_JPRB,5.3859E-05_JPRB,4.7059E-05_JPRB,3.9626E-05_JPRB,3.0110E-05_JPRB,&
594
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8574E-05_JPRB,4.8026E-05_JPRB,3.5441E-05_JPRB/)
595 KAO( :, 1, 8, 3) = (/&
596 & 2.7226E-05_JPRB,2.5212E-05_JPRB,2.1382E-05_JPRB,1.0543E-05_JPRB,2.2029E-05_JPRB,5.3627E-05_JPRB,&
597
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.2097E-05_JPRB,5.8785E-05_JPRB,4.6971E-06_JPRB/)
598 KAO( :, 2, 8, 3) = (/&
599 & 3.3008E-05_JPRB,3.0976E-05_JPRB,2.7464E-05_JPRB,1.9851E-05_JPRB,1.5586E-05_JPRB,3.6260E-05_JPRB,&
600
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.0608E-05_JPRB,6.2688E-05_JPRB,9.0473E-06_JPRB/)
601 KAO( :, 3, 8, 3) = (/&
602 & 3.9152E-05_JPRB,3.7119E-05_JPRB,3.3223E-05_JPRB,2.7933E-05_JPRB,1.6165E-05_JPRB,2.3754E-05_JPRB,&
603
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.6757E-05_JPRB,6.1667E-05_JPRB,1.6403E-05_JPRB/)
604 KAO( :, 4, 8, 3) = (/&
605 & 4.5401E-05_JPRB,4.3320E-05_JPRB,3.8890E-05_JPRB,3.3512E-05_JPRB,2.5986E-05_JPRB,1.7686E-05_JPRB,&
606
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1699E-05_JPRB,5.5000E-05_JPRB,2.8038E-05_JPRB/)
607 KAO( :, 5, 8, 3) = (/&
608 & 5.1574E-05_JPRB,4.9405E-05_JPRB,4.4463E-05_JPRB,3.8672E-05_JPRB,3.1838E-05_JPRB,1.9274E-05_JPRB,&
609
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7957E-05_JPRB,4.8608E-05_JPRB,4.5414E-05_JPRB/)
610 KAO( :, 1, 9, 3) = (/&
611 & 2.1974E-05_JPRB,2.0130E-05_JPRB,1.3358E-05_JPRB,1.2253E-05_JPRB,3.2656E-05_JPRB,7.0337E-05_JPRB,&
612
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.9242E-05_JPRB,5.7837E-05_JPRB,9.3121E-06_JPRB/)
613 KAO( :, 2, 9, 3) = (/&
614 & 2.6942E-05_JPRB,2.5061E-05_JPRB,2.1391E-05_JPRB,1.1226E-05_JPRB,2.1710E-05_JPRB,5.1789E-05_JPRB,&
615
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.4746E-05_JPRB,5.8409E-05_JPRB,1.8445E-05_JPRB/)
616 KAO( :, 3, 9, 3) = (/&
617 & 3.2174E-05_JPRB,3.0300E-05_JPRB,2.6794E-05_JPRB,1.9848E-05_JPRB,1.5650E-05_JPRB,3.5796E-05_JPRB,&
618
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3518E-05_JPRB,6.2556E-05_JPRB,3.5097E-05_JPRB/)
619 KAO( :, 4, 9, 3) = (/&
620 & 3.7549E-05_JPRB,3.5640E-05_JPRB,3.1882E-05_JPRB,2.6804E-05_JPRB,1.5301E-05_JPRB,2.3066E-05_JPRB,&
621
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1951E-05_JPRB,5.9042E-05_JPRB,6.2870E-05_JPRB/)
622 KAO( :, 5, 9, 3) = (/&
623 & 4.2852E-05_JPRB,4.0889E-05_JPRB,3.6715E-05_JPRB,3.1666E-05_JPRB,2.4183E-05_JPRB,1.7177E-05_JPRB,&
624
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0166E-05_JPRB,5.1290E-05_JPRB,1.0621E-04_JPRB/)
625 KAO( :, 1,10, 3) = (/&
626 & 1.7885E-05_JPRB,1.6093E-05_JPRB,7.4609E-06_JPRB,1.9809E-05_JPRB,4.8743E-05_JPRB,8.4191E-05_JPRB,&
627
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.7811E-05_JPRB,5.7087E-05_JPRB,2.4684E-05_JPRB/)
628 KAO( :, 2,10, 3) = (/&
629 & 2.2205E-05_JPRB,2.0473E-05_JPRB,1.4192E-05_JPRB,1.3653E-05_JPRB,3.3673E-05_JPRB,6.6332E-05_JPRB,&
630
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.1889E-05_JPRB,5.8933E-05_JPRB,4.8726E-05_JPRB/)
631 KAO( :, 3,10, 3) = (/&
632 & 2.6710E-05_JPRB,2.4979E-05_JPRB,2.1384E-05_JPRB,1.1205E-05_JPRB,2.2836E-05_JPRB,5.0904E-05_JPRB,&
633
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.7817E-05_JPRB,6.0017E-05_JPRB,9.5318E-05_JPRB/)
634 KAO( :, 4,10, 3) = (/&
635 & 3.1308E-05_JPRB,2.9540E-05_JPRB,2.6146E-05_JPRB,1.9462E-05_JPRB,1.5742E-05_JPRB,3.6775E-05_JPRB,&
636
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7447E-05_JPRB,6.0670E-05_JPRB,1.7750E-04_JPRB/)
637 KAO( :, 5,10, 3) = (/&
638 & 3.5884E-05_JPRB,3.4076E-05_JPRB,3.0469E-05_JPRB,2.5574E-05_JPRB,1.4532E-05_JPRB,2.3848E-05_JPRB,&
639
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8505E-05_JPRB,5.5852E-05_JPRB,3.1067E-04_JPRB/)
640 KAO( :, 1,11, 3) = (/&
641 & 1.6247E-05_JPRB,1.4357E-05_JPRB,6.7662E-06_JPRB,2.3639E-05_JPRB,5.5683E-05_JPRB,8.1956E-05_JPRB,&
642
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.4483E-05_JPRB,5.8077E-05_JPRB,3.4483E-05_JPRB/)
643 KAO( :, 2,11, 3) = (/&
644 & 2.0083E-05_JPRB,1.8438E-05_JPRB,1.1223E-05_JPRB,1.6583E-05_JPRB,3.8809E-05_JPRB,6.7379E-05_JPRB,&
645
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.0717E-05_JPRB,5.8833E-05_JPRB,6.8180E-05_JPRB/)
646 KAO( :, 3,11, 3) = (/&
647 & 2.4035E-05_JPRB,2.2414E-05_JPRB,1.8252E-05_JPRB,1.1545E-05_JPRB,2.7168E-05_JPRB,5.4230E-05_JPRB,&
648
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 6.6296E-05_JPRB,5.8218E-05_JPRB,1.3381E-04_JPRB/)
649
650
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART2',1,ZHOOK_HANDLE)
651 1 END SUBROUTINE PART2
652
653
654 1 SUBROUTINE PART3
655
656 REAL(KIND=JPRB) :: ZHOOK_HANDLE
657
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART3',0,ZHOOK_HANDLE)
658
659
660 KAO( :, 4,11, 3) = (/&
661 & 2.8028E-05_JPRB,2.6371E-05_JPRB,2.3077E-05_JPRB,1.4565E-05_JPRB,1.8361E-05_JPRB,4.2537E-05_JPRB,&
662
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.6345E-05_JPRB,5.9076E-05_JPRB,2.5000E-04_JPRB/)
663 KAO( :, 5,11, 3) = (/&
664 & 3.1996E-05_JPRB,3.0330E-05_JPRB,2.7020E-05_JPRB,2.1917E-05_JPRB,1.3395E-05_JPRB,2.9523E-05_JPRB,&
665
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8541E-05_JPRB,5.5094E-05_JPRB,4.3853E-04_JPRB/)
666 KAO( :, 1,12, 3) = (/&
667 & 1.4787E-05_JPRB,1.2868E-05_JPRB,7.7779E-06_JPRB,2.3775E-05_JPRB,5.3535E-05_JPRB,7.5004E-05_JPRB,&
668
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.6201E-05_JPRB,6.0383E-05_JPRB,3.6484E-05_JPRB/)
669 KAO( :, 2,12, 3) = (/&
670 & 1.8188E-05_JPRB,1.6624E-05_JPRB,9.6989E-06_JPRB,1.6809E-05_JPRB,3.8801E-05_JPRB,6.1756E-05_JPRB,&
671
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.3880E-05_JPRB,5.7828E-05_JPRB,7.2267E-05_JPRB/)
672 KAO( :, 3,12, 3) = (/&
673 & 2.1698E-05_JPRB,2.0162E-05_JPRB,1.6039E-05_JPRB,1.1681E-05_JPRB,2.6941E-05_JPRB,5.0140E-05_JPRB,&
674
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0455E-05_JPRB,5.6955E-05_JPRB,1.4213E-04_JPRB/)
675 KAO( :, 4,12, 3) = (/&
676 & 2.5223E-05_JPRB,2.3667E-05_JPRB,2.0595E-05_JPRB,1.1968E-05_JPRB,1.8179E-05_JPRB,4.0062E-05_JPRB,&
677
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0860E-05_JPRB,5.5338E-05_JPRB,2.6585E-04_JPRB/)
678 KAO( :, 5,12, 3) = (/&
679 & 2.8679E-05_JPRB,2.7160E-05_JPRB,2.4085E-05_JPRB,1.8993E-05_JPRB,1.3232E-05_JPRB,3.0080E-05_JPRB,&
680
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4162E-05_JPRB,5.0190E-05_JPRB,4.6593E-04_JPRB/)
681 KAO( :, 1,13, 3) = (/&
682 & 1.3378E-05_JPRB,1.1412E-05_JPRB,8.0344E-06_JPRB,2.3863E-05_JPRB,5.0631E-05_JPRB,6.7851E-05_JPRB,&
683
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.7279E-05_JPRB,5.9944E-05_JPRB,3.1248E-05_JPRB/)
684 KAO( :, 2,13, 3) = (/&
685 & 1.6405E-05_JPRB,1.4918E-05_JPRB,8.1452E-06_JPRB,1.7072E-05_JPRB,3.8399E-05_JPRB,5.6349E-05_JPRB,&
686
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.7351E-05_JPRB,5.6397E-05_JPRB,6.1993E-05_JPRB/)
687 KAO( :, 3,13, 3) = (/&
688 & 1.9514E-05_JPRB,1.8083E-05_JPRB,1.3959E-05_JPRB,1.1780E-05_JPRB,2.7506E-05_JPRB,4.6033E-05_JPRB,&
689
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5011E-05_JPRB,5.3246E-05_JPRB,1.2205E-04_JPRB/)
690 KAO( :, 4,13, 3) = (/&
691 & 2.2612E-05_JPRB,2.1175E-05_JPRB,1.8198E-05_JPRB,9.8216E-06_JPRB,1.8940E-05_JPRB,3.7116E-05_JPRB,&
692
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6044E-05_JPRB,5.0287E-05_JPRB,2.2822E-04_JPRB/)
693 KAO( :, 5,13, 3) = (/&
694 & 2.5652E-05_JPRB,2.4254E-05_JPRB,2.1392E-05_JPRB,1.5930E-05_JPRB,1.2761E-05_JPRB,2.9362E-05_JPRB,&
695
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0037E-05_JPRB,4.5639E-05_JPRB,3.9941E-04_JPRB/)
696 KAO( :, 1, 1, 4) = (/&
697 & 1.9325E-04_JPRB,1.8065E-04_JPRB,1.6180E-04_JPRB,1.4199E-04_JPRB,1.2006E-04_JPRB,9.6342E-05_JPRB,&
698
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5622E-05_JPRB,4.8423E-05_JPRB,3.6972E-05_JPRB/)
699 KAO( :, 2, 1, 4) = (/&
700 & 2.0819E-04_JPRB,1.9606E-04_JPRB,1.7737E-04_JPRB,1.5604E-04_JPRB,1.3291E-04_JPRB,1.0794E-04_JPRB,&
701
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.9216E-05_JPRB,4.1605E-05_JPRB,3.5731E-05_JPRB/)
702 KAO( :, 3, 1, 4) = (/&
703 & 2.2206E-04_JPRB,2.1170E-04_JPRB,1.9336E-04_JPRB,1.7130E-04_JPRB,1.4701E-04_JPRB,1.2089E-04_JPRB,&
704
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.0968E-05_JPRB,4.3271E-05_JPRB,3.0303E-05_JPRB/)
705 KAO( :, 4, 1, 4) = (/&
706 & 2.3676E-04_JPRB,2.2953E-04_JPRB,2.1085E-04_JPRB,1.8785E-04_JPRB,1.6294E-04_JPRB,1.3496E-04_JPRB,&
707
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0281E-04_JPRB,6.1284E-05_JPRB,3.2172E-05_JPRB/)
708 KAO( :, 5, 1, 4) = (/&
709 & 2.5437E-04_JPRB,2.4947E-04_JPRB,2.3011E-04_JPRB,2.0700E-04_JPRB,1.8097E-04_JPRB,1.5051E-04_JPRB,&
710
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1633E-04_JPRB,7.7203E-05_JPRB,5.3094E-05_JPRB/)
711 KAO( :, 1, 2, 4) = (/&
712 & 1.7573E-04_JPRB,1.6392E-04_JPRB,1.4659E-04_JPRB,1.2809E-04_JPRB,1.0782E-04_JPRB,8.5648E-05_JPRB,&
713
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2006E-05_JPRB,5.2667E-05_JPRB,2.6840E-05_JPRB/)
714 KAO( :, 2, 2, 4) = (/&
715 & 1.8913E-04_JPRB,1.7769E-04_JPRB,1.6041E-04_JPRB,1.4067E-04_JPRB,1.1911E-04_JPRB,9.5721E-05_JPRB,&
716
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.8639E-05_JPRB,4.4992E-05_JPRB,2.4069E-05_JPRB/)
717 KAO( :, 3, 2, 4) = (/&
718 & 2.0133E-04_JPRB,1.9150E-04_JPRB,1.7426E-04_JPRB,1.5374E-04_JPRB,1.3095E-04_JPRB,1.0674E-04_JPRB,&
719
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.9754E-05_JPRB,3.2688E-05_JPRB,1.8110E-05_JPRB/)
720 KAO( :, 4, 2, 4) = (/&
721 & 2.1403E-04_JPRB,2.0644E-04_JPRB,1.8885E-04_JPRB,1.6750E-04_JPRB,1.4394E-04_JPRB,1.1875E-04_JPRB,&
722
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.9867E-05_JPRB,4.7809E-05_JPRB,3.1086E-05_JPRB/)
723 KAO( :, 5, 2, 4) = (/&
724 & 2.2856E-04_JPRB,2.2298E-04_JPRB,2.0481E-04_JPRB,1.8286E-04_JPRB,1.5862E-04_JPRB,1.3164E-04_JPRB,&
725
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0114E-04_JPRB,6.3503E-05_JPRB,4.8865E-05_JPRB/)
726 KAO( :, 1, 3, 4) = (/&
727 & 1.5562E-04_JPRB,1.4484E-04_JPRB,1.2927E-04_JPRB,1.1236E-04_JPRB,9.3995E-05_JPRB,7.3269E-05_JPRB,&
728
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7797E-05_JPRB,5.7431E-05_JPRB,1.5095E-05_JPRB/)
729 KAO( :, 2, 3, 4) = (/&
730 & 1.6743E-04_JPRB,1.5710E-04_JPRB,1.4113E-04_JPRB,1.2321E-04_JPRB,1.0375E-04_JPRB,8.2299E-05_JPRB,&
731
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2915E-05_JPRB,4.4705E-05_JPRB,1.4179E-05_JPRB/)
732 KAO( :, 3, 3, 4) = (/&
733 & 1.7855E-04_JPRB,1.6918E-04_JPRB,1.5296E-04_JPRB,1.3430E-04_JPRB,1.1381E-04_JPRB,9.1766E-05_JPRB,&
734
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6891E-05_JPRB,3.9451E-05_JPRB,2.0319E-05_JPRB/)
735 KAO( :, 4, 3, 4) = (/&
736 & 1.8934E-04_JPRB,1.8180E-04_JPRB,1.6533E-04_JPRB,1.4585E-04_JPRB,1.2452E-04_JPRB,1.0168E-04_JPRB,&
737
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.6248E-05_JPRB,3.2208E-05_JPRB,3.3927E-05_JPRB/)
738 KAO( :, 5, 3, 4) = (/&
739 & 2.0107E-04_JPRB,1.9484E-04_JPRB,1.7806E-04_JPRB,1.5818E-04_JPRB,1.3631E-04_JPRB,1.1252E-04_JPRB,&
740
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.5478E-05_JPRB,4.8964E-05_JPRB,4.8647E-05_JPRB/)
741 KAO( :, 1, 4, 4) = (/&
742 & 1.3687E-04_JPRB,1.2644E-04_JPRB,1.1299E-04_JPRB,9.7757E-05_JPRB,8.1171E-05_JPRB,6.0079E-05_JPRB,&
743
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3581E-05_JPRB,5.5796E-05_JPRB,9.0880E-06_JPRB/)
744 KAO( :, 2, 4, 4) = (/&
745 & 1.4693E-04_JPRB,1.3749E-04_JPRB,1.2327E-04_JPRB,1.0708E-04_JPRB,8.9715E-05_JPRB,7.0113E-05_JPRB,&
746
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5389E-05_JPRB,5.3371E-05_JPRB,1.3014E-05_JPRB/)
747 KAO( :, 3, 4, 4) = (/&
748 & 1.5672E-04_JPRB,1.4837E-04_JPRB,1.3344E-04_JPRB,1.1660E-04_JPRB,9.8197E-05_JPRB,7.8371E-05_JPRB,&
749
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1608E-05_JPRB,4.1358E-05_JPRB,2.3902E-05_JPRB/)
750 KAO( :, 4, 4, 4) = (/&
751 & 1.6639E-04_JPRB,1.5936E-04_JPRB,1.4405E-04_JPRB,1.2651E-04_JPRB,1.0733E-04_JPRB,8.6606E-05_JPRB,&
752
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3258E-05_JPRB,3.2371E-05_JPRB,3.6595E-05_JPRB/)
753 KAO( :, 5, 4, 4) = (/&
754 & 1.7628E-04_JPRB,1.7040E-04_JPRB,1.5502E-04_JPRB,1.3697E-04_JPRB,1.1689E-04_JPRB,9.5499E-05_JPRB,&
755
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.1870E-05_JPRB,3.2326E-05_JPRB,5.1692E-05_JPRB/)
756 KAO( :, 1, 5, 4) = (/&
757 & 1.2014E-04_JPRB,1.0999E-04_JPRB,9.8155E-05_JPRB,8.4680E-05_JPRB,6.9013E-05_JPRB,3.7866E-05_JPRB,&
758
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6216E-05_JPRB,5.4078E-05_JPRB,7.0562E-06_JPRB/)
759 KAO( :, 2, 5, 4) = (/&
760 & 1.2869E-04_JPRB,1.1940E-04_JPRB,1.0711E-04_JPRB,9.2677E-05_JPRB,7.7027E-05_JPRB,5.7820E-05_JPRB,&
761
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1601E-05_JPRB,5.4237E-05_JPRB,1.5420E-05_JPRB/)
762 KAO( :, 3, 5, 4) = (/&
763 & 1.3705E-04_JPRB,1.2928E-04_JPRB,1.1605E-04_JPRB,1.0090E-04_JPRB,8.4608E-05_JPRB,6.6395E-05_JPRB,&
764
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0335E-05_JPRB,4.8756E-05_JPRB,2.5527E-05_JPRB/)
765 KAO( :, 4, 5, 4) = (/&
766 & 1.4539E-04_JPRB,1.3907E-04_JPRB,1.2508E-04_JPRB,1.0941E-04_JPRB,9.2394E-05_JPRB,7.3775E-05_JPRB,&
767
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9339E-05_JPRB,4.0777E-05_JPRB,3.8427E-05_JPRB/)
768 KAO( :, 5, 5, 4) = (/&
769 & 1.5402E-04_JPRB,1.4864E-04_JPRB,1.3443E-04_JPRB,1.1832E-04_JPRB,1.0042E-04_JPRB,8.1145E-05_JPRB,&
770
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.9883E-05_JPRB,2.8598E-05_JPRB,5.5173E-05_JPRB/)
771 KAO( :, 1, 6, 4) = (/&
772 & 1.0508E-04_JPRB,9.5482E-05_JPRB,8.4601E-05_JPRB,7.2633E-05_JPRB,5.7469E-05_JPRB,2.8022E-05_JPRB,&
773
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0470E-05_JPRB,5.5709E-05_JPRB,8.4537E-06_JPRB/)
774 KAO( :, 2, 6, 4) = (/&
775 & 1.1254E-04_JPRB,1.0355E-04_JPRB,9.2576E-05_JPRB,7.9894E-05_JPRB,6.5248E-05_JPRB,3.5620E-05_JPRB,&
776
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1186E-05_JPRB,5.3203E-05_JPRB,1.5781E-05_JPRB/)
777 KAO( :, 3, 6, 4) = (/&
778 & 1.1968E-04_JPRB,1.1191E-04_JPRB,1.0054E-04_JPRB,8.6961E-05_JPRB,7.2380E-05_JPRB,5.4688E-05_JPRB,&
779
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8839E-05_JPRB,5.2690E-05_JPRB,2.5759E-05_JPRB/)
780 KAO( :, 4, 6, 4) = (/&
781 & 1.2668E-04_JPRB,1.2066E-04_JPRB,1.0839E-04_JPRB,9.4280E-05_JPRB,7.9174E-05_JPRB,6.2217E-05_JPRB,&
782
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9595E-05_JPRB,4.6245E-05_JPRB,3.9594E-05_JPRB/)
783 KAO( :, 5, 6, 4) = (/&
784 & 1.3386E-04_JPRB,1.2916E-04_JPRB,1.1625E-04_JPRB,1.0183E-04_JPRB,8.5941E-05_JPRB,6.8663E-05_JPRB,&
785
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7108E-05_JPRB,3.8925E-05_JPRB,5.8371E-05_JPRB/)
786 KAO( :, 1, 7, 4) = (/&
787 & 9.1290E-05_JPRB,8.2455E-05_JPRB,7.2640E-05_JPRB,6.1602E-05_JPRB,3.5951E-05_JPRB,3.2065E-05_JPRB,&
788
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.9438E-05_JPRB,5.4588E-05_JPRB,8.8732E-06_JPRB/)
789 KAO( :, 2, 7, 4) = (/&
790 & 9.8266E-05_JPRB,8.9923E-05_JPRB,7.9846E-05_JPRB,6.8611E-05_JPRB,5.4855E-05_JPRB,2.5347E-05_JPRB,&
791
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3484E-05_JPRB,5.4646E-05_JPRB,1.6319E-05_JPRB/)
792 KAO( :, 3, 7, 4) = (/&
793 & 1.0452E-04_JPRB,9.6912E-05_JPRB,8.6790E-05_JPRB,7.4880E-05_JPRB,6.1588E-05_JPRB,3.4215E-05_JPRB,&
794
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8465E-05_JPRB,5.3097E-05_JPRB,2.7544E-05_JPRB/)
795 KAO( :, 4, 7, 4) = (/&
796 & 1.1064E-04_JPRB,1.0436E-04_JPRB,9.3727E-05_JPRB,8.1191E-05_JPRB,6.7704E-05_JPRB,5.1369E-05_JPRB,&
797
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6755E-05_JPRB,5.1792E-05_JPRB,4.3707E-05_JPRB/)
798 KAO( :, 5, 7, 4) = (/&
799 & 1.1674E-04_JPRB,1.1189E-04_JPRB,1.0064E-04_JPRB,8.7738E-05_JPRB,7.3682E-05_JPRB,5.8032E-05_JPRB,&
800
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8026E-05_JPRB,4.3741E-05_JPRB,6.6125E-05_JPRB/)
801 KAO( :, 1, 8, 4) = (/&
802 & 7.8671E-05_JPRB,7.0723E-05_JPRB,6.1903E-05_JPRB,5.0899E-05_JPRB,2.5388E-05_JPRB,4.7045E-05_JPRB,&
803
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.3139E-05_JPRB,5.2475E-05_JPRB,1.0506E-05_JPRB/)
804 KAO( :, 2, 8, 4) = (/&
805 & 8.5114E-05_JPRB,7.7503E-05_JPRB,6.8369E-05_JPRB,5.8071E-05_JPRB,3.2941E-05_JPRB,3.1252E-05_JPRB,&
806
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5972E-05_JPRB,5.4053E-05_JPRB,1.9913E-05_JPRB/)
807 KAO( :, 3, 8, 4) = (/&
808 & 9.0774E-05_JPRB,8.3700E-05_JPRB,7.4489E-05_JPRB,6.3931E-05_JPRB,5.1217E-05_JPRB,2.3975E-05_JPRB,&
809
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9768E-05_JPRB,5.3114E-05_JPRB,3.5011E-05_JPRB/)
810 KAO( :, 4, 8, 4) = (/&
811 & 9.6188E-05_JPRB,9.0023E-05_JPRB,8.0588E-05_JPRB,6.9637E-05_JPRB,5.7276E-05_JPRB,3.0654E-05_JPRB,&
812
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6814E-05_JPRB,5.0886E-05_JPRB,5.7647E-05_JPRB/)
813 KAO( :, 5, 8, 4) = (/&
814 & 1.0147E-04_JPRB,9.6459E-05_JPRB,8.6744E-05_JPRB,7.5335E-05_JPRB,6.2848E-05_JPRB,4.7544E-05_JPRB,&
815
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4830E-05_JPRB,4.9742E-05_JPRB,8.9972E-05_JPRB/)
816 KAO( :, 1, 9, 4) = (/&
817 & 6.7736E-05_JPRB,6.0618E-05_JPRB,5.2744E-05_JPRB,3.0920E-05_JPRB,2.9239E-05_JPRB,6.2840E-05_JPRB,&
818
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.2889E-05_JPRB,5.0470E-05_JPRB,2.2355E-05_JPRB/)
819 KAO( :, 2, 9, 4) = (/&
820 & 7.3171E-05_JPRB,6.6259E-05_JPRB,5.8117E-05_JPRB,4.7578E-05_JPRB,2.3188E-05_JPRB,4.4116E-05_JPRB,&
821
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.7151E-05_JPRB,5.4835E-05_JPRB,4.4341E-05_JPRB/)
822 KAO( :, 3, 9, 4) = (/&
823 & 7.8488E-05_JPRB,7.2012E-05_JPRB,6.3679E-05_JPRB,5.4052E-05_JPRB,2.9892E-05_JPRB,3.0664E-05_JPRB,&
824
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0561E-05_JPRB,5.3817E-05_JPRB,8.1564E-05_JPRB/)
825 KAO( :, 4, 9, 4) = (/&
826 & 8.3263E-05_JPRB,7.7446E-05_JPRB,6.8972E-05_JPRB,5.9229E-05_JPRB,4.7000E-05_JPRB,2.3105E-05_JPRB,&
827
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7608E-05_JPRB,5.0373E-05_JPRB,1.4008E-04_JPRB/)
828 KAO( :, 5, 9, 4) = (/&
829 & 8.7956E-05_JPRB,8.2925E-05_JPRB,7.4329E-05_JPRB,6.4343E-05_JPRB,5.3101E-05_JPRB,2.7223E-05_JPRB,&
830
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3997E-05_JPRB,5.1225E-05_JPRB,2.2664E-04_JPRB/)
831 KAO( :, 1,10, 4) = (/&
832 & 5.8447E-05_JPRB,5.2123E-05_JPRB,4.4386E-05_JPRB,2.1253E-05_JPRB,4.1633E-05_JPRB,7.5363E-05_JPRB,&
833
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.7685E-05_JPRB,4.9222E-05_JPRB,5.9155E-05_JPRB/)
834 KAO( :, 2,10, 4) = (/&
835 & 6.2971E-05_JPRB,5.6773E-05_JPRB,4.9349E-05_JPRB,2.7108E-05_JPRB,2.8492E-05_JPRB,5.8974E-05_JPRB,&
836
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.8305E-05_JPRB,5.1607E-05_JPRB,1.2250E-04_JPRB/)
837 KAO( :, 3,10, 4) = (/&
838 & 6.7713E-05_JPRB,6.1803E-05_JPRB,5.4313E-05_JPRB,4.4294E-05_JPRB,2.2166E-05_JPRB,4.3639E-05_JPRB,&
839
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.2310E-05_JPRB,5.3792E-05_JPRB,2.3595E-04_JPRB/)
840 KAO( :, 4,10, 4) = (/&
841 & 7.2017E-05_JPRB,6.6651E-05_JPRB,5.9032E-05_JPRB,5.0145E-05_JPRB,2.5984E-05_JPRB,3.1163E-05_JPRB,&
842
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5814E-05_JPRB,5.4096E-05_JPRB,4.2155E-04_JPRB/)
843 KAO( :, 5,10, 4) = (/&
844 & 7.6122E-05_JPRB,7.1340E-05_JPRB,6.3672E-05_JPRB,5.4807E-05_JPRB,4.2703E-05_JPRB,2.2571E-05_JPRB,&
845
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5447E-05_JPRB,5.0941E-05_JPRB,7.0536E-04_JPRB/)
846 KAO( :, 1,11, 4) = (/&
847 & 5.1997E-05_JPRB,4.6399E-05_JPRB,3.7006E-05_JPRB,2.2118E-05_JPRB,4.9070E-05_JPRB,8.0297E-05_JPRB,&
848
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.7665E-05_JPRB,4.9036E-05_JPRB,8.3819E-05_JPRB/)
849 KAO( :, 2,11, 4) = (/&
850 & 5.5995E-05_JPRB,5.0499E-05_JPRB,4.3536E-05_JPRB,1.8160E-05_JPRB,3.3942E-05_JPRB,6.1798E-05_JPRB,&
851
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.7929E-05_JPRB,5.1899E-05_JPRB,1.7378E-04_JPRB/)
852 KAO( :, 3,11, 4) = (/&
853 & 6.0050E-05_JPRB,5.4855E-05_JPRB,4.8042E-05_JPRB,3.2999E-05_JPRB,2.4599E-05_JPRB,4.8087E-05_JPRB,&
854
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.2580E-05_JPRB,5.4376E-05_JPRB,3.3527E-04_JPRB/)
855 KAO( :, 4,11, 4) = (/&
856 & 6.3834E-05_JPRB,5.9102E-05_JPRB,5.2252E-05_JPRB,4.3696E-05_JPRB,1.9003E-05_JPRB,3.4301E-05_JPRB,&
857
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7788E-05_JPRB,5.3890E-05_JPRB,5.9988E-04_JPRB/)
858 KAO( :, 5,11, 4) = (/&
859 & 6.7488E-05_JPRB,6.3205E-05_JPRB,5.6377E-05_JPRB,4.8245E-05_JPRB,3.1229E-05_JPRB,2.6140E-05_JPRB,&
860
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5484E-05_JPRB,5.1296E-05_JPRB,1.0059E-03_JPRB/)
861 KAO( :, 1,12, 4) = (/&
862 & 4.6056E-05_JPRB,4.1083E-05_JPRB,2.9802E-05_JPRB,2.2251E-05_JPRB,4.6624E-05_JPRB,7.2962E-05_JPRB,&
863
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.3907E-05_JPRB,4.7563E-05_JPRB,8.9454E-05_JPRB/)
864 KAO( :, 2,12, 4) = (/&
865 & 4.9615E-05_JPRB,4.4762E-05_JPRB,3.8254E-05_JPRB,1.6590E-05_JPRB,3.3432E-05_JPRB,5.6542E-05_JPRB,&
866
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.1508E-05_JPRB,5.1901E-05_JPRB,1.8559E-04_JPRB/)
867 KAO( :, 3,12, 4) = (/&
868 & 5.3180E-05_JPRB,4.8610E-05_JPRB,4.2465E-05_JPRB,2.5666E-05_JPRB,2.4567E-05_JPRB,4.4887E-05_JPRB,&
869
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5994E-05_JPRB,5.4335E-05_JPRB,3.5825E-04_JPRB/)
870 KAO( :, 4,12, 4) = (/&
871 & 5.6562E-05_JPRB,5.2350E-05_JPRB,4.6232E-05_JPRB,3.8181E-05_JPRB,1.8227E-05_JPRB,3.2932E-05_JPRB,&
872
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2904E-05_JPRB,5.3475E-05_JPRB,6.4181E-04_JPRB/)
873 KAO( :, 5,12, 4) = (/&
874 & 5.9903E-05_JPRB,5.6017E-05_JPRB,4.9962E-05_JPRB,4.2621E-05_JPRB,2.4691E-05_JPRB,2.4714E-05_JPRB,&
875
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1916E-05_JPRB,5.0025E-05_JPRB,1.0767E-03_JPRB/)
876 KAO( :, 1,13, 4) = (/&
877 & 4.0560E-05_JPRB,3.6160E-05_JPRB,2.3255E-05_JPRB,2.2093E-05_JPRB,4.4020E-05_JPRB,6.7810E-05_JPRB,&
878
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.9069E-05_JPRB,4.8857E-05_JPRB,7.6979E-05_JPRB/)
879 KAO( :, 2,13, 4) = (/&
880 & 4.3721E-05_JPRB,3.9447E-05_JPRB,3.3315E-05_JPRB,1.5735E-05_JPRB,3.2401E-05_JPRB,5.2990E-05_JPRB,&
881
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.4939E-05_JPRB,5.2762E-05_JPRB,1.5983E-04_JPRB/)
882 KAO( :, 3,13, 4) = (/&
883 & 4.6874E-05_JPRB,4.2856E-05_JPRB,3.7307E-05_JPRB,1.9448E-05_JPRB,2.3246E-05_JPRB,4.1872E-05_JPRB,&
884
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0127E-05_JPRB,5.4225E-05_JPRB,3.0871E-04_JPRB/)
885 KAO( :, 4,13, 4) = (/&
886 & 4.9922E-05_JPRB,4.6146E-05_JPRB,4.0717E-05_JPRB,3.2736E-05_JPRB,1.7797E-05_JPRB,3.1779E-05_JPRB,&
887
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8971E-05_JPRB,5.3750E-05_JPRB,5.5309E-04_JPRB/)
888 KAO( :, 5,13, 4) = (/&
889 & 5.3030E-05_JPRB,4.9529E-05_JPRB,4.4121E-05_JPRB,3.7423E-05_JPRB,1.9634E-05_JPRB,2.2842E-05_JPRB,&
890
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9348E-05_JPRB,4.8274E-05_JPRB,9.2736E-04_JPRB/)
891 KAO( :, 1, 1, 5) = (/&
892 & 2.7778E-04_JPRB,2.5521E-04_JPRB,2.2685E-04_JPRB,1.9591E-04_JPRB,1.6332E-04_JPRB,1.2879E-04_JPRB,&
893
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.0596E-05_JPRB,4.4043E-05_JPRB,3.2346E-05_JPRB/)
894 KAO( :, 2, 1, 5) = (/&
895 & 2.9066E-04_JPRB,2.6987E-04_JPRB,2.4077E-04_JPRB,2.0932E-04_JPRB,1.7577E-04_JPRB,1.4048E-04_JPRB,&
896
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0294E-04_JPRB,3.8809E-05_JPRB,2.9426E-05_JPRB/)
897 KAO( :, 3, 1, 5) = (/&
898 & 3.0544E-04_JPRB,2.8616E-04_JPRB,2.5754E-04_JPRB,2.2525E-04_JPRB,1.9101E-04_JPRB,1.5455E-04_JPRB,&
899
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1678E-04_JPRB,5.7173E-05_JPRB,3.3954E-05_JPRB/)
900 KAO( :, 4, 1, 5) = (/&
901 & 3.2184E-04_JPRB,3.0525E-04_JPRB,2.7707E-04_JPRB,2.4441E-04_JPRB,2.0932E-04_JPRB,1.7239E-04_JPRB,&
902
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3430E-04_JPRB,8.9432E-05_JPRB,5.9307E-05_JPRB/)
903 KAO( :, 5, 1, 5) = (/&
904 & 3.3997E-04_JPRB,3.2768E-04_JPRB,2.9971E-04_JPRB,2.6685E-04_JPRB,2.3158E-04_JPRB,1.9537E-04_JPRB,&
905
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5650E-04_JPRB,1.1300E-04_JPRB,9.1458E-05_JPRB/)
906 KAO( :, 1, 2, 5) = (/&
907 & 2.6036E-04_JPRB,2.3849E-04_JPRB,2.1215E-04_JPRB,1.8325E-04_JPRB,1.5238E-04_JPRB,1.1978E-04_JPRB,&
908
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.1666E-05_JPRB,4.4295E-05_JPRB,2.4496E-05_JPRB/)
909 KAO( :, 2, 2, 5) = (/&
910 & 2.7147E-04_JPRB,2.5141E-04_JPRB,2.2439E-04_JPRB,1.9462E-04_JPRB,1.6271E-04_JPRB,1.2925E-04_JPRB,&
911
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.2973E-05_JPRB,3.2500E-05_JPRB,1.9528E-05_JPRB/)
912 KAO( :, 3, 2, 5) = (/&
913 & 2.8407E-04_JPRB,2.6548E-04_JPRB,2.3846E-04_JPRB,2.0759E-04_JPRB,1.7524E-04_JPRB,1.4054E-04_JPRB,&
914
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0396E-04_JPRB,4.5395E-05_JPRB,3.3431E-05_JPRB/)
915 KAO( :, 4, 2, 5) = (/&
916 & 2.9719E-04_JPRB,2.8128E-04_JPRB,2.5423E-04_JPRB,2.2320E-04_JPRB,1.8996E-04_JPRB,1.5400E-04_JPRB,&
917
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1668E-04_JPRB,6.9584E-05_JPRB,5.7490E-05_JPRB/)
918 KAO( :, 5, 2, 5) = (/&
919 & 3.1122E-04_JPRB,2.9870E-04_JPRB,2.7220E-04_JPRB,2.4100E-04_JPRB,2.0649E-04_JPRB,1.7035E-04_JPRB,&
920
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3266E-04_JPRB,9.1999E-05_JPRB,8.3000E-05_JPRB/)
921 KAO( :, 1, 3, 5) = (/&
922 & 2.4050E-04_JPRB,2.1900E-04_JPRB,1.9501E-04_JPRB,1.6859E-04_JPRB,1.4005E-04_JPRB,1.0947E-04_JPRB,&
923
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4416E-05_JPRB,3.5695E-05_JPRB,1.3250E-05_JPRB/)
924 KAO( :, 2, 3, 5) = (/&
925 & 2.4980E-04_JPRB,2.3024E-04_JPRB,2.0600E-04_JPRB,1.7839E-04_JPRB,1.4857E-04_JPRB,1.1723E-04_JPRB,&
926
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.2222E-05_JPRB,4.3756E-05_JPRB,1.9778E-05_JPRB/)
927 KAO( :, 3, 3, 5) = (/&
928 & 2.5986E-04_JPRB,2.4240E-04_JPRB,2.1776E-04_JPRB,1.8907E-04_JPRB,1.5831E-04_JPRB,1.2594E-04_JPRB,&
929
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.1156E-05_JPRB,3.2284E-05_JPRB,3.8343E-05_JPRB/)
930 KAO( :, 4, 3, 5) = (/&
931 & 2.7050E-04_JPRB,2.5528E-04_JPRB,2.3027E-04_JPRB,2.0105E-04_JPRB,1.6973E-04_JPRB,1.3628E-04_JPRB,&
932
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0110E-04_JPRB,4.6885E-05_JPRB,5.9630E-05_JPRB/)
933 KAO( :, 5, 3, 5) = (/&
934 & 2.8151E-04_JPRB,2.6949E-04_JPRB,2.4440E-04_JPRB,2.1478E-04_JPRB,1.8246E-04_JPRB,1.4822E-04_JPRB,&
935
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1296E-04_JPRB,7.0463E-05_JPRB,8.2542E-05_JPRB/)
936 KAO( :, 1, 4, 5) = (/&
937 & 2.2167E-04_JPRB,2.0054E-04_JPRB,1.7755E-04_JPRB,1.5346E-04_JPRB,1.2760E-04_JPRB,9.8873E-05_JPRB,&
938
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0720E-05_JPRB,3.6076E-05_JPRB,1.0820E-05_JPRB/)
939 KAO( :, 2, 4, 5) = (/&
940 & 2.2949E-04_JPRB,2.0991E-04_JPRB,1.8792E-04_JPRB,1.6318E-04_JPRB,1.3546E-04_JPRB,1.0612E-04_JPRB,&
941
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.1178E-05_JPRB,4.0667E-05_JPRB,2.5683E-05_JPRB/)
942 KAO( :, 3, 4, 5) = (/&
943 & 2.3807E-04_JPRB,2.2061E-04_JPRB,1.9870E-04_JPRB,1.7224E-04_JPRB,1.4361E-04_JPRB,1.1345E-04_JPRB,&
944
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.0170E-05_JPRB,3.9940E-05_JPRB,4.2610E-05_JPRB/)
945 KAO( :, 4, 4, 5) = (/&
946 & 2.4662E-04_JPRB,2.3181E-04_JPRB,2.0905E-04_JPRB,1.8202E-04_JPRB,1.5268E-04_JPRB,1.2186E-04_JPRB,&
947
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 8.8749E-05_JPRB,3.2893E-05_JPRB,6.1830E-05_JPRB/)
948
949
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART3',1,ZHOOK_HANDLE)
950 1 END SUBROUTINE PART3
951
952
953 1 SUBROUTINE PART4
954
955 REAL(KIND=JPRB) :: ZHOOK_HANDLE
956
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART4',0,ZHOOK_HANDLE)
957
958
959 KAO( :, 5, 4, 5) = (/&
960 & 2.5546E-04_JPRB,2.4342E-04_JPRB,2.2022E-04_JPRB,1.9281E-04_JPRB,1.6313E-04_JPRB,1.3125E-04_JPRB,&
961
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.8124E-05_JPRB,4.6973E-05_JPRB,8.6084E-05_JPRB/)
962 KAO( :, 1, 5, 5) = (/&
963 & 2.0312E-04_JPRB,1.8300E-04_JPRB,1.6095E-04_JPRB,1.3872E-04_JPRB,1.1510E-04_JPRB,8.6738E-05_JPRB,&
964
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3892E-05_JPRB,4.1155E-05_JPRB,1.4610E-05_JPRB/)
965 KAO( :, 2, 5, 5) = (/&
966 & 2.1032E-04_JPRB,1.9153E-04_JPRB,1.7045E-04_JPRB,1.4818E-04_JPRB,1.2310E-04_JPRB,9.5120E-05_JPRB,&
967
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7530E-05_JPRB,4.0109E-05_JPRB,2.7956E-05_JPRB/)
968 KAO( :, 3, 5, 5) = (/&
969 & 2.1754E-04_JPRB,2.0013E-04_JPRB,1.8048E-04_JPRB,1.5683E-04_JPRB,1.3036E-04_JPRB,1.0212E-04_JPRB,&
970
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5559E-05_JPRB,4.4646E-05_JPRB,4.3990E-05_JPRB/)
971 KAO( :, 4, 5, 5) = (/&
972 & 2.2506E-04_JPRB,2.1008E-04_JPRB,1.8992E-04_JPRB,1.6512E-04_JPRB,1.3787E-04_JPRB,1.0933E-04_JPRB,&
973
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.7878E-05_JPRB,3.3941E-05_JPRB,6.4638E-05_JPRB/)
974 KAO( :, 5, 5, 5) = (/&
975 & 2.3238E-04_JPRB,2.2040E-04_JPRB,1.9936E-04_JPRB,1.7403E-04_JPRB,1.4649E-04_JPRB,1.1721E-04_JPRB,&
976
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.5745E-05_JPRB,3.1943E-05_JPRB,9.1486E-05_JPRB/)
977 KAO( :, 1, 6, 5) = (/&
978 & 1.8420E-04_JPRB,1.6521E-04_JPRB,1.4487E-04_JPRB,1.2401E-04_JPRB,1.0200E-04_JPRB,5.1119E-05_JPRB,&
979
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2764E-05_JPRB,4.0912E-05_JPRB,1.5202E-05_JPRB/)
980 KAO( :, 2, 6, 5) = (/&
981 & 1.9125E-04_JPRB,1.7344E-04_JPRB,1.5331E-04_JPRB,1.3274E-04_JPRB,1.1039E-04_JPRB,8.3040E-05_JPRB,&
982
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0684E-05_JPRB,4.1198E-05_JPRB,2.7867E-05_JPRB/)
983 KAO( :, 3, 6, 5) = (/&
984 & 1.9735E-04_JPRB,1.8080E-04_JPRB,1.6199E-04_JPRB,1.4097E-04_JPRB,1.1727E-04_JPRB,9.0932E-05_JPRB,&
985
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7180E-05_JPRB,4.3495E-05_JPRB,4.4553E-05_JPRB/)
986 KAO( :, 4, 6, 5) = (/&
987 & 2.0383E-04_JPRB,1.8894E-04_JPRB,1.7073E-04_JPRB,1.4876E-04_JPRB,1.2398E-04_JPRB,9.7753E-05_JPRB,&
988
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3121E-05_JPRB,4.1277E-05_JPRB,6.7315E-05_JPRB/)
989 KAO( :, 5, 6, 5) = (/&
990 & 2.1033E-04_JPRB,1.9804E-04_JPRB,1.7951E-04_JPRB,1.5655E-04_JPRB,1.3146E-04_JPRB,1.0454E-04_JPRB,&
991
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.4462E-05_JPRB,2.9067E-05_JPRB,9.7382E-05_JPRB/)
992 KAO( :, 1, 7, 5) = (/&
993 & 1.6701E-04_JPRB,1.4912E-04_JPRB,1.3042E-04_JPRB,1.1101E-04_JPRB,8.9476E-05_JPRB,4.0710E-05_JPRB,&
994
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0855E-05_JPRB,4.0116E-05_JPRB,1.6644E-05_JPRB/)
995 KAO( :, 2, 7, 5) = (/&
996 & 1.7267E-04_JPRB,1.5557E-04_JPRB,1.3718E-04_JPRB,1.1786E-04_JPRB,9.7049E-05_JPRB,4.9928E-05_JPRB,&
997
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8787E-05_JPRB,4.5062E-05_JPRB,2.9556E-05_JPRB/)
998 KAO( :, 3, 7, 5) = (/&
999 & 1.7837E-04_JPRB,1.6263E-04_JPRB,1.4469E-04_JPRB,1.2545E-04_JPRB,1.0416E-04_JPRB,7.8620E-05_JPRB,&
1000
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6425E-05_JPRB,4.0796E-05_JPRB,4.8760E-05_JPRB/)
1001 KAO( :, 4, 7, 5) = (/&
1002 & 1.8378E-04_JPRB,1.6956E-04_JPRB,1.5235E-04_JPRB,1.3267E-04_JPRB,1.1063E-04_JPRB,8.6254E-05_JPRB,&
1003
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2851E-05_JPRB,4.0620E-05_JPRB,7.6055E-05_JPRB/)
1004 KAO( :, 5, 7, 5) = (/&
1005 & 1.8944E-04_JPRB,1.7724E-04_JPRB,1.6021E-04_JPRB,1.4001E-04_JPRB,1.1733E-04_JPRB,9.2830E-05_JPRB,&
1006
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.1065E-05_JPRB,3.8081E-05_JPRB,1.1312E-04_JPRB/)
1007 KAO( :, 1, 8, 5) = (/&
1008 & 1.5130E-04_JPRB,1.3448E-04_JPRB,1.1721E-04_JPRB,9.9034E-05_JPRB,5.7155E-05_JPRB,4.5775E-05_JPRB,&
1009
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5418E-05_JPRB,3.6348E-05_JPRB,2.0483E-05_JPRB/)
1010 KAO( :, 2, 8, 5) = (/&
1011 & 1.5492E-04_JPRB,1.3874E-04_JPRB,1.2199E-04_JPRB,1.0406E-04_JPRB,8.3301E-05_JPRB,3.7776E-05_JPRB,&
1012
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8525E-05_JPRB,4.3657E-05_JPRB,3.7683E-05_JPRB/)
1013 KAO( :, 3, 8, 5) = (/&
1014 & 1.6015E-04_JPRB,1.4504E-04_JPRB,1.2855E-04_JPRB,1.1077E-04_JPRB,9.0857E-05_JPRB,4.6752E-05_JPRB,&
1015
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3822E-05_JPRB,4.5900E-05_JPRB,6.4480E-05_JPRB/)
1016 KAO( :, 4, 8, 5) = (/&
1017 & 1.6485E-04_JPRB,1.5131E-04_JPRB,1.3522E-04_JPRB,1.1731E-04_JPRB,9.7584E-05_JPRB,7.3940E-05_JPRB,&
1018
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2766E-05_JPRB,4.4537E-05_JPRB,1.0397E-04_JPRB/)
1019 KAO( :, 5, 8, 5) = (/&
1020 & 1.6974E-04_JPRB,1.5791E-04_JPRB,1.4195E-04_JPRB,1.2381E-04_JPRB,1.0390E-04_JPRB,8.1150E-05_JPRB,&
1021
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2012E-05_JPRB,4.1555E-05_JPRB,1.5936E-04_JPRB/)
1022 KAO( :, 1, 9, 5) = (/&
1023 & 1.3564E-04_JPRB,1.2012E-04_JPRB,1.0422E-04_JPRB,8.6571E-05_JPRB,3.4561E-05_JPRB,5.5358E-05_JPRB,&
1024
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.8138E-05_JPRB,3.3996E-05_JPRB,4.5162E-05_JPRB/)
1025 KAO( :, 2, 9, 5) = (/&
1026 & 1.3891E-04_JPRB,1.2385E-04_JPRB,1.0843E-04_JPRB,9.1664E-05_JPRB,5.0992E-05_JPRB,4.2386E-05_JPRB,&
1027
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5806E-05_JPRB,4.0485E-05_JPRB,8.7517E-05_JPRB/)
1028 KAO( :, 3, 9, 5) = (/&
1029 & 1.4289E-04_JPRB,1.2859E-04_JPRB,1.1355E-04_JPRB,9.7157E-05_JPRB,7.7469E-05_JPRB,3.4604E-05_JPRB,&
1030
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5697E-05_JPRB,4.6781E-05_JPRB,1.5660E-04_JPRB/)
1031 KAO( :, 4, 9, 5) = (/&
1032 & 1.4749E-04_JPRB,1.3449E-04_JPRB,1.1965E-04_JPRB,1.0332E-04_JPRB,8.5038E-05_JPRB,4.3487E-05_JPRB,&
1033
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9087E-05_JPRB,4.7631E-05_JPRB,2.6232E-04_JPRB/)
1034 KAO( :, 5, 9, 5) = (/&
1035 & 1.5175E-04_JPRB,1.4048E-04_JPRB,1.2566E-04_JPRB,1.0925E-04_JPRB,9.1216E-05_JPRB,6.9027E-05_JPRB,&
1036
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0570E-05_JPRB,4.2818E-05_JPRB,4.1578E-04_JPRB/)
1037 KAO( :, 1,10, 5) = (/&
1038 & 1.2050E-04_JPRB,1.0644E-04_JPRB,9.1895E-05_JPRB,5.4223E-05_JPRB,4.2282E-05_JPRB,7.1662E-05_JPRB,&
1039
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.3849E-05_JPRB,3.1216E-05_JPRB,1.2336E-04_JPRB/)
1040 KAO( :, 2,10, 5) = (/&
1041 & 1.2385E-04_JPRB,1.1007E-04_JPRB,9.5885E-05_JPRB,7.9074E-05_JPRB,3.2785E-05_JPRB,5.1790E-05_JPRB,&
1042
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.0330E-05_JPRB,3.8106E-05_JPRB,2.4914E-04_JPRB/)
1043 KAO( :, 3,10, 5) = (/&
1044 & 1.2701E-04_JPRB,1.1389E-04_JPRB,1.0009E-04_JPRB,8.4859E-05_JPRB,4.3697E-05_JPRB,3.8515E-05_JPRB,&
1045
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.4563E-05_JPRB,4.6857E-05_JPRB,4.6353E-04_JPRB/)
1046 KAO( :, 4,10, 5) = (/&
1047 & 1.3108E-04_JPRB,1.1889E-04_JPRB,1.0547E-04_JPRB,9.0382E-05_JPRB,7.1811E-05_JPRB,3.1846E-05_JPRB,&
1048
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3076E-05_JPRB,4.9334E-05_JPRB,8.0273E-04_JPRB/)
1049 KAO( :, 5,10, 5) = (/&
1050 & 1.3517E-04_JPRB,1.2455E-04_JPRB,1.1096E-04_JPRB,9.6119E-05_JPRB,7.9300E-05_JPRB,3.9467E-05_JPRB,&
1051
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6989E-05_JPRB,4.6816E-05_JPRB,1.3114E-03_JPRB/)
1052 KAO( :, 1,11, 5) = (/&
1053 & 1.0765E-04_JPRB,9.5133E-05_JPRB,8.1740E-05_JPRB,2.9684E-05_JPRB,4.4771E-05_JPRB,7.3844E-05_JPRB,&
1054
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.4458E-05_JPRB,3.2353E-05_JPRB,1.7556E-04_JPRB/)
1055 KAO( :, 2,11, 5) = (/&
1056 & 1.1086E-04_JPRB,9.8643E-05_JPRB,8.5755E-05_JPRB,6.3950E-05_JPRB,3.5072E-05_JPRB,5.6362E-05_JPRB,&
1057
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.3811E-05_JPRB,3.7974E-05_JPRB,3.5513E-04_JPRB/)
1058 KAO( :, 3,11, 5) = (/&
1059 & 1.1390E-04_JPRB,1.0226E-04_JPRB,8.9873E-05_JPRB,7.5337E-05_JPRB,2.7488E-05_JPRB,4.0668E-05_JPRB,&
1060
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6695E-05_JPRB,4.8469E-05_JPRB,6.6195E-04_JPRB/)
1061 KAO( :, 4,11, 5) = (/&
1062 & 1.1768E-04_JPRB,1.0695E-04_JPRB,9.4758E-05_JPRB,8.0812E-05_JPRB,5.6203E-05_JPRB,3.0959E-05_JPRB,&
1063
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4960E-05_JPRB,5.2325E-05_JPRB,1.1500E-03_JPRB/)
1064 KAO( :, 5,11, 5) = (/&
1065 & 1.2143E-04_JPRB,1.1200E-04_JPRB,9.9665E-05_JPRB,8.6317E-05_JPRB,7.0507E-05_JPRB,2.8241E-05_JPRB,&
1066
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0108E-05_JPRB,4.7823E-05_JPRB,1.8824E-03_JPRB/)
1067 KAO( :, 1,12, 5) = (/&
1068 & 9.5550E-05_JPRB,8.4510E-05_JPRB,7.2433E-05_JPRB,2.4695E-05_JPRB,4.1319E-05_JPRB,6.8965E-05_JPRB,&
1069
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.5836E-05_JPRB,3.3972E-05_JPRB,1.8803E-04_JPRB/)
1070 KAO( :, 2,12, 5) = (/&
1071 & 9.8585E-05_JPRB,8.7816E-05_JPRB,7.6262E-05_JPRB,5.0625E-05_JPRB,3.2099E-05_JPRB,5.2909E-05_JPRB,&
1072
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.1285E-05_JPRB,4.2092E-05_JPRB,3.8071E-04_JPRB/)
1073 KAO( :, 3,12, 5) = (/&
1074 & 1.0170E-04_JPRB,9.1397E-05_JPRB,8.0291E-05_JPRB,6.6609E-05_JPRB,2.6053E-05_JPRB,3.8656E-05_JPRB,&
1075
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.2061E-05_JPRB,5.0288E-05_JPRB,7.1091E-04_JPRB/)
1076 KAO( :, 4,12, 5) = (/&
1077 & 1.0532E-04_JPRB,9.5859E-05_JPRB,8.4741E-05_JPRB,7.2190E-05_JPRB,4.4571E-05_JPRB,2.9606E-05_JPRB,&
1078
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1144E-05_JPRB,5.0950E-05_JPRB,1.2367E-03_JPRB/)
1079 KAO( :, 5,12, 5) = (/&
1080 & 1.0873E-04_JPRB,1.0026E-04_JPRB,8.9123E-05_JPRB,7.7100E-05_JPRB,6.2475E-05_JPRB,2.4044E-05_JPRB,&
1081
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7811E-05_JPRB,4.5929E-05_JPRB,2.0278E-03_JPRB/)
1082 KAO( :, 1,13, 5) = (/&
1083 & 8.4205E-05_JPRB,7.4539E-05_JPRB,6.3467E-05_JPRB,2.3538E-05_JPRB,3.8325E-05_JPRB,6.4275E-05_JPRB,&
1084
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.5533E-05_JPRB,3.5671E-05_JPRB,1.6223E-04_JPRB/)
1085 KAO( :, 2,13, 5) = (/&
1086 & 8.7134E-05_JPRB,7.7658E-05_JPRB,6.7263E-05_JPRB,3.8163E-05_JPRB,2.9276E-05_JPRB,4.8144E-05_JPRB,&
1087
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6883E-05_JPRB,4.5962E-05_JPRB,3.2881E-04_JPRB/)
1088 KAO( :, 3,13, 5) = (/&
1089 & 9.0177E-05_JPRB,8.1122E-05_JPRB,7.1136E-05_JPRB,5.8053E-05_JPRB,2.4699E-05_JPRB,3.6684E-05_JPRB,&
1090
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7406E-05_JPRB,5.0678E-05_JPRB,6.1498E-04_JPRB/)
1091 KAO( :, 4,13, 5) = (/&
1092 & 9.3566E-05_JPRB,8.5217E-05_JPRB,7.5208E-05_JPRB,6.3816E-05_JPRB,3.3862E-05_JPRB,2.8346E-05_JPRB,&
1093
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7321E-05_JPRB,4.6618E-05_JPRB,1.0717E-03_JPRB/)
1094 KAO( :, 5,13, 5) = (/&
1095 & 9.6738E-05_JPRB,8.9098E-05_JPRB,7.9178E-05_JPRB,6.8356E-05_JPRB,5.4471E-05_JPRB,2.2350E-05_JPRB,&
1096
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5198E-05_JPRB,4.4559E-05_JPRB,1.7596E-03_JPRB/)
1097 KAO( :, 1, 1, 6) = (/&
1098 & 3.5218E-04_JPRB,3.2067E-04_JPRB,2.8542E-04_JPRB,2.4691E-04_JPRB,2.0715E-04_JPRB,1.6430E-04_JPRB,&
1099
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1630E-04_JPRB,3.0602E-05_JPRB,2.2334E-05_JPRB/)
1100 KAO( :, 2, 1, 6) = (/&
1101 & 3.6703E-04_JPRB,3.3779E-04_JPRB,3.0330E-04_JPRB,2.6523E-04_JPRB,2.2344E-04_JPRB,1.7999E-04_JPRB,&
1102
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3446E-04_JPRB,5.1639E-05_JPRB,3.3226E-05_JPRB/)
1103 KAO( :, 3, 1, 6) = (/&
1104 & 3.8585E-04_JPRB,3.5978E-04_JPRB,3.2593E-04_JPRB,2.8711E-04_JPRB,2.4473E-04_JPRB,2.0196E-04_JPRB,&
1105
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5783E-04_JPRB,1.0327E-04_JPRB,6.5420E-05_JPRB/)
1106 KAO( :, 4, 1, 6) = (/&
1107 & 4.0907E-04_JPRB,3.8577E-04_JPRB,3.5450E-04_JPRB,3.1632E-04_JPRB,2.7470E-04_JPRB,2.3182E-04_JPRB,&
1108
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8685E-04_JPRB,1.3638E-04_JPRB,1.1847E-04_JPRB/)
1109 KAO( :, 5, 1, 6) = (/&
1110 & 4.3737E-04_JPRB,4.1878E-04_JPRB,3.9158E-04_JPRB,3.5534E-04_JPRB,3.1369E-04_JPRB,2.6894E-04_JPRB,&
1111
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2111E-04_JPRB,1.7023E-04_JPRB,1.6126E-04_JPRB/)
1112 KAO( :, 1, 2, 6) = (/&
1113 & 3.3988E-04_JPRB,3.0828E-04_JPRB,2.7319E-04_JPRB,2.3566E-04_JPRB,1.9671E-04_JPRB,1.5488E-04_JPRB,&
1114
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0656E-04_JPRB,2.4639E-05_JPRB,2.0135E-05_JPRB/)
1115 KAO( :, 2, 2, 6) = (/&
1116 & 3.5074E-04_JPRB,3.2145E-04_JPRB,2.8720E-04_JPRB,2.5072E-04_JPRB,2.1014E-04_JPRB,1.6733E-04_JPRB,&
1117
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2121E-04_JPRB,3.9180E-05_JPRB,2.9901E-05_JPRB/)
1118 KAO( :, 3, 2, 6) = (/&
1119 & 3.6475E-04_JPRB,3.3829E-04_JPRB,3.0546E-04_JPRB,2.6776E-04_JPRB,2.2592E-04_JPRB,1.8277E-04_JPRB,&
1120
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3792E-04_JPRB,7.3527E-05_JPRB,6.9892E-05_JPRB/)
1121 KAO( :, 4, 2, 6) = (/&
1122 & 3.8225E-04_JPRB,3.5820E-04_JPRB,3.2688E-04_JPRB,2.8858E-04_JPRB,2.4665E-04_JPRB,2.0403E-04_JPRB,&
1123
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5963E-04_JPRB,1.1035E-04_JPRB,1.0774E-04_JPRB/)
1124 KAO( :, 5, 2, 6) = (/&
1125 & 4.0273E-04_JPRB,3.8268E-04_JPRB,3.5304E-04_JPRB,3.1570E-04_JPRB,2.7513E-04_JPRB,2.3154E-04_JPRB,&
1126
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8624E-04_JPRB,1.3783E-04_JPRB,1.4438E-04_JPRB/)
1127 KAO( :, 1, 3, 6) = (/&
1128 & 3.2586E-04_JPRB,2.9354E-04_JPRB,2.5840E-04_JPRB,2.2211E-04_JPRB,1.8493E-04_JPRB,1.4459E-04_JPRB,&
1129
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.3968E-05_JPRB,2.6836E-05_JPRB,1.7667E-05_JPRB/)
1130 KAO( :, 2, 3, 6) = (/&
1131 & 3.3335E-04_JPRB,3.0322E-04_JPRB,2.6938E-04_JPRB,2.3450E-04_JPRB,1.9584E-04_JPRB,1.5458E-04_JPRB,&
1132
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0872E-04_JPRB,2.7860E-05_JPRB,4.2305E-05_JPRB/)
1133 KAO( :, 3, 3, 6) = (/&
1134 & 3.4307E-04_JPRB,3.1560E-04_JPRB,2.8356E-04_JPRB,2.4811E-04_JPRB,2.0859E-04_JPRB,1.6657E-04_JPRB,&
1135
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2164E-04_JPRB,4.3049E-05_JPRB,7.4173E-05_JPRB/)
1136 KAO( :, 4, 3, 6) = (/&
1137 & 3.5510E-04_JPRB,3.3067E-04_JPRB,3.0030E-04_JPRB,2.6396E-04_JPRB,2.2347E-04_JPRB,1.8094E-04_JPRB,&
1138
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3617E-04_JPRB,8.0549E-05_JPRB,1.0462E-04_JPRB/)
1139 KAO( :, 5, 3, 6) = (/&
1140 & 3.6934E-04_JPRB,3.4886E-04_JPRB,3.1925E-04_JPRB,2.8285E-04_JPRB,2.4246E-04_JPRB,1.9904E-04_JPRB,&
1141
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5402E-04_JPRB,1.0740E-04_JPRB,1.4134E-04_JPRB/)
1142 KAO( :, 1, 4, 6) = (/&
1143 & 3.1202E-04_JPRB,2.8003E-04_JPRB,2.4507E-04_JPRB,2.0972E-04_JPRB,1.7365E-04_JPRB,1.3503E-04_JPRB,&
1144
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8768E-05_JPRB,2.9314E-05_JPRB,2.4023E-05_JPRB/)
1145 KAO( :, 2, 4, 6) = (/&
1146 & 3.1813E-04_JPRB,2.8791E-04_JPRB,2.5394E-04_JPRB,2.1965E-04_JPRB,1.8377E-04_JPRB,1.4389E-04_JPRB,&
1147
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.7093E-05_JPRB,2.3337E-05_JPRB,5.0021E-05_JPRB/)
1148 KAO( :, 3, 4, 6) = (/&
1149 & 3.2483E-04_JPRB,2.9675E-04_JPRB,2.6510E-04_JPRB,2.3175E-04_JPRB,1.9444E-04_JPRB,1.5360E-04_JPRB,&
1150
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0928E-04_JPRB,3.0718E-05_JPRB,7.6252E-05_JPRB/)
1151 KAO( :, 4, 4, 6) = (/&
1152 & 3.3350E-04_JPRB,3.0829E-04_JPRB,2.7872E-04_JPRB,2.4437E-04_JPRB,2.0593E-04_JPRB,1.6469E-04_JPRB,&
1153
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2057E-04_JPRB,4.4984E-05_JPRB,1.0921E-04_JPRB/)
1154 KAO( :, 5, 4, 6) = (/&
1155 & 3.4440E-04_JPRB,3.2288E-04_JPRB,2.9368E-04_JPRB,2.5882E-04_JPRB,2.1958E-04_JPRB,1.7772E-04_JPRB,&
1156
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3279E-04_JPRB,8.3344E-05_JPRB,1.5068E-04_JPRB/)
1157 KAO( :, 1, 5, 6) = (/&
1158 & 2.9770E-04_JPRB,2.6568E-04_JPRB,2.3231E-04_JPRB,1.9760E-04_JPRB,1.6264E-04_JPRB,1.2501E-04_JPRB,&
1159
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2212E-05_JPRB,2.7851E-05_JPRB,2.9425E-05_JPRB/)
1160 KAO( :, 2, 5, 6) = (/&
1161 & 3.0341E-04_JPRB,2.7316E-04_JPRB,2.3988E-04_JPRB,2.0612E-04_JPRB,1.7178E-04_JPRB,1.3444E-04_JPRB,&
1162
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.8808E-05_JPRB,2.4233E-05_JPRB,5.0902E-05_JPRB/)
1163 KAO( :, 3, 5, 6) = (/&
1164 & 3.0855E-04_JPRB,2.8044E-04_JPRB,2.4851E-04_JPRB,2.1615E-04_JPRB,1.8164E-04_JPRB,1.4300E-04_JPRB,&
1165
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.8456E-05_JPRB,2.2567E-05_JPRB,7.8789E-05_JPRB/)
1166 KAO( :, 4, 5, 6) = (/&
1167 & 3.1479E-04_JPRB,2.8896E-04_JPRB,2.6020E-04_JPRB,2.2793E-04_JPRB,1.9183E-04_JPRB,1.5203E-04_JPRB,&
1168
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0899E-04_JPRB,3.3886E-05_JPRB,1.1586E-04_JPRB/)
1169 KAO( :, 5, 5, 6) = (/&
1170 & 3.2275E-04_JPRB,3.0062E-04_JPRB,2.7287E-04_JPRB,2.4005E-04_JPRB,2.0243E-04_JPRB,1.6230E-04_JPRB,&
1171
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1916E-04_JPRB,4.8642E-05_JPRB,1.6375E-04_JPRB/)
1172 KAO( :, 1, 6, 6) = (/&
1173 & 2.8451E-04_JPRB,2.5278E-04_JPRB,2.2028E-04_JPRB,1.8707E-04_JPRB,1.5294E-04_JPRB,1.1368E-04_JPRB,&
1174
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1499E-05_JPRB,2.2491E-05_JPRB,2.9300E-05_JPRB/)
1175 KAO( :, 2, 6, 6) = (/&
1176 & 2.8818E-04_JPRB,2.5756E-04_JPRB,2.2592E-04_JPRB,1.9305E-04_JPRB,1.5960E-04_JPRB,1.2358E-04_JPRB,&
1177
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9278E-05_JPRB,2.8018E-05_JPRB,5.0020E-05_JPRB/)
1178 KAO( :, 3, 6, 6) = (/&
1179 & 2.9308E-04_JPRB,2.6479E-04_JPRB,2.3342E-04_JPRB,2.0176E-04_JPRB,1.6837E-04_JPRB,1.3278E-04_JPRB,&
1180
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.5022E-05_JPRB,2.4679E-05_JPRB,7.9554E-05_JPRB/)
1181 KAO( :, 4, 6, 6) = (/&
1182 & 2.9797E-04_JPRB,2.7171E-04_JPRB,2.4252E-04_JPRB,2.1130E-04_JPRB,1.7798E-04_JPRB,1.4080E-04_JPRB,&
1183
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.8593E-05_JPRB,2.6413E-05_JPRB,1.2029E-04_JPRB/)
1184 KAO( :, 5, 6, 6) = (/&
1185 & 3.0385E-04_JPRB,2.8038E-04_JPRB,2.5320E-04_JPRB,2.2231E-04_JPRB,1.8746E-04_JPRB,1.4953E-04_JPRB,&
1186
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0805E-04_JPRB,3.4957E-05_JPRB,1.7428E-04_JPRB/)
1187 KAO( :, 1, 7, 6) = (/&
1188 & 2.7154E-04_JPRB,2.4047E-04_JPRB,2.0869E-04_JPRB,1.7653E-04_JPRB,1.4316E-04_JPRB,6.3076E-05_JPRB,&
1189
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3076E-05_JPRB,1.8799E-05_JPRB,2.9459E-05_JPRB/)
1190 KAO( :, 2, 7, 6) = (/&
1191 & 2.7322E-04_JPRB,2.4322E-04_JPRB,2.1245E-04_JPRB,1.8113E-04_JPRB,1.4876E-04_JPRB,1.1194E-04_JPRB,&
1192
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9416E-05_JPRB,2.1766E-05_JPRB,5.1977E-05_JPRB/)
1193 KAO( :, 3, 7, 6) = (/&
1194 & 2.7795E-04_JPRB,2.4940E-04_JPRB,2.1931E-04_JPRB,1.8853E-04_JPRB,1.5632E-04_JPRB,1.2173E-04_JPRB,&
1195
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3459E-05_JPRB,2.7910E-05_JPRB,8.5515E-05_JPRB/)
1196 KAO( :, 4, 7, 6) = (/&
1197 & 2.8245E-04_JPRB,2.5609E-04_JPRB,2.2726E-04_JPRB,1.9695E-04_JPRB,1.6467E-04_JPRB,1.3028E-04_JPRB,&
1198
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.3030E-05_JPRB,3.1238E-05_JPRB,1.3325E-04_JPRB/)
1199 KAO( :, 5, 7, 6) = (/&
1200 & 2.8703E-04_JPRB,2.6318E-04_JPRB,2.3595E-04_JPRB,2.0579E-04_JPRB,1.7351E-04_JPRB,1.3813E-04_JPRB,&
1201
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.7826E-05_JPRB,2.9395E-05_JPRB,1.9863E-04_JPRB/)
1202 KAO( :, 1, 8, 6) = (/&
1203 & 2.5666E-04_JPRB,2.2665E-04_JPRB,1.9623E-04_JPRB,1.6528E-04_JPRB,1.3188E-04_JPRB,5.2672E-05_JPRB,&
1204
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4590E-05_JPRB,1.5212E-05_JPRB,3.5336E-05_JPRB/)
1205 KAO( :, 2, 8, 6) = (/&
1206 & 2.5871E-04_JPRB,2.2976E-04_JPRB,1.9987E-04_JPRB,1.6976E-04_JPRB,1.3838E-04_JPRB,6.2293E-05_JPRB,&
1207
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1049E-05_JPRB,2.0990E-05_JPRB,6.5164E-05_JPRB/)
1208 KAO( :, 3, 8, 6) = (/&
1209 & 2.6131E-04_JPRB,2.3354E-04_JPRB,2.0472E-04_JPRB,1.7542E-04_JPRB,1.4479E-04_JPRB,1.0936E-04_JPRB,&
1210
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3593E-05_JPRB,2.7838E-05_JPRB,1.1164E-04_JPRB/)
1211 KAO( :, 4, 8, 6) = (/&
1212 & 2.6597E-04_JPRB,2.3972E-04_JPRB,2.1214E-04_JPRB,1.8293E-04_JPRB,1.5207E-04_JPRB,1.1872E-04_JPRB,&
1213
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2928E-05_JPRB,2.9399E-05_JPRB,1.8005E-04_JPRB/)
1214 KAO( :, 5, 8, 6) = (/&
1215 & 2.6965E-04_JPRB,2.4602E-04_JPRB,2.1946E-04_JPRB,1.9059E-04_JPRB,1.5945E-04_JPRB,1.2678E-04_JPRB,&
1216
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.1506E-05_JPRB,3.0396E-05_JPRB,2.7574E-04_JPRB/)
1217 KAO( :, 1, 9, 6) = (/&
1218 & 2.4051E-04_JPRB,2.1191E-04_JPRB,1.8318E-04_JPRB,1.5348E-04_JPRB,8.9740E-05_JPRB,5.6443E-05_JPRB,&
1219
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8323E-05_JPRB,1.3977E-05_JPRB,7.8714E-05_JPRB/)
1220 KAO( :, 2, 9, 6) = (/&
1221 & 2.4280E-04_JPRB,2.1514E-04_JPRB,1.8659E-04_JPRB,1.5766E-04_JPRB,1.2621E-04_JPRB,4.8115E-05_JPRB,&
1222
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1962E-05_JPRB,1.8297E-05_JPRB,1.5286E-04_JPRB/)
1223 KAO( :, 3, 9, 6) = (/&
1224 & 2.4480E-04_JPRB,2.1809E-04_JPRB,1.9044E-04_JPRB,1.6238E-04_JPRB,1.3286E-04_JPRB,5.9719E-05_JPRB,&
1225
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7955E-05_JPRB,2.2245E-05_JPRB,2.7373E-04_JPRB/)
1226 KAO( :, 4, 9, 6) = (/&
1227 & 2.4800E-04_JPRB,2.2255E-04_JPRB,1.9613E-04_JPRB,1.6836E-04_JPRB,1.3908E-04_JPRB,1.0477E-04_JPRB,&
1228
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9262E-05_JPRB,3.1477E-05_JPRB,4.5768E-04_JPRB/)
1229 KAO( :, 5, 9, 6) = (/&
1230 & 2.5161E-04_JPRB,2.2818E-04_JPRB,2.0281E-04_JPRB,1.7515E-04_JPRB,1.4598E-04_JPRB,1.1469E-04_JPRB,&
1231
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6846E-05_JPRB,3.4477E-05_JPRB,7.2229E-04_JPRB/)
1232 KAO( :, 1,10, 6) = (/&
1233 & 2.2330E-04_JPRB,1.9647E-04_JPRB,1.6947E-04_JPRB,1.4070E-04_JPRB,5.0397E-05_JPRB,6.4372E-05_JPRB,&
1234
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4119E-05_JPRB,1.3671E-05_JPRB,2.1819E-04_JPRB/)
1235 KAO( :, 2,10, 6) = (/&
1236 & 2.2579E-04_JPRB,1.9970E-04_JPRB,1.7289E-04_JPRB,1.4528E-04_JPRB,8.0532E-05_JPRB,5.4367E-05_JPRB,&
1237
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0104E-05_JPRB,1.5483E-05_JPRB,4.4393E-04_JPRB/)
1238 KAO( :, 3,10, 6) = (/&
1239 & 2.2759E-04_JPRB,2.0234E-04_JPRB,1.7625E-04_JPRB,1.4950E-04_JPRB,1.1945E-04_JPRB,4.4354E-05_JPRB,&
1240
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3052E-05_JPRB,2.1110E-05_JPRB,8.2682E-04_JPRB/)
1241 KAO( :, 4,10, 6) = (/&
1242 & 2.2922E-04_JPRB,2.0521E-04_JPRB,1.8016E-04_JPRB,1.5410E-04_JPRB,1.2582E-04_JPRB,5.3486E-05_JPRB,&
1243
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4581E-05_JPRB,2.9122E-05_JPRB,1.4295E-03_JPRB/)
1244 KAO( :, 5,10, 6) = (/&
1245 & 2.3198E-04_JPRB,2.0949E-04_JPRB,1.8557E-04_JPRB,1.5950E-04_JPRB,1.3216E-04_JPRB,9.8775E-05_JPRB,&
1246
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6643E-05_JPRB,3.6794E-05_JPRB,2.3221E-03_JPRB/)
1247 KAO( :, 1,11, 6) = (/&
1248 & 2.0583E-04_JPRB,1.8127E-04_JPRB,1.5633E-04_JPRB,1.2776E-04_JPRB,4.7811E-05_JPRB,6.9737E-05_JPRB,&
1249
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 5.8557E-05_JPRB,1.2546E-05_JPRB,3.1512E-04_JPRB/)
1250
1251
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART4',1,ZHOOK_HANDLE)
1252 1 END SUBROUTINE PART4
1253
1254
1255 1 SUBROUTINE PART5
1256
1257 REAL(KIND=JPRB) :: ZHOOK_HANDLE
1258
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART5',0,ZHOOK_HANDLE)
1259
1260
1261 KAO( :, 2,11, 6) = (/&
1262 & 2.0808E-04_JPRB,1.8417E-04_JPRB,1.5959E-04_JPRB,1.3341E-04_JPRB,4.2960E-05_JPRB,5.2587E-05_JPRB,&
1263
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0943E-05_JPRB,1.7249E-05_JPRB,6.4309E-04_JPRB/)
1264 KAO( :, 3,11, 6) = (/&
1265 & 2.0985E-04_JPRB,1.8679E-04_JPRB,1.6278E-04_JPRB,1.3786E-04_JPRB,1.0094E-04_JPRB,4.2926E-05_JPRB,&
1266
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4000E-05_JPRB,2.1438E-05_JPRB,1.2009E-03_JPRB/)
1267 KAO( :, 4,11, 6) = (/&
1268 & 2.1113E-04_JPRB,1.8931E-04_JPRB,1.6638E-04_JPRB,1.4208E-04_JPRB,1.1471E-04_JPRB,3.5997E-05_JPRB,&
1269
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5064E-05_JPRB,2.9593E-05_JPRB,2.0809E-03_JPRB/)
1270 KAO( :, 5,11, 6) = (/&
1271 & 2.1332E-04_JPRB,1.9322E-04_JPRB,1.7102E-04_JPRB,1.4678E-04_JPRB,1.2136E-04_JPRB,7.6714E-05_JPRB,&
1272
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8255E-05_JPRB,4.0077E-05_JPRB,3.3932E-03_JPRB/)
1273 KAO( :, 1,12, 6) = (/&
1274 & 1.8719E-04_JPRB,1.6501E-04_JPRB,1.4226E-04_JPRB,1.0840E-04_JPRB,4.3551E-05_JPRB,6.5135E-05_JPRB,&
1275
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0449E-05_JPRB,1.2368E-05_JPRB,3.4134E-04_JPRB/)
1276 KAO( :, 2,12, 6) = (/&
1277 & 1.8952E-04_JPRB,1.6785E-04_JPRB,1.4553E-04_JPRB,1.2117E-04_JPRB,3.5062E-05_JPRB,4.8573E-05_JPRB,&
1278
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.2841E-05_JPRB,1.5474E-05_JPRB,6.9803E-04_JPRB/)
1279 KAO( :, 3,12, 6) = (/&
1280 & 1.9118E-04_JPRB,1.7048E-04_JPRB,1.4865E-04_JPRB,1.2583E-04_JPRB,8.1862E-05_JPRB,3.7617E-05_JPRB,&
1281
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3564E-05_JPRB,2.1248E-05_JPRB,1.3057E-03_JPRB/)
1282 KAO( :, 4,12, 6) = (/&
1283 & 1.9270E-04_JPRB,1.7320E-04_JPRB,1.5231E-04_JPRB,1.2983E-04_JPRB,1.0441E-04_JPRB,3.3342E-05_JPRB,&
1284
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1959E-05_JPRB,3.5845E-05_JPRB,2.2690E-03_JPRB/)
1285 KAO( :, 5,12, 6) = (/&
1286 & 1.9518E-04_JPRB,1.7738E-04_JPRB,1.5684E-04_JPRB,1.3457E-04_JPRB,1.1104E-04_JPRB,6.4947E-05_JPRB,&
1287
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5407E-05_JPRB,4.3496E-05_JPRB,3.7128E-03_JPRB/)
1288 KAO( :, 1,13, 6) = (/&
1289 & 1.6844E-04_JPRB,1.4859E-04_JPRB,1.2806E-04_JPRB,8.6165E-05_JPRB,4.0107E-05_JPRB,6.0133E-05_JPRB,&
1290
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.1357E-05_JPRB,1.2763E-05_JPRB,2.9734E-04_JPRB/)
1291 KAO( :, 2,13, 6) = (/&
1292 & 1.7069E-04_JPRB,1.5140E-04_JPRB,1.3134E-04_JPRB,1.0891E-04_JPRB,3.2613E-05_JPRB,4.6872E-05_JPRB,&
1293
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0094E-05_JPRB,1.5072E-05_JPRB,6.0887E-04_JPRB/)
1294 KAO( :, 3,13, 6) = (/&
1295 & 1.7244E-04_JPRB,1.5407E-04_JPRB,1.3444E-04_JPRB,1.1361E-04_JPRB,6.4637E-05_JPRB,3.4627E-05_JPRB,&
1296
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8765E-05_JPRB,2.7303E-05_JPRB,1.1416E-03_JPRB/)
1297 KAO( :, 4,13, 6) = (/&
1298 & 1.7422E-04_JPRB,1.5702E-04_JPRB,1.3806E-04_JPRB,1.1756E-04_JPRB,9.3337E-05_JPRB,3.0148E-05_JPRB,&
1299
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8538E-05_JPRB,4.2636E-05_JPRB,1.9903E-03_JPRB/)
1300 KAO( :, 5,13, 6) = (/&
1301 & 1.7685E-04_JPRB,1.6120E-04_JPRB,1.4238E-04_JPRB,1.2222E-04_JPRB,1.0041E-04_JPRB,5.2947E-05_JPRB,&
1302
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1886E-05_JPRB,4.0330E-05_JPRB,3.2638E-03_JPRB/)
1303 KAO( :, 1, 1, 7) = (/&
1304 & 4.3889E-04_JPRB,3.9958E-04_JPRB,3.5783E-04_JPRB,3.1336E-04_JPRB,2.6698E-04_JPRB,2.1857E-04_JPRB,&
1305
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6424E-04_JPRB,4.0399E-05_JPRB,2.8247E-05_JPRB/)
1306 KAO( :, 2, 1, 7) = (/&
1307 & 4.5976E-04_JPRB,4.2497E-04_JPRB,3.8736E-04_JPRB,3.4581E-04_JPRB,3.0220E-04_JPRB,2.5189E-04_JPRB,&
1308
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9631E-04_JPRB,1.0954E-04_JPRB,6.7630E-05_JPRB/)
1309 KAO( :, 3, 1, 7) = (/&
1310 & 4.8944E-04_JPRB,4.6159E-04_JPRB,4.2784E-04_JPRB,3.8962E-04_JPRB,3.4476E-04_JPRB,2.9292E-04_JPRB,&
1311
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3514E-04_JPRB,1.7014E-04_JPRB,1.5365E-04_JPRB/)
1312 KAO( :, 4, 1, 7) = (/&
1313 & 5.2941E-04_JPRB,5.1023E-04_JPRB,4.7948E-04_JPRB,4.4219E-04_JPRB,3.9618E-04_JPRB,3.4392E-04_JPRB,&
1314
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8630E-04_JPRB,2.2387E-04_JPRB,2.1803E-04_JPRB/)
1315 KAO( :, 5, 1, 7) = (/&
1316 & 5.7974E-04_JPRB,5.6859E-04_JPRB,5.4269E-04_JPRB,5.0514E-04_JPRB,4.6062E-04_JPRB,4.1002E-04_JPRB,&
1317
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5338E-04_JPRB,2.8599E-04_JPRB,2.8983E-04_JPRB/)
1318 KAO( :, 1, 2, 7) = (/&
1319 & 4.2778E-04_JPRB,3.8751E-04_JPRB,3.4424E-04_JPRB,2.9838E-04_JPRB,2.5188E-04_JPRB,2.0290E-04_JPRB,&
1320
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4875E-04_JPRB,2.6658E-05_JPRB,3.1573E-05_JPRB/)
1321 KAO( :, 2, 2, 7) = (/&
1322 & 4.4270E-04_JPRB,4.0621E-04_JPRB,3.6561E-04_JPRB,3.2154E-04_JPRB,2.7708E-04_JPRB,2.2750E-04_JPRB,&
1323
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7305E-04_JPRB,6.5324E-05_JPRB,8.8564E-05_JPRB/)
1324 KAO( :, 3, 2, 7) = (/&
1325 & 4.6316E-04_JPRB,4.3154E-04_JPRB,3.9306E-04_JPRB,3.5392E-04_JPRB,3.0888E-04_JPRB,2.5881E-04_JPRB,&
1326
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0328E-04_JPRB,1.3652E-04_JPRB,1.4781E-04_JPRB/)
1327 KAO( :, 4, 2, 7) = (/&
1328 & 4.8891E-04_JPRB,4.6467E-04_JPRB,4.3116E-04_JPRB,3.9316E-04_JPRB,3.4835E-04_JPRB,2.9748E-04_JPRB,&
1329
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4237E-04_JPRB,1.8240E-04_JPRB,2.0533E-04_JPRB/)
1330 KAO( :, 5, 2, 7) = (/&
1331 & 5.2249E-04_JPRB,5.0735E-04_JPRB,4.7839E-04_JPRB,4.4173E-04_JPRB,3.9700E-04_JPRB,3.4683E-04_JPRB,&
1332
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9289E-04_JPRB,2.3410E-04_JPRB,2.7363E-04_JPRB/)
1333 KAO( :, 1, 3, 7) = (/&
1334 & 4.1666E-04_JPRB,3.7587E-04_JPRB,3.3124E-04_JPRB,2.8500E-04_JPRB,2.3719E-04_JPRB,1.8911E-04_JPRB,&
1335
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3261E-04_JPRB,2.3452E-05_JPRB,4.9343E-05_JPRB/)
1336 KAO( :, 2, 3, 7) = (/&
1337 & 4.2699E-04_JPRB,3.8906E-04_JPRB,3.4648E-04_JPRB,3.0084E-04_JPRB,2.5570E-04_JPRB,2.0628E-04_JPRB,&
1338
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5092E-04_JPRB,2.8713E-05_JPRB,9.9198E-05_JPRB/)
1339 KAO( :, 3, 3, 7) = (/&
1340 & 4.4021E-04_JPRB,4.0629E-04_JPRB,3.6539E-04_JPRB,3.2263E-04_JPRB,2.7685E-04_JPRB,2.2699E-04_JPRB,&
1341
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7257E-04_JPRB,8.2898E-05_JPRB,1.4682E-04_JPRB/)
1342 KAO( :, 4, 3, 7) = (/&
1343 & 4.5674E-04_JPRB,4.2778E-04_JPRB,3.8962E-04_JPRB,3.4911E-04_JPRB,3.0352E-04_JPRB,2.5381E-04_JPRB,&
1344
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9998E-04_JPRB,1.3835E-04_JPRB,2.0520E-04_JPRB/)
1345 KAO( :, 5, 3, 7) = (/&
1346 & 4.7776E-04_JPRB,4.5415E-04_JPRB,4.2101E-04_JPRB,3.8173E-04_JPRB,3.3698E-04_JPRB,2.8849E-04_JPRB,&
1347
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3510E-04_JPRB,1.7936E-04_JPRB,2.7654E-04_JPRB/)
1348 KAO( :, 1, 4, 7) = (/&
1349 & 4.0967E-04_JPRB,3.6653E-04_JPRB,3.2176E-04_JPRB,2.7479E-04_JPRB,2.2703E-04_JPRB,1.7902E-04_JPRB,&
1350
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1570E-04_JPRB,2.0026E-05_JPRB,6.2716E-05_JPRB/)
1351 KAO( :, 2, 4, 7) = (/&
1352 & 4.1728E-04_JPRB,3.7737E-04_JPRB,3.3344E-04_JPRB,2.8769E-04_JPRB,2.4076E-04_JPRB,1.9242E-04_JPRB,&
1353
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3658E-04_JPRB,2.3923E-05_JPRB,1.0107E-04_JPRB/)
1354 KAO( :, 3, 4, 7) = (/&
1355 & 4.2535E-04_JPRB,3.8928E-04_JPRB,3.4656E-04_JPRB,3.0255E-04_JPRB,2.5648E-04_JPRB,2.0706E-04_JPRB,&
1356
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5237E-04_JPRB,3.0608E-05_JPRB,1.5048E-04_JPRB/)
1357 KAO( :, 4, 4, 7) = (/&
1358 & 4.3671E-04_JPRB,4.0394E-04_JPRB,3.6448E-04_JPRB,3.2102E-04_JPRB,2.7530E-04_JPRB,2.2501E-04_JPRB,&
1359
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7081E-04_JPRB,9.6060E-05_JPRB,2.1454E-04_JPRB/)
1360 KAO( :, 5, 4, 7) = (/&
1361 & 4.4976E-04_JPRB,4.2181E-04_JPRB,3.8534E-04_JPRB,3.4353E-04_JPRB,2.9780E-04_JPRB,2.4759E-04_JPRB,&
1362
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9471E-04_JPRB,1.3517E-04_JPRB,2.9601E-04_JPRB/)
1363 KAO( :, 1, 5, 7) = (/&
1364 & 4.0808E-04_JPRB,3.6358E-04_JPRB,3.1756E-04_JPRB,2.7050E-04_JPRB,2.2238E-04_JPRB,1.7234E-04_JPRB,&
1365
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.9731E-05_JPRB,1.5183E-05_JPRB,6.3144E-05_JPRB/)
1366 KAO( :, 2, 5, 7) = (/&
1367 & 4.1172E-04_JPRB,3.6950E-04_JPRB,3.2496E-04_JPRB,2.7819E-04_JPRB,2.3077E-04_JPRB,1.8213E-04_JPRB,&
1368
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2446E-04_JPRB,2.0194E-05_JPRB,1.0232E-04_JPRB/)
1369 KAO( :, 3, 5, 7) = (/&
1370 & 4.1699E-04_JPRB,3.7855E-04_JPRB,3.3456E-04_JPRB,2.8999E-04_JPRB,2.4284E-04_JPRB,1.9427E-04_JPRB,&
1371
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3989E-04_JPRB,2.2013E-05_JPRB,1.5619E-04_JPRB/)
1372 KAO( :, 4, 5, 7) = (/&
1373 & 4.2318E-04_JPRB,3.8831E-04_JPRB,3.4637E-04_JPRB,3.0279E-04_JPRB,2.5707E-04_JPRB,2.0772E-04_JPRB,&
1374
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5350E-04_JPRB,3.7923E-05_JPRB,2.2888E-04_JPRB/)
1375 KAO( :, 5, 5, 7) = (/&
1376 & 4.3181E-04_JPRB,3.9999E-04_JPRB,3.6216E-04_JPRB,3.1916E-04_JPRB,2.7412E-04_JPRB,2.2354E-04_JPRB,&
1377
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6943E-04_JPRB,1.0257E-04_JPRB,3.2402E-04_JPRB/)
1378 KAO( :, 1, 6, 7) = (/&
1379 & 4.0917E-04_JPRB,3.6282E-04_JPRB,3.1586E-04_JPRB,2.6754E-04_JPRB,2.1851E-04_JPRB,1.6735E-04_JPRB,&
1380
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0306E-05_JPRB,1.4647E-05_JPRB,5.9838E-05_JPRB/)
1381 KAO( :, 2, 6, 7) = (/&
1382 & 4.0728E-04_JPRB,3.6393E-04_JPRB,3.1828E-04_JPRB,2.7141E-04_JPRB,2.2388E-04_JPRB,1.7484E-04_JPRB,&
1383
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6257E-05_JPRB,1.8734E-05_JPRB,1.0066E-04_JPRB/)
1384 KAO( :, 3, 6, 7) = (/&
1385 & 4.1093E-04_JPRB,3.6989E-04_JPRB,3.2582E-04_JPRB,2.7999E-04_JPRB,2.3310E-04_JPRB,1.8335E-04_JPRB,&
1386
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2803E-04_JPRB,1.9091E-05_JPRB,1.6014E-04_JPRB/)
1387 KAO( :, 4, 6, 7) = (/&
1388 & 4.1435E-04_JPRB,3.7775E-04_JPRB,3.3462E-04_JPRB,2.9056E-04_JPRB,2.4377E-04_JPRB,1.9519E-04_JPRB,&
1389
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4167E-04_JPRB,2.4651E-05_JPRB,2.4320E-04_JPRB/)
1390 KAO( :, 5, 6, 7) = (/&
1391 & 4.1880E-04_JPRB,3.8572E-04_JPRB,3.4541E-04_JPRB,3.0219E-04_JPRB,2.5684E-04_JPRB,2.0763E-04_JPRB,&
1392
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5383E-04_JPRB,5.0012E-05_JPRB,3.5512E-04_JPRB/)
1393 KAO( :, 1, 7, 7) = (/&
1394 & 4.0843E-04_JPRB,3.6062E-04_JPRB,3.1311E-04_JPRB,2.6422E-04_JPRB,2.1469E-04_JPRB,1.5788E-04_JPRB,&
1395
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4260E-05_JPRB,1.0477E-05_JPRB,5.9419E-05_JPRB/)
1396 KAO( :, 2, 7, 7) = (/&
1397 & 4.0468E-04_JPRB,3.5984E-04_JPRB,3.1329E-04_JPRB,2.6596E-04_JPRB,2.1769E-04_JPRB,1.6781E-04_JPRB,&
1398
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1786E-05_JPRB,1.4646E-05_JPRB,1.0524E-04_JPRB/)
1399 KAO( :, 3, 7, 7) = (/&
1400 & 4.0363E-04_JPRB,3.6136E-04_JPRB,3.1683E-04_JPRB,2.7075E-04_JPRB,2.2418E-04_JPRB,1.7495E-04_JPRB,&
1401
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.7540E-05_JPRB,1.8041E-05_JPRB,1.7514E-04_JPRB/)
1402 KAO( :, 4, 7, 7) = (/&
1403 & 4.0645E-04_JPRB,3.6771E-04_JPRB,3.2468E-04_JPRB,2.8007E-04_JPRB,2.3381E-04_JPRB,1.8431E-04_JPRB,&
1404
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2997E-04_JPRB,1.8283E-05_JPRB,2.7663E-04_JPRB/)
1405 KAO( :, 5, 7, 7) = (/&
1406 & 4.0882E-04_JPRB,3.7446E-04_JPRB,3.3339E-04_JPRB,2.9009E-04_JPRB,2.4386E-04_JPRB,1.9554E-04_JPRB,&
1407
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4307E-04_JPRB,2.6104E-05_JPRB,4.1561E-04_JPRB/)
1408 KAO( :, 1, 8, 7) = (/&
1409 & 4.0424E-04_JPRB,3.5590E-04_JPRB,3.0795E-04_JPRB,2.5922E-04_JPRB,2.0908E-04_JPRB,7.0272E-05_JPRB,&
1410
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7437E-05_JPRB,1.0693E-05_JPRB,7.0148E-05_JPRB/)
1411 KAO( :, 2, 8, 7) = (/&
1412 & 3.9936E-04_JPRB,3.5369E-04_JPRB,3.0725E-04_JPRB,2.5982E-04_JPRB,2.1133E-04_JPRB,1.5687E-04_JPRB,&
1413
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6834E-05_JPRB,1.4067E-05_JPRB,1.3163E-04_JPRB/)
1414 KAO( :, 3, 8, 7) = (/&
1415 & 3.9575E-04_JPRB,3.5313E-04_JPRB,3.0818E-04_JPRB,2.6229E-04_JPRB,2.1562E-04_JPRB,1.6577E-04_JPRB,&
1416
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0426E-05_JPRB,1.5328E-05_JPRB,2.2983E-04_JPRB/)
1417 KAO( :, 4, 8, 7) = (/&
1418 & 3.9577E-04_JPRB,3.5593E-04_JPRB,3.1259E-04_JPRB,2.6838E-04_JPRB,2.2238E-04_JPRB,1.7380E-04_JPRB,&
1419
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.5405E-05_JPRB,1.7738E-05_JPRB,3.7526E-04_JPRB/)
1420 KAO( :, 5, 8, 7) = (/&
1421 & 3.9853E-04_JPRB,3.6216E-04_JPRB,3.2118E-04_JPRB,2.7729E-04_JPRB,2.3198E-04_JPRB,1.8391E-04_JPRB,&
1422
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3140E-04_JPRB,2.3100E-05_JPRB,5.7971E-04_JPRB/)
1423 KAO( :, 1, 9, 7) = (/&
1424 & 3.9550E-04_JPRB,3.4756E-04_JPRB,2.9976E-04_JPRB,2.5157E-04_JPRB,2.0053E-04_JPRB,6.3971E-05_JPRB,&
1425
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0992E-05_JPRB,8.5618E-06_JPRB,1.5177E-04_JPRB/)
1426 KAO( :, 2, 9, 7) = (/&
1427 & 3.9108E-04_JPRB,3.4522E-04_JPRB,2.9936E-04_JPRB,2.5239E-04_JPRB,2.0355E-04_JPRB,7.9459E-05_JPRB,&
1428
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6168E-05_JPRB,1.0069E-05_JPRB,3.0222E-04_JPRB/)
1429 KAO( :, 3, 9, 7) = (/&
1430 & 3.8711E-04_JPRB,3.4432E-04_JPRB,2.9976E-04_JPRB,2.5434E-04_JPRB,2.0775E-04_JPRB,1.5531E-04_JPRB,&
1431
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6577E-05_JPRB,1.4628E-05_JPRB,5.5112E-04_JPRB/)
1432 KAO( :, 4, 9, 7) = (/&
1433 & 3.8454E-04_JPRB,3.4471E-04_JPRB,3.0182E-04_JPRB,2.5833E-04_JPRB,2.1289E-04_JPRB,1.6399E-04_JPRB,&
1434
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7735E-05_JPRB,1.8317E-05_JPRB,9.3434E-04_JPRB/)
1435 KAO( :, 5, 9, 7) = (/&
1436 & 3.8590E-04_JPRB,3.4906E-04_JPRB,3.0820E-04_JPRB,2.6500E-04_JPRB,2.1985E-04_JPRB,1.7262E-04_JPRB,&
1437
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0739E-04_JPRB,2.0046E-05_JPRB,1.4932E-03_JPRB/)
1438 KAO( :, 1,10, 7) = (/&
1439 & 3.8145E-04_JPRB,3.3484E-04_JPRB,2.8824E-04_JPRB,2.4073E-04_JPRB,1.3749E-04_JPRB,6.8864E-05_JPRB,&
1440
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3426E-05_JPRB,5.4253E-06_JPRB,4.2208E-04_JPRB/)
1441 KAO( :, 2,10, 7) = (/&
1442 & 3.7808E-04_JPRB,3.3310E-04_JPRB,2.8836E-04_JPRB,2.4244E-04_JPRB,1.9222E-04_JPRB,5.4332E-05_JPRB,&
1443
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8318E-05_JPRB,1.3544E-05_JPRB,8.8420E-04_JPRB/)
1444 KAO( :, 3,10, 7) = (/&
1445 & 3.7522E-04_JPRB,3.3290E-04_JPRB,2.8933E-04_JPRB,2.4468E-04_JPRB,1.9821E-04_JPRB,8.2625E-05_JPRB,&
1446
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6026E-05_JPRB,1.3859E-05_JPRB,1.6822E-03_JPRB/)
1447 KAO( :, 4,10, 7) = (/&
1448 & 3.7308E-04_JPRB,3.3362E-04_JPRB,2.9154E-04_JPRB,2.4864E-04_JPRB,2.0415E-04_JPRB,1.5269E-04_JPRB,&
1449
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6983E-05_JPRB,1.4205E-05_JPRB,2.9547E-03_JPRB/)
1450 KAO( :, 5,10, 7) = (/&
1451 & 3.7174E-04_JPRB,3.3554E-04_JPRB,2.9552E-04_JPRB,2.5392E-04_JPRB,2.0969E-04_JPRB,1.6270E-04_JPRB,&
1452
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1673E-05_JPRB,1.7828E-05_JPRB,4.8607E-03_JPRB/)
1453 KAO( :, 1,11, 7) = (/&
1454 & 3.6294E-04_JPRB,3.1871E-04_JPRB,2.7451E-04_JPRB,2.2858E-04_JPRB,8.3578E-05_JPRB,6.1372E-05_JPRB,&
1455
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3364E-05_JPRB,7.7912E-06_JPRB,6.2992E-04_JPRB/)
1456 KAO( :, 2,11, 7) = (/&
1457 & 3.6112E-04_JPRB,3.1852E-04_JPRB,2.7580E-04_JPRB,2.3178E-04_JPRB,1.8037E-04_JPRB,5.7295E-05_JPRB,&
1458
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0682E-05_JPRB,1.2520E-05_JPRB,1.3182E-03_JPRB/)
1459 KAO( :, 3,11, 7) = (/&
1460 & 3.5947E-04_JPRB,3.1941E-04_JPRB,2.7779E-04_JPRB,2.3507E-04_JPRB,1.9020E-04_JPRB,4.7650E-05_JPRB,&
1461
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7645E-05_JPRB,1.4087E-05_JPRB,2.5064E-03_JPRB/)
1462 KAO( :, 4,11, 7) = (/&
1463 & 3.5796E-04_JPRB,3.2062E-04_JPRB,2.8056E-04_JPRB,2.3967E-04_JPRB,1.9644E-04_JPRB,1.3235E-04_JPRB,&
1464
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6296E-05_JPRB,1.5164E-05_JPRB,4.4025E-03_JPRB/)
1465 KAO( :, 5,11, 7) = (/&
1466 & 3.5673E-04_JPRB,3.2259E-04_JPRB,2.8479E-04_JPRB,2.4474E-04_JPRB,2.0200E-04_JPRB,1.5578E-04_JPRB,&
1467
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2752E-05_JPRB,1.8894E-05_JPRB,7.2340E-03_JPRB/)
1468 KAO( :, 1,12, 7) = (/&
1469 & 3.4280E-04_JPRB,3.0118E-04_JPRB,2.5967E-04_JPRB,2.1631E-04_JPRB,7.2200E-05_JPRB,5.9727E-05_JPRB,&
1470
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2869E-05_JPRB,5.5658E-06_JPRB,7.0164E-04_JPRB/)
1471 KAO( :, 2,12, 7) = (/&
1472 & 3.4212E-04_JPRB,3.0217E-04_JPRB,2.6182E-04_JPRB,2.2007E-04_JPRB,1.6435E-04_JPRB,5.4340E-05_JPRB,&
1473
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2800E-05_JPRB,1.1130E-05_JPRB,1.4668E-03_JPRB/)
1474 KAO( :, 3,12, 7) = (/&
1475 & 3.4134E-04_JPRB,3.0369E-04_JPRB,2.6435E-04_JPRB,2.2391E-04_JPRB,1.8076E-04_JPRB,4.4282E-05_JPRB,&
1476
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6617E-05_JPRB,1.2881E-05_JPRB,2.7876E-03_JPRB/)
1477 KAO( :, 4,12, 7) = (/&
1478 & 3.4044E-04_JPRB,3.0540E-04_JPRB,2.6773E-04_JPRB,2.2890E-04_JPRB,1.8713E-04_JPRB,1.1838E-04_JPRB,&
1479
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1381E-05_JPRB,1.3556E-05_JPRB,4.8923E-03_JPRB/)
1480 KAO( :, 5,12, 7) = (/&
1481 & 3.3969E-04_JPRB,3.0785E-04_JPRB,2.7216E-04_JPRB,2.3387E-04_JPRB,1.9308E-04_JPRB,1.4819E-04_JPRB,&
1482
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8774E-05_JPRB,2.3365E-05_JPRB,8.0367E-03_JPRB/)
1483 KAO( :, 1,13, 7) = (/&
1484 & 3.2074E-04_JPRB,2.8200E-04_JPRB,2.4335E-04_JPRB,2.0260E-04_JPRB,5.9755E-05_JPRB,5.5012E-05_JPRB,&
1485
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0916E-05_JPRB,6.5979E-06_JPRB,6.2734E-04_JPRB/)
1486 KAO( :, 2,13, 7) = (/&
1487 & 3.2081E-04_JPRB,2.8371E-04_JPRB,2.4601E-04_JPRB,2.0672E-04_JPRB,1.4264E-04_JPRB,4.7131E-05_JPRB,&
1488
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6167E-05_JPRB,1.0279E-05_JPRB,1.3098E-03_JPRB/)
1489 KAO( :, 3,13, 7) = (/&
1490 & 3.2050E-04_JPRB,2.8547E-04_JPRB,2.4888E-04_JPRB,2.1104E-04_JPRB,1.6957E-04_JPRB,3.8720E-05_JPRB,&
1491
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6164E-05_JPRB,1.0646E-05_JPRB,2.4868E-03_JPRB/)
1492 KAO( :, 4,13, 7) = (/&
1493 & 3.2004E-04_JPRB,2.8761E-04_JPRB,2.5261E-04_JPRB,2.1602E-04_JPRB,1.7644E-04_JPRB,1.0425E-04_JPRB,&
1494
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7809E-05_JPRB,1.7867E-05_JPRB,4.3609E-03_JPRB/)
1495 KAO( :, 5,13, 7) = (/&
1496 & 3.1955E-04_JPRB,2.9043E-04_JPRB,2.5703E-04_JPRB,2.2081E-04_JPRB,1.8253E-04_JPRB,1.3988E-04_JPRB,&
1497
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6793E-05_JPRB,3.0837E-05_JPRB,7.1735E-03_JPRB/)
1498 KAO( :, 1, 1, 8) = (/&
1499 & 5.6685E-04_JPRB,5.1953E-04_JPRB,4.6936E-04_JPRB,4.1592E-04_JPRB,3.5781E-04_JPRB,2.9881E-04_JPRB,&
1500
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3721E-04_JPRB,1.2965E-04_JPRB,9.7553E-05_JPRB/)
1501 KAO( :, 2, 1, 8) = (/&
1502 & 6.1498E-04_JPRB,5.7331E-04_JPRB,5.2736E-04_JPRB,4.7456E-04_JPRB,4.1825E-04_JPRB,3.6336E-04_JPRB,&
1503
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0181E-04_JPRB,2.4017E-04_JPRB,2.2948E-04_JPRB/)
1504 KAO( :, 3, 1, 8) = (/&
1505 & 6.7611E-04_JPRB,6.4061E-04_JPRB,6.0111E-04_JPRB,5.5388E-04_JPRB,5.0779E-04_JPRB,4.5514E-04_JPRB,&
1506
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9223E-04_JPRB,3.3256E-04_JPRB,3.4276E-04_JPRB/)
1507 KAO( :, 4, 1, 8) = (/&
1508 & 7.5480E-04_JPRB,7.2914E-04_JPRB,7.0254E-04_JPRB,6.6835E-04_JPRB,6.2923E-04_JPRB,5.7675E-04_JPRB,&
1509
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0673E-04_JPRB,4.4275E-04_JPRB,4.7133E-04_JPRB/)
1510 KAO( :, 5, 1, 8) = (/&
1511 & 8.5668E-04_JPRB,8.5031E-04_JPRB,8.3845E-04_JPRB,8.1883E-04_JPRB,7.8346E-04_JPRB,7.2655E-04_JPRB,&
1512
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.4693E-04_JPRB,5.7765E-04_JPRB,6.2516E-04_JPRB/)
1513 KAO( :, 1, 2, 8) = (/&
1514 & 5.4710E-04_JPRB,4.9662E-04_JPRB,4.4514E-04_JPRB,3.9135E-04_JPRB,3.3202E-04_JPRB,2.7342E-04_JPRB,&
1515
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1062E-04_JPRB,7.4193E-05_JPRB,1.1449E-04_JPRB/)
1516 KAO( :, 2, 2, 8) = (/&
1517 & 5.7920E-04_JPRB,5.3530E-04_JPRB,4.8866E-04_JPRB,4.3544E-04_JPRB,3.7966E-04_JPRB,3.2266E-04_JPRB,&
1518
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6099E-04_JPRB,1.8962E-04_JPRB,2.1819E-04_JPRB/)
1519 KAO( :, 3, 2, 8) = (/&
1520 & 6.1998E-04_JPRB,5.8558E-04_JPRB,5.4532E-04_JPRB,4.9598E-04_JPRB,4.4601E-04_JPRB,3.9266E-04_JPRB,&
1521
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3270E-04_JPRB,2.7330E-04_JPRB,3.1544E-04_JPRB/)
1522 KAO( :, 4, 2, 8) = (/&
1523 & 6.7522E-04_JPRB,6.5257E-04_JPRB,6.1970E-04_JPRB,5.8199E-04_JPRB,5.3956E-04_JPRB,4.8955E-04_JPRB,&
1524
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2848E-04_JPRB,3.6701E-04_JPRB,4.3346E-04_JPRB/)
1525 KAO( :, 5, 2, 8) = (/&
1526 & 7.4593E-04_JPRB,7.3758E-04_JPRB,7.2139E-04_JPRB,6.9843E-04_JPRB,6.6276E-04_JPRB,6.1561E-04_JPRB,&
1527
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4954E-04_JPRB,4.8184E-04_JPRB,5.7913E-04_JPRB/)
1528 KAO( :, 1, 3, 8) = (/&
1529 & 5.3214E-04_JPRB,4.7681E-04_JPRB,4.2344E-04_JPRB,3.6680E-04_JPRB,3.0810E-04_JPRB,2.4726E-04_JPRB,&
1530
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8453E-04_JPRB,2.5084E-05_JPRB,1.5128E-04_JPRB/)
1531 KAO( :, 2, 3, 8) = (/&
1532 & 5.5191E-04_JPRB,5.0347E-04_JPRB,4.5239E-04_JPRB,3.9784E-04_JPRB,3.4016E-04_JPRB,2.8162E-04_JPRB,&
1533
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1920E-04_JPRB,1.0464E-04_JPRB,2.3348E-04_JPRB/)
1534 KAO( :, 3, 3, 8) = (/&
1535 & 5.7477E-04_JPRB,5.3435E-04_JPRB,4.8907E-04_JPRB,4.3911E-04_JPRB,3.8574E-04_JPRB,3.2874E-04_JPRB,&
1536
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6890E-04_JPRB,2.0489E-04_JPRB,3.3684E-04_JPRB/)
1537 KAO( :, 4, 3, 8) = (/&
1538 & 6.0596E-04_JPRB,5.7781E-04_JPRB,5.4062E-04_JPRB,4.9604E-04_JPRB,4.4703E-04_JPRB,3.9517E-04_JPRB,&
1539
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3938E-04_JPRB,2.8379E-04_JPRB,4.6834E-04_JPRB/)
1540 KAO( :, 5, 3, 8) = (/&
1541 & 6.4785E-04_JPRB,6.3446E-04_JPRB,6.0817E-04_JPRB,5.7312E-04_JPRB,5.3235E-04_JPRB,4.8682E-04_JPRB,&
1542
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3334E-04_JPRB,3.7597E-04_JPRB,6.3257E-04_JPRB/)
1543 KAO( :, 1, 4, 8) = (/&
1544 & 5.3110E-04_JPRB,4.7262E-04_JPRB,4.1623E-04_JPRB,3.5723E-04_JPRB,2.9627E-04_JPRB,2.3321E-04_JPRB,&
1545
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6340E-04_JPRB,1.9895E-05_JPRB,1.6136E-04_JPRB/)
1546 KAO( :, 2, 4, 8) = (/&
1547 & 5.4153E-04_JPRB,4.8798E-04_JPRB,4.3377E-04_JPRB,3.7487E-04_JPRB,3.1581E-04_JPRB,2.5480E-04_JPRB,&
1548
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9036E-04_JPRB,3.4588E-05_JPRB,2.5102E-04_JPRB/)
1549 KAO( :, 3, 4, 8) = (/&
1550 & 5.5497E-04_JPRB,5.0890E-04_JPRB,4.5760E-04_JPRB,4.0292E-04_JPRB,3.4647E-04_JPRB,2.8693E-04_JPRB,&
1551
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 2.2354E-04_JPRB,1.2964E-04_JPRB,3.6989E-04_JPRB/)
1552
1553
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART5',1,ZHOOK_HANDLE)
1554 1 END SUBROUTINE PART5
1555
1556
1557 1 SUBROUTINE PART6
1558
1559 REAL(KIND=JPRB) :: ZHOOK_HANDLE
1560
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART6',0,ZHOOK_HANDLE)
1561
1562
1563 KAO( :, 4, 4, 8) = (/&
1564 & 5.7139E-04_JPRB,5.3494E-04_JPRB,4.8805E-04_JPRB,4.4096E-04_JPRB,3.8626E-04_JPRB,3.3033E-04_JPRB,&
1565
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7143E-04_JPRB,2.1212E-04_JPRB,5.2455E-04_JPRB/)
1566 KAO( :, 5, 4, 8) = (/&
1567 & 5.9415E-04_JPRB,5.6860E-04_JPRB,5.3306E-04_JPRB,4.9025E-04_JPRB,4.4085E-04_JPRB,3.9152E-04_JPRB,&
1568
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3850E-04_JPRB,2.8746E-04_JPRB,7.1892E-04_JPRB/)
1569 KAO( :, 1, 5, 8) = (/&
1570 & 5.4290E-04_JPRB,4.8021E-04_JPRB,4.2005E-04_JPRB,3.5773E-04_JPRB,2.9361E-04_JPRB,2.2840E-04_JPRB,&
1571
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2412E-04_JPRB,1.6779E-05_JPRB,1.6478E-04_JPRB/)
1572 KAO( :, 2, 5, 8) = (/&
1573 & 5.4234E-04_JPRB,4.8521E-04_JPRB,4.2730E-04_JPRB,3.6655E-04_JPRB,3.0462E-04_JPRB,2.4081E-04_JPRB,&
1574
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7158E-04_JPRB,2.4577E-05_JPRB,2.6430E-04_JPRB/)
1575 KAO( :, 3, 5, 8) = (/&
1576 & 5.5176E-04_JPRB,4.9971E-04_JPRB,4.4439E-04_JPRB,3.8473E-04_JPRB,3.2493E-04_JPRB,2.6199E-04_JPRB,&
1577
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9530E-04_JPRB,5.1968E-05_JPRB,4.0107E-04_JPRB/)
1578 KAO( :, 4, 5, 8) = (/&
1579 & 5.6082E-04_JPRB,5.1698E-04_JPRB,4.6451E-04_JPRB,4.1055E-04_JPRB,3.5125E-04_JPRB,2.9127E-04_JPRB,&
1580
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2746E-04_JPRB,1.4698E-04_JPRB,5.8315E-04_JPRB/)
1581 KAO( :, 5, 5, 8) = (/&
1582 & 5.7193E-04_JPRB,5.3856E-04_JPRB,4.9143E-04_JPRB,4.4154E-04_JPRB,3.8661E-04_JPRB,3.3087E-04_JPRB,&
1583
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7242E-04_JPRB,2.1704E-04_JPRB,8.1664E-04_JPRB/)
1584 KAO( :, 1, 6, 8) = (/&
1585 & 5.5933E-04_JPRB,4.9291E-04_JPRB,4.2842E-04_JPRB,3.6305E-04_JPRB,2.9613E-04_JPRB,2.2724E-04_JPRB,&
1586
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3023E-05_JPRB,1.5921E-05_JPRB,1.6080E-04_JPRB/)
1587 KAO( :, 2, 6, 8) = (/&
1588 & 5.5265E-04_JPRB,4.9132E-04_JPRB,4.3026E-04_JPRB,3.6705E-04_JPRB,3.0202E-04_JPRB,2.3616E-04_JPRB,&
1589
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5492E-04_JPRB,1.7381E-05_JPRB,2.6878E-04_JPRB/)
1590 KAO( :, 3, 6, 8) = (/&
1591 & 5.5383E-04_JPRB,4.9775E-04_JPRB,4.3880E-04_JPRB,3.7661E-04_JPRB,3.1407E-04_JPRB,2.4921E-04_JPRB,&
1592
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7746E-04_JPRB,2.2302E-05_JPRB,4.2225E-04_JPRB/)
1593 KAO( :, 4, 6, 8) = (/&
1594 & 5.6178E-04_JPRB,5.1138E-04_JPRB,4.5491E-04_JPRB,3.9556E-04_JPRB,3.3327E-04_JPRB,2.6812E-04_JPRB,&
1595
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0001E-04_JPRB,6.4403E-05_JPRB,6.3155E-04_JPRB/)
1596 KAO( :, 5, 6, 8) = (/&
1597 & 5.6806E-04_JPRB,5.2664E-04_JPRB,4.7387E-04_JPRB,4.1708E-04_JPRB,3.5623E-04_JPRB,2.9443E-04_JPRB,&
1598
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3016E-04_JPRB,1.5609E-04_JPRB,9.0635E-04_JPRB/)
1599 KAO( :, 1, 7, 8) = (/&
1600 & 5.7912E-04_JPRB,5.0929E-04_JPRB,4.4052E-04_JPRB,3.7179E-04_JPRB,3.0169E-04_JPRB,2.2904E-04_JPRB,&
1601
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6739E-05_JPRB,9.8065E-06_JPRB,1.6369E-04_JPRB/)
1602 KAO( :, 2, 7, 8) = (/&
1603 & 5.7054E-04_JPRB,5.0526E-04_JPRB,4.4059E-04_JPRB,3.7406E-04_JPRB,3.0610E-04_JPRB,2.3585E-04_JPRB,&
1604
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5393E-05_JPRB,1.3372E-05_JPRB,2.8615E-04_JPRB/)
1605 KAO( :, 3, 7, 8) = (/&
1606 & 5.6399E-04_JPRB,5.0435E-04_JPRB,4.4269E-04_JPRB,3.7826E-04_JPRB,3.1294E-04_JPRB,2.4573E-04_JPRB,&
1607
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6693E-04_JPRB,2.0015E-05_JPRB,4.6772E-04_JPRB/)
1608 KAO( :, 4, 7, 8) = (/&
1609 & 5.6580E-04_JPRB,5.1086E-04_JPRB,4.5119E-04_JPRB,3.8935E-04_JPRB,3.2489E-04_JPRB,2.5799E-04_JPRB,&
1610
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8517E-04_JPRB,2.1193E-05_JPRB,7.2326E-04_JPRB/)
1611 KAO( :, 5, 7, 8) = (/&
1612 & 5.7198E-04_JPRB,5.2353E-04_JPRB,4.6732E-04_JPRB,4.0650E-04_JPRB,3.4261E-04_JPRB,2.7564E-04_JPRB,&
1613
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0638E-04_JPRB,8.3698E-05_JPRB,1.0705E-03_JPRB/)
1614 KAO( :, 1, 8, 8) = (/&
1615 & 5.9871E-04_JPRB,5.2574E-04_JPRB,4.5363E-04_JPRB,3.8151E-04_JPRB,3.0818E-04_JPRB,2.2816E-04_JPRB,&
1616
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1690E-05_JPRB,9.1563E-06_JPRB,1.9592E-04_JPRB/)
1617 KAO( :, 2, 8, 8) = (/&
1618 & 5.8942E-04_JPRB,5.2019E-04_JPRB,4.5182E-04_JPRB,3.8232E-04_JPRB,3.1150E-04_JPRB,2.3688E-04_JPRB,&
1619
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4878E-05_JPRB,1.3062E-05_JPRB,3.5981E-04_JPRB/)
1620 KAO( :, 3, 8, 8) = (/&
1621 & 5.8144E-04_JPRB,5.1705E-04_JPRB,4.5231E-04_JPRB,3.8496E-04_JPRB,3.1600E-04_JPRB,2.4571E-04_JPRB,&
1622
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0309E-04_JPRB,1.4129E-05_JPRB,6.1385E-04_JPRB/)
1623 KAO( :, 4, 8, 8) = (/&
1624 & 5.7448E-04_JPRB,5.1610E-04_JPRB,4.5471E-04_JPRB,3.9018E-04_JPRB,3.2457E-04_JPRB,2.5556E-04_JPRB,&
1625
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7544E-04_JPRB,1.7304E-05_JPRB,9.8945E-04_JPRB/)
1626 KAO( :, 5, 8, 8) = (/&
1627 & 5.7483E-04_JPRB,5.2262E-04_JPRB,4.6340E-04_JPRB,4.0220E-04_JPRB,3.3597E-04_JPRB,2.6696E-04_JPRB,&
1628
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9367E-04_JPRB,2.4514E-05_JPRB,1.5199E-03_JPRB/)
1629 KAO( :, 1, 9, 8) = (/&
1630 & 6.1652E-04_JPRB,5.4081E-04_JPRB,4.6545E-04_JPRB,3.9056E-04_JPRB,3.1379E-04_JPRB,9.9114E-05_JPRB,&
1631
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3949E-05_JPRB,3.9239E-06_JPRB,4.2520E-04_JPRB/)
1632 KAO( :, 2, 9, 8) = (/&
1633 & 6.0629E-04_JPRB,5.3376E-04_JPRB,4.6202E-04_JPRB,3.8990E-04_JPRB,3.1655E-04_JPRB,2.3544E-04_JPRB,&
1634
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7382E-05_JPRB,8.6951E-06_JPRB,8.3044E-04_JPRB/)
1635 KAO( :, 3, 9, 8) = (/&
1636 & 5.9694E-04_JPRB,5.2858E-04_JPRB,4.6094E-04_JPRB,3.9128E-04_JPRB,3.1984E-04_JPRB,2.4585E-04_JPRB,&
1637
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7453E-05_JPRB,1.1219E-05_JPRB,1.4978E-03_JPRB/)
1638 KAO( :, 4, 9, 8) = (/&
1639 & 5.8812E-04_JPRB,5.2540E-04_JPRB,4.6162E-04_JPRB,3.9424E-04_JPRB,3.2635E-04_JPRB,2.5585E-04_JPRB,&
1640
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3793E-04_JPRB,1.5823E-05_JPRB,2.5315E-03_JPRB/)
1641 KAO( :, 5, 9, 8) = (/&
1642 & 5.8094E-04_JPRB,5.2489E-04_JPRB,4.6409E-04_JPRB,4.0156E-04_JPRB,3.3516E-04_JPRB,2.6461E-04_JPRB,&
1643
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8608E-04_JPRB,1.9887E-05_JPRB,4.0512E-03_JPRB/)
1644 KAO( :, 1,10, 8) = (/&
1645 & 6.2969E-04_JPRB,5.5181E-04_JPRB,4.7454E-04_JPRB,3.9703E-04_JPRB,3.1724E-04_JPRB,6.5127E-05_JPRB,&
1646
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7452E-06_JPRB,3.2741E-06_JPRB,1.1769E-03_JPRB/)
1647 KAO( :, 2,10, 8) = (/&
1648 & 6.1957E-04_JPRB,5.4459E-04_JPRB,4.7029E-04_JPRB,3.9585E-04_JPRB,3.1968E-04_JPRB,1.3041E-04_JPRB,&
1649
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4515E-05_JPRB,7.2975E-06_JPRB,2.4417E-03_JPRB/)
1650 KAO( :, 3,10, 8) = (/&
1651 & 6.0939E-04_JPRB,5.3813E-04_JPRB,4.6769E-04_JPRB,3.9651E-04_JPRB,3.2305E-04_JPRB,2.4182E-04_JPRB,&
1652
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3807E-05_JPRB,1.1783E-05_JPRB,4.6287E-03_JPRB/)
1653 KAO( :, 4,10, 8) = (/&
1654 & 5.9955E-04_JPRB,5.3329E-04_JPRB,4.6744E-04_JPRB,3.9835E-04_JPRB,3.2790E-04_JPRB,2.5437E-04_JPRB,&
1655
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6423E-05_JPRB,1.1970E-05_JPRB,8.1527E-03_JPRB/)
1656 KAO( :, 5,10, 8) = (/&
1657 & 5.9051E-04_JPRB,5.3069E-04_JPRB,4.6841E-04_JPRB,4.0335E-04_JPRB,3.3599E-04_JPRB,2.6411E-04_JPRB,&
1658
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6905E-04_JPRB,1.8347E-05_JPRB,1.3511E-02_JPRB/)
1659 KAO( :, 1,11, 8) = (/&
1660 & 6.3270E-04_JPRB,5.5469E-04_JPRB,4.7693E-04_JPRB,3.9917E-04_JPRB,3.1669E-04_JPRB,6.3388E-05_JPRB,&
1661
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6721E-06_JPRB,3.2147E-07_JPRB,1.7207E-03_JPRB/)
1662 KAO( :, 2,11, 8) = (/&
1663 & 6.2323E-04_JPRB,5.4792E-04_JPRB,4.7320E-04_JPRB,3.9836E-04_JPRB,3.2132E-04_JPRB,8.3669E-05_JPRB,&
1664
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5421E-05_JPRB,6.2024E-06_JPRB,3.6065E-03_JPRB/)
1665 KAO( :, 3,11, 8) = (/&
1666 & 6.1343E-04_JPRB,5.4174E-04_JPRB,4.7120E-04_JPRB,3.9965E-04_JPRB,3.2524E-04_JPRB,2.3807E-04_JPRB,&
1667
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5288E-05_JPRB,1.1010E-05_JPRB,6.9077E-03_JPRB/)
1668 KAO( :, 4,11, 8) = (/&
1669 & 6.0422E-04_JPRB,5.3760E-04_JPRB,4.7151E-04_JPRB,4.0215E-04_JPRB,3.3145E-04_JPRB,2.5596E-04_JPRB,&
1670
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6438E-05_JPRB,1.1046E-05_JPRB,1.2276E-02_JPRB/)
1671 KAO( :, 5,11, 8) = (/&
1672 & 5.9513E-04_JPRB,5.3553E-04_JPRB,4.7292E-04_JPRB,4.0786E-04_JPRB,3.3977E-04_JPRB,2.6645E-04_JPRB,&
1673
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3530E-04_JPRB,1.8396E-05_JPRB,2.0378E-02_JPRB/)
1674 KAO( :, 1,12, 8) = (/&
1675 & 6.3015E-04_JPRB,5.5264E-04_JPRB,4.7514E-04_JPRB,3.9757E-04_JPRB,3.1556E-04_JPRB,6.0378E-05_JPRB,&
1676
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1686E-06_JPRB,4.1217E-06_JPRB,1.9089E-03_JPRB/)
1677 KAO( :, 2,12, 8) = (/&
1678 & 6.2156E-04_JPRB,5.4661E-04_JPRB,4.7228E-04_JPRB,3.9794E-04_JPRB,3.2115E-04_JPRB,9.3459E-05_JPRB,&
1679
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5910E-05_JPRB,6.9491E-06_JPRB,4.0407E-03_JPRB/)
1680 KAO( :, 3,12, 8) = (/&
1681 & 6.1284E-04_JPRB,5.4153E-04_JPRB,4.7137E-04_JPRB,3.9993E-04_JPRB,3.2562E-04_JPRB,2.3942E-04_JPRB,&
1682
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5459E-05_JPRB,1.2207E-05_JPRB,7.7972E-03_JPRB/)
1683 KAO( :, 4,12, 8) = (/&
1684 & 6.0431E-04_JPRB,5.3827E-04_JPRB,4.7217E-04_JPRB,4.0315E-04_JPRB,3.3297E-04_JPRB,2.5722E-04_JPRB,&
1685
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4991E-05_JPRB,1.1842E-05_JPRB,1.3838E-02_JPRB/)
1686 KAO( :, 5,12, 8) = (/&
1687 & 5.9614E-04_JPRB,5.3719E-04_JPRB,4.7459E-04_JPRB,4.0965E-04_JPRB,3.4109E-04_JPRB,2.6763E-04_JPRB,&
1688
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4327E-04_JPRB,1.6122E-05_JPRB,2.2897E-02_JPRB/)
1689 KAO( :, 1,13, 8) = (/&
1690 & 6.2067E-04_JPRB,5.4442E-04_JPRB,4.6829E-04_JPRB,3.9206E-04_JPRB,3.1059E-04_JPRB,5.4570E-05_JPRB,&
1691
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5324E-05_JPRB,1.9027E-06_JPRB,1.7246E-03_JPRB/)
1692 KAO( :, 2,13, 8) = (/&
1693 & 6.1333E-04_JPRB,5.3966E-04_JPRB,4.6657E-04_JPRB,3.9353E-04_JPRB,3.1741E-04_JPRB,1.0184E-04_JPRB,&
1694
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1822E-05_JPRB,6.3468E-06_JPRB,3.6765E-03_JPRB/)
1695 KAO( :, 3,13, 8) = (/&
1696 & 6.0610E-04_JPRB,5.3617E-04_JPRB,4.6704E-04_JPRB,3.9622E-04_JPRB,3.2317E-04_JPRB,2.3665E-04_JPRB,&
1697
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5927E-05_JPRB,1.1176E-05_JPRB,7.0786E-03_JPRB/)
1698 KAO( :, 4,13, 8) = (/&
1699 & 5.9902E-04_JPRB,5.3443E-04_JPRB,4.6878E-04_JPRB,4.0069E-04_JPRB,3.3118E-04_JPRB,2.5588E-04_JPRB,&
1700
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4674E-05_JPRB,1.1239E-05_JPRB,1.2524E-02_JPRB/)
1701 KAO( :, 5,13, 8) = (/&
1702 & 5.9234E-04_JPRB,5.3454E-04_JPRB,4.7242E-04_JPRB,4.0791E-04_JPRB,3.3951E-04_JPRB,2.6646E-04_JPRB,&
1703
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4670E-04_JPRB,2.0921E-05_JPRB,2.0681E-02_JPRB/)
1704 KAO( :, 1, 1, 9) = (/&
1705 & 7.6730E-04_JPRB,6.9533E-04_JPRB,6.3435E-04_JPRB,5.7755E-04_JPRB,5.2747E-04_JPRB,4.8127E-04_JPRB,&
1706
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6360E-04_JPRB,4.7153E-04_JPRB,5.0503E-04_JPRB/)
1707 KAO( :, 2, 1, 9) = (/&
1708 & 8.9446E-04_JPRB,8.3145E-04_JPRB,7.7791E-04_JPRB,7.3079E-04_JPRB,6.8158E-04_JPRB,6.4054E-04_JPRB,&
1709
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.4060E-04_JPRB,6.7751E-04_JPRB,7.4127E-04_JPRB/)
1710 KAO( :, 3, 1, 9) = (/&
1711 & 1.0839E-03_JPRB,1.0326E-03_JPRB,9.8910E-04_JPRB,9.4874E-04_JPRB,8.8995E-04_JPRB,8.5059E-04_JPRB,&
1712
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.6660E-04_JPRB,9.3858E-04_JPRB,1.0404E-03_JPRB/)
1713 KAO( :, 4, 1, 9) = (/&
1714 & 1.3392E-03_JPRB,1.2976E-03_JPRB,1.2617E-03_JPRB,1.2187E-03_JPRB,1.1503E-03_JPRB,1.1142E-03_JPRB,&
1715
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1537E-03_JPRB,1.2600E-03_JPRB,1.4074E-03_JPRB/)
1716 KAO( :, 5, 1, 9) = (/&
1717 & 1.6572E-03_JPRB,1.6190E-03_JPRB,1.5928E-03_JPRB,1.5446E-03_JPRB,1.4696E-03_JPRB,1.4385E-03_JPRB,&
1718
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5029E-03_JPRB,1.6559E-03_JPRB,1.8563E-03_JPRB/)
1719 KAO( :, 1, 2, 9) = (/&
1720 & 7.2791E-04_JPRB,6.5760E-04_JPRB,5.9478E-04_JPRB,5.3539E-04_JPRB,4.8045E-04_JPRB,4.2766E-04_JPRB,&
1721
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0009E-04_JPRB,3.9735E-04_JPRB,4.3728E-04_JPRB/)
1722 KAO( :, 2, 2, 9) = (/&
1723 & 8.1810E-04_JPRB,7.5677E-04_JPRB,7.0172E-04_JPRB,6.5562E-04_JPRB,6.0484E-04_JPRB,5.6238E-04_JPRB,&
1724
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5650E-04_JPRB,5.8260E-04_JPRB,6.4861E-04_JPRB/)
1725 KAO( :, 3, 2, 9) = (/&
1726 & 9.5216E-04_JPRB,9.0507E-04_JPRB,8.6910E-04_JPRB,8.3462E-04_JPRB,7.8786E-04_JPRB,7.5096E-04_JPRB,&
1727
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.5914E-04_JPRB,8.1646E-04_JPRB,9.1827E-04_JPRB/)
1728 KAO( :, 4, 2, 9) = (/&
1729 & 1.1442E-03_JPRB,1.1148E-03_JPRB,1.1009E-03_JPRB,1.0715E-03_JPRB,1.0248E-03_JPRB,9.9267E-04_JPRB,&
1730
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0179E-03_JPRB,1.1078E-03_JPRB,1.2541E-03_JPRB/)
1731 KAO( :, 5, 2, 9) = (/&
1732 & 1.3996E-03_JPRB,1.3905E-03_JPRB,1.3914E-03_JPRB,1.3624E-03_JPRB,1.3173E-03_JPRB,1.2906E-03_JPRB,&
1733
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3365E-03_JPRB,1.4703E-03_JPRB,1.6733E-03_JPRB/)
1734 KAO( :, 1, 3, 9) = (/&
1735 & 6.9198E-04_JPRB,6.2093E-04_JPRB,5.5500E-04_JPRB,4.9112E-04_JPRB,4.2858E-04_JPRB,3.6796E-04_JPRB,&
1736
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2243E-04_JPRB,2.7068E-04_JPRB,3.8445E-04_JPRB/)
1737 KAO( :, 2, 3, 9) = (/&
1738 & 7.4808E-04_JPRB,6.8197E-04_JPRB,6.2244E-04_JPRB,5.6656E-04_JPRB,5.0936E-04_JPRB,4.6235E-04_JPRB,&
1739
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4533E-04_JPRB,4.5718E-04_JPRB,5.8212E-04_JPRB/)
1740 KAO( :, 3, 3, 9) = (/&
1741 & 8.2613E-04_JPRB,7.7358E-04_JPRB,7.3159E-04_JPRB,6.8941E-04_JPRB,6.4390E-04_JPRB,6.1118E-04_JPRB,&
1742
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.1390E-04_JPRB,6.5687E-04_JPRB,8.4097E-04_JPRB/)
1743 KAO( :, 4, 3, 9) = (/&
1744 & 9.3955E-04_JPRB,9.0936E-04_JPRB,8.9358E-04_JPRB,8.6993E-04_JPRB,8.3759E-04_JPRB,8.1431E-04_JPRB,&
1745
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.3330E-04_JPRB,9.0689E-04_JPRB,1.1736E-03_JPRB/)
1746 KAO( :, 5, 3, 9) = (/&
1747 & 1.1024E-03_JPRB,1.1029E-03_JPRB,1.1144E-03_JPRB,1.1087E-03_JPRB,1.0858E-03_JPRB,1.0701E-03_JPRB,&
1748
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1102E-03_JPRB,1.2203E-03_JPRB,1.5855E-03_JPRB/)
1749 KAO( :, 1, 4, 9) = (/&
1750 & 6.9141E-04_JPRB,6.1573E-04_JPRB,5.4365E-04_JPRB,4.7268E-04_JPRB,4.0185E-04_JPRB,3.3169E-04_JPRB,&
1751
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6484E-04_JPRB,1.1941E-04_JPRB,4.2525E-04_JPRB/)
1752 KAO( :, 2, 4, 9) = (/&
1753 & 7.1303E-04_JPRB,6.4311E-04_JPRB,5.7730E-04_JPRB,5.1428E-04_JPRB,4.4890E-04_JPRB,3.8935E-04_JPRB,&
1754
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5277E-04_JPRB,3.2803E-04_JPRB,6.6098E-04_JPRB/)
1755 KAO( :, 3, 4, 9) = (/&
1756 & 7.6419E-04_JPRB,7.0113E-04_JPRB,6.4756E-04_JPRB,5.8990E-04_JPRB,5.3391E-04_JPRB,4.9265E-04_JPRB,&
1757
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8275E-04_JPRB,5.0730E-04_JPRB,9.8045E-04_JPRB/)
1758 KAO( :, 4, 4, 9) = (/&
1759 & 8.2609E-04_JPRB,7.8182E-04_JPRB,7.4991E-04_JPRB,7.1089E-04_JPRB,6.7442E-04_JPRB,6.5009E-04_JPRB,&
1760
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6146E-04_JPRB,7.1854E-04_JPRB,1.3938E-03_JPRB/)
1761 KAO( :, 5, 4, 9) = (/&
1762 & 9.1327E-04_JPRB,9.0245E-04_JPRB,8.9877E-04_JPRB,8.8705E-04_JPRB,8.7034E-04_JPRB,8.6010E-04_JPRB,&
1763
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.9180E-04_JPRB,9.8101E-04_JPRB,1.9118E-03_JPRB/)
1764 KAO( :, 1, 5, 9) = (/&
1765 & 7.1194E-04_JPRB,6.3073E-04_JPRB,5.5152E-04_JPRB,4.7348E-04_JPRB,3.9513E-04_JPRB,3.1519E-04_JPRB,&
1766
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2983E-04_JPRB,2.7452E-05_JPRB,4.8453E-04_JPRB/)
1767 KAO( :, 2, 5, 9) = (/&
1768 & 7.1296E-04_JPRB,6.3797E-04_JPRB,5.6646E-04_JPRB,4.9574E-04_JPRB,4.2273E-04_JPRB,3.5196E-04_JPRB,&
1769
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8944E-04_JPRB,1.7242E-04_JPRB,7.7671E-04_JPRB/)
1770 KAO( :, 3, 5, 9) = (/&
1771 & 7.3444E-04_JPRB,6.6574E-04_JPRB,6.0369E-04_JPRB,5.3780E-04_JPRB,4.7146E-04_JPRB,4.1473E-04_JPRB,&
1772
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8369E-04_JPRB,3.7633E-04_JPRB,1.1824E-03_JPRB/)
1773 KAO( :, 4, 5, 9) = (/&
1774 & 7.7697E-04_JPRB,7.1991E-04_JPRB,6.7045E-04_JPRB,6.1217E-04_JPRB,5.6053E-04_JPRB,5.2336E-04_JPRB,&
1775
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2023E-04_JPRB,5.5862E-04_JPRB,1.7181E-03_JPRB/)
1776 KAO( :, 5, 5, 9) = (/&
1777 & 8.2601E-04_JPRB,7.9119E-04_JPRB,7.6213E-04_JPRB,7.3107E-04_JPRB,6.9880E-04_JPRB,6.8266E-04_JPRB,&
1778
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.0503E-04_JPRB,7.7701E-04_JPRB,2.3991E-03_JPRB/)
1779 KAO( :, 1, 6, 9) = (/&
1780 & 7.4702E-04_JPRB,6.5911E-04_JPRB,5.7262E-04_JPRB,4.8679E-04_JPRB,4.0134E-04_JPRB,3.1318E-04_JPRB,&
1781
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5461E-04_JPRB,1.6758E-05_JPRB,5.2688E-04_JPRB/)
1782 KAO( :, 2, 6, 9) = (/&
1783 & 7.4128E-04_JPRB,6.5855E-04_JPRB,5.7826E-04_JPRB,4.9892E-04_JPRB,4.1789E-04_JPRB,3.3501E-04_JPRB,&
1784
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5184E-04_JPRB,5.3936E-05_JPRB,8.7850E-04_JPRB/)
1785 KAO( :, 3, 6, 9) = (/&
1786 & 7.3954E-04_JPRB,6.6416E-04_JPRB,5.9359E-04_JPRB,5.2126E-04_JPRB,4.4507E-04_JPRB,3.7370E-04_JPRB,&
1787
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1408E-04_JPRB,2.2236E-04_JPRB,1.3809E-03_JPRB/)
1788 KAO( :, 4, 6, 9) = (/&
1789 & 7.5717E-04_JPRB,6.9002E-04_JPRB,6.2962E-04_JPRB,5.6099E-04_JPRB,4.9557E-04_JPRB,4.3902E-04_JPRB,&
1790
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1006E-04_JPRB,4.1489E-04_JPRB,2.0655E-03_JPRB/)
1791 KAO( :, 5, 6, 9) = (/&
1792 & 7.8954E-04_JPRB,7.3758E-04_JPRB,6.8841E-04_JPRB,6.3360E-04_JPRB,5.8155E-04_JPRB,5.4713E-04_JPRB,&
1793
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4922E-04_JPRB,5.9986E-04_JPRB,2.9589E-03_JPRB/)
1794 KAO( :, 1, 7, 9) = (/&
1795 & 7.9467E-04_JPRB,6.9929E-04_JPRB,6.0424E-04_JPRB,5.1073E-04_JPRB,4.1693E-04_JPRB,3.2089E-04_JPRB,&
1796
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1325E-05_JPRB,1.2122E-05_JPRB,6.0259E-04_JPRB/)
1797 KAO( :, 2, 7, 9) = (/&
1798 & 7.8343E-04_JPRB,6.9250E-04_JPRB,6.0357E-04_JPRB,5.1592E-04_JPRB,4.2687E-04_JPRB,3.3542E-04_JPRB,&
1799
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2592E-04_JPRB,1.5976E-05_JPRB,1.0502E-03_JPRB/)
1800 KAO( :, 3, 7, 9) = (/&
1801 & 7.7573E-04_JPRB,6.9130E-04_JPRB,6.0997E-04_JPRB,5.2908E-04_JPRB,4.4409E-04_JPRB,3.5904E-04_JPRB,&
1802
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7616E-04_JPRB,9.2965E-05_JPRB,1.7102E-03_JPRB/)
1803 KAO( :, 4, 7, 9) = (/&
1804 & 7.7294E-04_JPRB,6.9692E-04_JPRB,6.2657E-04_JPRB,5.4965E-04_JPRB,4.7312E-04_JPRB,3.9920E-04_JPRB,&
1805
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3903E-04_JPRB,2.7602E-04_JPRB,2.6319E-03_JPRB/)
1806 KAO( :, 5, 7, 9) = (/&
1807 & 7.8731E-04_JPRB,7.2173E-04_JPRB,6.5887E-04_JPRB,5.9065E-04_JPRB,5.2295E-04_JPRB,4.6490E-04_JPRB,&
1808
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3618E-04_JPRB,4.5346E-04_JPRB,3.8668E-03_JPRB/)
1809 KAO( :, 1, 8, 9) = (/&
1810 & 8.5501E-04_JPRB,7.5078E-04_JPRB,6.4657E-04_JPRB,5.4366E-04_JPRB,4.4039E-04_JPRB,3.3294E-04_JPRB,&
1811
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6688E-05_JPRB,1.2258E-05_JPRB,8.1286E-04_JPRB/)
1812 KAO( :, 2, 8, 9) = (/&
1813 & 8.4099E-04_JPRB,7.4093E-04_JPRB,6.4228E-04_JPRB,5.4430E-04_JPRB,4.4636E-04_JPRB,3.4551E-04_JPRB,&
1814
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0468E-04_JPRB,1.2830E-05_JPRB,1.4923E-03_JPRB/)
1815 KAO( :, 3, 8, 9) = (/&
1816 & 8.2855E-04_JPRB,7.3472E-04_JPRB,6.4208E-04_JPRB,5.5147E-04_JPRB,4.5797E-04_JPRB,3.6152E-04_JPRB,&
1817
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5538E-04_JPRB,1.6241E-05_JPRB,2.5369E-03_JPRB/)
1818 KAO( :, 4, 8, 9) = (/&
1819 & 8.1840E-04_JPRB,7.3203E-04_JPRB,6.4929E-04_JPRB,5.6425E-04_JPRB,4.7544E-04_JPRB,3.8760E-04_JPRB,&
1820
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0236E-04_JPRB,1.3733E-04_JPRB,4.0371E-03_JPRB/)
1821 KAO( :, 5, 8, 9) = (/&
1822 & 8.1270E-04_JPRB,7.3589E-04_JPRB,6.6348E-04_JPRB,5.8412E-04_JPRB,5.0562E-04_JPRB,4.2829E-04_JPRB,&
1823
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6616E-04_JPRB,3.2564E-04_JPRB,6.0900E-03_JPRB/)
1824 KAO( :, 1, 9, 9) = (/&
1825 & 9.2560E-04_JPRB,8.1125E-04_JPRB,6.9819E-04_JPRB,5.8413E-04_JPRB,4.7055E-04_JPRB,3.5015E-04_JPRB,&
1826
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5500E-06_JPRB,4.9629E-06_JPRB,2.0290E-03_JPRB/)
1827 KAO( :, 2, 9, 9) = (/&
1828 & 9.1093E-04_JPRB,8.0097E-04_JPRB,6.9137E-04_JPRB,5.8249E-04_JPRB,4.7378E-04_JPRB,3.6194E-04_JPRB,&
1829
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0062E-05_JPRB,1.0842E-05_JPRB,3.9531E-03_JPRB/)
1830 KAO( :, 3, 9, 9) = (/&
1831 & 8.9709E-04_JPRB,7.9180E-04_JPRB,6.8775E-04_JPRB,5.8518E-04_JPRB,4.8156E-04_JPRB,3.7367E-04_JPRB,&
1832
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7999E-04_JPRB,1.5619E-05_JPRB,7.0405E-03_JPRB/)
1833 KAO( :, 4, 9, 9) = (/&
1834 & 8.8317E-04_JPRB,7.8542E-04_JPRB,6.8899E-04_JPRB,5.9345E-04_JPRB,4.9320E-04_JPRB,3.9217E-04_JPRB,&
1835
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8412E-04_JPRB,3.4988E-05_JPRB,1.1630E-02_JPRB/)
1836 KAO( :, 5, 9, 9) = (/&
1837 & 8.7042E-04_JPRB,7.8172E-04_JPRB,6.9655E-04_JPRB,6.0534E-04_JPRB,5.1346E-04_JPRB,4.2035E-04_JPRB,&
1838
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3049E-04_JPRB,1.7732E-04_JPRB,1.8084E-02_JPRB/)
1839 KAO( :, 1,10, 9) = (/&
1840 & 1.0020E-03_JPRB,8.7768E-04_JPRB,7.5453E-04_JPRB,6.2994E-04_JPRB,5.0369E-04_JPRB,2.0029E-04_JPRB,&
1841
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8338E-06_JPRB,1.1150E-06_JPRB,6.1828E-03_JPRB/)
1842 KAO( :, 2,10, 9) = (/&
1843 & 9.8614E-04_JPRB,8.6564E-04_JPRB,7.4527E-04_JPRB,6.2596E-04_JPRB,5.0608E-04_JPRB,3.8053E-04_JPRB,&
1844
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2407E-05_JPRB,6.0753E-06_JPRB,1.2701E-02_JPRB/)
1845 KAO( :, 3,10, 9) = (/&
1846 & 9.7041E-04_JPRB,8.5442E-04_JPRB,7.4008E-04_JPRB,6.2563E-04_JPRB,5.1190E-04_JPRB,3.9299E-04_JPRB,&
1847
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.6685E-05_JPRB,1.0644E-05_JPRB,2.3596E-02_JPRB/)
1848 KAO( :, 4,10, 9) = (/&
1849 & 9.5474E-04_JPRB,8.4629E-04_JPRB,7.3757E-04_JPRB,6.3110E-04_JPRB,5.2156E-04_JPRB,4.0815E-04_JPRB,&
1850
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 2.6069E-04_JPRB,1.4418E-05_JPRB,4.0339E-02_JPRB/)
1851
1852
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART6',1,ZHOOK_HANDLE)
1853 1 END SUBROUTINE PART6
1854
1855
1856 1 SUBROUTINE PART7
1857
1858 REAL(KIND=JPRB) :: ZHOOK_HANDLE
1859
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART7',0,ZHOOK_HANDLE)
1860
1861
1862 KAO( :, 5,10, 9) = (/&
1863 & 9.3936E-04_JPRB,8.3916E-04_JPRB,7.4145E-04_JPRB,6.4037E-04_JPRB,5.3630E-04_JPRB,4.3024E-04_JPRB,&
1864
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1815E-04_JPRB,7.5689E-05_JPRB,6.4528E-02_JPRB/)
1865 KAO( :, 1,11, 9) = (/&
1866 & 1.0733E-03_JPRB,9.4010E-04_JPRB,8.0821E-04_JPRB,6.7481E-04_JPRB,5.3993E-04_JPRB,1.7304E-04_JPRB,&
1867
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5690E-06_JPRB,1.0947E-06_JPRB,9.5058E-03_JPRB/)
1868 KAO( :, 2,11, 9) = (/&
1869 & 1.0562E-03_JPRB,9.2720E-04_JPRB,7.9859E-04_JPRB,6.7071E-04_JPRB,5.4165E-04_JPRB,4.0387E-04_JPRB,&
1870
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1514E-05_JPRB,7.8378E-06_JPRB,1.9538E-02_JPRB/)
1871 KAO( :, 3,11, 9) = (/&
1872 & 1.0391E-03_JPRB,9.1541E-04_JPRB,7.9272E-04_JPRB,6.7016E-04_JPRB,5.4829E-04_JPRB,4.2037E-04_JPRB,&
1873
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6128E-05_JPRB,1.0839E-05_JPRB,3.6276E-02_JPRB/)
1874 KAO( :, 4,11, 9) = (/&
1875 & 1.0222E-03_JPRB,9.0627E-04_JPRB,7.9028E-04_JPRB,6.7590E-04_JPRB,5.5839E-04_JPRB,4.3725E-04_JPRB,&
1876
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4358E-04_JPRB,1.5967E-05_JPRB,6.2057E-02_JPRB/)
1877 KAO( :, 5,11, 9) = (/&
1878 & 1.0062E-03_JPRB,8.9870E-04_JPRB,7.9417E-04_JPRB,6.8540E-04_JPRB,5.7395E-04_JPRB,4.5941E-04_JPRB,&
1879
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3487E-04_JPRB,5.8510E-05_JPRB,9.9558E-02_JPRB/)
1880 KAO( :, 1,12, 9) = (/&
1881 & 1.1429E-03_JPRB,1.0011E-03_JPRB,8.6066E-04_JPRB,7.1891E-04_JPRB,5.7572E-04_JPRB,2.3708E-04_JPRB,&
1882
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4567E-06_JPRB,5.1497E-06_JPRB,1.0798E-02_JPRB/)
1883 KAO( :, 2,12, 9) = (/&
1884 & 1.1252E-03_JPRB,9.8802E-04_JPRB,8.5145E-04_JPRB,7.1518E-04_JPRB,5.7793E-04_JPRB,4.3517E-04_JPRB,&
1885
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8931E-05_JPRB,1.3305E-05_JPRB,2.2185E-02_JPRB/)
1886 KAO( :, 3,12, 9) = (/&
1887 & 1.1078E-03_JPRB,9.7648E-04_JPRB,8.4588E-04_JPRB,7.1557E-04_JPRB,5.8568E-04_JPRB,4.5025E-04_JPRB,&
1888
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.7797E-05_JPRB,1.2058E-05_JPRB,4.1218E-02_JPRB/)
1889 KAO( :, 4,12, 9) = (/&
1890 & 1.0907E-03_JPRB,9.6728E-04_JPRB,8.4415E-04_JPRB,7.2188E-04_JPRB,5.9608E-04_JPRB,4.6749E-04_JPRB,&
1891
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9839E-04_JPRB,1.3906E-05_JPRB,7.0748E-02_JPRB/)
1892 KAO( :, 5,12, 9) = (/&
1893 & 1.0737E-03_JPRB,9.5961E-04_JPRB,8.4835E-04_JPRB,7.3154E-04_JPRB,6.1267E-04_JPRB,4.9042E-04_JPRB,&
1894
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5775E-04_JPRB,5.9229E-05_JPRB,1.1398E-01_JPRB/)
1895 KAO( :, 1,13, 9) = (/&
1896 & 1.2093E-03_JPRB,1.0592E-03_JPRB,9.1069E-04_JPRB,7.6104E-04_JPRB,6.0998E-04_JPRB,3.0141E-04_JPRB,&
1897
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.4692E-06_JPRB,3.6390E-06_JPRB,9.7505E-03_JPRB/)
1898 KAO( :, 2,13, 9) = (/&
1899 & 1.1916E-03_JPRB,1.0465E-03_JPRB,9.0223E-04_JPRB,7.5810E-04_JPRB,6.1322E-04_JPRB,4.6338E-04_JPRB,&
1900
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8957E-05_JPRB,7.1625E-06_JPRB,2.0045E-02_JPRB/)
1901 KAO( :, 3,13, 9) = (/&
1902 & 1.1742E-03_JPRB,1.0355E-03_JPRB,8.9704E-04_JPRB,7.5964E-04_JPRB,6.2169E-04_JPRB,4.7851E-04_JPRB,&
1903
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3589E-04_JPRB,1.1895E-05_JPRB,3.7380E-02_JPRB/)
1904 KAO( :, 4,13, 9) = (/&
1905 & 1.1565E-03_JPRB,1.0260E-03_JPRB,8.9628E-04_JPRB,7.6660E-04_JPRB,6.3308E-04_JPRB,4.9715E-04_JPRB,&
1906
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4150E-04_JPRB,1.1060E-05_JPRB,6.4458E-02_JPRB/)
1907 KAO( :, 5,13, 9) = (/&
1908 & 1.1382E-03_JPRB,1.0180E-03_JPRB,9.0061E-04_JPRB,7.7706E-04_JPRB,6.5089E-04_JPRB,5.2149E-04_JPRB,&
1909
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8129E-04_JPRB,5.9752E-05_JPRB,1.0436E-01_JPRB/)
1910 KAO( :, 1, 1,10) = (/&
1911 & 9.4926E-04_JPRB,8.5786E-04_JPRB,8.1138E-04_JPRB,7.6433E-04_JPRB,7.2663E-04_JPRB,7.8967E-04_JPRB,&
1912
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.8787E-04_JPRB,9.8903E-04_JPRB,1.1026E-03_JPRB/)
1913 KAO( :, 2, 1,10) = (/&
1914 & 1.2390E-03_JPRB,1.1300E-03_JPRB,1.0621E-03_JPRB,9.8809E-04_JPRB,9.8084E-04_JPRB,1.1153E-03_JPRB,&
1915
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2754E-03_JPRB,1.4463E-03_JPRB,1.6199E-03_JPRB/)
1916 KAO( :, 3, 1,10) = (/&
1917 & 1.6285E-03_JPRB,1.4941E-03_JPRB,1.4019E-03_JPRB,1.3143E-03_JPRB,1.3388E-03_JPRB,1.5587E-03_JPRB,&
1918
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7963E-03_JPRB,2.0319E-03_JPRB,2.2893E-03_JPRB/)
1919 KAO( :, 4, 1,10) = (/&
1920 & 2.1075E-03_JPRB,1.9429E-03_JPRB,1.8233E-03_JPRB,1.7260E-03_JPRB,1.7987E-03_JPRB,2.1195E-03_JPRB,&
1921
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4630E-03_JPRB,2.8065E-03_JPRB,3.1716E-03_JPRB/)
1922 KAO( :, 5, 1,10) = (/&
1923 & 2.6676E-03_JPRB,2.4810E-03_JPRB,2.3359E-03_JPRB,2.2329E-03_JPRB,2.3416E-03_JPRB,2.7812E-03_JPRB,&
1924
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2550E-03_JPRB,3.7334E-03_JPRB,4.2210E-03_JPRB/)
1925 KAO( :, 1, 2,10) = (/&
1926 & 8.9025E-04_JPRB,8.0274E-04_JPRB,7.4274E-04_JPRB,6.8609E-04_JPRB,6.7102E-04_JPRB,7.1742E-04_JPRB,&
1927
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.9680E-04_JPRB,8.7045E-04_JPRB,9.7644E-04_JPRB/)
1928 KAO( :, 2, 2,10) = (/&
1929 & 1.1017E-03_JPRB,1.0100E-03_JPRB,9.5453E-04_JPRB,8.9274E-04_JPRB,8.8682E-04_JPRB,1.0003E-03_JPRB,&
1930
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1309E-03_JPRB,1.2737E-03_JPRB,1.4319E-03_JPRB/)
1931 KAO( :, 3, 2,10) = (/&
1932 & 1.4395E-03_JPRB,1.3424E-03_JPRB,1.2619E-03_JPRB,1.1931E-03_JPRB,1.1956E-03_JPRB,1.3885E-03_JPRB,&
1933
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5988E-03_JPRB,1.8061E-03_JPRB,2.0428E-03_JPRB/)
1934 KAO( :, 4, 2,10) = (/&
1935 & 1.8618E-03_JPRB,1.7544E-03_JPRB,1.6479E-03_JPRB,1.5853E-03_JPRB,1.5993E-03_JPRB,1.8833E-03_JPRB,&
1936
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1846E-03_JPRB,2.4927E-03_JPRB,2.8370E-03_JPRB/)
1937 KAO( :, 5, 2,10) = (/&
1938 & 2.3686E-03_JPRB,2.2486E-03_JPRB,2.1364E-03_JPRB,2.0670E-03_JPRB,2.0882E-03_JPRB,2.4685E-03_JPRB,&
1939
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8904E-03_JPRB,3.3295E-03_JPRB,3.7864E-03_JPRB/)
1940 KAO( :, 1, 3,10) = (/&
1941 & 8.4979E-04_JPRB,7.6433E-04_JPRB,6.9594E-04_JPRB,6.3370E-04_JPRB,5.8853E-04_JPRB,5.9559E-04_JPRB,&
1942
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5667E-04_JPRB,7.1533E-04_JPRB,8.1217E-04_JPRB/)
1943 KAO( :, 2, 3,10) = (/&
1944 & 9.3603E-04_JPRB,8.5921E-04_JPRB,7.9338E-04_JPRB,7.5508E-04_JPRB,7.6062E-04_JPRB,8.4114E-04_JPRB,&
1945
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.4920E-04_JPRB,1.0487E-03_JPRB,1.2014E-03_JPRB/)
1946 KAO( :, 3, 3,10) = (/&
1947 & 1.1433E-03_JPRB,1.0846E-03_JPRB,1.0263E-03_JPRB,9.9233E-04_JPRB,1.0119E-03_JPRB,1.1695E-03_JPRB,&
1948
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3351E-03_JPRB,1.4995E-03_JPRB,1.7286E-03_JPRB/)
1949 KAO( :, 4, 3,10) = (/&
1950 & 1.4720E-03_JPRB,1.4093E-03_JPRB,1.3576E-03_JPRB,1.3122E-03_JPRB,1.3394E-03_JPRB,1.5776E-03_JPRB,&
1951
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8258E-03_JPRB,2.0744E-03_JPRB,2.3896E-03_JPRB/)
1952 KAO( :, 5, 3,10) = (/&
1953 & 1.8783E-03_JPRB,1.8107E-03_JPRB,1.7793E-03_JPRB,1.7293E-03_JPRB,1.7612E-03_JPRB,2.0848E-03_JPRB,&
1954
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4329E-03_JPRB,2.7873E-03_JPRB,3.2122E-03_JPRB/)
1955 KAO( :, 1, 4,10) = (/&
1956 & 8.5598E-04_JPRB,7.6200E-04_JPRB,6.7698E-04_JPRB,6.0274E-04_JPRB,5.4143E-04_JPRB,4.8510E-04_JPRB,&
1957
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0808E-04_JPRB,5.4195E-04_JPRB,7.2030E-04_JPRB/)
1958 KAO( :, 2, 4,10) = (/&
1959 & 8.7829E-04_JPRB,7.9754E-04_JPRB,7.2820E-04_JPRB,6.8132E-04_JPRB,6.4105E-04_JPRB,6.7652E-04_JPRB,&
1960
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.5328E-04_JPRB,8.3000E-04_JPRB,1.1216E-03_JPRB/)
1961 KAO( :, 3, 4,10) = (/&
1962 & 9.6941E-04_JPRB,9.0019E-04_JPRB,8.3950E-04_JPRB,8.2706E-04_JPRB,8.3972E-04_JPRB,9.4956E-04_JPRB,&
1963
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0831E-03_JPRB,1.2181E-03_JPRB,1.6652E-03_JPRB/)
1964 KAO( :, 4, 4,10) = (/&
1965 & 1.1497E-03_JPRB,1.1076E-03_JPRB,1.0973E-03_JPRB,1.0748E-03_JPRB,1.1139E-03_JPRB,1.3070E-03_JPRB,&
1966
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5051E-03_JPRB,1.7091E-03_JPRB,2.3798E-03_JPRB/)
1967 KAO( :, 5, 4,10) = (/&
1968 & 1.4423E-03_JPRB,1.4228E-03_JPRB,1.4377E-03_JPRB,1.4117E-03_JPRB,1.4741E-03_JPRB,1.7577E-03_JPRB,&
1969
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0499E-03_JPRB,2.3324E-03_JPRB,3.2737E-03_JPRB/)
1970 KAO( :, 1, 5,10) = (/&
1971 & 8.8900E-04_JPRB,7.8652E-04_JPRB,6.9034E-04_JPRB,5.9667E-04_JPRB,5.1545E-04_JPRB,4.4672E-04_JPRB,&
1972
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9522E-04_JPRB,3.0801E-04_JPRB,9.0832E-04_JPRB/)
1973 KAO( :, 2, 5,10) = (/&
1974 & 8.9256E-04_JPRB,7.9933E-04_JPRB,7.1388E-04_JPRB,6.4679E-04_JPRB,5.8953E-04_JPRB,5.4566E-04_JPRB,&
1975
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8778E-04_JPRB,6.2517E-04_JPRB,1.4726E-03_JPRB/)
1976 KAO( :, 3, 5,10) = (/&
1977 & 9.1630E-04_JPRB,8.3731E-04_JPRB,7.6863E-04_JPRB,7.3348E-04_JPRB,7.0053E-04_JPRB,7.6737E-04_JPRB,&
1978
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.6212E-04_JPRB,9.5439E-04_JPRB,2.2518E-03_JPRB/)
1979 KAO( :, 4, 5,10) = (/&
1980 & 1.0039E-03_JPRB,9.3325E-04_JPRB,8.9498E-04_JPRB,8.8178E-04_JPRB,9.2025E-04_JPRB,1.0734E-03_JPRB,&
1981
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2371E-03_JPRB,1.3976E-03_JPRB,3.3076E-03_JPRB/)
1982 KAO( :, 5, 5,10) = (/&
1983 & 1.1384E-03_JPRB,1.1125E-03_JPRB,1.1459E-03_JPRB,1.1447E-03_JPRB,1.2384E-03_JPRB,1.4768E-03_JPRB,&
1984
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7232E-03_JPRB,1.9621E-03_JPRB,4.6582E-03_JPRB/)
1985 KAO( :, 1, 6,10) = (/&
1986 & 9.4887E-04_JPRB,8.3839E-04_JPRB,7.3102E-04_JPRB,6.2493E-04_JPRB,5.2042E-04_JPRB,4.2275E-04_JPRB,&
1987
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3556E-04_JPRB,3.4740E-06_JPRB,1.1251E-03_JPRB/)
1988 KAO( :, 2, 6,10) = (/&
1989 & 9.3677E-04_JPRB,8.3218E-04_JPRB,7.3454E-04_JPRB,6.4594E-04_JPRB,5.6378E-04_JPRB,4.9151E-04_JPRB,&
1990
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4994E-04_JPRB,4.2597E-04_JPRB,1.8832E-03_JPRB/)
1991 KAO( :, 3, 6,10) = (/&
1992 & 9.3921E-04_JPRB,8.4673E-04_JPRB,7.5957E-04_JPRB,6.9636E-04_JPRB,6.3706E-04_JPRB,6.1057E-04_JPRB,&
1993
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.7476E-04_JPRB,7.3912E-04_JPRB,2.9583E-03_JPRB/)
1994 KAO( :, 4, 6,10) = (/&
1995 & 9.5719E-04_JPRB,8.7688E-04_JPRB,8.1813E-04_JPRB,7.7967E-04_JPRB,7.5775E-04_JPRB,8.5851E-04_JPRB,&
1996
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.8609E-04_JPRB,1.1121E-03_JPRB,4.4273E-03_JPRB/)
1997 KAO( :, 5, 6,10) = (/&
1998 & 1.0294E-03_JPRB,9.6457E-04_JPRB,9.3753E-04_JPRB,9.2588E-04_JPRB,1.0133E-03_JPRB,1.2038E-03_JPRB,&
1999
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4020E-03_JPRB,1.6034E-03_JPRB,6.3437E-03_JPRB/)
2000 KAO( :, 1, 7,10) = (/&
2001 & 1.0279E-03_JPRB,9.0433E-04_JPRB,7.8375E-04_JPRB,6.6508E-04_JPRB,5.4484E-04_JPRB,4.2431E-04_JPRB,&
2002
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6888E-04_JPRB,7.8015E-06_JPRB,1.4588E-03_JPRB/)
2003 KAO( :, 2, 7,10) = (/&
2004 & 1.0083E-03_JPRB,8.9241E-04_JPRB,7.8172E-04_JPRB,6.7204E-04_JPRB,5.7124E-04_JPRB,4.6914E-04_JPRB,&
2005
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6802E-04_JPRB,8.6137E-05_JPRB,2.5625E-03_JPRB/)
2006 KAO( :, 3, 7,10) = (/&
2007 & 9.9596E-04_JPRB,8.9237E-04_JPRB,7.9108E-04_JPRB,7.0321E-04_JPRB,6.1556E-04_JPRB,5.3871E-04_JPRB,&
2008
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1518E-04_JPRB,5.4052E-04_JPRB,4.1805E-03_JPRB/)
2009 KAO( :, 4, 7,10) = (/&
2010 & 9.8826E-04_JPRB,8.9639E-04_JPRB,8.1334E-04_JPRB,7.5573E-04_JPRB,6.8824E-04_JPRB,6.8183E-04_JPRB,&
2011
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.7451E-04_JPRB,8.6801E-04_JPRB,6.4027E-03_JPRB/)
2012 KAO( :, 5, 7,10) = (/&
2013 & 1.0011E-03_JPRB,9.2233E-04_JPRB,8.6964E-04_JPRB,8.2719E-04_JPRB,8.3320E-04_JPRB,9.6571E-04_JPRB,&
2014
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1203E-03_JPRB,1.2853E-03_JPRB,9.3461E-03_JPRB/)
2015 KAO( :, 1, 8,10) = (/&
2016 & 1.1125E-03_JPRB,9.7475E-04_JPRB,8.4628E-04_JPRB,7.1245E-04_JPRB,5.8223E-04_JPRB,4.4955E-04_JPRB,&
2017
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2055E-05_JPRB,1.4979E-05_JPRB,2.2126E-03_JPRB/)
2018 KAO( :, 2, 8,10) = (/&
2019 & 1.0938E-03_JPRB,9.6654E-04_JPRB,8.3997E-04_JPRB,7.1323E-04_JPRB,5.9255E-04_JPRB,4.7230E-04_JPRB,&
2020
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2313E-04_JPRB,3.4269E-06_JPRB,4.0836E-03_JPRB/)
2021 KAO( :, 3, 8,10) = (/&
2022 & 1.0758E-03_JPRB,9.5487E-04_JPRB,8.3741E-04_JPRB,7.2643E-04_JPRB,6.2166E-04_JPRB,5.1323E-04_JPRB,&
2023
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2493E-04_JPRB,3.0113E-04_JPRB,6.9437E-03_JPRB/)
2024 KAO( :, 4, 8,10) = (/&
2025 & 1.0550E-03_JPRB,9.4862E-04_JPRB,8.4799E-04_JPRB,7.6117E-04_JPRB,6.7028E-04_JPRB,5.9614E-04_JPRB,&
2026
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0166E-04_JPRB,6.5642E-04_JPRB,1.1024E-02_JPRB/)
2027 KAO( :, 5, 8,10) = (/&
2028 & 1.0393E-03_JPRB,9.5089E-04_JPRB,8.7866E-04_JPRB,8.1224E-04_JPRB,7.5400E-04_JPRB,7.6815E-04_JPRB,&
2029
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.8282E-04_JPRB,1.0221E-03_JPRB,1.6724E-02_JPRB/)
2030 KAO( :, 1, 9,10) = (/&
2031 & 1.2180E-03_JPRB,1.0664E-03_JPRB,9.2270E-04_JPRB,7.7328E-04_JPRB,6.2475E-04_JPRB,4.6815E-04_JPRB,&
2032
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.5178E-06_JPRB,3.3772E-06_JPRB,6.2846E-03_JPRB/)
2033 KAO( :, 2, 9,10) = (/&
2034 & 1.1921E-03_JPRB,1.0498E-03_JPRB,9.0635E-04_JPRB,7.6682E-04_JPRB,6.2317E-04_JPRB,4.8406E-04_JPRB,&
2035
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.3341E-05_JPRB,3.8343E-06_JPRB,1.2227E-02_JPRB/)
2036 KAO( :, 3, 9,10) = (/&
2037 & 1.1669E-03_JPRB,1.0310E-03_JPRB,8.9852E-04_JPRB,7.6558E-04_JPRB,6.4277E-04_JPRB,5.2121E-04_JPRB,&
2038
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7666E-04_JPRB,1.2040E-05_JPRB,2.1734E-02_JPRB/)
2039 KAO( :, 4, 9,10) = (/&
2040 & 1.1470E-03_JPRB,1.0235E-03_JPRB,9.0044E-04_JPRB,7.8767E-04_JPRB,6.8183E-04_JPRB,5.6489E-04_JPRB,&
2041
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9156E-04_JPRB,4.5088E-04_JPRB,3.6006E-02_JPRB/)
2042 KAO( :, 5, 9,10) = (/&
2043 & 1.1295E-03_JPRB,1.0174E-03_JPRB,9.1849E-04_JPRB,8.2709E-04_JPRB,7.3027E-04_JPRB,6.6994E-04_JPRB,&
2044
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.9088E-04_JPRB,7.9186E-04_JPRB,5.6162E-02_JPRB/)
2045 KAO( :, 1,10,10) = (/&
2046 & 1.3419E-03_JPRB,1.1745E-03_JPRB,1.0112E-03_JPRB,8.4729E-04_JPRB,6.7925E-04_JPRB,4.9697E-04_JPRB,&
2047
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5254E-06_JPRB,1.5343E-06_JPRB,2.0999E-02_JPRB/)
2048 KAO( :, 2,10,10) = (/&
2049 & 1.3141E-03_JPRB,1.1539E-03_JPRB,9.9630E-04_JPRB,8.3744E-04_JPRB,6.7916E-04_JPRB,5.1101E-04_JPRB,&
2050
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.8452E-06_JPRB,3.0451E-06_JPRB,4.3024E-02_JPRB/)
2051 KAO( :, 3,10,10) = (/&
2052 & 1.2898E-03_JPRB,1.1375E-03_JPRB,9.8703E-04_JPRB,8.3404E-04_JPRB,6.8649E-04_JPRB,5.3929E-04_JPRB,&
2053
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2626E-04_JPRB,6.0173E-06_JPRB,7.9885E-02_JPRB/)
2054 KAO( :, 4,10,10) = (/&
2055 & 1.2672E-03_JPRB,1.1264E-03_JPRB,9.8249E-04_JPRB,8.4764E-04_JPRB,7.1223E-04_JPRB,5.7730E-04_JPRB,&
2056
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4171E-04_JPRB,9.9896E-05_JPRB,1.3680E-01_JPRB/)
2057 KAO( :, 5,10,10) = (/&
2058 & 1.2477E-03_JPRB,1.1172E-03_JPRB,9.9135E-04_JPRB,8.7077E-04_JPRB,7.4770E-04_JPRB,6.3934E-04_JPRB,&
2059
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7696E-04_JPRB,6.1656E-04_JPRB,2.1952E-01_JPRB/)
2060 KAO( :, 1,11,10) = (/&
2061 & 1.4755E-03_JPRB,1.2917E-03_JPRB,1.1119E-03_JPRB,9.3058E-04_JPRB,7.4744E-04_JPRB,5.5051E-04_JPRB,&
2062
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6522E-06_JPRB,1.5412E-06_JPRB,3.4475E-02_JPRB/)
2063 KAO( :, 2,11,10) = (/&
2064 & 1.4485E-03_JPRB,1.2719E-03_JPRB,1.0971E-03_JPRB,9.2191E-04_JPRB,7.4745E-04_JPRB,5.7109E-04_JPRB,&
2065
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1696E-05_JPRB,3.1243E-06_JPRB,7.0850E-02_JPRB/)
2066 KAO( :, 3,11,10) = (/&
2067 & 1.4264E-03_JPRB,1.2579E-03_JPRB,1.0914E-03_JPRB,9.2154E-04_JPRB,7.5855E-04_JPRB,5.9482E-04_JPRB,&
2068
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1605E-04_JPRB,9.6309E-06_JPRB,1.3183E-01_JPRB/)
2069 KAO( :, 4,11,10) = (/&
2070 & 1.4023E-03_JPRB,1.2457E-03_JPRB,1.0849E-03_JPRB,9.3462E-04_JPRB,7.7881E-04_JPRB,6.1925E-04_JPRB,&
2071
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6174E-04_JPRB,2.1053E-05_JPRB,2.2597E-01_JPRB/)
2072 KAO( :, 5,11,10) = (/&
2073 & 1.3792E-03_JPRB,1.2345E-03_JPRB,1.0916E-03_JPRB,9.5041E-04_JPRB,8.0615E-04_JPRB,6.7157E-04_JPRB,&
2074
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8929E-04_JPRB,6.0215E-04_JPRB,3.6233E-01_JPRB/)
2075 KAO( :, 1,12,10) = (/&
2076 & 1.6315E-03_JPRB,1.4286E-03_JPRB,1.2296E-03_JPRB,1.0282E-03_JPRB,8.2450E-04_JPRB,6.1652E-04_JPRB,&
2077
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3057E-06_JPRB,1.5465E-06_JPRB,4.1474E-02_JPRB/)
2078 KAO( :, 2,12,10) = (/&
2079 & 1.6041E-03_JPRB,1.4085E-03_JPRB,1.2135E-03_JPRB,1.0193E-03_JPRB,8.2407E-04_JPRB,6.2890E-04_JPRB,&
2080
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0154E-05_JPRB,3.2488E-06_JPRB,8.5418E-02_JPRB/)
2081 KAO( :, 3,12,10) = (/&
2082 & 1.5781E-03_JPRB,1.3908E-03_JPRB,1.2052E-03_JPRB,1.0160E-03_JPRB,8.3518E-04_JPRB,6.5087E-04_JPRB,&
2083
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2444E-04_JPRB,1.1529E-05_JPRB,1.5881E-01_JPRB/)
2084 KAO( :, 4,12,10) = (/&
2085 & 1.5539E-03_JPRB,1.3775E-03_JPRB,1.1979E-03_JPRB,1.0287E-03_JPRB,8.5555E-04_JPRB,6.7702E-04_JPRB,&
2086
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9760E-04_JPRB,3.6698E-05_JPRB,2.7219E-01_JPRB/)
2087 KAO( :, 5,12,10) = (/&
2088 & 1.5294E-03_JPRB,1.3662E-03_JPRB,1.2069E-03_JPRB,1.0470E-03_JPRB,8.8424E-04_JPRB,7.2459E-04_JPRB,&
2089
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0457E-04_JPRB,5.8830E-04_JPRB,4.3580E-01_JPRB/)
2090 KAO( :, 1,13,10) = (/&
2091 & 1.8076E-03_JPRB,1.5828E-03_JPRB,1.3613E-03_JPRB,1.1383E-03_JPRB,9.1463E-04_JPRB,6.8299E-04_JPRB,&
2092
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0458E-06_JPRB,2.1473E-06_JPRB,3.9495E-02_JPRB/)
2093 KAO( :, 2,13,10) = (/&
2094 & 1.7788E-03_JPRB,1.5607E-03_JPRB,1.3444E-03_JPRB,1.1293E-03_JPRB,9.1288E-04_JPRB,6.9366E-04_JPRB,&
2095
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1339E-05_JPRB,1.1723E-05_JPRB,8.1294E-02_JPRB/)
2096 KAO( :, 3,13,10) = (/&
2097 & 1.7495E-03_JPRB,1.5404E-03_JPRB,1.3343E-03_JPRB,1.1244E-03_JPRB,9.2221E-04_JPRB,7.1955E-04_JPRB,&
2098
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9268E-04_JPRB,4.3370E-06_JPRB,1.5101E-01_JPRB/)
2099 KAO( :, 4,13,10) = (/&
2100 & 1.7235E-03_JPRB,1.5270E-03_JPRB,1.3269E-03_JPRB,1.1365E-03_JPRB,9.4473E-04_JPRB,7.4612E-04_JPRB,&
2101
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5227E-04_JPRB,4.6866E-05_JPRB,2.5856E-01_JPRB/)
2102 KAO( :, 5,13,10) = (/&
2103 & 1.6990E-03_JPRB,1.5170E-03_JPRB,1.3368E-03_JPRB,1.1584E-03_JPRB,9.7488E-04_JPRB,7.9318E-04_JPRB,&
2104
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.2728E-04_JPRB,5.6960E-04_JPRB,4.1354E-01_JPRB/)
2105 KAO( :, 1, 1,11) = (/&
2106 & 1.0196E-03_JPRB,9.3758E-04_JPRB,9.0316E-04_JPRB,8.5667E-04_JPRB,8.7577E-04_JPRB,1.0236E-03_JPRB,&
2107
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1763E-03_JPRB,1.3143E-03_JPRB,1.4719E-03_JPRB/)
2108 KAO( :, 2, 1,11) = (/&
2109 & 1.3459E-03_JPRB,1.2311E-03_JPRB,1.1576E-03_JPRB,1.1100E-03_JPRB,1.2232E-03_JPRB,1.4576E-03_JPRB,&
2110
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6924E-03_JPRB,1.9154E-03_JPRB,2.1488E-03_JPRB/)
2111 KAO( :, 3, 1,11) = (/&
2112 & 1.7777E-03_JPRB,1.6234E-03_JPRB,1.5128E-03_JPRB,1.4437E-03_JPRB,1.6918E-03_JPRB,2.0373E-03_JPRB,&
2113
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3872E-03_JPRB,2.7172E-03_JPRB,3.0763E-03_JPRB/)
2114 KAO( :, 4, 1,11) = (/&
2115 & 2.2969E-03_JPRB,2.1117E-03_JPRB,1.9790E-03_JPRB,1.9131E-03_JPRB,2.3134E-03_JPRB,2.7903E-03_JPRB,&
2116
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2537E-03_JPRB,3.7099E-03_JPRB,4.2069E-03_JPRB/)
2117 KAO( :, 5, 1,11) = (/&
2118 & 2.9364E-03_JPRB,2.7064E-03_JPRB,2.5487E-03_JPRB,2.4995E-03_JPRB,3.0802E-03_JPRB,3.7340E-03_JPRB,&
2119
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3606E-03_JPRB,4.9323E-03_JPRB,5.6150E-03_JPRB/)
2120 KAO( :, 1, 2,11) = (/&
2121 & 9.5564E-04_JPRB,8.6594E-04_JPRB,8.2247E-04_JPRB,7.8184E-04_JPRB,7.7258E-04_JPRB,8.9065E-04_JPRB,&
2122
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0177E-03_JPRB,1.1498E-03_JPRB,1.2899E-03_JPRB/)
2123 KAO( :, 2, 2,11) = (/&
2124 & 1.2029E-03_JPRB,1.1043E-03_JPRB,1.0479E-03_JPRB,9.9924E-04_JPRB,1.0917E-03_JPRB,1.3015E-03_JPRB,&
2125
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5067E-03_JPRB,1.7035E-03_JPRB,1.9385E-03_JPRB/)
2126 KAO( :, 3, 2,11) = (/&
2127 & 1.5957E-03_JPRB,1.4702E-03_JPRB,1.3834E-03_JPRB,1.3292E-03_JPRB,1.5404E-03_JPRB,1.8482E-03_JPRB,&
2128
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1587E-03_JPRB,2.4595E-03_JPRB,2.8087E-03_JPRB/)
2129 KAO( :, 4, 2,11) = (/&
2130 & 2.0836E-03_JPRB,1.9269E-03_JPRB,1.8210E-03_JPRB,1.7577E-03_JPRB,2.1115E-03_JPRB,2.5490E-03_JPRB,&
2131
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9802E-03_JPRB,3.4053E-03_JPRB,3.8766E-03_JPRB/)
2132 KAO( :, 5, 2,11) = (/&
2133 & 2.6761E-03_JPRB,2.4830E-03_JPRB,2.3690E-03_JPRB,2.3218E-03_JPRB,2.8435E-03_JPRB,3.4292E-03_JPRB,&
2134
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0478E-03_JPRB,4.5913E-03_JPRB,5.2765E-03_JPRB/)
2135 KAO( :, 1, 3,11) = (/&
2136 & 9.1098E-04_JPRB,8.1971E-04_JPRB,7.5453E-04_JPRB,6.8955E-04_JPRB,6.6573E-04_JPRB,7.4366E-04_JPRB,&
2137
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.3291E-04_JPRB,9.1681E-04_JPRB,1.0507E-03_JPRB/)
2138 KAO( :, 2, 3,11) = (/&
2139 & 1.0095E-03_JPRB,9.2632E-04_JPRB,8.7912E-04_JPRB,8.5222E-04_JPRB,9.1711E-04_JPRB,1.0796E-03_JPRB,&
2140
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2384E-03_JPRB,1.3937E-03_JPRB,1.6031E-03_JPRB/)
2141 KAO( :, 3, 3,11) = (/&
2142 & 1.2860E-03_JPRB,1.2005E-03_JPRB,1.1448E-03_JPRB,1.1224E-03_JPRB,1.2896E-03_JPRB,1.5406E-03_JPRB,&
2143
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7947E-03_JPRB,2.0396E-03_JPRB,2.3408E-03_JPRB/)
2144 KAO( :, 4, 3,11) = (/&
2145 & 1.6840E-03_JPRB,1.5843E-03_JPRB,1.5072E-03_JPRB,1.4946E-03_JPRB,1.7912E-03_JPRB,2.1550E-03_JPRB,&
2146
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5174E-03_JPRB,2.8934E-03_JPRB,3.3321E-03_JPRB/)
2147 KAO( :, 5, 3,11) = (/&
2148 & 2.1821E-03_JPRB,2.0586E-03_JPRB,1.9862E-03_JPRB,1.9857E-03_JPRB,2.4329E-03_JPRB,2.9479E-03_JPRB,&
2149
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4818E-03_JPRB,3.9625E-03_JPRB,4.5981E-03_JPRB/)
2150 KAO( :, 1, 4,11) = (/&
2151 & 9.1007E-04_JPRB,8.1515E-04_JPRB,7.4019E-04_JPRB,6.6666E-04_JPRB,6.0223E-04_JPRB,6.1717E-04_JPRB,&
2152
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 6.7688E-04_JPRB,7.1358E-04_JPRB,8.7370E-04_JPRB/)
2153
2154
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART7',1,ZHOOK_HANDLE)
2155 1 END SUBROUTINE PART7
2156
2157
2158 1 SUBROUTINE PART8
2159
2160 REAL(KIND=JPRB) :: ZHOOK_HANDLE
2161
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART8',0,ZHOOK_HANDLE)
2162
2163
2164 KAO( :, 2, 4,11) = (/&
2165 & 9.4061E-04_JPRB,8.5858E-04_JPRB,8.0024E-04_JPRB,7.4707E-04_JPRB,7.7220E-04_JPRB,8.8981E-04_JPRB,&
2166
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0064E-03_JPRB,1.1094E-03_JPRB,1.3491E-03_JPRB/)
2167 KAO( :, 3, 4,11) = (/&
2168 & 1.0580E-03_JPRB,9.8116E-04_JPRB,9.2713E-04_JPRB,9.3975E-04_JPRB,1.0753E-03_JPRB,1.2664E-03_JPRB,&
2169
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4600E-03_JPRB,1.6482E-03_JPRB,1.9983E-03_JPRB/)
2170 KAO( :, 4, 4,11) = (/&
2171 & 1.3185E-03_JPRB,1.2651E-03_JPRB,1.2235E-03_JPRB,1.2449E-03_JPRB,1.4893E-03_JPRB,1.7828E-03_JPRB,&
2172
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0723E-03_JPRB,2.3550E-03_JPRB,2.8663E-03_JPRB/)
2173 KAO( :, 5, 4,11) = (/&
2174 & 1.7012E-03_JPRB,1.6381E-03_JPRB,1.6202E-03_JPRB,1.6478E-03_JPRB,2.0248E-03_JPRB,2.4554E-03_JPRB,&
2175
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8747E-03_JPRB,3.2963E-03_JPRB,4.0058E-03_JPRB/)
2176 KAO( :, 1, 5,11) = (/&
2177 & 9.4336E-04_JPRB,8.3814E-04_JPRB,7.4599E-04_JPRB,6.5815E-04_JPRB,5.8713E-04_JPRB,5.1959E-04_JPRB,&
2178
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3264E-04_JPRB,5.5247E-04_JPRB,1.0574E-03_JPRB/)
2179 KAO( :, 2, 5,11) = (/&
2180 & 9.5312E-04_JPRB,8.5894E-04_JPRB,7.8295E-04_JPRB,7.1666E-04_JPRB,6.6657E-04_JPRB,7.2698E-04_JPRB,&
2181
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.1350E-04_JPRB,8.9727E-04_JPRB,1.7265E-03_JPRB/)
2182 KAO( :, 3, 5,11) = (/&
2183 & 9.8083E-04_JPRB,9.0340E-04_JPRB,8.4536E-04_JPRB,8.1479E-04_JPRB,8.9835E-04_JPRB,1.0481E-03_JPRB,&
2184
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2030E-03_JPRB,1.3495E-03_JPRB,2.6645E-03_JPRB/)
2185 KAO( :, 4, 5,11) = (/&
2186 & 1.0919E-03_JPRB,1.0271E-03_JPRB,9.9432E-04_JPRB,1.0447E-03_JPRB,1.2444E-03_JPRB,1.4845E-03_JPRB,&
2187
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7171E-03_JPRB,1.9373E-03_JPRB,3.9343E-03_JPRB/)
2188 KAO( :, 5, 5,11) = (/&
2189 & 1.3125E-03_JPRB,1.2964E-03_JPRB,1.3064E-03_JPRB,1.3776E-03_JPRB,1.6940E-03_JPRB,2.0397E-03_JPRB,&
2190
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3911E-03_JPRB,2.7218E-03_JPRB,5.5487E-03_JPRB/)
2191 KAO( :, 1, 6,11) = (/&
2192 & 1.0191E-03_JPRB,8.9896E-04_JPRB,7.8508E-04_JPRB,6.7831E-04_JPRB,5.7633E-04_JPRB,4.9216E-04_JPRB,&
2193
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0826E-04_JPRB,9.2980E-05_JPRB,1.3931E-03_JPRB/)
2194 KAO( :, 2, 6,11) = (/&
2195 & 1.0047E-03_JPRB,8.9662E-04_JPRB,8.0205E-04_JPRB,7.1402E-04_JPRB,6.3991E-04_JPRB,5.8384E-04_JPRB,&
2196
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.2794E-04_JPRB,6.7696E-04_JPRB,2.3552E-03_JPRB/)
2197 KAO( :, 3, 6,11) = (/&
2198 & 1.0047E-03_JPRB,9.1475E-04_JPRB,8.3262E-04_JPRB,7.7264E-04_JPRB,7.4682E-04_JPRB,8.3595E-04_JPRB,&
2199
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.5189E-04_JPRB,1.0656E-03_JPRB,3.7189E-03_JPRB/)
2200 KAO( :, 4, 6,11) = (/&
2201 & 1.0246E-03_JPRB,9.4864E-04_JPRB,8.9322E-04_JPRB,8.8690E-04_JPRB,1.0204E-03_JPRB,1.2021E-03_JPRB,&
2202
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3925E-03_JPRB,1.5656E-03_JPRB,5.5692E-03_JPRB/)
2203 KAO( :, 5, 6,11) = (/&
2204 & 1.1192E-03_JPRB,1.0605E-03_JPRB,1.0485E-03_JPRB,1.1451E-03_JPRB,1.4045E-03_JPRB,1.6858E-03_JPRB,&
2205
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9713E-03_JPRB,2.2360E-03_JPRB,7.9629E-03_JPRB/)
2206 KAO( :, 1, 7,11) = (/&
2207 & 1.1105E-03_JPRB,9.7554E-04_JPRB,8.4845E-04_JPRB,7.2311E-04_JPRB,5.9822E-04_JPRB,4.8054E-04_JPRB,&
2208
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5912E-04_JPRB,1.6334E-05_JPRB,1.8685E-03_JPRB/)
2209 KAO( :, 2, 7,11) = (/&
2210 & 1.0953E-03_JPRB,9.7181E-04_JPRB,8.5659E-04_JPRB,7.3634E-04_JPRB,6.3339E-04_JPRB,5.4068E-04_JPRB,&
2211
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8190E-04_JPRB,4.0504E-04_JPRB,3.3171E-03_JPRB/)
2212 KAO( :, 3, 7,11) = (/&
2213 & 1.0776E-03_JPRB,9.6988E-04_JPRB,8.6596E-04_JPRB,7.7221E-04_JPRB,7.0034E-04_JPRB,6.6772E-04_JPRB,&
2214
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.4067E-04_JPRB,8.0814E-04_JPRB,5.4649E-03_JPRB/)
2215 KAO( :, 4, 7,11) = (/&
2216 & 1.0633E-03_JPRB,9.7163E-04_JPRB,8.9525E-04_JPRB,8.4042E-04_JPRB,8.3803E-04_JPRB,9.5863E-04_JPRB,&
2217
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0998E-03_JPRB,1.2373E-03_JPRB,8.4838E-03_JPRB/)
2218 KAO( :, 5, 7,11) = (/&
2219 & 1.0727E-03_JPRB,1.0017E-03_JPRB,9.6422E-04_JPRB,9.7682E-04_JPRB,1.1474E-03_JPRB,1.3738E-03_JPRB,&
2220
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6070E-03_JPRB,1.8227E-03_JPRB,1.2477E-02_JPRB/)
2221 KAO( :, 1, 8,11) = (/&
2222 & 1.2212E-03_JPRB,1.0686E-03_JPRB,9.2776E-04_JPRB,7.8030E-04_JPRB,6.3679E-04_JPRB,4.9028E-04_JPRB,&
2223
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5705E-05_JPRB,3.5598E-06_JPRB,3.0236E-03_JPRB/)
2224 KAO( :, 2, 8,11) = (/&
2225 & 1.1904E-03_JPRB,1.0515E-03_JPRB,9.1846E-04_JPRB,7.8584E-04_JPRB,6.5098E-04_JPRB,5.2805E-04_JPRB,&
2226
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1417E-04_JPRB,7.4299E-06_JPRB,5.6339E-03_JPRB/)
2227 KAO( :, 3, 8,11) = (/&
2228 & 1.1656E-03_JPRB,1.0373E-03_JPRB,9.2017E-04_JPRB,7.9903E-04_JPRB,6.9375E-04_JPRB,6.0910E-04_JPRB,&
2229
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7009E-04_JPRB,5.4932E-04_JPRB,9.6178E-03_JPRB/)
2230 KAO( :, 4, 8,11) = (/&
2231 & 1.1498E-03_JPRB,1.0424E-03_JPRB,9.3266E-04_JPRB,8.4261E-04_JPRB,7.7492E-04_JPRB,7.6691E-04_JPRB,&
2232
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.6816E-04_JPRB,9.6408E-04_JPRB,1.5378E-02_JPRB/)
2233 KAO( :, 5, 8,11) = (/&
2234 & 1.1310E-03_JPRB,1.0416E-03_JPRB,9.7038E-04_JPRB,9.2287E-04_JPRB,9.4475E-04_JPRB,1.1097E-03_JPRB,&
2235
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2928E-03_JPRB,1.4673E-03_JPRB,2.3131E-02_JPRB/)
2236 KAO( :, 1, 9,11) = (/&
2237 & 1.3346E-03_JPRB,1.1677E-03_JPRB,1.0079E-03_JPRB,8.4634E-04_JPRB,6.8278E-04_JPRB,5.1557E-04_JPRB,&
2238
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.2170E-06_JPRB,3.5575E-07_JPRB,9.0278E-03_JPRB/)
2239 KAO( :, 2, 9,11) = (/&
2240 & 1.3004E-03_JPRB,1.1437E-03_JPRB,9.9288E-04_JPRB,8.4407E-04_JPRB,6.9152E-04_JPRB,5.4161E-04_JPRB,&
2241
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0407E-04_JPRB,7.5811E-06_JPRB,1.7755E-02_JPRB/)
2242 KAO( :, 3, 9,11) = (/&
2243 & 1.2716E-03_JPRB,1.1282E-03_JPRB,9.9193E-04_JPRB,8.4979E-04_JPRB,7.1877E-04_JPRB,5.8562E-04_JPRB,&
2244
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7440E-04_JPRB,1.3642E-04_JPRB,3.1669E-02_JPRB/)
2245 KAO( :, 4, 9,11) = (/&
2246 & 1.2493E-03_JPRB,1.1232E-03_JPRB,9.9486E-04_JPRB,8.7574E-04_JPRB,7.6208E-04_JPRB,6.8407E-04_JPRB,&
2247
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.7008E-04_JPRB,7.2430E-04_JPRB,5.2322E-02_JPRB/)
2248 KAO( :, 5, 9,11) = (/&
2249 & 1.2292E-03_JPRB,1.1190E-03_JPRB,1.0123E-03_JPRB,9.2200E-04_JPRB,8.6839E-04_JPRB,8.8671E-04_JPRB,&
2250
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0239E-03_JPRB,1.1645E-03_JPRB,8.1332E-02_JPRB/)
2251 KAO( :, 1,10,11) = (/&
2252 & 1.4702E-03_JPRB,1.2866E-03_JPRB,1.1046E-03_JPRB,9.2775E-04_JPRB,7.4227E-04_JPRB,5.4877E-04_JPRB,&
2253
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5669E-06_JPRB,2.1750E-07_JPRB,3.1809E-02_JPRB/)
2254 KAO( :, 2,10,11) = (/&
2255 & 1.4381E-03_JPRB,1.2591E-03_JPRB,1.0910E-03_JPRB,9.1751E-04_JPRB,7.4581E-04_JPRB,5.6956E-04_JPRB,&
2256
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4408E-05_JPRB,2.9977E-06_JPRB,6.5658E-02_JPRB/)
2257 KAO( :, 3,10,11) = (/&
2258 & 1.4088E-03_JPRB,1.2443E-03_JPRB,1.0832E-03_JPRB,9.2001E-04_JPRB,7.6006E-04_JPRB,6.0163E-04_JPRB,&
2259
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0981E-04_JPRB,3.3752E-06_JPRB,1.2158E-01_JPRB/)
2260 KAO( :, 4,10,11) = (/&
2261 & 1.3837E-03_JPRB,1.2299E-03_JPRB,1.0785E-03_JPRB,9.3172E-04_JPRB,7.8792E-04_JPRB,6.5978E-04_JPRB,&
2262
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.6509E-04_JPRB,4.3870E-04_JPRB,2.0789E-01_JPRB/)
2263 KAO( :, 5,10,11) = (/&
2264 & 1.3583E-03_JPRB,1.2214E-03_JPRB,1.0847E-03_JPRB,9.6075E-04_JPRB,8.5481E-04_JPRB,7.9082E-04_JPRB,&
2265
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.2900E-04_JPRB,9.3239E-04_JPRB,3.3217E-01_JPRB/)
2266 KAO( :, 1,11,11) = (/&
2267 & 1.6253E-03_JPRB,1.4219E-03_JPRB,1.2219E-03_JPRB,1.0236E-03_JPRB,8.2003E-04_JPRB,6.0541E-04_JPRB,&
2268
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4231E-06_JPRB,1.8071E-07_JPRB,5.4692E-02_JPRB/)
2269 KAO( :, 2,11,11) = (/&
2270 & 1.5951E-03_JPRB,1.3985E-03_JPRB,1.2081E-03_JPRB,1.0150E-03_JPRB,8.2284E-04_JPRB,6.1646E-04_JPRB,&
2271
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.6207E-06_JPRB,2.7452E-06_JPRB,1.1216E-01_JPRB/)
2272 KAO( :, 3,11,11) = (/&
2273 & 1.5642E-03_JPRB,1.3790E-03_JPRB,1.1965E-03_JPRB,1.0113E-03_JPRB,8.2943E-04_JPRB,6.4775E-04_JPRB,&
2274
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3571E-04_JPRB,8.6785E-06_JPRB,2.0795E-01_JPRB/)
2275 KAO( :, 4,11,11) = (/&
2276 & 1.5361E-03_JPRB,1.3630E-03_JPRB,1.1895E-03_JPRB,1.0207E-03_JPRB,8.5744E-04_JPRB,7.0323E-04_JPRB,&
2277
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8809E-04_JPRB,4.1682E-04_JPRB,3.5571E-01_JPRB/)
2278 KAO( :, 5,11,11) = (/&
2279 & 1.5066E-03_JPRB,1.3488E-03_JPRB,1.1930E-03_JPRB,1.0481E-03_JPRB,9.1295E-04_JPRB,8.2679E-04_JPRB,&
2280
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.2109E-04_JPRB,9.1792E-04_JPRB,5.7120E-01_JPRB/)
2281 KAO( :, 1,12,11) = (/&
2282 & 1.8041E-03_JPRB,1.5789E-03_JPRB,1.3570E-03_JPRB,1.1389E-03_JPRB,9.1257E-04_JPRB,6.7888E-04_JPRB,&
2283
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1658E-06_JPRB,1.5829E-07_JPRB,6.8561E-02_JPRB/)
2284 KAO( :, 2,12,11) = (/&
2285 & 1.7738E-03_JPRB,1.5558E-03_JPRB,1.3438E-03_JPRB,1.1292E-03_JPRB,9.1436E-04_JPRB,6.9573E-04_JPRB,&
2286
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0820E-05_JPRB,3.7433E-06_JPRB,1.4057E-01_JPRB/)
2287 KAO( :, 3,12,11) = (/&
2288 & 1.7418E-03_JPRB,1.5353E-03_JPRB,1.3329E-03_JPRB,1.1261E-03_JPRB,9.2270E-04_JPRB,7.2358E-04_JPRB,&
2289
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7954E-04_JPRB,1.5535E-05_JPRB,2.6118E-01_JPRB/)
2290 KAO( :, 4,12,11) = (/&
2291 & 1.7090E-03_JPRB,1.5180E-03_JPRB,1.3238E-03_JPRB,1.1375E-03_JPRB,9.5111E-04_JPRB,7.6548E-04_JPRB,&
2292
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0636E-04_JPRB,4.1209E-04_JPRB,4.4778E-01_JPRB/)
2293 KAO( :, 5,12,11) = (/&
2294 & 1.6778E-03_JPRB,1.5017E-03_JPRB,1.3263E-03_JPRB,1.1626E-03_JPRB,9.9449E-04_JPRB,8.6348E-04_JPRB,&
2295
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.1707E-04_JPRB,9.1552E-04_JPRB,7.1823E-01_JPRB/)
2296 KAO( :, 1,13,11) = (/&
2297 & 2.0162E-03_JPRB,1.7643E-03_JPRB,1.5166E-03_JPRB,1.2707E-03_JPRB,1.0200E-03_JPRB,7.6409E-04_JPRB,&
2298
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3933E-06_JPRB,1.3814E-07_JPRB,6.7541E-02_JPRB/)
2299 KAO( :, 2,13,11) = (/&
2300 & 1.9804E-03_JPRB,1.7378E-03_JPRB,1.5003E-03_JPRB,1.2598E-03_JPRB,1.0208E-03_JPRB,7.7583E-04_JPRB,&
2301
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0519E-04_JPRB,2.9677E-05_JPRB,1.3898E-01_JPRB/)
2302 KAO( :, 3,13,11) = (/&
2303 & 1.9463E-03_JPRB,1.7141E-03_JPRB,1.4887E-03_JPRB,1.2580E-03_JPRB,1.0319E-03_JPRB,8.0958E-04_JPRB,&
2304
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.4607E-04_JPRB,8.2236E-06_JPRB,2.5839E-01_JPRB/)
2305 KAO( :, 4,13,11) = (/&
2306 & 1.9119E-03_JPRB,1.6986E-03_JPRB,1.4811E-03_JPRB,1.2741E-03_JPRB,1.0665E-03_JPRB,8.4965E-04_JPRB,&
2307
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3669E-04_JPRB,4.3144E-04_JPRB,4.4372E-01_JPRB/)
2308 KAO( :, 5,13,11) = (/&
2309 & 1.8807E-03_JPRB,1.6835E-03_JPRB,1.4885E-03_JPRB,1.3024E-03_JPRB,1.1081E-03_JPRB,9.2308E-04_JPRB,&
2310
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.2856E-04_JPRB,9.1296E-04_JPRB,7.1076E-01_JPRB/)
2311 KAO( :, 1, 1,12) = (/&
2312 & 1.1348E-03_JPRB,1.0512E-03_JPRB,1.0112E-03_JPRB,1.0380E-03_JPRB,1.2591E-03_JPRB,1.5034E-03_JPRB,&
2313
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7458E-03_JPRB,1.9916E-03_JPRB,2.2515E-03_JPRB/)
2314 KAO( :, 2, 1,12) = (/&
2315 & 1.4497E-03_JPRB,1.3258E-03_JPRB,1.2902E-03_JPRB,1.3933E-03_JPRB,1.7402E-03_JPRB,2.0749E-03_JPRB,&
2316
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4232E-03_JPRB,2.7843E-03_JPRB,3.1336E-03_JPRB/)
2317 KAO( :, 3, 1,12) = (/&
2318 & 1.9087E-03_JPRB,1.7431E-03_JPRB,1.6616E-03_JPRB,1.8437E-03_JPRB,2.3259E-03_JPRB,2.8106E-03_JPRB,&
2319
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3232E-03_JPRB,3.7674E-03_JPRB,4.2777E-03_JPRB/)
2320 KAO( :, 4, 1,12) = (/&
2321 & 2.5088E-03_JPRB,2.2929E-03_JPRB,2.1415E-03_JPRB,2.4320E-03_JPRB,3.0901E-03_JPRB,3.7563E-03_JPRB,&
2322
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4295E-03_JPRB,5.0514E-03_JPRB,5.7435E-03_JPRB/)
2323 KAO( :, 5, 1,12) = (/&
2324 & 3.2224E-03_JPRB,2.9512E-03_JPRB,2.7375E-03_JPRB,3.2055E-03_JPRB,4.1147E-03_JPRB,5.0116E-03_JPRB,&
2325
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.9163E-03_JPRB,6.7642E-03_JPRB,7.7486E-03_JPRB/)
2326 KAO( :, 1, 2,12) = (/&
2327 & 1.0492E-03_JPRB,9.6475E-04_JPRB,9.4375E-04_JPRB,9.3817E-04_JPRB,1.1146E-03_JPRB,1.3292E-03_JPRB,&
2328
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5275E-03_JPRB,1.7383E-03_JPRB,1.9763E-03_JPRB/)
2329 KAO( :, 2, 2,12) = (/&
2330 & 1.3114E-03_JPRB,1.2057E-03_JPRB,1.1899E-03_JPRB,1.2587E-03_JPRB,1.5556E-03_JPRB,1.8745E-03_JPRB,&
2331
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1716E-03_JPRB,2.4737E-03_JPRB,2.8199E-03_JPRB/)
2332 KAO( :, 3, 2,12) = (/&
2333 & 1.7413E-03_JPRB,1.5927E-03_JPRB,1.5301E-03_JPRB,1.6869E-03_JPRB,2.1324E-03_JPRB,2.5756E-03_JPRB,&
2334
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0059E-03_JPRB,3.4270E-03_JPRB,3.9244E-03_JPRB/)
2335 KAO( :, 4, 2,12) = (/&
2336 & 2.2840E-03_JPRB,2.1084E-03_JPRB,1.9850E-03_JPRB,2.2595E-03_JPRB,2.8933E-03_JPRB,3.5203E-03_JPRB,&
2337
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1407E-03_JPRB,4.7114E-03_JPRB,5.4047E-03_JPRB/)
2338 KAO( :, 5, 2,12) = (/&
2339 & 2.9533E-03_JPRB,2.7476E-03_JPRB,2.5658E-03_JPRB,3.0087E-03_JPRB,3.8774E-03_JPRB,4.7340E-03_JPRB,&
2340
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5746E-03_JPRB,6.3471E-03_JPRB,7.3465E-03_JPRB/)
2341 KAO( :, 1, 3,12) = (/&
2342 & 9.8854E-04_JPRB,8.9343E-04_JPRB,8.4035E-04_JPRB,7.9923E-04_JPRB,8.9609E-04_JPRB,1.0622E-03_JPRB,&
2343
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2115E-03_JPRB,1.3909E-03_JPRB,1.5813E-03_JPRB/)
2344 KAO( :, 2, 3,12) = (/&
2345 & 1.0879E-03_JPRB,1.0117E-03_JPRB,1.0134E-03_JPRB,1.0514E-03_JPRB,1.2838E-03_JPRB,1.5374E-03_JPRB,&
2346
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7938E-03_JPRB,2.0363E-03_JPRB,2.3508E-03_JPRB/)
2347 KAO( :, 3, 3,12) = (/&
2348 & 1.4163E-03_JPRB,1.3226E-03_JPRB,1.2897E-03_JPRB,1.4327E-03_JPRB,1.8163E-03_JPRB,2.1941E-03_JPRB,&
2349
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5686E-03_JPRB,2.9319E-03_JPRB,3.4012E-03_JPRB/)
2350 KAO( :, 4, 3,12) = (/&
2351 & 1.8714E-03_JPRB,1.7493E-03_JPRB,1.6791E-03_JPRB,1.9710E-03_JPRB,2.5266E-03_JPRB,3.0817E-03_JPRB,&
2352
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6203E-03_JPRB,4.1272E-03_JPRB,4.8320E-03_JPRB/)
2353 KAO( :, 5, 3,12) = (/&
2354 & 2.4278E-03_JPRB,2.3027E-03_JPRB,2.1923E-03_JPRB,2.6689E-03_JPRB,3.4381E-03_JPRB,4.1969E-03_JPRB,&
2355
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9576E-03_JPRB,5.6521E-03_JPRB,6.6247E-03_JPRB/)
2356 KAO( :, 1, 4,12) = (/&
2357 & 9.8669E-04_JPRB,8.8509E-04_JPRB,8.1352E-04_JPRB,7.2996E-04_JPRB,7.1817E-04_JPRB,8.1881E-04_JPRB,&
2358
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.2748E-04_JPRB,1.0403E-03_JPRB,1.2116E-03_JPRB/)
2359 KAO( :, 2, 4,12) = (/&
2360 & 1.0290E-03_JPRB,9.4426E-04_JPRB,8.9000E-04_JPRB,8.7285E-04_JPRB,1.0287E-03_JPRB,1.2254E-03_JPRB,&
2361
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4193E-03_JPRB,1.6044E-03_JPRB,1.8734E-03_JPRB/)
2362 KAO( :, 3, 4,12) = (/&
2363 & 1.1436E-03_JPRB,1.0840E-03_JPRB,1.0833E-03_JPRB,1.1914E-03_JPRB,1.4983E-03_JPRB,1.8005E-03_JPRB,&
2364
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1029E-03_JPRB,2.3872E-03_JPRB,2.8182E-03_JPRB/)
2365 KAO( :, 4, 4,12) = (/&
2366 & 1.4872E-03_JPRB,1.4093E-03_JPRB,1.3825E-03_JPRB,1.6613E-03_JPRB,2.1282E-03_JPRB,2.5939E-03_JPRB,&
2367
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0338E-03_JPRB,3.4691E-03_JPRB,4.1139E-03_JPRB/)
2368 KAO( :, 5, 4,12) = (/&
2369 & 1.9382E-03_JPRB,1.8528E-03_JPRB,1.8277E-03_JPRB,2.2907E-03_JPRB,2.9502E-03_JPRB,3.6113E-03_JPRB,&
2370
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.2678E-03_JPRB,4.8667E-03_JPRB,5.7453E-03_JPRB/)
2371 KAO( :, 1, 5,12) = (/&
2372 & 1.0261E-03_JPRB,9.1725E-04_JPRB,8.2759E-04_JPRB,7.3874E-04_JPRB,6.4512E-04_JPRB,6.5305E-04_JPRB,&
2373
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.2025E-04_JPRB,7.5251E-04_JPRB,1.2236E-03_JPRB/)
2374 KAO( :, 2, 5,12) = (/&
2375 & 1.0342E-03_JPRB,9.3335E-04_JPRB,8.6180E-04_JPRB,7.8962E-04_JPRB,8.4539E-04_JPRB,9.8224E-04_JPRB,&
2376
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1196E-03_JPRB,1.2424E-03_JPRB,1.9823E-03_JPRB/)
2377 KAO( :, 3, 5,12) = (/&
2378 & 1.0684E-03_JPRB,1.0038E-03_JPRB,9.4286E-04_JPRB,9.9237E-04_JPRB,1.2238E-03_JPRB,1.4671E-03_JPRB,&
2379
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7012E-03_JPRB,1.9194E-03_JPRB,3.0657E-03_JPRB/)
2380 KAO( :, 4, 5,12) = (/&
2381 & 1.1964E-03_JPRB,1.1404E-03_JPRB,1.1495E-03_JPRB,1.3909E-03_JPRB,1.7635E-03_JPRB,2.1391E-03_JPRB,&
2382
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5166E-03_JPRB,2.8551E-03_JPRB,4.5233E-03_JPRB/)
2383 KAO( :, 5, 5,12) = (/&
2384 & 1.5188E-03_JPRB,1.4742E-03_JPRB,1.5113E-03_JPRB,1.9296E-03_JPRB,2.4758E-03_JPRB,3.0285E-03_JPRB,&
2385
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5691E-03_JPRB,4.1028E-03_JPRB,6.4627E-03_JPRB/)
2386 KAO( :, 1, 6,12) = (/&
2387 & 1.1049E-03_JPRB,9.7887E-04_JPRB,8.6230E-04_JPRB,7.6209E-04_JPRB,6.5337E-04_JPRB,5.5666E-04_JPRB,&
2388
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5642E-04_JPRB,4.3457E-04_JPRB,1.6601E-03_JPRB/)
2389 KAO( :, 2, 6,12) = (/&
2390 & 1.0940E-03_JPRB,9.8241E-04_JPRB,8.8704E-04_JPRB,7.8683E-04_JPRB,7.2565E-04_JPRB,7.9447E-04_JPRB,&
2391
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.9119E-04_JPRB,9.6573E-04_JPRB,2.8308E-03_JPRB/)
2392 KAO( :, 3, 6,12) = (/&
2393 & 1.0875E-03_JPRB,9.9703E-04_JPRB,9.2009E-04_JPRB,8.7195E-04_JPRB,1.0022E-03_JPRB,1.1888E-03_JPRB,&
2394
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3628E-03_JPRB,1.5154E-03_JPRB,4.5116E-03_JPRB/)
2395 KAO( :, 4, 6,12) = (/&
2396 & 1.1159E-03_JPRB,1.0443E-03_JPRB,1.0086E-03_JPRB,1.1512E-03_JPRB,1.4495E-03_JPRB,1.7437E-03_JPRB,&
2397
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0380E-03_JPRB,2.2956E-03_JPRB,6.7993E-03_JPRB/)
2398 KAO( :, 5, 6,12) = (/&
2399 & 1.2286E-03_JPRB,1.1769E-03_JPRB,1.2461E-03_JPRB,1.5980E-03_JPRB,2.0421E-03_JPRB,2.4961E-03_JPRB,&
2400
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9289E-03_JPRB,3.3559E-03_JPRB,9.7752E-03_JPRB/)
2401 KAO( :, 1, 7,12) = (/&
2402 & 1.2137E-03_JPRB,1.0668E-03_JPRB,9.3381E-04_JPRB,8.0126E-04_JPRB,6.7255E-04_JPRB,5.4820E-04_JPRB,&
2403
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1640E-04_JPRB,3.0869E-05_JPRB,2.3413E-03_JPRB/)
2404 KAO( :, 2, 7,12) = (/&
2405 & 1.1848E-03_JPRB,1.0517E-03_JPRB,9.3479E-04_JPRB,8.1727E-04_JPRB,7.1224E-04_JPRB,6.5078E-04_JPRB,&
2406
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.0341E-04_JPRB,7.0961E-04_JPRB,4.1815E-03_JPRB/)
2407 KAO( :, 3, 7,12) = (/&
2408 & 1.1720E-03_JPRB,1.0531E-03_JPRB,9.4856E-04_JPRB,8.6129E-04_JPRB,8.4208E-04_JPRB,9.5854E-04_JPRB,&
2409
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0943E-03_JPRB,1.2041E-03_JPRB,6.9208E-03_JPRB/)
2410 KAO( :, 4, 7,12) = (/&
2411 & 1.1592E-03_JPRB,1.0754E-03_JPRB,9.9552E-04_JPRB,9.9504E-04_JPRB,1.1919E-03_JPRB,1.4256E-03_JPRB,&
2412
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6531E-03_JPRB,1.8455E-03_JPRB,1.0828E-02_JPRB/)
2413 KAO( :, 5, 7,12) = (/&
2414 & 1.1731E-03_JPRB,1.1101E-03_JPRB,1.1084E-03_JPRB,1.3320E-03_JPRB,1.6974E-03_JPRB,2.0528E-03_JPRB,&
2415
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4023E-03_JPRB,2.7339E-03_JPRB,1.6080E-02_JPRB/)
2416 KAO( :, 1, 8,12) = (/&
2417 & 1.3302E-03_JPRB,1.1658E-03_JPRB,1.0139E-03_JPRB,8.5656E-04_JPRB,7.0725E-04_JPRB,5.4905E-04_JPRB,&
2418
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6082E-04_JPRB,2.8484E-07_JPRB,3.9959E-03_JPRB/)
2419 KAO( :, 2, 8,12) = (/&
2420 & 1.3004E-03_JPRB,1.1467E-03_JPRB,1.0012E-03_JPRB,8.6385E-04_JPRB,7.2504E-04_JPRB,6.1282E-04_JPRB,&
2421
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3057E-04_JPRB,1.6656E-04_JPRB,7.5095E-03_JPRB/)
2422 KAO( :, 3, 8,12) = (/&
2423 & 1.2723E-03_JPRB,1.1332E-03_JPRB,1.0084E-03_JPRB,8.8648E-04_JPRB,8.0497E-04_JPRB,7.6904E-04_JPRB,&
2424
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.5886E-04_JPRB,9.3436E-04_JPRB,1.2956E-02_JPRB/)
2425 KAO( :, 4, 8,12) = (/&
2426 & 1.2504E-03_JPRB,1.1361E-03_JPRB,1.0320E-03_JPRB,9.6671E-04_JPRB,9.9043E-04_JPRB,1.1533E-03_JPRB,&
2427
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3325E-03_JPRB,1.4846E-03_JPRB,2.0833E-02_JPRB/)
2428 KAO( :, 5, 8,12) = (/&
2429 & 1.2393E-03_JPRB,1.1508E-03_JPRB,1.0962E-03_JPRB,1.1509E-03_JPRB,1.4064E-03_JPRB,1.6900E-03_JPRB,&
2430
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9737E-03_JPRB,2.2347E-03_JPRB,3.1620E-02_JPRB/)
2431 KAO( :, 1, 9,12) = (/&
2432 & 1.4663E-03_JPRB,1.2845E-03_JPRB,1.1076E-03_JPRB,9.3469E-04_JPRB,7.5727E-04_JPRB,5.8307E-04_JPRB,&
2433
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6145E-06_JPRB,2.0592E-07_JPRB,1.2575E-02_JPRB/)
2434 KAO( :, 2, 9,12) = (/&
2435 & 1.4356E-03_JPRB,1.2615E-03_JPRB,1.0955E-03_JPRB,9.3110E-04_JPRB,7.6732E-04_JPRB,6.0757E-04_JPRB,&
2436
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.4742E-04_JPRB,4.9464E-06_JPRB,2.4960E-02_JPRB/)
2437 KAO( :, 3, 9,12) = (/&
2438 & 1.4052E-03_JPRB,1.2435E-03_JPRB,1.0940E-03_JPRB,9.3756E-04_JPRB,8.0269E-04_JPRB,7.0533E-04_JPRB,&
2439
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6208E-04_JPRB,5.9691E-04_JPRB,4.4947E-02_JPRB/)
2440 KAO( :, 4, 9,12) = (/&
2441 & 1.3734E-03_JPRB,1.2333E-03_JPRB,1.0941E-03_JPRB,9.8345E-04_JPRB,9.2035E-04_JPRB,9.1976E-04_JPRB,&
2442
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0530E-03_JPRB,1.1532E-03_JPRB,7.5044E-02_JPRB/)
2443 KAO( :, 5, 9,12) = (/&
2444 & 1.3495E-03_JPRB,1.2289E-03_JPRB,1.1320E-03_JPRB,1.1073E-03_JPRB,1.1561E-03_JPRB,1.3692E-03_JPRB,&
2445
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6014E-03_JPRB,1.8055E-03_JPRB,1.1730E-01_JPRB/)
2446 KAO( :, 1,10,12) = (/&
2447 & 1.6187E-03_JPRB,1.4174E-03_JPRB,1.2153E-03_JPRB,1.0239E-03_JPRB,8.2814E-04_JPRB,6.1453E-04_JPRB,&
2448
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.9444E-06_JPRB,1.3528E-07_JPRB,4.6442E-02_JPRB/)
2449 KAO( :, 2,10,12) = (/&
2450 & 1.5845E-03_JPRB,1.3876E-03_JPRB,1.2040E-03_JPRB,1.0153E-03_JPRB,8.2732E-04_JPRB,6.3066E-04_JPRB,&
2451
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0414E-06_JPRB,2.4038E-07_JPRB,9.7061E-02_JPRB/)
2452 KAO( :, 3,10,12) = (/&
2453 & 1.5496E-03_JPRB,1.3649E-03_JPRB,1.1919E-03_JPRB,1.0167E-03_JPRB,8.3828E-04_JPRB,6.9321E-04_JPRB,&
2454
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 5.6244E-04_JPRB,1.6180E-05_JPRB,1.8182E-01_JPRB/)
2455
2456
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART8',1,ZHOOK_HANDLE)
2457 1 END SUBROUTINE PART8
2458
2459
2460 1 SUBROUTINE PART9
2461
2462 REAL(KIND=JPRB) :: ZHOOK_HANDLE
2463
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART9',0,ZHOOK_HANDLE)
2464
2465
2466 KAO( :, 4,10,12) = (/&
2467 & 1.5143E-03_JPRB,1.3460E-03_JPRB,1.1894E-03_JPRB,1.0321E-03_JPRB,9.2147E-04_JPRB,8.3365E-04_JPRB,&
2468
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.4635E-04_JPRB,8.9521E-04_JPRB,3.1352E-01_JPRB/)
2469 KAO( :, 5,10,12) = (/&
2470 & 1.4834E-03_JPRB,1.3403E-03_JPRB,1.2022E-03_JPRB,1.1224E-03_JPRB,1.0739E-03_JPRB,1.1316E-03_JPRB,&
2471
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3218E-03_JPRB,1.4837E-03_JPRB,5.0232E-01_JPRB/)
2472 KAO( :, 1,11,12) = (/&
2473 & 1.7757E-03_JPRB,1.5541E-03_JPRB,1.3331E-03_JPRB,1.1222E-03_JPRB,9.0093E-04_JPRB,6.6092E-04_JPRB,&
2474
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1249E-07_JPRB,1.1902E-07_JPRB,8.4989E-02_JPRB/)
2475 KAO( :, 2,11,12) = (/&
2476 & 1.7401E-03_JPRB,1.5236E-03_JPRB,1.3209E-03_JPRB,1.1131E-03_JPRB,9.0551E-04_JPRB,6.8456E-04_JPRB,&
2477
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0849E-06_JPRB,2.2480E-07_JPRB,1.7663E-01_JPRB/)
2478 KAO( :, 3,11,12) = (/&
2479 & 1.7062E-03_JPRB,1.5022E-03_JPRB,1.3117E-03_JPRB,1.1165E-03_JPRB,9.1999E-04_JPRB,7.4783E-04_JPRB,&
2480
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.9186E-04_JPRB,1.9217E-05_JPRB,3.2957E-01_JPRB/)
2481 KAO( :, 4,11,12) = (/&
2482 & 1.6714E-03_JPRB,1.4855E-03_JPRB,1.3084E-03_JPRB,1.1327E-03_JPRB,9.9341E-04_JPRB,8.8882E-04_JPRB,&
2483
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.4081E-04_JPRB,8.6421E-04_JPRB,5.6545E-01_JPRB/)
2484 KAO( :, 5,11,12) = (/&
2485 & 1.6419E-03_JPRB,1.4793E-03_JPRB,1.3196E-03_JPRB,1.2145E-03_JPRB,1.1433E-03_JPRB,1.1424E-03_JPRB,&
2486
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3148E-03_JPRB,1.4973E-03_JPRB,9.0555E-01_JPRB/)
2487 KAO( :, 1,12,12) = (/&
2488 & 1.9873E-03_JPRB,1.7393E-03_JPRB,1.4928E-03_JPRB,1.2520E-03_JPRB,1.0061E-03_JPRB,7.4569E-04_JPRB,&
2489
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5180E-06_JPRB,1.0587E-07_JPRB,1.1338E-01_JPRB/)
2490 KAO( :, 2,12,12) = (/&
2491 & 1.9520E-03_JPRB,1.7112E-03_JPRB,1.4785E-03_JPRB,1.2437E-03_JPRB,1.0101E-03_JPRB,7.5903E-04_JPRB,&
2492
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0775E-04_JPRB,2.1135E-07_JPRB,2.3445E-01_JPRB/)
2493 KAO( :, 3,12,12) = (/&
2494 & 1.9174E-03_JPRB,1.6867E-03_JPRB,1.4681E-03_JPRB,1.2458E-03_JPRB,1.0238E-03_JPRB,8.1622E-04_JPRB,&
2495
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.4203E-04_JPRB,3.7377E-05_JPRB,4.3560E-01_JPRB/)
2496 KAO( :, 4,12,12) = (/&
2497 & 1.8834E-03_JPRB,1.6709E-03_JPRB,1.4657E-03_JPRB,1.2628E-03_JPRB,1.0856E-03_JPRB,9.4862E-04_JPRB,&
2498
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.6085E-04_JPRB,8.9434E-04_JPRB,7.4512E-01_JPRB/)
2499 KAO( :, 5,12,12) = (/&
2500 & 1.8486E-03_JPRB,1.6625E-03_JPRB,1.4769E-03_JPRB,1.3298E-03_JPRB,1.2184E-03_JPRB,1.1740E-03_JPRB,&
2501
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3120E-03_JPRB,1.5054E-03_JPRB,1.1919E+00_JPRB/)
2502 KAO( :, 1,13,12) = (/&
2503 & 2.2427E-03_JPRB,1.9626E-03_JPRB,1.6858E-03_JPRB,1.4123E-03_JPRB,1.1345E-03_JPRB,8.4814E-04_JPRB,&
2504
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1187E-05_JPRB,1.0167E-07_JPRB,1.1866E-01_JPRB/)
2505 KAO( :, 2,13,12) = (/&
2506 & 2.2124E-03_JPRB,1.9395E-03_JPRB,1.6734E-03_JPRB,1.4094E-03_JPRB,1.1421E-03_JPRB,8.6480E-04_JPRB,&
2507
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2696E-04_JPRB,2.8959E-06_JPRB,2.4434E-01_JPRB/)
2508 KAO( :, 3,13,12) = (/&
2509 & 2.1775E-03_JPRB,1.9152E-03_JPRB,1.6674E-03_JPRB,1.4121E-03_JPRB,1.1577E-03_JPRB,9.1193E-04_JPRB,&
2510
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.8708E-04_JPRB,6.0943E-05_JPRB,4.5287E-01_JPRB/)
2511 KAO( :, 4,13,12) = (/&
2512 & 2.1409E-03_JPRB,1.8984E-03_JPRB,1.6628E-03_JPRB,1.4290E-03_JPRB,1.2050E-03_JPRB,1.0161E-03_JPRB,&
2513
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.8642E-04_JPRB,9.0231E-04_JPRB,7.7451E-01_JPRB/)
2514 KAO( :, 5,13,12) = (/&
2515 & 2.1006E-03_JPRB,1.8859E-03_JPRB,1.6731E-03_JPRB,1.4783E-03_JPRB,1.3081E-03_JPRB,1.2199E-03_JPRB,&
2516
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3045E-03_JPRB,1.5082E-03_JPRB,1.2405E+00_JPRB/)
2517 KAO( :, 1, 1,13) = (/&
2518 & 1.2739E-03_JPRB,1.1824E-03_JPRB,1.1666E-03_JPRB,1.5366E-03_JPRB,1.9783E-03_JPRB,2.4169E-03_JPRB,&
2519
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8580E-03_JPRB,3.2493E-03_JPRB,3.6912E-03_JPRB/)
2520 KAO( :, 2, 1,13) = (/&
2521 & 1.5764E-03_JPRB,1.4796E-03_JPRB,1.5934E-03_JPRB,2.2153E-03_JPRB,2.8682E-03_JPRB,3.5161E-03_JPRB,&
2522
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1531E-03_JPRB,4.7522E-03_JPRB,5.3893E-03_JPRB/)
2523 KAO( :, 3, 1,13) = (/&
2524 & 2.0474E-03_JPRB,1.8907E-03_JPRB,2.1514E-03_JPRB,3.0567E-03_JPRB,3.9747E-03_JPRB,4.8887E-03_JPRB,&
2525
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7686E-03_JPRB,6.5999E-03_JPRB,7.5144E-03_JPRB/)
2526 KAO( :, 4, 1,13) = (/&
2527 & 2.6856E-03_JPRB,2.4413E-03_JPRB,2.8242E-03_JPRB,4.0342E-03_JPRB,5.3078E-03_JPRB,6.5325E-03_JPRB,&
2528
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.7349E-03_JPRB,8.8443E-03_JPRB,1.0074E-02_JPRB/)
2529 KAO( :, 5, 1,13) = (/&
2530 & 3.4590E-03_JPRB,3.1378E-03_JPRB,3.6496E-03_JPRB,5.2809E-03_JPRB,6.8982E-03_JPRB,8.3727E-03_JPRB,&
2531
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.9335E-03_JPRB,1.1522E-02_JPRB,1.3097E-02_JPRB/)
2532 KAO( :, 1, 2,13) = (/&
2533 & 1.1866E-03_JPRB,1.1005E-03_JPRB,1.0888E-03_JPRB,1.4004E-03_JPRB,1.7886E-03_JPRB,2.1767E-03_JPRB,&
2534
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5570E-03_JPRB,2.9296E-03_JPRB,3.3601E-03_JPRB/)
2535 KAO( :, 2, 2,13) = (/&
2536 & 1.4562E-03_JPRB,1.3635E-03_JPRB,1.4719E-03_JPRB,2.0169E-03_JPRB,2.6032E-03_JPRB,3.1819E-03_JPRB,&
2537
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7488E-03_JPRB,4.3087E-03_JPRB,4.9192E-03_JPRB/)
2538 KAO( :, 3, 2,13) = (/&
2539 & 1.8764E-03_JPRB,1.7361E-03_JPRB,1.9709E-03_JPRB,2.7595E-03_JPRB,3.5900E-03_JPRB,4.4194E-03_JPRB,&
2540
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.2979E-03_JPRB,6.0766E-03_JPRB,6.9371E-03_JPRB/)
2541 KAO( :, 4, 2,13) = (/&
2542 & 2.4859E-03_JPRB,2.2733E-03_JPRB,2.5962E-03_JPRB,3.6933E-03_JPRB,4.8528E-03_JPRB,5.9853E-03_JPRB,&
2543
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.0801E-03_JPRB,8.2323E-03_JPRB,9.3999E-03_JPRB/)
2544 KAO( :, 5, 2,13) = (/&
2545 & 3.2381E-03_JPRB,2.9580E-03_JPRB,3.3897E-03_JPRB,4.8434E-03_JPRB,6.3274E-03_JPRB,7.7660E-03_JPRB,&
2546
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.2016E-03_JPRB,1.0766E-02_JPRB,1.2382E-02_JPRB/)
2547 KAO( :, 1, 3,13) = (/&
2548 & 1.0869E-03_JPRB,9.8978E-04_JPRB,9.6295E-04_JPRB,1.1603E-03_JPRB,1.4657E-03_JPRB,1.7785E-03_JPRB,&
2549
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0850E-03_JPRB,2.3589E-03_JPRB,2.7295E-03_JPRB/)
2550 KAO( :, 2, 3,13) = (/&
2551 & 1.2497E-03_JPRB,1.1652E-03_JPRB,1.2498E-03_JPRB,1.6617E-03_JPRB,2.1329E-03_JPRB,2.6212E-03_JPRB,&
2552
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0709E-03_JPRB,3.5231E-03_JPRB,4.1120E-03_JPRB/)
2553 KAO( :, 3, 3,13) = (/&
2554 & 1.5536E-03_JPRB,1.4627E-03_JPRB,1.6643E-03_JPRB,2.3266E-03_JPRB,3.0120E-03_JPRB,3.7022E-03_JPRB,&
2555
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3567E-03_JPRB,5.0579E-03_JPRB,5.8139E-03_JPRB/)
2556 KAO( :, 4, 3,13) = (/&
2557 & 2.0446E-03_JPRB,1.9153E-03_JPRB,2.2001E-03_JPRB,3.1214E-03_JPRB,4.0764E-03_JPRB,5.0190E-03_JPRB,&
2558
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0061E-03_JPRB,6.9576E-03_JPRB,7.9493E-03_JPRB/)
2559 KAO( :, 5, 3,13) = (/&
2560 & 2.6968E-03_JPRB,2.5178E-03_JPRB,2.9045E-03_JPRB,4.1585E-03_JPRB,5.4384E-03_JPRB,6.6732E-03_JPRB,&
2561
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.9956E-03_JPRB,9.1997E-03_JPRB,1.0739E-02_JPRB/)
2562 KAO( :, 1, 4,13) = (/&
2563 & 1.0799E-03_JPRB,9.7556E-04_JPRB,8.9641E-04_JPRB,9.5375E-04_JPRB,1.1834E-03_JPRB,1.4206E-03_JPRB,&
2564
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6456E-03_JPRB,1.8574E-03_JPRB,2.1783E-03_JPRB/)
2565 KAO( :, 2, 4,13) = (/&
2566 & 1.1355E-03_JPRB,1.0374E-03_JPRB,1.0646E-03_JPRB,1.3628E-03_JPRB,1.7241E-03_JPRB,2.0900E-03_JPRB,&
2567
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4594E-03_JPRB,2.8248E-03_JPRB,3.3135E-03_JPRB/)
2568 KAO( :, 3, 4,13) = (/&
2569 & 1.2900E-03_JPRB,1.2405E-03_JPRB,1.3881E-03_JPRB,1.9129E-03_JPRB,2.4612E-03_JPRB,3.0202E-03_JPRB,&
2570
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.5514E-03_JPRB,4.1507E-03_JPRB,4.7512E-03_JPRB/)
2571 KAO( :, 4, 4,13) = (/&
2572 & 1.6429E-03_JPRB,1.5804E-03_JPRB,1.8599E-03_JPRB,2.6280E-03_JPRB,3.3944E-03_JPRB,4.1721E-03_JPRB,&
2573
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9786E-03_JPRB,5.7576E-03_JPRB,6.6384E-03_JPRB/)
2574 KAO( :, 5, 4,13) = (/&
2575 & 2.1595E-03_JPRB,2.0705E-03_JPRB,2.4561E-03_JPRB,3.5243E-03_JPRB,4.6000E-03_JPRB,5.6864E-03_JPRB,&
2576
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.7238E-03_JPRB,7.7228E-03_JPRB,9.0563E-03_JPRB/)
2577 KAO( :, 1, 5,13) = (/&
2578 & 1.1289E-03_JPRB,1.0122E-03_JPRB,9.1285E-04_JPRB,8.4241E-04_JPRB,9.2546E-04_JPRB,1.1068E-03_JPRB,&
2579
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2785E-03_JPRB,1.4321E-03_JPRB,1.7133E-03_JPRB/)
2580 KAO( :, 2, 5,13) = (/&
2581 & 1.1322E-03_JPRB,1.0283E-03_JPRB,9.7216E-04_JPRB,1.1030E-03_JPRB,1.3905E-03_JPRB,1.6648E-03_JPRB,&
2582
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9659E-03_JPRB,2.2474E-03_JPRB,2.6825E-03_JPRB/)
2583 KAO( :, 3, 5,13) = (/&
2584 & 1.1835E-03_JPRB,1.1059E-03_JPRB,1.1769E-03_JPRB,1.5659E-03_JPRB,1.9991E-03_JPRB,2.4574E-03_JPRB,&
2585
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8892E-03_JPRB,3.3463E-03_JPRB,3.9939E-03_JPRB/)
2586 KAO( :, 4, 5,13) = (/&
2587 & 1.3233E-03_JPRB,1.3123E-03_JPRB,1.5693E-03_JPRB,2.1884E-03_JPRB,2.8269E-03_JPRB,3.4574E-03_JPRB,&
2588
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1167E-03_JPRB,4.7382E-03_JPRB,5.7495E-03_JPRB/)
2589 KAO( :, 5, 5,13) = (/&
2590 & 1.7059E-03_JPRB,1.6691E-03_JPRB,2.0917E-03_JPRB,2.9965E-03_JPRB,3.8855E-03_JPRB,4.8207E-03_JPRB,&
2591
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.6559E-03_JPRB,6.5131E-03_JPRB,7.9790E-03_JPRB/)
2592 KAO( :, 1, 6,13) = (/&
2593 & 1.2255E-03_JPRB,1.0879E-03_JPRB,9.6530E-04_JPRB,8.5617E-04_JPRB,7.6660E-04_JPRB,8.1723E-04_JPRB,&
2594
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.3534E-04_JPRB,1.0402E-03_JPRB,1.9062E-03_JPRB/)
2595 KAO( :, 2, 6,13) = (/&
2596 & 1.1965E-03_JPRB,1.0719E-03_JPRB,9.9849E-04_JPRB,9.4121E-04_JPRB,1.0795E-03_JPRB,1.2813E-03_JPRB,&
2597
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4997E-03_JPRB,1.7132E-03_JPRB,3.2547E-03_JPRB/)
2598 KAO( :, 3, 6,13) = (/&
2599 & 1.1926E-03_JPRB,1.1043E-03_JPRB,1.0603E-03_JPRB,1.2688E-03_JPRB,1.5962E-03_JPRB,1.9526E-03_JPRB,&
2600
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2912E-03_JPRB,2.6142E-03_JPRB,5.2095E-03_JPRB/)
2601 KAO( :, 4, 6,13) = (/&
2602 & 1.2240E-03_JPRB,1.1777E-03_JPRB,1.3174E-03_JPRB,1.8087E-03_JPRB,2.3347E-03_JPRB,2.8437E-03_JPRB,&
2603
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3597E-03_JPRB,3.8303E-03_JPRB,7.9481E-03_JPRB/)
2604 KAO( :, 5, 6,13) = (/&
2605 & 1.3458E-03_JPRB,1.3554E-03_JPRB,1.7833E-03_JPRB,2.5412E-03_JPRB,3.2833E-03_JPRB,4.0389E-03_JPRB,&
2606
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7385E-03_JPRB,5.4113E-03_JPRB,1.1516E-02_JPRB/)
2607 KAO( :, 1, 7,13) = (/&
2608 & 1.3402E-03_JPRB,1.1742E-03_JPRB,1.0361E-03_JPRB,8.9910E-04_JPRB,7.6679E-04_JPRB,6.5368E-04_JPRB,&
2609
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.8075E-04_JPRB,4.6956E-04_JPRB,2.7722E-03_JPRB/)
2610 KAO( :, 2, 7,13) = (/&
2611 & 1.3037E-03_JPRB,1.1622E-03_JPRB,1.0519E-03_JPRB,9.4323E-04_JPRB,8.7488E-04_JPRB,9.7401E-04_JPRB,&
2612
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1211E-03_JPRB,1.2635E-03_JPRB,5.0027E-03_JPRB/)
2613 KAO( :, 3, 7,13) = (/&
2614 & 1.2784E-03_JPRB,1.1532E-03_JPRB,1.0893E-03_JPRB,1.0694E-03_JPRB,1.2699E-03_JPRB,1.5175E-03_JPRB,&
2615
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7746E-03_JPRB,2.0272E-03_JPRB,8.3555E-03_JPRB/)
2616 KAO( :, 4, 7,13) = (/&
2617 & 1.2774E-03_JPRB,1.1979E-03_JPRB,1.1860E-03_JPRB,1.4785E-03_JPRB,1.8884E-03_JPRB,2.2924E-03_JPRB,&
2618
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6858E-03_JPRB,3.0881E-03_JPRB,1.3125E-02_JPRB/)
2619 KAO( :, 5, 7,13) = (/&
2620 & 1.2892E-03_JPRB,1.2565E-03_JPRB,1.5103E-03_JPRB,2.1215E-03_JPRB,2.7429E-03_JPRB,3.3579E-03_JPRB,&
2621
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.9536E-03_JPRB,4.4822E-03_JPRB,1.9541E-02_JPRB/)
2622 KAO( :, 1, 8,13) = (/&
2623 & 1.4772E-03_JPRB,1.2923E-03_JPRB,1.1263E-03_JPRB,9.6270E-04_JPRB,8.0241E-04_JPRB,6.4872E-04_JPRB,&
2624
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5811E-04_JPRB,2.1716E-07_JPRB,4.9636E-03_JPRB/)
2625 KAO( :, 2, 8,13) = (/&
2626 & 1.4370E-03_JPRB,1.2729E-03_JPRB,1.1241E-03_JPRB,9.9655E-04_JPRB,8.5931E-04_JPRB,7.7387E-04_JPRB,&
2627
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.4353E-04_JPRB,8.7711E-04_JPRB,9.4321E-03_JPRB/)
2628 KAO( :, 3, 8,13) = (/&
2629 & 1.4034E-03_JPRB,1.2585E-03_JPRB,1.1607E-03_JPRB,1.0510E-03_JPRB,1.0272E-03_JPRB,1.1868E-03_JPRB,&
2630
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3711E-03_JPRB,1.5476E-03_JPRB,1.6446E-02_JPRB/)
2631 KAO( :, 4, 8,13) = (/&
2632 & 1.3792E-03_JPRB,1.2775E-03_JPRB,1.2067E-03_JPRB,1.2391E-03_JPRB,1.5156E-03_JPRB,1.8221E-03_JPRB,&
2633
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1295E-03_JPRB,2.4428E-03_JPRB,2.6678E-02_JPRB/)
2634 KAO( :, 5, 8,13) = (/&
2635 & 1.3692E-03_JPRB,1.3040E-03_JPRB,1.3510E-03_JPRB,1.7655E-03_JPRB,2.2564E-03_JPRB,2.7486E-03_JPRB,&
2636
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2245E-03_JPRB,3.6702E-03_JPRB,4.0890E-02_JPRB/)
2637 KAO( :, 1, 9,13) = (/&
2638 & 1.6318E-03_JPRB,1.4281E-03_JPRB,1.2324E-03_JPRB,1.0452E-03_JPRB,8.5200E-04_JPRB,6.6304E-04_JPRB,&
2639
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2309E-05_JPRB,1.5379E-07_JPRB,1.6381E-02_JPRB/)
2640 KAO( :, 2, 9,13) = (/&
2641 & 1.5875E-03_JPRB,1.3936E-03_JPRB,1.2247E-03_JPRB,1.0563E-03_JPRB,9.0066E-04_JPRB,7.3338E-04_JPRB,&
2642
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.0228E-04_JPRB,1.0871E-04_JPRB,3.2932E-02_JPRB/)
2643 KAO( :, 3, 9,13) = (/&
2644 & 1.5482E-03_JPRB,1.3786E-03_JPRB,1.2438E-03_JPRB,1.1136E-03_JPRB,9.6991E-04_JPRB,9.4000E-04_JPRB,&
2645
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0591E-03_JPRB,1.1303E-03_JPRB,6.0073E-02_JPRB/)
2646 KAO( :, 4, 9,13) = (/&
2647 & 1.5167E-03_JPRB,1.3746E-03_JPRB,1.2857E-03_JPRB,1.1928E-03_JPRB,1.2413E-03_JPRB,1.4696E-03_JPRB,&
2648
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6946E-03_JPRB,1.9089E-03_JPRB,1.0132E-01_JPRB/)
2649 KAO( :, 5, 9,13) = (/&
2650 & 1.4899E-03_JPRB,1.4080E-03_JPRB,1.3636E-03_JPRB,1.4825E-03_JPRB,1.8628E-03_JPRB,2.2533E-03_JPRB,&
2651
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6127E-03_JPRB,2.9482E-03_JPRB,1.5979E-01_JPRB/)
2652 KAO( :, 1,10,13) = (/&
2653 & 1.8020E-03_JPRB,1.5774E-03_JPRB,1.3520E-03_JPRB,1.1382E-03_JPRB,9.2570E-04_JPRB,6.9265E-04_JPRB,&
2654
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3740E-07_JPRB,1.3289E-07_JPRB,6.3524E-02_JPRB/)
2655 KAO( :, 2,10,13) = (/&
2656 & 1.7549E-03_JPRB,1.5358E-03_JPRB,1.3388E-03_JPRB,1.1389E-03_JPRB,9.5013E-04_JPRB,7.6352E-04_JPRB,&
2657
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9725E-04_JPRB,1.5747E-07_JPRB,1.3432E-01_JPRB/)
2658 KAO( :, 3,10,13) = (/&
2659 & 1.7152E-03_JPRB,1.5184E-03_JPRB,1.3412E-03_JPRB,1.1838E-03_JPRB,1.0217E-03_JPRB,8.6702E-04_JPRB,&
2660
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.3836E-04_JPRB,6.8845E-04_JPRB,2.5555E-01_JPRB/)
2661 KAO( :, 4,10,13) = (/&
2662 & 1.6812E-03_JPRB,1.5047E-03_JPRB,1.3857E-03_JPRB,1.2506E-03_JPRB,1.1577E-03_JPRB,1.2249E-03_JPRB,&
2663
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4008E-03_JPRB,1.5238E-03_JPRB,4.4499E-01_JPRB/)
2664 KAO( :, 5,10,13) = (/&
2665 & 1.6497E-03_JPRB,1.5369E-03_JPRB,1.4416E-03_JPRB,1.4073E-03_JPRB,1.5858E-03_JPRB,1.9083E-03_JPRB,&
2666
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1930E-03_JPRB,2.4338E-03_JPRB,7.2126E-01_JPRB/)
2667 KAO( :, 1,11,13) = (/&
2668 & 1.9883E-03_JPRB,1.7404E-03_JPRB,1.4929E-03_JPRB,1.2571E-03_JPRB,1.0189E-03_JPRB,7.6574E-04_JPRB,&
2669
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2245E-07_JPRB,1.1939E-07_JPRB,1.2338E-01_JPRB/)
2670 KAO( :, 2,11,13) = (/&
2671 & 1.9390E-03_JPRB,1.6974E-03_JPRB,1.4774E-03_JPRB,1.2577E-03_JPRB,1.0438E-03_JPRB,8.3574E-04_JPRB,&
2672
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2761E-04_JPRB,1.3870E-07_JPRB,2.6041E-01_JPRB/)
2673 KAO( :, 3,11,13) = (/&
2674 & 1.9012E-03_JPRB,1.6811E-03_JPRB,1.4837E-03_JPRB,1.3022E-03_JPRB,1.1118E-03_JPRB,9.5270E-04_JPRB,&
2675
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.5092E-04_JPRB,5.4921E-04_JPRB,4.9292E-01_JPRB/)
2676 KAO( :, 4,11,13) = (/&
2677 & 1.8676E-03_JPRB,1.6686E-03_JPRB,1.5247E-03_JPRB,1.3663E-03_JPRB,1.2686E-03_JPRB,1.2743E-03_JPRB,&
2678
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4286E-03_JPRB,1.5277E-03_JPRB,8.5618E-01_JPRB/)
2679 KAO( :, 5,11,13) = (/&
2680 & 1.8327E-03_JPRB,1.6976E-03_JPRB,1.5788E-03_JPRB,1.5380E-03_JPRB,1.6440E-03_JPRB,1.9550E-03_JPRB,&
2681
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2595E-03_JPRB,2.4555E-03_JPRB,1.3826E+00_JPRB/)
2682 KAO( :, 1,12,13) = (/&
2683 & 2.2187E-03_JPRB,1.9406E-03_JPRB,1.6640E-03_JPRB,1.4003E-03_JPRB,1.1350E-03_JPRB,8.4971E-04_JPRB,&
2684
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4328E-05_JPRB,1.0909E-07_JPRB,1.7650E-01_JPRB/)
2685 KAO( :, 2,12,13) = (/&
2686 & 2.1703E-03_JPRB,1.8998E-03_JPRB,1.6482E-03_JPRB,1.4040E-03_JPRB,1.1602E-03_JPRB,9.1881E-04_JPRB,&
2687
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8608E-04_JPRB,1.2488E-07_JPRB,3.7061E-01_JPRB/)
2688 KAO( :, 3,12,13) = (/&
2689 & 2.1329E-03_JPRB,1.8834E-03_JPRB,1.6576E-03_JPRB,1.4426E-03_JPRB,1.2188E-03_JPRB,1.0435E-03_JPRB,&
2690
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.0113E-04_JPRB,6.0140E-04_JPRB,6.9805E-01_JPRB/)
2691 KAO( :, 4,12,13) = (/&
2692 & 2.0986E-03_JPRB,1.8697E-03_JPRB,1.6880E-03_JPRB,1.4960E-03_JPRB,1.3858E-03_JPRB,1.3370E-03_JPRB,&
2693
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4776E-03_JPRB,1.5577E-03_JPRB,1.2104E+00_JPRB/)
2694 KAO( :, 5,12,13) = (/&
2695 & 2.0637E-03_JPRB,1.8889E-03_JPRB,1.7335E-03_JPRB,1.6736E-03_JPRB,1.7272E-03_JPRB,2.0047E-03_JPRB,&
2696
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3234E-03_JPRB,2.5266E-03_JPRB,1.9488E+00_JPRB/)
2697 KAO( :, 1,13,13) = (/&
2698 & 2.5214E-03_JPRB,2.2065E-03_JPRB,1.8921E-03_JPRB,1.5892E-03_JPRB,1.2848E-03_JPRB,9.6635E-04_JPRB,&
2699
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4011E-05_JPRB,9.2652E-08_JPRB,1.9891E-01_JPRB/)
2700 KAO( :, 2,13,13) = (/&
2701 & 2.4696E-03_JPRB,2.1633E-03_JPRB,1.8707E-03_JPRB,1.5871E-03_JPRB,1.3039E-03_JPRB,1.0191E-03_JPRB,&
2702
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.2224E-04_JPRB,1.1771E-07_JPRB,4.1557E-01_JPRB/)
2703 KAO( :, 3,13,13) = (/&
2704 & 2.4301E-03_JPRB,2.1428E-03_JPRB,1.8727E-03_JPRB,1.6140E-03_JPRB,1.3467E-03_JPRB,1.1319E-03_JPRB,&
2705
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.6477E-04_JPRB,7.6672E-04_JPRB,7.8045E-01_JPRB/)
2706 KAO( :, 4,13,13) = (/&
2707 & 2.3936E-03_JPRB,2.1221E-03_JPRB,1.8926E-03_JPRB,1.6520E-03_JPRB,1.5047E-03_JPRB,1.4110E-03_JPRB,&
2708
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5144E-03_JPRB,1.6138E-03_JPRB,1.3452E+00_JPRB/)
2709 KAO( :, 5,13,13) = (/&
2710 & 2.3541E-03_JPRB,2.1248E-03_JPRB,1.9211E-03_JPRB,1.8214E-03_JPRB,1.8209E-03_JPRB,2.0454E-03_JPRB,&
2711
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3767E-03_JPRB,2.6027E-03_JPRB,2.1609E+00_JPRB/)
2712 KAO( :, 1, 1,14) = (/&
2713 & 1.4077E-03_JPRB,1.3543E-03_JPRB,2.0015E-03_JPRB,2.9052E-03_JPRB,3.8062E-03_JPRB,4.7033E-03_JPRB,&
2714
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.5027E-03_JPRB,6.3534E-03_JPRB,7.2447E-03_JPRB/)
2715 KAO( :, 2, 1,14) = (/&
2716 & 1.7458E-03_JPRB,1.7470E-03_JPRB,2.6822E-03_JPRB,3.8935E-03_JPRB,5.1049E-03_JPRB,6.3777E-03_JPRB,&
2717
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.5886E-03_JPRB,8.9435E-03_JPRB,1.0377E-02_JPRB/)
2718 KAO( :, 3, 1,14) = (/&
2719 & 2.2077E-03_JPRB,2.2614E-03_JPRB,3.6964E-03_JPRB,5.3773E-03_JPRB,7.0539E-03_JPRB,8.7220E-03_JPRB,&
2720
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0257E-02_JPRB,1.2410E-02_JPRB,1.4154E-02_JPRB/)
2721 KAO( :, 4, 1,14) = (/&
2722 & 2.8109E-03_JPRB,2.9075E-03_JPRB,4.9134E-03_JPRB,7.1686E-03_JPRB,9.5162E-03_JPRB,1.1788E-02_JPRB,&
2723
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3767E-02_JPRB,1.5840E-02_JPRB,1.8057E-02_JPRB/)
2724 KAO( :, 5, 1,14) = (/&
2725 & 3.6086E-03_JPRB,3.7240E-03_JPRB,6.4216E-03_JPRB,9.3840E-03_JPRB,1.2343E-02_JPRB,1.5071E-02_JPRB,&
2726
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7936E-02_JPRB,2.0469E-02_JPRB,2.3091E-02_JPRB/)
2727 KAO( :, 1, 2,14) = (/&
2728 & 1.3294E-03_JPRB,1.2597E-03_JPRB,1.6974E-03_JPRB,2.4370E-03_JPRB,3.1928E-03_JPRB,3.9456E-03_JPRB,&
2729
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9620E-03_JPRB,5.6067E-03_JPRB,6.6116E-03_JPRB/)
2730 KAO( :, 2, 2,14) = (/&
2731 & 1.6318E-03_JPRB,1.6184E-03_JPRB,2.4692E-03_JPRB,3.6012E-03_JPRB,4.7302E-03_JPRB,5.7659E-03_JPRB,&
2732
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.8491E-03_JPRB,8.1205E-03_JPRB,8.9947E-03_JPRB/)
2733 KAO( :, 3, 2,14) = (/&
2734 & 2.0588E-03_JPRB,2.1063E-03_JPRB,3.4156E-03_JPRB,4.9986E-03_JPRB,6.5782E-03_JPRB,8.1429E-03_JPRB,&
2735
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.7017E-03_JPRB,1.0879E-02_JPRB,1.2701E-02_JPRB/)
2736 KAO( :, 4, 2,14) = (/&
2737 & 2.6403E-03_JPRB,2.6941E-03_JPRB,4.6292E-03_JPRB,6.7785E-03_JPRB,8.9613E-03_JPRB,1.1099E-02_JPRB,&
2738
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3055E-02_JPRB,1.4808E-02_JPRB,1.7360E-02_JPRB/)
2739 KAO( :, 5, 2,14) = (/&
2740 & 3.4097E-03_JPRB,3.4754E-03_JPRB,6.1509E-03_JPRB,9.0470E-03_JPRB,1.1928E-02_JPRB,1.4499E-02_JPRB,&
2741
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7101E-02_JPRB,1.9409E-02_JPRB,2.2968E-02_JPRB/)
2742 KAO( :, 1, 3,14) = (/&
2743 & 1.2102E-03_JPRB,1.1138E-03_JPRB,1.3857E-03_JPRB,2.0244E-03_JPRB,2.6529E-03_JPRB,3.2119E-03_JPRB,&
2744
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0399E-03_JPRB,4.4246E-03_JPRB,5.1581E-03_JPRB/)
2745 KAO( :, 2, 3,14) = (/&
2746 & 1.4090E-03_JPRB,1.3841E-03_JPRB,2.0941E-03_JPRB,3.0584E-03_JPRB,4.0208E-03_JPRB,4.9852E-03_JPRB,&
2747
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.9175E-03_JPRB,6.7182E-03_JPRB,7.9412E-03_JPRB/)
2748 KAO( :, 3, 3,14) = (/&
2749 & 1.7427E-03_JPRB,1.7765E-03_JPRB,2.9090E-03_JPRB,4.4193E-03_JPRB,5.8208E-03_JPRB,7.2086E-03_JPRB,&
2750
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.4753E-03_JPRB,9.3954E-03_JPRB,1.1366E-02_JPRB/)
2751 KAO( :, 4, 3,14) = (/&
2752 & 2.2157E-03_JPRB,2.2613E-03_JPRB,3.9916E-03_JPRB,5.8630E-03_JPRB,8.0161E-03_JPRB,9.9398E-03_JPRB,&
2753
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 1.1828E-02_JPRB,1.3094E-02_JPRB,1.5315E-02_JPRB/)
2754
2755
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART9',1,ZHOOK_HANDLE)
2756 1 END SUBROUTINE PART9
2757
2758
2759 1 SUBROUTINE PART10
2760
2761 REAL(KIND=JPRB) :: ZHOOK_HANDLE
2762
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART10',0,ZHOOK_HANDLE)
2763
2764
2765 KAO( :, 5, 3,14) = (/&
2766 & 2.8879E-03_JPRB,2.9466E-03_JPRB,5.4167E-03_JPRB,7.9578E-03_JPRB,1.0502E-02_JPRB,1.2821E-02_JPRB,&
2767
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5472E-02_JPRB,1.7483E-02_JPRB,2.0768E-02_JPRB/)
2768 KAO( :, 1, 4,14) = (/&
2769 & 1.1727E-03_JPRB,1.0568E-03_JPRB,1.1437E-03_JPRB,1.6336E-03_JPRB,2.1314E-03_JPRB,2.5848E-03_JPRB,&
2770
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0242E-03_JPRB,3.4499E-03_JPRB,4.1004E-03_JPRB/)
2771 KAO( :, 2, 4,14) = (/&
2772 & 1.2525E-03_JPRB,1.1704E-03_JPRB,1.6924E-03_JPRB,2.4669E-03_JPRB,3.2745E-03_JPRB,3.9503E-03_JPRB,&
2773
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8080E-03_JPRB,5.4438E-03_JPRB,6.5186E-03_JPRB/)
2774 KAO( :, 3, 4,14) = (/&
2775 & 1.4517E-03_JPRB,1.4687E-03_JPRB,2.4478E-03_JPRB,3.6499E-03_JPRB,4.8038E-03_JPRB,6.0561E-03_JPRB,&
2776
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.1091E-03_JPRB,8.0698E-03_JPRB,9.5998E-03_JPRB/)
2777 KAO( :, 4, 4,14) = (/&
2778 & 1.8147E-03_JPRB,1.9649E-03_JPRB,3.5509E-03_JPRB,5.2270E-03_JPRB,6.8077E-03_JPRB,8.4354E-03_JPRB,&
2779
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0206E-02_JPRB,1.1463E-02_JPRB,1.3354E-02_JPRB/)
2780 KAO( :, 5, 4,14) = (/&
2781 & 2.3595E-03_JPRB,2.5550E-03_JPRB,4.7325E-03_JPRB,6.9980E-03_JPRB,9.2811E-03_JPRB,1.1690E-02_JPRB,&
2782
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3662E-02_JPRB,1.5386E-02_JPRB,1.8463E-02_JPRB/)
2783 KAO( :, 1, 5,14) = (/&
2784 & 1.2458E-03_JPRB,1.1157E-03_JPRB,1.0306E-03_JPRB,1.3033E-03_JPRB,1.6734E-03_JPRB,2.0057E-03_JPRB,&
2785
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3259E-03_JPRB,2.6388E-03_JPRB,3.1846E-03_JPRB/)
2786 KAO( :, 2, 5,14) = (/&
2787 & 1.2388E-03_JPRB,1.1282E-03_JPRB,1.3991E-03_JPRB,2.0036E-03_JPRB,2.6425E-03_JPRB,3.1687E-03_JPRB,&
2788
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8762E-03_JPRB,4.3488E-03_JPRB,5.2301E-03_JPRB/)
2789 KAO( :, 3, 5,14) = (/&
2790 & 1.2913E-03_JPRB,1.2589E-03_JPRB,2.0814E-03_JPRB,3.0197E-03_JPRB,3.9667E-03_JPRB,4.9958E-03_JPRB,&
2791
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.9133E-03_JPRB,6.6574E-03_JPRB,8.0153E-03_JPRB/)
2792 KAO( :, 4, 5,14) = (/&
2793 & 1.4963E-03_JPRB,1.6907E-03_JPRB,3.0309E-03_JPRB,4.4615E-03_JPRB,5.8606E-03_JPRB,7.1898E-03_JPRB,&
2794
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.6483E-03_JPRB,9.7418E-03_JPRB,1.1669E-02_JPRB/)
2795 KAO( :, 5, 5,14) = (/&
2796 & 1.8886E-03_JPRB,2.2503E-03_JPRB,4.1688E-03_JPRB,6.1333E-03_JPRB,8.1604E-03_JPRB,1.0200E-02_JPRB,&
2797
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2063E-02_JPRB,1.3620E-02_JPRB,1.6367E-02_JPRB/)
2798 KAO( :, 1, 6,14) = (/&
2799 & 1.3667E-03_JPRB,1.2087E-03_JPRB,1.0726E-03_JPRB,1.0607E-03_JPRB,1.2821E-03_JPRB,1.5260E-03_JPRB,&
2800
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8008E-03_JPRB,1.9547E-03_JPRB,2.5327E-03_JPRB/)
2801 KAO( :, 2, 6,14) = (/&
2802 & 1.3345E-03_JPRB,1.2078E-03_JPRB,1.2022E-03_JPRB,1.6068E-03_JPRB,2.0999E-03_JPRB,2.5469E-03_JPRB,&
2803
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0216E-03_JPRB,3.3465E-03_JPRB,4.2698E-03_JPRB/)
2804 KAO( :, 3, 6,14) = (/&
2805 & 1.3246E-03_JPRB,1.2185E-03_JPRB,1.7375E-03_JPRB,2.5142E-03_JPRB,3.2318E-03_JPRB,4.0369E-03_JPRB,&
2806
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7556E-03_JPRB,5.3249E-03_JPRB,6.8388E-03_JPRB/)
2807 KAO( :, 4, 6,14) = (/&
2808 & 1.3486E-03_JPRB,1.4645E-03_JPRB,2.5454E-03_JPRB,3.7331E-03_JPRB,4.8424E-03_JPRB,6.0309E-03_JPRB,&
2809
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.1539E-03_JPRB,8.1418E-03_JPRB,1.0356E-02_JPRB/)
2810 KAO( :, 5, 6,14) = (/&
2811 & 1.5159E-03_JPRB,1.9586E-03_JPRB,3.6257E-03_JPRB,5.3066E-03_JPRB,6.9540E-03_JPRB,8.6820E-03_JPRB,&
2812
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0231E-02_JPRB,1.1546E-02_JPRB,1.5077E-02_JPRB/)
2813 KAO( :, 1, 7,14) = (/&
2814 & 1.5156E-03_JPRB,1.3262E-03_JPRB,1.1714E-03_JPRB,1.0190E-03_JPRB,1.0169E-03_JPRB,1.1666E-03_JPRB,&
2815
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3423E-03_JPRB,1.3981E-03_JPRB,3.1910E-03_JPRB/)
2816 KAO( :, 2, 7,14) = (/&
2817 & 1.4765E-03_JPRB,1.3249E-03_JPRB,1.1925E-03_JPRB,1.3147E-03_JPRB,1.6557E-03_JPRB,1.9990E-03_JPRB,&
2818
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2925E-03_JPRB,2.5530E-03_JPRB,5.7452E-03_JPRB/)
2819 KAO( :, 3, 7,14) = (/&
2820 & 1.4370E-03_JPRB,1.3162E-03_JPRB,1.4936E-03_JPRB,2.0652E-03_JPRB,2.6453E-03_JPRB,3.2054E-03_JPRB,&
2821
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7731E-03_JPRB,4.2042E-03_JPRB,9.6110E-03_JPRB/)
2822 KAO( :, 4, 7,14) = (/&
2823 & 1.4149E-03_JPRB,1.3977E-03_JPRB,2.1475E-03_JPRB,3.1203E-03_JPRB,4.0198E-03_JPRB,4.9787E-03_JPRB,&
2824
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7945E-03_JPRB,6.6068E-03_JPRB,1.5108E-02_JPRB/)
2825 KAO( :, 5, 7,14) = (/&
2826 & 1.4374E-03_JPRB,1.7222E-03_JPRB,3.0905E-03_JPRB,4.5057E-03_JPRB,5.8428E-03_JPRB,7.2095E-03_JPRB,&
2827
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.5374E-03_JPRB,9.6315E-03_JPRB,2.2589E-02_JPRB/)
2828 KAO( :, 1, 8,14) = (/&
2829 & 1.6998E-03_JPRB,1.4847E-03_JPRB,1.3004E-03_JPRB,1.1133E-03_JPRB,9.4349E-04_JPRB,9.0420E-04_JPRB,&
2830
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0045E-03_JPRB,4.3482E-04_JPRB,5.8016E-03_JPRB/)
2831 KAO( :, 2, 8,14) = (/&
2832 & 1.6532E-03_JPRB,1.4674E-03_JPRB,1.3041E-03_JPRB,1.2025E-03_JPRB,1.3140E-03_JPRB,1.5672E-03_JPRB,&
2833
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7686E-03_JPRB,1.9237E-03_JPRB,1.1052E-02_JPRB/)
2834 KAO( :, 3, 8,14) = (/&
2835 & 1.6074E-03_JPRB,1.4616E-03_JPRB,1.4143E-03_JPRB,1.6802E-03_JPRB,2.1261E-03_JPRB,2.5596E-03_JPRB,&
2836
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0033E-03_JPRB,3.3007E-03_JPRB,1.9324E-02_JPRB/)
2837 KAO( :, 4, 8,14) = (/&
2838 & 1.5686E-03_JPRB,1.4776E-03_JPRB,1.8215E-03_JPRB,2.5548E-03_JPRB,3.2874E-03_JPRB,4.0303E-03_JPRB,&
2839
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.7235E-03_JPRB,5.2596E-03_JPRB,3.1553E-02_JPRB/)
2840 KAO( :, 5, 8,14) = (/&
2841 & 1.5375E-03_JPRB,1.6349E-03_JPRB,2.6125E-03_JPRB,3.7580E-03_JPRB,4.8839E-03_JPRB,6.0119E-03_JPRB,&
2842
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.1085E-03_JPRB,8.0648E-03_JPRB,4.8625E-02_JPRB/)
2843 KAO( :, 1, 9,14) = (/&
2844 & 1.9224E-03_JPRB,1.6818E-03_JPRB,1.4431E-03_JPRB,1.2356E-03_JPRB,1.0226E-03_JPRB,8.1041E-04_JPRB,&
2845
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6192E-04_JPRB,1.6289E-07_JPRB,1.9855E-02_JPRB/)
2846 KAO( :, 2, 9,14) = (/&
2847 & 1.8714E-03_JPRB,1.6372E-03_JPRB,1.4546E-03_JPRB,1.2624E-03_JPRB,1.1376E-03_JPRB,1.2029E-03_JPRB,&
2848
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3478E-03_JPRB,1.4009E-03_JPRB,4.0030E-02_JPRB/)
2849 KAO( :, 3, 9,14) = (/&
2850 & 1.8227E-03_JPRB,1.6409E-03_JPRB,1.4856E-03_JPRB,1.4717E-03_JPRB,1.6810E-03_JPRB,2.0286E-03_JPRB,&
2851
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3381E-03_JPRB,2.5517E-03_JPRB,7.3381E-02_JPRB/)
2852 KAO( :, 4, 9,14) = (/&
2853 & 1.7776E-03_JPRB,1.6302E-03_JPRB,1.6842E-03_JPRB,2.0805E-03_JPRB,2.6540E-03_JPRB,3.2313E-03_JPRB,&
2854
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7806E-03_JPRB,4.1994E-03_JPRB,1.2455E-01_JPRB/)
2855 KAO( :, 5, 9,14) = (/&
2856 & 1.7367E-03_JPRB,1.7061E-03_JPRB,2.1848E-03_JPRB,3.1013E-03_JPRB,4.0216E-03_JPRB,4.9873E-03_JPRB,&
2857
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.8671E-03_JPRB,6.6087E-03_JPRB,1.9836E-01_JPRB/)
2858 KAO( :, 1,10,14) = (/&
2859 & 2.1700E-03_JPRB,1.8991E-03_JPRB,1.6269E-03_JPRB,1.3797E-03_JPRB,1.1299E-03_JPRB,8.7387E-04_JPRB,&
2860
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3980E-07_JPRB,1.2659E-07_JPRB,7.9784E-02_JPRB/)
2861 KAO( :, 2,10,14) = (/&
2862 & 2.1212E-03_JPRB,1.8542E-03_JPRB,1.6327E-03_JPRB,1.4005E-03_JPRB,1.1807E-03_JPRB,1.0294E-03_JPRB,&
2863
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0221E-03_JPRB,1.9929E-04_JPRB,1.6978E-01_JPRB/)
2864 KAO( :, 3,10,14) = (/&
2865 & 2.0702E-03_JPRB,1.8475E-03_JPRB,1.6421E-03_JPRB,1.4813E-03_JPRB,1.4506E-03_JPRB,1.6271E-03_JPRB,&
2866
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8528E-03_JPRB,1.9874E-03_JPRB,3.2534E-01_JPRB/)
2867 KAO( :, 4,10,14) = (/&
2868 & 2.0197E-03_JPRB,1.8363E-03_JPRB,1.7391E-03_JPRB,1.8390E-03_JPRB,2.2028E-03_JPRB,2.6538E-03_JPRB,&
2869
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1240E-03_JPRB,3.3958E-03_JPRB,5.7201E-01_JPRB/)
2870 KAO( :, 5,10,14) = (/&
2871 & 1.9722E-03_JPRB,1.8724E-03_JPRB,2.0258E-03_JPRB,2.6203E-03_JPRB,3.3709E-03_JPRB,4.1714E-03_JPRB,&
2872
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8976E-03_JPRB,5.4947E-03_JPRB,9.3618E-01_JPRB/)
2873 KAO( :, 1,11,14) = (/&
2874 & 2.4346E-03_JPRB,2.1262E-03_JPRB,1.8242E-03_JPRB,1.5461E-03_JPRB,1.2663E-03_JPRB,9.7971E-04_JPRB,&
2875
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2672E-07_JPRB,1.1257E-07_JPRB,1.6191E-01_JPRB/)
2876 KAO( :, 2,11,14) = (/&
2877 & 2.3800E-03_JPRB,2.0803E-03_JPRB,1.8321E-03_JPRB,1.5714E-03_JPRB,1.3247E-03_JPRB,1.1173E-03_JPRB,&
2878
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0133E-03_JPRB,1.0538E-04_JPRB,3.4424E-01_JPRB/)
2879 KAO( :, 3,11,14) = (/&
2880 & 2.3211E-03_JPRB,2.0734E-03_JPRB,1.8393E-03_JPRB,1.6589E-03_JPRB,1.5627E-03_JPRB,1.6631E-03_JPRB,&
2881
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8852E-03_JPRB,2.0216E-03_JPRB,6.6076E-01_JPRB/)
2882 KAO( :, 4,11,14) = (/&
2883 & 2.2623E-03_JPRB,2.0579E-03_JPRB,1.9437E-03_JPRB,1.9604E-03_JPRB,2.2434E-03_JPRB,2.7165E-03_JPRB,&
2884
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1823E-03_JPRB,3.4732E-03_JPRB,1.1622E+00_JPRB/)
2885 KAO( :, 5,11,14) = (/&
2886 & 2.2095E-03_JPRB,2.1020E-03_JPRB,2.1745E-03_JPRB,2.6686E-03_JPRB,3.4370E-03_JPRB,4.2001E-03_JPRB,&
2887
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9598E-03_JPRB,5.6011E-03_JPRB,1.8980E+00_JPRB/)
2888 KAO( :, 1,12,14) = (/&
2889 & 2.7322E-03_JPRB,2.3881E-03_JPRB,2.0484E-03_JPRB,1.7387E-03_JPRB,1.4199E-03_JPRB,1.1012E-03_JPRB,&
2890
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1269E-07_JPRB,1.0126E-07_JPRB,2.4431E-01_JPRB/)
2891 KAO( :, 2,12,14) = (/&
2892 & 2.6690E-03_JPRB,2.3367E-03_JPRB,2.0556E-03_JPRB,1.7563E-03_JPRB,1.4836E-03_JPRB,1.2255E-03_JPRB,&
2893
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0602E-03_JPRB,2.2342E-04_JPRB,5.2005E-01_JPRB/)
2894 KAO( :, 3,12,14) = (/&
2895 & 2.6024E-03_JPRB,2.3216E-03_JPRB,2.0574E-03_JPRB,1.8575E-03_JPRB,1.6967E-03_JPRB,1.7241E-03_JPRB,&
2896
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9458E-03_JPRB,2.1132E-03_JPRB,9.9525E-01_JPRB/)
2897 KAO( :, 4,12,14) = (/&
2898 & 2.5362E-03_JPRB,2.2963E-03_JPRB,2.1666E-03_JPRB,2.1029E-03_JPRB,2.2976E-03_JPRB,2.7702E-03_JPRB,&
2899
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2192E-03_JPRB,3.5953E-03_JPRB,1.7434E+00_JPRB/)
2900 KAO( :, 5,12,14) = (/&
2901 & 2.4736E-03_JPRB,2.3442E-03_JPRB,2.3511E-03_JPRB,2.7323E-03_JPRB,3.5045E-03_JPRB,4.2744E-03_JPRB,&
2902
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.0574E-03_JPRB,5.7337E-03_JPRB,2.8511E+00_JPRB/)
2903 KAO( :, 1,13,14) = (/&
2904 & 3.0694E-03_JPRB,2.6858E-03_JPRB,2.3020E-03_JPRB,1.9523E-03_JPRB,1.5893E-03_JPRB,1.2280E-03_JPRB,&
2905
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.6824E-05_JPRB,9.3571E-08_JPRB,2.9420E-01_JPRB/)
2906 KAO( :, 2,13,14) = (/&
2907 & 2.9959E-03_JPRB,2.6225E-03_JPRB,2.2984E-03_JPRB,1.9588E-03_JPRB,1.6492E-03_JPRB,1.3537E-03_JPRB,&
2908
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1186E-03_JPRB,4.7180E-04_JPRB,6.2570E-01_JPRB/)
2909 KAO( :, 3,13,14) = (/&
2910 & 2.9125E-03_JPRB,2.5931E-03_JPRB,2.2966E-03_JPRB,2.0585E-03_JPRB,1.8442E-03_JPRB,1.7986E-03_JPRB,&
2911
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9858E-03_JPRB,2.1644E-03_JPRB,1.1929E+00_JPRB/)
2912 KAO( :, 4,13,14) = (/&
2913 & 2.8338E-03_JPRB,2.5576E-03_JPRB,2.3960E-03_JPRB,2.2668E-03_JPRB,2.3808E-03_JPRB,2.8162E-03_JPRB,&
2914
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2861E-03_JPRB,3.6781E-03_JPRB,2.0900E+00_JPRB/)
2915 KAO( :, 5,13,14) = (/&
2916 & 2.7615E-03_JPRB,2.6036E-03_JPRB,2.5577E-03_JPRB,2.8390E-03_JPRB,3.5800E-03_JPRB,4.3621E-03_JPRB,&
2917
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1422E-03_JPRB,5.8469E-03_JPRB,3.4082E+00_JPRB/)
2918 KAO( :, 1, 1,15) = (/&
2919 & 1.5335E-03_JPRB,1.9324E-03_JPRB,3.7679E-03_JPRB,5.5453E-03_JPRB,7.3003E-03_JPRB,9.0183E-03_JPRB,&
2920
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0616E-02_JPRB,1.1802E-02_JPRB,1.3402E-02_JPRB/)
2921 KAO( :, 2, 1,15) = (/&
2922 & 1.8833E-03_JPRB,2.7655E-03_JPRB,5.2889E-03_JPRB,7.8002E-03_JPRB,1.0284E-02_JPRB,1.2663E-02_JPRB,&
2923
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4949E-02_JPRB,1.7186E-02_JPRB,1.9451E-02_JPRB/)
2924 KAO( :, 3, 1,15) = (/&
2925 & 2.3483E-03_JPRB,3.8414E-03_JPRB,7.3773E-03_JPRB,1.0888E-02_JPRB,1.4361E-02_JPRB,1.7765E-02_JPRB,&
2926
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0815E-02_JPRB,2.3917E-02_JPRB,2.7184E-02_JPRB/)
2927 KAO( :, 4, 1,15) = (/&
2928 & 2.9416E-03_JPRB,5.1566E-03_JPRB,9.9228E-03_JPRB,1.4661E-02_JPRB,1.9210E-02_JPRB,2.3760E-02_JPRB,&
2929
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8113E-02_JPRB,3.1154E-02_JPRB,3.5404E-02_JPRB/)
2930 KAO( :, 5, 1,15) = (/&
2931 & 3.6966E-03_JPRB,6.6653E-03_JPRB,1.2941E-02_JPRB,1.9171E-02_JPRB,2.5316E-02_JPRB,3.1127E-02_JPRB,&
2932
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6787E-02_JPRB,4.1016E-02_JPRB,4.6262E-02_JPRB/)
2933 KAO( :, 1, 2,15) = (/&
2934 & 1.4383E-03_JPRB,1.8910E-03_JPRB,3.6349E-03_JPRB,5.3031E-03_JPRB,6.9932E-03_JPRB,8.6450E-03_JPRB,&
2935
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0512E-02_JPRB,1.1619E-02_JPRB,1.3810E-02_JPRB/)
2936 KAO( :, 2, 2,15) = (/&
2937 & 1.7711E-03_JPRB,2.7662E-03_JPRB,5.3277E-03_JPRB,7.8716E-03_JPRB,1.0388E-02_JPRB,1.2798E-02_JPRB,&
2938
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4898E-02_JPRB,1.7232E-02_JPRB,1.9744E-02_JPRB/)
2939 KAO( :, 3, 2,15) = (/&
2940 & 2.2091E-03_JPRB,3.9249E-03_JPRB,7.5049E-03_JPRB,1.1104E-02_JPRB,1.4661E-02_JPRB,1.8139E-02_JPRB,&
2941
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1328E-02_JPRB,2.3602E-02_JPRB,2.7985E-02_JPRB/)
2942 KAO( :, 4, 2,15) = (/&
2943 & 2.7705E-03_JPRB,5.2948E-03_JPRB,1.0279E-02_JPRB,1.5231E-02_JPRB,2.0000E-02_JPRB,2.4763E-02_JPRB,&
2944
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9040E-02_JPRB,3.2255E-02_JPRB,3.8158E-02_JPRB/)
2945 KAO( :, 5, 2,15) = (/&
2946 & 3.5089E-03_JPRB,6.9573E-03_JPRB,1.3524E-02_JPRB,2.0020E-02_JPRB,2.6474E-02_JPRB,3.2706E-02_JPRB,&
2947
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.8152E-02_JPRB,4.2439E-02_JPRB,5.0508E-02_JPRB/)
2948 KAO( :, 1, 3,15) = (/&
2949 & 1.2705E-03_JPRB,1.6880E-03_JPRB,3.2165E-03_JPRB,4.7906E-03_JPRB,6.3186E-03_JPRB,7.6460E-03_JPRB,&
2950
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.3643E-03_JPRB,1.0229E-02_JPRB,1.2458E-02_JPRB/)
2951 KAO( :, 2, 3,15) = (/&
2952 & 1.5436E-03_JPRB,2.5438E-03_JPRB,4.9323E-03_JPRB,7.3010E-03_JPRB,9.6387E-03_JPRB,1.1841E-02_JPRB,&
2953
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4163E-02_JPRB,1.5548E-02_JPRB,1.9155E-02_JPRB/)
2954 KAO( :, 3, 3,15) = (/&
2955 & 1.9176E-03_JPRB,3.6434E-03_JPRB,6.9853E-03_JPRB,1.0590E-02_JPRB,1.3995E-02_JPRB,1.7311E-02_JPRB,&
2956
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0232E-02_JPRB,2.1858E-02_JPRB,2.7487E-02_JPRB/)
2957 KAO( :, 4, 3,15) = (/&
2958 & 2.3869E-03_JPRB,4.9269E-03_JPRB,9.6201E-03_JPRB,1.4277E-02_JPRB,1.9500E-02_JPRB,2.4127E-02_JPRB,&
2959
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8236E-02_JPRB,3.0501E-02_JPRB,3.7416E-02_JPRB/)
2960 KAO( :, 5, 3,15) = (/&
2961 & 2.9972E-03_JPRB,6.6065E-03_JPRB,1.2887E-02_JPRB,1.9158E-02_JPRB,2.5345E-02_JPRB,3.1167E-02_JPRB,&
2962
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7358E-02_JPRB,4.1161E-02_JPRB,5.0258E-02_JPRB/)
2963 KAO( :, 1, 4,15) = (/&
2964 & 1.2393E-03_JPRB,1.4291E-03_JPRB,2.7934E-03_JPRB,4.1582E-03_JPRB,5.4860E-03_JPRB,6.6271E-03_JPRB,&
2965
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.7456E-03_JPRB,8.5638E-03_JPRB,1.0713E-02_JPRB/)
2966 KAO( :, 2, 4,15) = (/&
2967 & 1.3400E-03_JPRB,2.1964E-03_JPRB,4.2752E-03_JPRB,6.3365E-03_JPRB,8.4061E-03_JPRB,1.0279E-02_JPRB,&
2968
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2357E-02_JPRB,1.3474E-02_JPRB,1.7008E-02_JPRB/)
2969 KAO( :, 3, 4,15) = (/&
2970 & 1.6349E-03_JPRB,3.2436E-03_JPRB,6.2304E-03_JPRB,9.4103E-03_JPRB,1.2432E-02_JPRB,1.5539E-02_JPRB,&
2971
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8108E-02_JPRB,2.0011E-02_JPRB,2.5265E-02_JPRB/)
2972 KAO( :, 4, 4,15) = (/&
2973 & 2.0292E-03_JPRB,4.6522E-03_JPRB,9.1141E-03_JPRB,1.3542E-02_JPRB,1.7761E-02_JPRB,2.1969E-02_JPRB,&
2974
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5895E-02_JPRB,2.8549E-02_JPRB,3.4694E-02_JPRB/)
2975 KAO( :, 5, 4,15) = (/&
2976 & 2.5299E-03_JPRB,6.1198E-03_JPRB,1.2014E-02_JPRB,1.7823E-02_JPRB,2.3626E-02_JPRB,3.0145E-02_JPRB,&
2977
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4844E-02_JPRB,3.8179E-02_JPRB,4.7443E-02_JPRB/)
2978 KAO( :, 1, 5,15) = (/&
2979 & 1.3376E-03_JPRB,1.3061E-03_JPRB,2.2933E-03_JPRB,3.4105E-03_JPRB,4.5058E-03_JPRB,5.4169E-03_JPRB,&
2980
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3127E-03_JPRB,7.0090E-03_JPRB,8.8382E-03_JPRB/)
2981 KAO( :, 2, 5,15) = (/&
2982 & 1.3263E-03_JPRB,1.8712E-03_JPRB,3.6486E-03_JPRB,5.3688E-03_JPRB,7.2653E-03_JPRB,8.6947E-03_JPRB,&
2983
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0335E-02_JPRB,1.1527E-02_JPRB,1.4282E-02_JPRB/)
2984 KAO( :, 3, 5,15) = (/&
2985 & 1.4243E-03_JPRB,2.8262E-03_JPRB,5.4158E-03_JPRB,8.2878E-03_JPRB,1.0953E-02_JPRB,1.3340E-02_JPRB,&
2986
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6078E-02_JPRB,1.7370E-02_JPRB,2.2313E-02_JPRB/)
2987 KAO( :, 4, 5,15) = (/&
2988 & 1.6989E-03_JPRB,4.0314E-03_JPRB,7.9177E-03_JPRB,1.2164E-02_JPRB,1.6022E-02_JPRB,1.9693E-02_JPRB,&
2989
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2743E-02_JPRB,2.5430E-02_JPRB,3.1147E-02_JPRB/)
2990 KAO( :, 5, 5,15) = (/&
2991 & 2.0980E-03_JPRB,5.4208E-03_JPRB,1.0645E-02_JPRB,1.5846E-02_JPRB,2.1457E-02_JPRB,2.6719E-02_JPRB,&
2992
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1700E-02_JPRB,3.4634E-02_JPRB,4.2396E-02_JPRB/)
2993 KAO( :, 1, 6,15) = (/&
2994 & 1.4699E-03_JPRB,1.3039E-03_JPRB,1.7682E-03_JPRB,2.6642E-03_JPRB,3.3901E-03_JPRB,4.1361E-03_JPRB,&
2995
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.9645E-03_JPRB,5.4015E-03_JPRB,7.0142E-03_JPRB/)
2996 KAO( :, 2, 6,15) = (/&
2997 & 1.4420E-03_JPRB,1.6011E-03_JPRB,2.9603E-03_JPRB,4.2663E-03_JPRB,5.9096E-03_JPRB,7.1197E-03_JPRB,&
2998
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.3224E-03_JPRB,9.2909E-03_JPRB,1.1572E-02_JPRB/)
2999 KAO( :, 3, 6,15) = (/&
3000 & 1.4209E-03_JPRB,2.3651E-03_JPRB,4.5056E-03_JPRB,6.8456E-03_JPRB,9.2009E-03_JPRB,1.1119E-02_JPRB,&
3001
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3497E-02_JPRB,1.4341E-02_JPRB,1.8485E-02_JPRB/)
3002 KAO( :, 4, 6,15) = (/&
3003 & 1.4876E-03_JPRB,3.4335E-03_JPRB,6.7368E-03_JPRB,1.0314E-02_JPRB,1.3111E-02_JPRB,1.6614E-02_JPRB,&
3004
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9482E-02_JPRB,2.1613E-02_JPRB,2.6785E-02_JPRB/)
3005 KAO( :, 5, 6,15) = (/&
3006 & 1.7311E-03_JPRB,4.9309E-03_JPRB,9.6716E-03_JPRB,1.4408E-02_JPRB,1.8785E-02_JPRB,2.3407E-02_JPRB,&
3007
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7826E-02_JPRB,3.0253E-02_JPRB,3.8797E-02_JPRB/)
3008 KAO( :, 1, 7,15) = (/&
3009 & 1.6452E-03_JPRB,1.4412E-03_JPRB,1.4879E-03_JPRB,1.9571E-03_JPRB,2.5256E-03_JPRB,3.0766E-03_JPRB,&
3010
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7011E-03_JPRB,4.0149E-03_JPRB,5.3627E-03_JPRB/)
3011 KAO( :, 2, 7,15) = (/&
3012 & 1.6160E-03_JPRB,1.5227E-03_JPRB,2.2973E-03_JPRB,3.3257E-03_JPRB,4.5738E-03_JPRB,5.5584E-03_JPRB,&
3013
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.3881E-03_JPRB,7.2538E-03_JPRB,9.6722E-03_JPRB/)
3014 KAO( :, 3, 7,15) = (/&
3015 & 1.5860E-03_JPRB,2.0263E-03_JPRB,3.8492E-03_JPRB,5.5523E-03_JPRB,7.3824E-03_JPRB,9.0664E-03_JPRB,&
3016
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0834E-02_JPRB,1.1569E-02_JPRB,1.5617E-02_JPRB/)
3017 KAO( :, 4, 7,15) = (/&
3018 & 1.5638E-03_JPRB,2.9557E-03_JPRB,5.6559E-03_JPRB,8.6531E-03_JPRB,1.0991E-02_JPRB,1.3929E-02_JPRB,&
3019
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6365E-02_JPRB,1.8010E-02_JPRB,2.4730E-02_JPRB/)
3020 KAO( :, 5, 7,15) = (/&
3021 & 1.5935E-03_JPRB,4.3661E-03_JPRB,8.5392E-03_JPRB,1.2446E-02_JPRB,1.6667E-02_JPRB,2.0343E-02_JPRB,&
3022
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3794E-02_JPRB,2.5830E-02_JPRB,3.6014E-02_JPRB/)
3023 KAO( :, 1, 8,15) = (/&
3024 & 1.8723E-03_JPRB,1.6388E-03_JPRB,1.4610E-03_JPRB,1.5561E-03_JPRB,1.8720E-03_JPRB,2.3376E-03_JPRB,&
3025
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6613E-03_JPRB,2.9039E-03_JPRB,6.4956E-03_JPRB/)
3026 KAO( :, 2, 8,15) = (/&
3027 & 1.8456E-03_JPRB,1.6296E-03_JPRB,1.9116E-03_JPRB,2.6011E-03_JPRB,3.5199E-03_JPRB,4.2393E-03_JPRB,&
3028
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.8531E-03_JPRB,5.3550E-03_JPRB,1.2422E-02_JPRB/)
3029 KAO( :, 3, 8,15) = (/&
3030 & 1.8093E-03_JPRB,1.9050E-03_JPRB,3.1124E-03_JPRB,4.4584E-03_JPRB,5.9417E-03_JPRB,7.2783E-03_JPRB,&
3031
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.6194E-03_JPRB,9.3908E-03_JPRB,2.1656E-02_JPRB/)
3032 KAO( :, 4, 8,15) = (/&
3033 & 1.7796E-03_JPRB,2.5264E-03_JPRB,4.7746E-03_JPRB,7.1139E-03_JPRB,9.2445E-03_JPRB,1.1405E-02_JPRB,&
3034
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3524E-02_JPRB,1.4718E-02_JPRB,3.5472E-02_JPRB/)
3035 KAO( :, 5, 8,15) = (/&
3036 & 1.7474E-03_JPRB,3.6460E-03_JPRB,7.3775E-03_JPRB,1.0554E-02_JPRB,1.4351E-02_JPRB,1.7437E-02_JPRB,&
3037
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.0234E-02_JPRB,2.2659E-02_JPRB,5.4466E-02_JPRB/)
3038 KAO( :, 1, 9,15) = (/&
3039 & 2.1531E-03_JPRB,1.8852E-03_JPRB,1.6173E-03_JPRB,1.4438E-03_JPRB,1.4392E-03_JPRB,1.6909E-03_JPRB,&
3040
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8360E-03_JPRB,1.2556E-03_JPRB,2.2429E-02_JPRB/)
3041 KAO( :, 2, 9,15) = (/&
3042 & 2.1197E-03_JPRB,1.8522E-03_JPRB,1.7919E-03_JPRB,2.0362E-03_JPRB,2.5897E-03_JPRB,3.1619E-03_JPRB,&
3043
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6769E-03_JPRB,3.8809E-03_JPRB,4.5293E-02_JPRB/)
3044 KAO( :, 3, 9,15) = (/&
3045 & 2.0806E-03_JPRB,1.9202E-03_JPRB,2.4651E-03_JPRB,3.5166E-03_JPRB,4.6833E-03_JPRB,5.6685E-03_JPRB,&
3046
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.7191E-03_JPRB,7.2005E-03_JPRB,8.3053E-02_JPRB/)
3047 KAO( :, 4, 9,15) = (/&
3048 & 2.0479E-03_JPRB,2.3234E-03_JPRB,3.9257E-03_JPRB,5.8282E-03_JPRB,7.5382E-03_JPRB,9.2852E-03_JPRB,&
3049
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0968E-02_JPRB,1.1755E-02_JPRB,1.4085E-01_JPRB/)
3050 KAO( :, 5, 9,15) = (/&
3051 & 2.0135E-03_JPRB,3.1161E-03_JPRB,6.2953E-03_JPRB,8.9489E-03_JPRB,1.1910E-02_JPRB,1.4603E-02_JPRB,&
3052
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7103E-02_JPRB,1.8687E-02_JPRB,2.2489E-01_JPRB/)
3053 KAO( :, 1,10,15) = (/&
3054 & 2.4996E-03_JPRB,2.1860E-03_JPRB,1.8719E-03_JPRB,1.5736E-03_JPRB,1.3474E-03_JPRB,1.3138E-03_JPRB,&
3055
2/2
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 1 times.
10 & 1.2455E-03_JPRB,1.1328E-07_JPRB,9.2144E-02_JPRB/)
3056
3057
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART10',1,ZHOOK_HANDLE)
3058 1 END SUBROUTINE PART10
3059
3060
3061 1 SUBROUTINE PART11
3062
3063 REAL(KIND=JPRB) :: ZHOOK_HANDLE
3064
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART11',0,ZHOOK_HANDLE)
3065
3066
3067 KAO( :, 2,10,15) = (/&
3068 & 2.4545E-03_JPRB,2.1478E-03_JPRB,1.8895E-03_JPRB,1.8842E-03_JPRB,2.0494E-03_JPRB,2.4515E-03_JPRB,&
3069
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7912E-03_JPRB,2.8411E-03_JPRB,1.9577E-01_JPRB/)
3070 KAO( :, 3,10,15) = (/&
3071 & 2.4123E-03_JPRB,2.1379E-03_JPRB,2.2699E-03_JPRB,2.9106E-03_JPRB,3.7957E-03_JPRB,4.5303E-03_JPRB,&
3072
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.1569E-03_JPRB,5.5947E-03_JPRB,3.7579E-01_JPRB/)
3073 KAO( :, 4,10,15) = (/&
3074 & 2.3670E-03_JPRB,2.3455E-03_JPRB,3.3904E-03_JPRB,4.7982E-03_JPRB,6.5586E-03_JPRB,7.6814E-03_JPRB,&
3075
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.9698E-03_JPRB,9.4919E-03_JPRB,6.5920E-01_JPRB/)
3076 KAO( :, 5,10,15) = (/&
3077 & 2.3225E-03_JPRB,2.8728E-03_JPRB,5.4745E-03_JPRB,7.9446E-03_JPRB,1.0257E-02_JPRB,1.2466E-02_JPRB,&
3078
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4486E-02_JPRB,1.5553E-02_JPRB,1.0800E+00_JPRB/)
3079 KAO( :, 1,11,15) = (/&
3080 & 2.8637E-03_JPRB,2.5035E-03_JPRB,2.1436E-03_JPRB,1.8035E-03_JPRB,1.5339E-03_JPRB,1.4234E-03_JPRB,&
3081
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1994E-03_JPRB,9.8829E-08_JPRB,1.9145E-01_JPRB/)
3082 KAO( :, 2,11,15) = (/&
3083 & 2.8241E-03_JPRB,2.4682E-03_JPRB,2.1655E-03_JPRB,2.0940E-03_JPRB,2.2293E-03_JPRB,2.5943E-03_JPRB,&
3084
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.8972E-03_JPRB,2.9304E-03_JPRB,4.0810E-01_JPRB/)
3085 KAO( :, 3,11,15) = (/&
3086 & 2.7755E-03_JPRB,2.4611E-03_JPRB,2.5498E-03_JPRB,3.0773E-03_JPRB,3.9941E-03_JPRB,4.8157E-03_JPRB,&
3087
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3205E-03_JPRB,5.7118E-03_JPRB,7.8317E-01_JPRB/)
3088 KAO( :, 4,11,15) = (/&
3089 & 2.7180E-03_JPRB,2.6251E-03_JPRB,3.6039E-03_JPRB,5.0535E-03_JPRB,6.8961E-03_JPRB,8.2198E-03_JPRB,&
3090
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.2474E-03_JPRB,9.6840E-03_JPRB,1.3768E+00_JPRB/)
3091 KAO( :, 5,11,15) = (/&
3092 & 2.6558E-03_JPRB,3.1273E-03_JPRB,5.6600E-03_JPRB,8.3772E-03_JPRB,1.0624E-02_JPRB,1.3218E-02_JPRB,&
3093
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5003E-02_JPRB,1.5876E-02_JPRB,2.2520E+00_JPRB/)
3094 KAO( :, 1,12,15) = (/&
3095 & 3.2714E-03_JPRB,2.8584E-03_JPRB,2.4535E-03_JPRB,2.0680E-03_JPRB,1.7413E-03_JPRB,1.5693E-03_JPRB,&
3096
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4195E-03_JPRB,8.7492E-08_JPRB,2.9715E-01_JPRB/)
3097 KAO( :, 2,12,15) = (/&
3098 & 3.2238E-03_JPRB,2.8219E-03_JPRB,2.4898E-03_JPRB,2.3173E-03_JPRB,2.4029E-03_JPRB,2.7493E-03_JPRB,&
3099
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0184E-03_JPRB,3.0151E-03_JPRB,6.3430E-01_JPRB/)
3100 KAO( :, 3,12,15) = (/&
3101 & 3.1690E-03_JPRB,2.8261E-03_JPRB,2.8398E-03_JPRB,3.2763E-03_JPRB,4.1787E-03_JPRB,5.0712E-03_JPRB,&
3102
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7128E-03_JPRB,5.7933E-03_JPRB,1.2146E+00_JPRB/)
3103 KAO( :, 4,12,15) = (/&
3104 & 3.1066E-03_JPRB,2.9671E-03_JPRB,3.8178E-03_JPRB,5.5845E-03_JPRB,7.1025E-03_JPRB,8.6518E-03_JPRB,&
3105
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.8099E-03_JPRB,1.0106E-02_JPRB,2.1338E+00_JPRB/)
3106 KAO( :, 5,12,15) = (/&
3107 & 3.0417E-03_JPRB,3.4447E-03_JPRB,5.9771E-03_JPRB,8.7849E-03_JPRB,1.1154E-02_JPRB,1.3933E-02_JPRB,&
3108
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5683E-02_JPRB,1.6226E-02_JPRB,3.5026E+00_JPRB/)
3109 KAO( :, 1,13,15) = (/&
3110 & 3.7174E-03_JPRB,3.2529E-03_JPRB,2.7876E-03_JPRB,2.3613E-03_JPRB,1.9840E-03_JPRB,1.7059E-03_JPRB,&
3111
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5699E-03_JPRB,2.2638E-04_JPRB,3.7080E-01_JPRB/)
3112 KAO( :, 2,13,15) = (/&
3113 & 3.6607E-03_JPRB,3.2024E-03_JPRB,2.8505E-03_JPRB,2.5957E-03_JPRB,2.5988E-03_JPRB,2.8843E-03_JPRB,&
3114
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1480E-03_JPRB,3.2252E-03_JPRB,7.9012E-01_JPRB/)
3115 KAO( :, 3,13,15) = (/&
3116 & 3.6056E-03_JPRB,3.2358E-03_JPRB,3.0977E-03_JPRB,3.5132E-03_JPRB,4.3893E-03_JPRB,5.3238E-03_JPRB,&
3117
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.9823E-03_JPRB,6.0551E-03_JPRB,1.5116E+00_JPRB/)
3118 KAO( :, 4,13,15) = (/&
3119 & 3.5392E-03_JPRB,3.3725E-03_JPRB,4.1216E-03_JPRB,5.8741E-03_JPRB,7.4524E-03_JPRB,8.9744E-03_JPRB,&
3120
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0256E-02_JPRB,1.0534E-02_JPRB,2.6566E+00_JPRB/)
3121 KAO( :, 5,13,15) = (/&
3122 & 3.4654E-03_JPRB,3.8025E-03_JPRB,6.3205E-03_JPRB,9.1996E-03_JPRB,1.1773E-02_JPRB,1.4433E-02_JPRB,&
3123
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6393E-02_JPRB,1.6955E-02_JPRB,4.3588E+00_JPRB/)
3124 KAO( :, 1, 1,16) = (/&
3125 & 1.5672E-03_JPRB,2.1553E-03_JPRB,4.1215E-03_JPRB,6.0711E-03_JPRB,7.9933E-03_JPRB,9.8639E-03_JPRB,&
3126
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1623E-02_JPRB,1.2894E-02_JPRB,1.4627E-02_JPRB/)
3127 KAO( :, 2, 1,16) = (/&
3128 & 1.9455E-03_JPRB,3.1176E-03_JPRB,5.9834E-03_JPRB,8.8258E-03_JPRB,1.1628E-02_JPRB,1.4352E-02_JPRB,&
3129
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6890E-02_JPRB,1.8782E-02_JPRB,2.1292E-02_JPRB/)
3130 KAO( :, 3, 1,16) = (/&
3131 & 2.4286E-03_JPRB,4.3028E-03_JPRB,8.2818E-03_JPRB,1.2234E-02_JPRB,1.6127E-02_JPRB,1.9913E-02_JPRB,&
3132
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3612E-02_JPRB,2.6215E-02_JPRB,2.9752E-02_JPRB/)
3133 KAO( :, 4, 1,16) = (/&
3134 & 3.0199E-03_JPRB,5.7955E-03_JPRB,1.1212E-02_JPRB,1.6585E-02_JPRB,2.1939E-02_JPRB,2.7103E-02_JPRB,&
3135
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1641E-02_JPRB,3.5382E-02_JPRB,4.0152E-02_JPRB/)
3136 KAO( :, 5, 1,16) = (/&
3137 & 3.7301E-03_JPRB,7.5925E-03_JPRB,1.4663E-02_JPRB,2.1614E-02_JPRB,2.8523E-02_JPRB,3.5412E-02_JPRB,&
3138
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.1705E-02_JPRB,4.6016E-02_JPRB,5.2602E-02_JPRB/)
3139 KAO( :, 1, 2,16) = (/&
3140 & 1.4714E-03_JPRB,2.1897E-03_JPRB,4.1859E-03_JPRB,6.1816E-03_JPRB,8.1457E-03_JPRB,1.0051E-02_JPRB,&
3141
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1874E-02_JPRB,1.3114E-02_JPRB,1.5524E-02_JPRB/)
3142 KAO( :, 2, 2,16) = (/&
3143 & 1.8243E-03_JPRB,3.2190E-03_JPRB,6.2284E-03_JPRB,9.2101E-03_JPRB,1.2144E-02_JPRB,1.5021E-02_JPRB,&
3144
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7606E-02_JPRB,1.9473E-02_JPRB,2.2997E-02_JPRB/)
3145 KAO( :, 3, 2,16) = (/&
3146 & 2.2843E-03_JPRB,4.5394E-03_JPRB,8.8033E-03_JPRB,1.3032E-02_JPRB,1.7194E-02_JPRB,2.1230E-02_JPRB,&
3147
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5009E-02_JPRB,2.7460E-02_JPRB,3.2496E-02_JPRB/)
3148 KAO( :, 4, 2,16) = (/&
3149 & 2.8708E-03_JPRB,6.2086E-03_JPRB,1.2093E-02_JPRB,1.7923E-02_JPRB,2.3632E-02_JPRB,2.9181E-02_JPRB,&
3150
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4133E-02_JPRB,3.7858E-02_JPRB,4.4523E-02_JPRB/)
3151 KAO( :, 5, 2,16) = (/&
3152 & 3.5701E-03_JPRB,8.1350E-03_JPRB,1.5874E-02_JPRB,2.3527E-02_JPRB,3.1085E-02_JPRB,3.8729E-02_JPRB,&
3153
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5307E-02_JPRB,4.9567E-02_JPRB,5.9359E-02_JPRB/)
3154 KAO( :, 1, 3,16) = (/&
3155 & 1.2836E-03_JPRB,2.0294E-03_JPRB,3.8863E-03_JPRB,5.8124E-03_JPRB,7.6573E-03_JPRB,9.3378E-03_JPRB,&
3156
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1017E-02_JPRB,1.1974E-02_JPRB,1.4949E-02_JPRB/)
3157 KAO( :, 2, 3,16) = (/&
3158 & 1.5660E-03_JPRB,3.0824E-03_JPRB,6.0009E-03_JPRB,8.8868E-03_JPRB,1.1717E-02_JPRB,1.4438E-02_JPRB,&
3159
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.6887E-02_JPRB,1.8445E-02_JPRB,2.2945E-02_JPRB/)
3160 KAO( :, 3, 3,16) = (/&
3161 & 1.9600E-03_JPRB,4.4422E-03_JPRB,8.7147E-03_JPRB,1.2909E-02_JPRB,1.7029E-02_JPRB,2.0993E-02_JPRB,&
3162
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4634E-02_JPRB,2.6606E-02_JPRB,3.3559E-02_JPRB/)
3163 KAO( :, 4, 3,16) = (/&
3164 & 2.4642E-03_JPRB,6.2222E-03_JPRB,1.2184E-02_JPRB,1.8079E-02_JPRB,2.3727E-02_JPRB,2.9253E-02_JPRB,&
3165
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4378E-02_JPRB,3.7595E-02_JPRB,4.7010E-02_JPRB/)
3166 KAO( :, 5, 3,16) = (/&
3167 & 3.0951E-03_JPRB,8.3838E-03_JPRB,1.6309E-02_JPRB,2.4359E-02_JPRB,3.2164E-02_JPRB,3.9734E-02_JPRB,&
3168
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6556E-02_JPRB,5.0749E-02_JPRB,6.3475E-02_JPRB/)
3169 KAO( :, 1, 4,16) = (/&
3170 & 1.2574E-03_JPRB,1.8114E-03_JPRB,3.5154E-03_JPRB,5.2030E-03_JPRB,6.8473E-03_JPRB,8.4135E-03_JPRB,&
3171
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 9.7945E-03_JPRB,1.0467E-02_JPRB,1.3735E-02_JPRB/)
3172 KAO( :, 2, 4,16) = (/&
3173 & 1.4045E-03_JPRB,2.8445E-03_JPRB,5.5546E-03_JPRB,8.2273E-03_JPRB,1.0867E-02_JPRB,1.3255E-02_JPRB,&
3174
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.5543E-02_JPRB,1.6757E-02_JPRB,2.1717E-02_JPRB/)
3175 KAO( :, 3, 4,16) = (/&
3176 & 1.7089E-03_JPRB,4.2655E-03_JPRB,8.3342E-03_JPRB,1.2385E-02_JPRB,1.6320E-02_JPRB,2.0006E-02_JPRB,&
3177
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.3383E-02_JPRB,2.5166E-02_JPRB,3.2791E-02_JPRB/)
3178 KAO( :, 4, 4,16) = (/&
3179 & 2.1090E-03_JPRB,6.0675E-03_JPRB,1.1915E-02_JPRB,1.7681E-02_JPRB,2.3322E-02_JPRB,2.8694E-02_JPRB,&
3180
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3458E-02_JPRB,3.6118E-02_JPRB,4.7164E-02_JPRB/)
3181 KAO( :, 5, 4,16) = (/&
3182 & 2.6086E-03_JPRB,8.3756E-03_JPRB,1.6515E-02_JPRB,2.4278E-02_JPRB,3.2230E-02_JPRB,3.9587E-02_JPRB,&
3183
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.6358E-02_JPRB,4.9833E-02_JPRB,6.4660E-02_JPRB/)
3184 KAO( :, 1, 5,16) = (/&
3185 & 1.3825E-03_JPRB,1.5837E-03_JPRB,3.0919E-03_JPRB,4.5531E-03_JPRB,6.0074E-03_JPRB,7.3563E-03_JPRB,&
3186
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.5040E-03_JPRB,9.0047E-03_JPRB,1.2222E-02_JPRB/)
3187 KAO( :, 2, 5,16) = (/&
3188 & 1.3514E-03_JPRB,2.5997E-03_JPRB,5.0814E-03_JPRB,7.5197E-03_JPRB,9.9239E-03_JPRB,1.2026E-02_JPRB,&
3189
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.3939E-02_JPRB,1.4883E-02_JPRB,2.0096E-02_JPRB/)
3190 KAO( :, 3, 5,16) = (/&
3191 & 1.5206E-03_JPRB,4.0333E-03_JPRB,7.8158E-03_JPRB,1.1713E-02_JPRB,1.5405E-02_JPRB,1.8636E-02_JPRB,&
3192
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1846E-02_JPRB,2.3099E-02_JPRB,3.1394E-02_JPRB/)
3193 KAO( :, 4, 5,16) = (/&
3194 & 1.8386E-03_JPRB,5.8482E-03_JPRB,1.1495E-02_JPRB,1.7163E-02_JPRB,2.2705E-02_JPRB,2.7707E-02_JPRB,&
3195
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.1828E-02_JPRB,3.4087E-02_JPRB,4.5825E-02_JPRB/)
3196 KAO( :, 5, 5,16) = (/&
3197 & 2.2527E-03_JPRB,8.2599E-03_JPRB,1.6275E-02_JPRB,2.4092E-02_JPRB,3.1836E-02_JPRB,3.8856E-02_JPRB,&
3198
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.5237E-02_JPRB,4.7798E-02_JPRB,6.5032E-02_JPRB/)
3199 KAO( :, 1, 6,16) = (/&
3200 & 1.5452E-03_JPRB,1.3558E-03_JPRB,2.6064E-03_JPRB,3.8420E-03_JPRB,5.0190E-03_JPRB,6.1218E-03_JPRB,&
3201
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.0124E-03_JPRB,7.3072E-03_JPRB,1.0404E-02_JPRB/)
3202 KAO( :, 2, 6,16) = (/&
3203 & 1.5160E-03_JPRB,2.2762E-03_JPRB,4.4992E-03_JPRB,6.5908E-03_JPRB,8.7549E-03_JPRB,1.0577E-02_JPRB,&
3204
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2081E-02_JPRB,1.2650E-02_JPRB,1.7914E-02_JPRB/)
3205 KAO( :, 3, 6,16) = (/&
3206 & 1.4831E-03_JPRB,3.6667E-03_JPRB,7.1626E-03_JPRB,1.0648E-02_JPRB,1.4117E-02_JPRB,1.6912E-02_JPRB,&
3207
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9731E-02_JPRB,2.0210E-02_JPRB,2.8978E-02_JPRB/)
3208 KAO( :, 4, 6,16) = (/&
3209 & 1.6115E-03_JPRB,5.5846E-03_JPRB,1.0973E-02_JPRB,1.6135E-02_JPRB,2.1251E-02_JPRB,2.6015E-02_JPRB,&
3210
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9549E-02_JPRB,3.0765E-02_JPRB,4.3671E-02_JPRB/)
3211 KAO( :, 5, 6,16) = (/&
3212 & 1.9392E-03_JPRB,8.0663E-03_JPRB,1.5907E-02_JPRB,2.3470E-02_JPRB,3.0817E-02_JPRB,3.7382E-02_JPRB,&
3213
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3204E-02_JPRB,4.4622E-02_JPRB,6.3997E-02_JPRB/)
3214 KAO( :, 1, 7,16) = (/&
3215 & 1.7424E-03_JPRB,1.5255E-03_JPRB,2.1507E-03_JPRB,3.1520E-03_JPRB,4.1047E-03_JPRB,4.9755E-03_JPRB,&
3216
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.6339E-03_JPRB,5.7296E-03_JPRB,8.6456E-03_JPRB/)
3217 KAO( :, 2, 7,16) = (/&
3218 & 1.7170E-03_JPRB,1.9718E-03_JPRB,3.9047E-03_JPRB,5.6866E-03_JPRB,7.5061E-03_JPRB,9.0459E-03_JPRB,&
3219
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0285E-02_JPRB,1.0440E-02_JPRB,1.5762E-02_JPRB/)
3220 KAO( :, 3, 7,16) = (/&
3221 & 1.6789E-03_JPRB,3.3135E-03_JPRB,6.5455E-03_JPRB,9.5842E-03_JPRB,1.2571E-02_JPRB,1.5280E-02_JPRB,&
3222
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.7323E-02_JPRB,1.7346E-02_JPRB,2.6392E-02_JPRB/)
3223 KAO( :, 4, 7,16) = (/&
3224 & 1.6475E-03_JPRB,5.2207E-03_JPRB,1.0255E-02_JPRB,1.5008E-02_JPRB,1.9715E-02_JPRB,2.4009E-02_JPRB,&
3225
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.7310E-02_JPRB,2.7325E-02_JPRB,4.1677E-02_JPRB/)
3226 KAO( :, 5, 7,16) = (/&
3227 & 1.7171E-03_JPRB,7.7744E-03_JPRB,1.5301E-02_JPRB,2.2477E-02_JPRB,2.9556E-02_JPRB,3.5932E-02_JPRB,&
3228
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0780E-02_JPRB,4.0784E-02_JPRB,6.2312E-02_JPRB/)
3229 KAO( :, 1, 8,16) = (/&
3230 & 1.9724E-03_JPRB,1.7312E-03_JPRB,1.7354E-03_JPRB,2.5314E-03_JPRB,3.2671E-03_JPRB,3.9608E-03_JPRB,&
3231
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.3782E-03_JPRB,4.2763E-03_JPRB,7.0340E-03_JPRB/)
3232 KAO( :, 2, 8,16) = (/&
3233 & 1.9569E-03_JPRB,1.7215E-03_JPRB,3.3340E-03_JPRB,4.8320E-03_JPRB,6.3356E-03_JPRB,7.5448E-03_JPRB,&
3234
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 8.4497E-03_JPRB,8.2045E-03_JPRB,1.3623E-02_JPRB/)
3235 KAO( :, 3, 8,16) = (/&
3236 & 1.9222E-03_JPRB,3.0063E-03_JPRB,5.8393E-03_JPRB,8.4557E-03_JPRB,1.1082E-02_JPRB,1.3356E-02_JPRB,&
3237
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4892E-02_JPRB,1.4508E-02_JPRB,2.3611E-02_JPRB/)
3238 KAO( :, 4, 8,16) = (/&
3239 & 1.8856E-03_JPRB,4.8368E-03_JPRB,9.4413E-03_JPRB,1.3907E-02_JPRB,1.7960E-02_JPRB,2.1659E-02_JPRB,&
3240
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4357E-02_JPRB,2.3676E-02_JPRB,3.8984E-02_JPRB/)
3241 KAO( :, 5, 8,16) = (/&
3242 & 1.8442E-03_JPRB,7.3401E-03_JPRB,1.4568E-02_JPRB,2.1338E-02_JPRB,2.7859E-02_JPRB,3.3579E-02_JPRB,&
3243
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.7493E-02_JPRB,3.6571E-02_JPRB,5.9238E-02_JPRB/)
3244 KAO( :, 1, 9,16) = (/&
3245 & 2.2527E-03_JPRB,1.9717E-03_JPRB,1.6910E-03_JPRB,1.9762E-03_JPRB,2.5161E-03_JPRB,3.0221E-03_JPRB,&
3246
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2672E-03_JPRB,3.0670E-03_JPRB,2.3998E-02_JPRB/)
3247 KAO( :, 2, 9,16) = (/&
3248 & 2.2414E-03_JPRB,1.9482E-03_JPRB,2.7675E-03_JPRB,3.9857E-03_JPRB,5.1603E-03_JPRB,6.1015E-03_JPRB,&
3249
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.6813E-03_JPRB,6.2533E-03_JPRB,4.8508E-02_JPRB/)
3250 KAO( :, 3, 9,16) = (/&
3251 & 2.2044E-03_JPRB,2.6160E-03_JPRB,5.0727E-03_JPRB,7.3140E-03_JPRB,9.5554E-03_JPRB,1.1250E-02_JPRB,&
3252
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2412E-02_JPRB,1.1623E-02_JPRB,8.8725E-02_JPRB/)
3253 KAO( :, 4, 9,16) = (/&
3254 & 2.1701E-03_JPRB,4.4267E-03_JPRB,8.5607E-03_JPRB,1.2545E-02_JPRB,1.6038E-02_JPRB,1.9134E-02_JPRB,&
3255
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.1125E-02_JPRB,1.9740E-02_JPRB,1.5078E-01_JPRB/)
3256 KAO( :, 5, 9,16) = (/&
3257 & 2.1291E-03_JPRB,6.8813E-03_JPRB,1.3705E-02_JPRB,1.9867E-02_JPRB,2.5629E-02_JPRB,3.0522E-02_JPRB,&
3258
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.3472E-02_JPRB,3.1537E-02_JPRB,2.4056E-01_JPRB/)
3259 KAO( :, 1,10,16) = (/&
3260 & 2.6049E-03_JPRB,2.2811E-03_JPRB,1.9524E-03_JPRB,1.6297E-03_JPRB,1.9817E-03_JPRB,2.3323E-03_JPRB,&
3261
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.4538E-03_JPRB,1.0919E-07_JPRB,9.9434E-02_JPRB/)
3262 KAO( :, 2,10,16) = (/&
3263 & 2.5564E-03_JPRB,2.2387E-03_JPRB,2.3682E-03_JPRB,3.4024E-03_JPRB,4.3056E-03_JPRB,4.9923E-03_JPRB,&
3264
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.3151E-03_JPRB,4.7395E-03_JPRB,2.1164E-01_JPRB/)
3265 KAO( :, 3,10,16) = (/&
3266 & 2.5312E-03_JPRB,2.3572E-03_JPRB,4.5332E-03_JPRB,6.5179E-03_JPRB,8.3516E-03_JPRB,9.6321E-03_JPRB,&
3267
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.0262E-02_JPRB,9.2275E-03_JPRB,4.0466E-01_JPRB/)
3268 KAO( :, 4,10,16) = (/&
3269 & 2.4933E-03_JPRB,4.1318E-03_JPRB,7.9555E-03_JPRB,1.1428E-02_JPRB,1.4719E-02_JPRB,1.6992E-02_JPRB,&
3270
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.8127E-02_JPRB,1.6262E-02_JPRB,7.1180E-01_JPRB/)
3271 KAO( :, 5,10,16) = (/&
3272 & 2.4587E-03_JPRB,6.7099E-03_JPRB,1.3086E-02_JPRB,1.8862E-02_JPRB,2.3880E-02_JPRB,2.7946E-02_JPRB,&
3273
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.9807E-02_JPRB,2.6793E-02_JPRB,1.1699E+00_JPRB/)
3274 KAO( :, 1,11,16) = (/&
3275 & 3.0995E-03_JPRB,2.7200E-03_JPRB,2.3118E-03_JPRB,1.9403E-03_JPRB,2.2912E-03_JPRB,2.6188E-03_JPRB,&
3276
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.6729E-03_JPRB,9.6247E-08_JPRB,2.0911E-01_JPRB/)
3277 KAO( :, 2,11,16) = (/&
3278 & 2.9890E-03_JPRB,2.6201E-03_JPRB,2.7716E-03_JPRB,3.9533E-03_JPRB,4.9561E-03_JPRB,5.6265E-03_JPRB,&
3279
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 5.7942E-03_JPRB,4.9820E-03_JPRB,4.4548E-01_JPRB/)
3280 KAO( :, 3,11,16) = (/&
3281 & 2.9190E-03_JPRB,2.7609E-03_JPRB,5.3580E-03_JPRB,7.5536E-03_JPRB,9.5654E-03_JPRB,1.0853E-02_JPRB,&
3282
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.1187E-02_JPRB,9.7006E-03_JPRB,8.5245E-01_JPRB/)
3283 KAO( :, 4,11,16) = (/&
3284 & 2.8864E-03_JPRB,4.8539E-03_JPRB,9.3197E-03_JPRB,1.3213E-02_JPRB,1.6850E-02_JPRB,1.9193E-02_JPRB,&
3285
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.9763E-02_JPRB,1.7093E-02_JPRB,1.5055E+00_JPRB/)
3286 KAO( :, 5,11,16) = (/&
3287 & 2.8813E-03_JPRB,7.9127E-03_JPRB,1.5164E-02_JPRB,2.1854E-02_JPRB,2.7083E-02_JPRB,3.1374E-02_JPRB,&
3288
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.2509E-02_JPRB,2.8179E-02_JPRB,2.4634E+00_JPRB/)
3289 KAO( :, 1,12,16) = (/&
3290 & 3.7114E-03_JPRB,3.2586E-03_JPRB,2.7915E-03_JPRB,2.3232E-03_JPRB,2.6631E-03_JPRB,3.0175E-03_JPRB,&
3291
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.0634E-03_JPRB,8.7203E-08_JPRB,3.2918E-01_JPRB/)
3292 KAO( :, 2,12,16) = (/&
3293 & 3.5714E-03_JPRB,3.1255E-03_JPRB,3.2432E-03_JPRB,4.6151E-03_JPRB,5.7633E-03_JPRB,6.4683E-03_JPRB,&
3294
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 6.5276E-03_JPRB,5.5718E-03_JPRB,7.0176E-01_JPRB/)
3295 KAO( :, 3,12,16) = (/&
3296 & 3.4916E-03_JPRB,3.2858E-03_JPRB,6.3152E-03_JPRB,8.8262E-03_JPRB,1.0981E-02_JPRB,1.2464E-02_JPRB,&
3297
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.2740E-02_JPRB,1.0731E-02_JPRB,1.3410E+00_JPRB/)
3298 KAO( :, 4,12,16) = (/&
3299 & 3.4311E-03_JPRB,5.7096E-03_JPRB,1.0941E-02_JPRB,1.5646E-02_JPRB,1.9404E-02_JPRB,2.2034E-02_JPRB,&
3300
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.2454E-02_JPRB,1.9063E-02_JPRB,2.3582E+00_JPRB/)
3301 KAO( :, 5,12,16) = (/&
3302 & 3.4152E-03_JPRB,9.2951E-03_JPRB,1.7728E-02_JPRB,2.5434E-02_JPRB,3.1194E-02_JPRB,3.5945E-02_JPRB,&
3303
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.6575E-02_JPRB,3.1362E-02_JPRB,3.8718E+00_JPRB/)
3304 KAO( :, 1,13,16) = (/&
3305 & 4.4410E-03_JPRB,3.8860E-03_JPRB,3.3353E-03_JPRB,2.7740E-03_JPRB,3.0544E-03_JPRB,3.4238E-03_JPRB,&
3306
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 3.4509E-03_JPRB,2.8859E-03_JPRB,4.1592E-01_JPRB/)
3307 KAO( :, 2,13,16) = (/&
3308 & 4.2685E-03_JPRB,3.7372E-03_JPRB,3.7732E-03_JPRB,5.3427E-03_JPRB,6.6266E-03_JPRB,7.3589E-03_JPRB,&
3309
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 7.3233E-03_JPRB,6.2265E-03_JPRB,8.8643E-01_JPRB/)
3310 KAO( :, 3,13,16) = (/&
3311 & 4.1797E-03_JPRB,3.9191E-03_JPRB,7.1821E-03_JPRB,1.0185E-02_JPRB,1.2582E-02_JPRB,1.4162E-02_JPRB,&
3312
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 1.4321E-02_JPRB,1.1935E-02_JPRB,1.6929E+00_JPRB/)
3313 KAO( :, 4,13,16) = (/&
3314 & 4.0934E-03_JPRB,6.6879E-03_JPRB,1.2699E-02_JPRB,1.8078E-02_JPRB,2.2220E-02_JPRB,2.4912E-02_JPRB,&
3315
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 2.5205E-02_JPRB,2.1207E-02_JPRB,2.9775E+00_JPRB/)
3316 KAO( :, 5,13,16) = (/&
3317 & 4.0583E-03_JPRB,1.0796E-02_JPRB,2.0731E-02_JPRB,2.9284E-02_JPRB,3.5883E-02_JPRB,4.0713E-02_JPRB,&
3318
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
10 & 4.0964E-02_JPRB,3.4894E-02_JPRB,4.8770E+00_JPRB/)
3319
3320 ! The array KBO contains absorption coefs at the 16 chosen g-values
3321 ! for a range of pressure levels < ~100mb and temperatures. The first
3322 ! index in the array, JT, which runs from 1 to 5, corresponds to
3323 ! different temperatures. More specifically, JT = 3 means that the
3324 ! data are for the reference temperature TREF for this pressure
3325 ! level, JT = 2 refers to the temperature TREF-15, JT = 1 is for
3326 ! TREF-30, JT = 4 is for TREF+15, and JT = 5 is for TREF+30.
3327 ! The second index, JP, runs from 13 to 59 and refers to the JPth
3328 ! reference pressure level (see taumol.f for the value of these
3329 ! pressure levels in mb). The third index, IG, goes from 1 to 16,
3330 ! and tells us which g-interval the absorption coefficients are for.
3331
3332 KBO( :,13, 1) = (/&
3333
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1259E-02_JPRB,7.3611E-02_JPRB,1.0293E-01_JPRB,1.3958E-01_JPRB,1.8370E-01_JPRB/)
3334 KBO( :,14, 1) = (/&
3335
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5713E-02_JPRB,6.5277E-02_JPRB,9.0553E-02_JPRB,1.2145E-01_JPRB,1.5795E-01_JPRB/)
3336 KBO( :,15, 1) = (/&
3337
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.0795E-02_JPRB,5.7938E-02_JPRB,7.9664E-02_JPRB,1.0581E-01_JPRB,1.3605E-01_JPRB/)
3338 KBO( :,16, 1) = (/&
3339
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6460E-02_JPRB,5.1532E-02_JPRB,7.0278E-02_JPRB,9.2517E-02_JPRB,1.1775E-01_JPRB/)
3340 KBO( :,17, 1) = (/&
3341
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2358E-02_JPRB,4.5390E-02_JPRB,6.1388E-02_JPRB,8.0070E-02_JPRB,1.0088E-01_JPRB/)
3342 KBO( :,18, 1) = (/&
3343
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8485E-02_JPRB,3.9634E-02_JPRB,5.3109E-02_JPRB,6.8586E-02_JPRB,8.5607E-02_JPRB/)
3344 KBO( :,19, 1) = (/&
3345
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4839E-02_JPRB,3.4251E-02_JPRB,4.5451E-02_JPRB,5.8119E-02_JPRB,7.1935E-02_JPRB/)
3346 KBO( :,20, 1) = (/&
3347
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1646E-02_JPRB,2.9549E-02_JPRB,3.8829E-02_JPRB,4.9218E-02_JPRB,6.0534E-02_JPRB/)
3348 KBO( :,21, 1) = (/&
3349
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8726E-02_JPRB,2.5319E-02_JPRB,3.2990E-02_JPRB,4.1539E-02_JPRB,5.0831E-02_JPRB/)
3350 KBO( :,22, 1) = (/&
3351
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6430E-02_JPRB,2.1972E-02_JPRB,2.8373E-02_JPRB,3.5469E-02_JPRB,4.3144E-02_JPRB/)
3352 KBO( :,23, 1) = (/&
3353
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4344E-02_JPRB,1.9007E-02_JPRB,2.4347E-02_JPRB,3.0236E-02_JPRB,3.6575E-02_JPRB/)
3354 KBO( :,24, 1) = (/&
3355
2/2
✓ Branch 0 taken 5 times.
✓ Branch 1 taken 1 times.
6 & 1.2498E-02_JPRB,1.6422E-02_JPRB,2.0874E-02_JPRB,2.5759E-02_JPRB,3.0990E-02_JPRB/)
3356
3357
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART11',1,ZHOOK_HANDLE)
3358 1 END SUBROUTINE PART11
3359
3360
3361 1 SUBROUTINE PART12
3362
3363 REAL(KIND=JPRB) :: ZHOOK_HANDLE
3364
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART12',0,ZHOOK_HANDLE)
3365
3366
3367 KBO( :,25, 1) = (/&
3368
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0890E-02_JPRB,1.4194E-02_JPRB,1.7906E-02_JPRB,2.1962E-02_JPRB,2.6282E-02_JPRB/)
3369 KBO( :,26, 1) = (/&
3370
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.5169E-03_JPRB,1.2303E-02_JPRB,1.5406E-02_JPRB,1.8780E-02_JPRB,2.2347E-02_JPRB/)
3371 KBO( :,27, 1) = (/&
3372
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.3127E-03_JPRB,1.0661E-02_JPRB,1.3260E-02_JPRB,1.6073E-02_JPRB,1.9015E-02_JPRB/)
3373 KBO( :,28, 1) = (/&
3374
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.2555E-03_JPRB,9.2333E-03_JPRB,1.1414E-02_JPRB,1.3752E-02_JPRB,1.6182E-02_JPRB/)
3375 KBO( :,29, 1) = (/&
3376
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.3460E-03_JPRB,8.0168E-03_JPRB,9.8497E-03_JPRB,1.1797E-02_JPRB,1.3808E-02_JPRB/)
3377 KBO( :,30, 1) = (/&
3378
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.5479E-03_JPRB,6.9613E-03_JPRB,8.4972E-03_JPRB,1.0118E-02_JPRB,1.1783E-02_JPRB/)
3379 KBO( :,31, 1) = (/&
3380
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8584E-03_JPRB,6.0543E-03_JPRB,7.3446E-03_JPRB,8.6964E-03_JPRB,1.0081E-02_JPRB/)
3381 KBO( :,32, 1) = (/&
3382
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.2533E-03_JPRB,5.2649E-03_JPRB,6.3493E-03_JPRB,7.4778E-03_JPRB,8.6341E-03_JPRB/)
3383 KBO( :,33, 1) = (/&
3384
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7229E-03_JPRB,4.5793E-03_JPRB,5.4910E-03_JPRB,6.4373E-03_JPRB,7.4041E-03_JPRB/)
3385 KBO( :,34, 1) = (/&
3386
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2276E-03_JPRB,3.9492E-03_JPRB,4.7134E-03_JPRB,5.5048E-03_JPRB,6.3115E-03_JPRB/)
3387 KBO( :,35, 1) = (/&
3388
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7399E-03_JPRB,3.3442E-03_JPRB,3.9827E-03_JPRB,4.6441E-03_JPRB,5.3183E-03_JPRB/)
3389 KBO( :,36, 1) = (/&
3390
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2726E-03_JPRB,2.7751E-03_JPRB,3.3064E-03_JPRB,3.8585E-03_JPRB,4.4216E-03_JPRB/)
3391 KBO( :,37, 1) = (/&
3392
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8221E-03_JPRB,2.2350E-03_JPRB,2.6736E-03_JPRB,3.1310E-03_JPRB,3.5993E-03_JPRB/)
3393 KBO( :,38, 1) = (/&
3394
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4592E-03_JPRB,1.7985E-03_JPRB,2.1611E-03_JPRB,2.5404E-03_JPRB,2.9304E-03_JPRB/)
3395 KBO( :,39, 1) = (/&
3396
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1699E-03_JPRB,1.4493E-03_JPRB,1.7501E-03_JPRB,2.0658E-03_JPRB,2.3919E-03_JPRB/)
3397 KBO( :,40, 1) = (/&
3398
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.1194E-04_JPRB,1.1380E-03_JPRB,1.3840E-03_JPRB,1.6433E-03_JPRB,1.9130E-03_JPRB/)
3399 KBO( :,41, 1) = (/&
3400
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.0723E-04_JPRB,8.8961E-04_JPRB,1.0899E-03_JPRB,1.3025E-03_JPRB,1.5252E-03_JPRB/)
3401 KBO( :,42, 1) = (/&
3402
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.4756E-04_JPRB,6.9456E-04_JPRB,8.5764E-04_JPRB,1.0321E-03_JPRB,1.2157E-03_JPRB/)
3403 KBO( :,43, 1) = (/&
3404
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1699E-04_JPRB,5.3448E-04_JPRB,6.6629E-04_JPRB,8.0890E-04_JPRB,9.6007E-04_JPRB/)
3405 KBO( :,44, 1) = (/&
3406
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1440E-04_JPRB,4.0792E-04_JPRB,5.1407E-04_JPRB,6.3038E-04_JPRB,7.5481E-04_JPRB/)
3407 KBO( :,45, 1) = (/&
3408
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3640E-04_JPRB,3.1074E-04_JPRB,3.9606E-04_JPRB,4.9085E-04_JPRB,5.9335E-04_JPRB/)
3409 KBO( :,46, 1) = (/&
3410
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7594E-04_JPRB,2.3455E-04_JPRB,3.0267E-04_JPRB,3.7967E-04_JPRB,4.6391E-04_JPRB/)
3411 KBO( :,47, 1) = (/&
3412
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2843E-04_JPRB,1.7389E-04_JPRB,2.2775E-04_JPRB,2.8951E-04_JPRB,3.5820E-04_JPRB/)
3413 KBO( :,48, 1) = (/&
3414
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.3343E-05_JPRB,1.2837E-04_JPRB,1.7092E-04_JPRB,2.2045E-04_JPRB,2.7649E-04_JPRB/)
3415 KBO( :,49, 1) = (/&
3416
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.7599E-05_JPRB,9.4536E-05_JPRB,1.2808E-04_JPRB,1.6786E-04_JPRB,2.1369E-04_JPRB/)
3417 KBO( :,50, 1) = (/&
3418
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8948E-05_JPRB,6.9502E-05_JPRB,9.5623E-05_JPRB,1.2729E-04_JPRB,1.6435E-04_JPRB/)
3419 KBO( :,51, 1) = (/&
3420
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5346E-05_JPRB,5.0921E-05_JPRB,7.1079E-05_JPRB,9.6095E-05_JPRB,1.2578E-04_JPRB/)
3421 KBO( :,52, 1) = (/&
3422
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5450E-05_JPRB,3.7196E-05_JPRB,5.2726E-05_JPRB,7.2442E-05_JPRB,9.6232E-05_JPRB/)
3423 KBO( :,53, 1) = (/&
3424
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8296E-05_JPRB,2.7103E-05_JPRB,3.9075E-05_JPRB,5.4599E-05_JPRB,7.3735E-05_JPRB/)
3425 KBO( :,54, 1) = (/&
3426
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3152E-05_JPRB,1.9639E-05_JPRB,2.8663E-05_JPRB,4.0549E-05_JPRB,5.5484E-05_JPRB/)
3427 KBO( :,55, 1) = (/&
3428
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.4445E-06_JPRB,1.4166E-05_JPRB,2.0853E-05_JPRB,2.9772E-05_JPRB,4.1184E-05_JPRB/)
3429 KBO( :,56, 1) = (/&
3430
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.7805E-06_JPRB,1.0206E-05_JPRB,1.5127E-05_JPRB,2.1803E-05_JPRB,3.0469E-05_JPRB/)
3431 KBO( :,57, 1) = (/&
3432
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8676E-06_JPRB,7.3427E-06_JPRB,1.0945E-05_JPRB,1.5922E-05_JPRB,2.2468E-05_JPRB/)
3433 KBO( :,58, 1) = (/&
3434
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5190E-06_JPRB,5.3050E-06_JPRB,7.9365E-06_JPRB,1.1632E-05_JPRB,1.6547E-05_JPRB/)
3435 KBO( :,59, 1) = (/&
3436
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7224E-06_JPRB,4.0826E-06_JPRB,6.0785E-06_JPRB,8.8720E-06_JPRB,1.2572E-05_JPRB/)
3437 KBO( :,13, 2) = (/&
3438
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7119E-01_JPRB,3.6310E-01_JPRB,4.7414E-01_JPRB,6.0307E-01_JPRB,7.4957E-01_JPRB/)
3439 KBO( :,14, 2) = (/&
3440
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5353E-01_JPRB,3.3756E-01_JPRB,4.3733E-01_JPRB,5.5227E-01_JPRB,6.8177E-01_JPRB/)
3441 KBO( :,15, 2) = (/&
3442
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3613E-01_JPRB,3.1296E-01_JPRB,4.0272E-01_JPRB,5.0521E-01_JPRB,6.1950E-01_JPRB/)
3443 KBO( :,16, 2) = (/&
3444
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1883E-01_JPRB,2.8892E-01_JPRB,3.7007E-01_JPRB,4.6171E-01_JPRB,5.6222E-01_JPRB/)
3445 KBO( :,17, 2) = (/&
3446
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0046E-01_JPRB,2.6387E-01_JPRB,3.3671E-01_JPRB,4.1802E-01_JPRB,5.0615E-01_JPRB/)
3447 KBO( :,18, 2) = (/&
3448
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8162E-01_JPRB,2.3837E-01_JPRB,3.0306E-01_JPRB,3.7451E-01_JPRB,4.5033E-01_JPRB/)
3449 KBO( :,19, 2) = (/&
3450
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6273E-01_JPRB,2.1280E-01_JPRB,2.6942E-01_JPRB,3.3081E-01_JPRB,3.9474E-01_JPRB/)
3451 KBO( :,20, 2) = (/&
3452
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4529E-01_JPRB,1.8899E-01_JPRB,2.3756E-01_JPRB,2.8972E-01_JPRB,3.4258E-01_JPRB/)
3453 KBO( :,21, 2) = (/&
3454
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2870E-01_JPRB,1.6616E-01_JPRB,2.0730E-01_JPRB,2.5076E-01_JPRB,2.9377E-01_JPRB/)
3455 KBO( :,22, 2) = (/&
3456
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1499E-01_JPRB,1.4695E-01_JPRB,1.8158E-01_JPRB,2.1711E-01_JPRB,2.5164E-01_JPRB/)
3457 KBO( :,23, 2) = (/&
3458
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0194E-01_JPRB,1.2892E-01_JPRB,1.5758E-01_JPRB,1.8624E-01_JPRB,2.1370E-01_JPRB/)
3459 KBO( :,24, 2) = (/&
3460
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.9789E-02_JPRB,1.1229E-01_JPRB,1.3567E-01_JPRB,1.5862E-01_JPRB,1.8060E-01_JPRB/)
3461 KBO( :,25, 2) = (/&
3462
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.8662E-02_JPRB,9.7205E-02_JPRB,1.1609E-01_JPRB,1.3460E-01_JPRB,1.5226E-01_JPRB/)
3463 KBO( :,26, 2) = (/&
3464
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.8677E-02_JPRB,8.3839E-02_JPRB,9.9146E-02_JPRB,1.1408E-01_JPRB,1.2832E-01_JPRB/)
3465 KBO( :,27, 2) = (/&
3466
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.9597E-02_JPRB,7.2017E-02_JPRB,8.4456E-02_JPRB,9.6525E-02_JPRB,1.0804E-01_JPRB/)
3467 KBO( :,28, 2) = (/&
3468
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1479E-02_JPRB,6.1677E-02_JPRB,7.1788E-02_JPRB,8.1553E-02_JPRB,9.0870E-02_JPRB/)
3469 KBO( :,29, 2) = (/&
3470
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4418E-02_JPRB,5.2773E-02_JPRB,6.1008E-02_JPRB,6.8941E-02_JPRB,7.6507E-02_JPRB/)
3471 KBO( :,30, 2) = (/&
3472
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8240E-02_JPRB,4.5084E-02_JPRB,5.1802E-02_JPRB,5.8270E-02_JPRB,6.4403E-02_JPRB/)
3473 KBO( :,31, 2) = (/&
3474
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2906E-02_JPRB,3.8522E-02_JPRB,4.4011E-02_JPRB,4.9308E-02_JPRB,5.4268E-02_JPRB/)
3475 KBO( :,32, 2) = (/&
3476
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8286E-02_JPRB,3.2899E-02_JPRB,3.7402E-02_JPRB,4.1721E-02_JPRB,4.5728E-02_JPRB/)
3477 KBO( :,33, 2) = (/&
3478
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4296E-02_JPRB,2.8097E-02_JPRB,3.1779E-02_JPRB,3.5285E-02_JPRB,3.8510E-02_JPRB/)
3479 KBO( :,34, 2) = (/&
3480
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0730E-02_JPRB,2.3844E-02_JPRB,2.6852E-02_JPRB,2.9683E-02_JPRB,3.2295E-02_JPRB/)
3481 KBO( :,35, 2) = (/&
3482
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7417E-02_JPRB,1.9970E-02_JPRB,2.2433E-02_JPRB,2.4741E-02_JPRB,2.6876E-02_JPRB/)
3483 KBO( :,36, 2) = (/&
3484
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4391E-02_JPRB,1.6493E-02_JPRB,1.8520E-02_JPRB,2.0421E-02_JPRB,2.2183E-02_JPRB/)
3485 KBO( :,37, 2) = (/&
3486
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1614E-02_JPRB,1.3354E-02_JPRB,1.5031E-02_JPRB,1.6611E-02_JPRB,1.8085E-02_JPRB/)
3487 KBO( :,38, 2) = (/&
3488
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.3636E-03_JPRB,1.0802E-02_JPRB,1.2193E-02_JPRB,1.3510E-02_JPRB,1.4737E-02_JPRB/)
3489 KBO( :,39, 2) = (/&
3490
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.5541E-03_JPRB,8.7439E-03_JPRB,9.8975E-03_JPRB,1.0998E-02_JPRB,1.2026E-02_JPRB/)
3491 KBO( :,40, 2) = (/&
3492
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.9794E-03_JPRB,6.9606E-03_JPRB,7.9183E-03_JPRB,8.8404E-03_JPRB,9.7022E-03_JPRB/)
3493 KBO( :,41, 2) = (/&
3494
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7162E-03_JPRB,5.5242E-03_JPRB,6.3175E-03_JPRB,7.0884E-03_JPRB,7.8122E-03_JPRB/)
3495 KBO( :,42, 2) = (/&
3496
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7141E-03_JPRB,4.3793E-03_JPRB,5.0373E-03_JPRB,5.6797E-03_JPRB,6.2875E-03_JPRB/)
3497 KBO( :,43, 2) = (/&
3498
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8894E-03_JPRB,3.4367E-03_JPRB,3.9819E-03_JPRB,4.5167E-03_JPRB,5.0302E-03_JPRB/)
3499 KBO( :,44, 2) = (/&
3500
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2311E-03_JPRB,2.6800E-03_JPRB,3.1318E-03_JPRB,3.5777E-03_JPRB,4.0109E-03_JPRB/)
3501 KBO( :,45, 2) = (/&
3502
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7190E-03_JPRB,2.0864E-03_JPRB,2.4595E-03_JPRB,2.8305E-03_JPRB,3.1948E-03_JPRB/)
3503 KBO( :,46, 2) = (/&
3504
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3144E-03_JPRB,1.6127E-03_JPRB,1.9198E-03_JPRB,2.2288E-03_JPRB,2.5338E-03_JPRB/)
3505 KBO( :,47, 2) = (/&
3506
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.9072E-04_JPRB,1.2307E-03_JPRB,1.4827E-03_JPRB,1.7388E-03_JPRB,1.9939E-03_JPRB/)
3507 KBO( :,48, 2) = (/&
3508
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.4328E-04_JPRB,9.3584E-04_JPRB,1.1422E-03_JPRB,1.3542E-03_JPRB,1.5673E-03_JPRB/)
3509 KBO( :,49, 2) = (/&
3510
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.5568E-04_JPRB,7.0962E-04_JPRB,8.7747E-04_JPRB,1.0533E-03_JPRB,1.2311E-03_JPRB/)
3511 KBO( :,50, 2) = (/&
3512
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1543E-04_JPRB,5.3759E-04_JPRB,6.7298E-04_JPRB,8.1754E-04_JPRB,9.6501E-04_JPRB/)
3513 KBO( :,51, 2) = (/&
3514
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0972E-04_JPRB,4.0612E-04_JPRB,5.1480E-04_JPRB,6.3279E-04_JPRB,7.5447E-04_JPRB/)
3515 KBO( :,52, 2) = (/&
3516
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2960E-04_JPRB,3.0589E-04_JPRB,3.9277E-04_JPRB,4.8863E-04_JPRB,5.8929E-04_JPRB/)
3517 KBO( :,53, 2) = (/&
3518
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6933E-04_JPRB,2.2968E-04_JPRB,2.9891E-04_JPRB,3.7665E-04_JPRB,4.6003E-04_JPRB/)
3519 KBO( :,54, 2) = (/&
3520
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2476E-04_JPRB,1.7207E-04_JPRB,2.2658E-04_JPRB,2.8866E-04_JPRB,3.5637E-04_JPRB/)
3521 KBO( :,55, 2) = (/&
3522
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.1638E-05_JPRB,1.2832E-04_JPRB,1.7102E-04_JPRB,2.1999E-04_JPRB,2.7423E-04_JPRB/)
3523 KBO( :,56, 2) = (/&
3524
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.6998E-05_JPRB,9.5270E-05_JPRB,1.2875E-04_JPRB,1.6725E-04_JPRB,2.1034E-04_JPRB/)
3525 KBO( :,57, 2) = (/&
3526
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8715E-05_JPRB,7.0398E-05_JPRB,9.6609E-05_JPRB,1.2676E-04_JPRB,1.6093E-04_JPRB/)
3527 KBO( :,58, 2) = (/&
3528
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5429E-05_JPRB,5.2045E-05_JPRB,7.2448E-05_JPRB,9.6079E-05_JPRB,1.2306E-04_JPRB/)
3529 KBO( :,59, 2) = (/&
3530
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7567E-05_JPRB,4.0660E-05_JPRB,5.6784E-05_JPRB,7.5471E-05_JPRB,9.6741E-05_JPRB/)
3531 KBO( :,13, 3) = (/&
3532
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0985E+00_JPRB,1.3471E+00_JPRB,1.6024E+00_JPRB,1.8569E+00_JPRB,2.1065E+00_JPRB/)
3533 KBO( :,14, 3) = (/&
3534
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0057E+00_JPRB,1.2261E+00_JPRB,1.4487E+00_JPRB,1.6701E+00_JPRB,1.8867E+00_JPRB/)
3535 KBO( :,15, 3) = (/&
3536
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.2327E-01_JPRB,1.1163E+00_JPRB,1.3096E+00_JPRB,1.5013E+00_JPRB,1.6927E+00_JPRB/)
3537 KBO( :,16, 3) = (/&
3538
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.4655E-01_JPRB,1.0142E+00_JPRB,1.1813E+00_JPRB,1.3501E+00_JPRB,1.5181E+00_JPRB/)
3539 KBO( :,17, 3) = (/&
3540
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.7095E-01_JPRB,9.1488E-01_JPRB,1.0609E+00_JPRB,1.2083E+00_JPRB,1.3539E+00_JPRB/)
3541 KBO( :,18, 3) = (/&
3542
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.9584E-01_JPRB,8.2061E-01_JPRB,9.4796E-01_JPRB,1.0751E+00_JPRB,1.2000E+00_JPRB/)
3543 KBO( :,19, 3) = (/&
3544
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.2275E-01_JPRB,7.3128E-01_JPRB,8.4109E-01_JPRB,9.5006E-01_JPRB,1.0557E+00_JPRB/)
3545 KBO( :,20, 3) = (/&
3546
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.5466E-01_JPRB,6.4877E-01_JPRB,7.4343E-01_JPRB,8.3591E-01_JPRB,9.2515E-01_JPRB/)
3547 KBO( :,21, 3) = (/&
3548
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8960E-01_JPRB,5.7076E-01_JPRB,6.5178E-01_JPRB,7.3033E-01_JPRB,8.0430E-01_JPRB/)
3549 KBO( :,22, 3) = (/&
3550
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.3303E-01_JPRB,5.0259E-01_JPRB,5.7096E-01_JPRB,6.3565E-01_JPRB,6.9649E-01_JPRB/)
3551 KBO( :,23, 3) = (/&
3552
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8028E-01_JPRB,4.3904E-01_JPRB,4.9534E-01_JPRB,5.4802E-01_JPRB,5.9732E-01_JPRB/)
3553 KBO( :,24, 3) = (/&
3554
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3218E-01_JPRB,3.8059E-01_JPRB,4.2634E-01_JPRB,4.6878E-01_JPRB,5.0765E-01_JPRB/)
3555 KBO( :,25, 3) = (/&
3556
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8849E-01_JPRB,3.2793E-01_JPRB,3.6460E-01_JPRB,3.9816E-01_JPRB,4.2820E-01_JPRB/)
3557 KBO( :,26, 3) = (/&
3558
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4952E-01_JPRB,2.8128E-01_JPRB,3.1016E-01_JPRB,3.3620E-01_JPRB,3.5944E-01_JPRB/)
3559 KBO( :,27, 3) = (/&
3560
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1458E-01_JPRB,2.3971E-01_JPRB,2.6222E-01_JPRB,2.8249E-01_JPRB,3.0071E-01_JPRB/)
3561 KBO( :,28, 3) = (/&
3562
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8348E-01_JPRB,2.0307E-01_JPRB,2.2063E-01_JPRB,2.3668E-01_JPRB,2.5103E-01_JPRB/)
3563 KBO( :,29, 3) = (/&
3564
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5612E-01_JPRB,1.7138E-01_JPRB,1.8529E-01_JPRB,1.9807E-01_JPRB,2.0946E-01_JPRB/)
3565 KBO( :,30, 3) = (/&
3566
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3217E-01_JPRB,1.4426E-01_JPRB,1.5536E-01_JPRB,1.6555E-01_JPRB,1.7467E-01_JPRB/)
3567 KBO( :,31, 3) = (/&
3568
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1164E-01_JPRB,1.2131E-01_JPRB,1.3020E-01_JPRB,1.3837E-01_JPRB,1.4579E-01_JPRB/)
3569 KBO( :,32, 3) = (/&
3570
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.4160E-02_JPRB,1.0190E-01_JPRB,1.0909E-01_JPRB,1.1569E-01_JPRB,1.2174E-01_JPRB/)
3571 KBO( :,33, 3) = (/&
3572
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9328E-02_JPRB,8.5579E-02_JPRB,9.1418E-02_JPRB,9.6812E-02_JPRB,1.0174E-01_JPRB/)
3573 KBO( :,34, 3) = (/&
3574
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.6575E-02_JPRB,7.1681E-02_JPRB,7.6449E-02_JPRB,8.0861E-02_JPRB,8.4837E-02_JPRB/)
3575 KBO( :,35, 3) = (/&
3576
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.5452E-02_JPRB,5.9669E-02_JPRB,6.3583E-02_JPRB,6.7195E-02_JPRB,7.0402E-02_JPRB/)
3577 KBO( :,36, 3) = (/&
3578
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5817E-02_JPRB,4.9311E-02_JPRB,5.2541E-02_JPRB,5.5500E-02_JPRB,5.8136E-02_JPRB/)
3579 KBO( :,37, 3) = (/&
3580
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7392E-02_JPRB,4.0307E-02_JPRB,4.2995E-02_JPRB,4.5443E-02_JPRB,4.7667E-02_JPRB/)
3581 KBO( :,38, 3) = (/&
3582
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0507E-02_JPRB,3.2931E-02_JPRB,3.5170E-02_JPRB,3.7213E-02_JPRB,3.9076E-02_JPRB/)
3583 KBO( :,39, 3) = (/&
3584
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4900E-02_JPRB,2.6916E-02_JPRB,2.8785E-02_JPRB,3.0496E-02_JPRB,3.2065E-02_JPRB/)
3585 KBO( :,40, 3) = (/&
3586
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0117E-02_JPRB,2.1794E-02_JPRB,2.3370E-02_JPRB,2.4808E-02_JPRB,2.6137E-02_JPRB/)
3587 KBO( :,41, 3) = (/&
3588
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6225E-02_JPRB,1.7626E-02_JPRB,1.8947E-02_JPRB,2.0157E-02_JPRB,2.1285E-02_JPRB/)
3589 KBO( :,42, 3) = (/&
3590
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3079E-02_JPRB,1.4250E-02_JPRB,1.5359E-02_JPRB,1.6379E-02_JPRB,1.7329E-02_JPRB/)
3591 KBO( :,43, 3) = (/&
3592
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0482E-02_JPRB,1.1462E-02_JPRB,1.2394E-02_JPRB,1.3257E-02_JPRB,1.4064E-02_JPRB/)
3593 KBO( :,44, 3) = (/&
3594
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.3710E-03_JPRB,9.1942E-03_JPRB,9.9787E-03_JPRB,1.0713E-02_JPRB,1.1396E-02_JPRB/)
3595 KBO( :,45, 3) = (/&
3596
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.6788E-03_JPRB,7.3702E-03_JPRB,8.0298E-03_JPRB,8.6522E-03_JPRB,9.2329E-03_JPRB/)
3597 KBO( :,46, 3) = (/&
3598
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.3081E-03_JPRB,5.8891E-03_JPRB,6.4422E-03_JPRB,6.9706E-03_JPRB,7.4651E-03_JPRB/)
3599 KBO( :,47, 3) = (/&
3600
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1866E-03_JPRB,4.6766E-03_JPRB,5.1419E-03_JPRB,5.5881E-03_JPRB,6.0116E-03_JPRB/)
3601 KBO( :,48, 3) = (/&
3602
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2935E-03_JPRB,3.7074E-03_JPRB,4.1001E-03_JPRB,4.4778E-03_JPRB,4.8397E-03_JPRB/)
3603 KBO( :,49, 3) = (/&
3604
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5846E-03_JPRB,2.9354E-03_JPRB,3.2677E-03_JPRB,3.5868E-03_JPRB,3.8959E-03_JPRB/)
3605 KBO( :,50, 3) = (/&
3606
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0269E-03_JPRB,2.3221E-03_JPRB,2.6022E-03_JPRB,2.8709E-03_JPRB,3.1320E-03_JPRB/)
3607 KBO( :,51, 3) = (/&
3608
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5861E-03_JPRB,1.8335E-03_JPRB,2.0693E-03_JPRB,2.2950E-03_JPRB,2.5144E-03_JPRB/)
3609 KBO( :,52, 3) = (/&
3610
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2373E-03_JPRB,1.4448E-03_JPRB,1.6433E-03_JPRB,1.8335E-03_JPRB,2.0181E-03_JPRB/)
3611 KBO( :,53, 3) = (/&
3612
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.6238E-04_JPRB,1.1359E-03_JPRB,1.3032E-03_JPRB,1.4639E-03_JPRB,1.6200E-03_JPRB/)
3613 KBO( :,54, 3) = (/&
3614
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.4760E-04_JPRB,8.9109E-04_JPRB,1.0310E-03_JPRB,1.1653E-03_JPRB,1.2951E-03_JPRB/)
3615 KBO( :,55, 3) = (/&
3616
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.7948E-04_JPRB,6.9751E-04_JPRB,8.1351E-04_JPRB,9.2482E-04_JPRB,1.0323E-03_JPRB/)
3617 KBO( :,56, 3) = (/&
3618
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4747E-04_JPRB,5.4475E-04_JPRB,6.4072E-04_JPRB,7.3311E-04_JPRB,8.2203E-04_JPRB/)
3619 KBO( :,57, 3) = (/&
3620
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.4377E-04_JPRB,4.2418E-04_JPRB,5.0351E-04_JPRB,5.8007E-04_JPRB,6.5383E-04_JPRB/)
3621 KBO( :,58, 3) = (/&
3622
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6362E-04_JPRB,3.3015E-04_JPRB,3.9544E-04_JPRB,4.5883E-04_JPRB,5.1985E-04_JPRB/)
3623 KBO( :,59, 3) = (/&
3624
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1059E-04_JPRB,2.6499E-04_JPRB,3.1808E-04_JPRB,3.6954E-04_JPRB,4.1891E-04_JPRB/)
3625 KBO( :,13, 4) = (/&
3626
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3302E+00_JPRB,3.5900E+00_JPRB,3.8490E+00_JPRB,4.0993E+00_JPRB,4.3544E+00_JPRB/)
3627 KBO( :,14, 4) = (/&
3628
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9375E+00_JPRB,3.1623E+00_JPRB,3.3912E+00_JPRB,3.6192E+00_JPRB,3.8536E+00_JPRB/)
3629 KBO( :,15, 4) = (/&
3630
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5847E+00_JPRB,2.7829E+00_JPRB,2.9920E+00_JPRB,3.2042E+00_JPRB,3.4159E+00_JPRB/)
3631 KBO( :,16, 4) = (/&
3632
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2723E+00_JPRB,2.4555E+00_JPRB,2.6487E+00_JPRB,2.8409E+00_JPRB,3.0352E+00_JPRB/)
3633 KBO( :,17, 4) = (/&
3634
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9985E+00_JPRB,2.1683E+00_JPRB,2.3422E+00_JPRB,2.5153E+00_JPRB,2.6950E+00_JPRB/)
3635 KBO( :,18, 4) = (/&
3636
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7574E+00_JPRB,1.9111E+00_JPRB,2.0646E+00_JPRB,2.2235E+00_JPRB,2.3882E+00_JPRB/)
3637 KBO( :,19, 4) = (/&
3638
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5417E+00_JPRB,1.6771E+00_JPRB,1.8159E+00_JPRB,1.9608E+00_JPRB,2.1091E+00_JPRB/)
3639 KBO( :,20, 4) = (/&
3640
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3501E+00_JPRB,1.4708E+00_JPRB,1.5966E+00_JPRB,1.7265E+00_JPRB,1.8579E+00_JPRB/)
3641 KBO( :,21, 4) = (/&
3642
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1792E+00_JPRB,1.2872E+00_JPRB,1.3996E+00_JPRB,1.5140E+00_JPRB,1.6291E+00_JPRB/)
3643 KBO( :,22, 4) = (/&
3644
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0331E+00_JPRB,1.1299E+00_JPRB,1.2292E+00_JPRB,1.3301E+00_JPRB,1.4294E+00_JPRB/)
3645 KBO( :,23, 4) = (/&
3646
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.0257E-01_JPRB,9.8785E-01_JPRB,1.0758E+00_JPRB,1.1637E+00_JPRB,1.2469E+00_JPRB/)
3647 KBO( :,24, 4) = (/&
3648
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.8462E-01_JPRB,8.6035E-01_JPRB,9.3739E-01_JPRB,1.0117E+00_JPRB,1.0795E+00_JPRB/)
3649 KBO( :,25, 4) = (/&
3650
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.8021E-01_JPRB,7.4644E-01_JPRB,8.1147E-01_JPRB,8.7243E-01_JPRB,9.2768E-01_JPRB/)
3651 KBO( :,26, 4) = (/&
3652
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.8877E-01_JPRB,6.4489E-01_JPRB,6.9856E-01_JPRB,7.4767E-01_JPRB,7.9152E-01_JPRB/)
3653 KBO( :,27, 4) = (/&
3654
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.0790E-01_JPRB,5.5427E-01_JPRB,5.9771E-01_JPRB,6.3660E-01_JPRB,6.7040E-01_JPRB/)
3655 KBO( :,28, 4) = (/&
3656
2/2
✓ Branch 0 taken 5 times.
✓ Branch 1 taken 1 times.
6 & 4.3619E-01_JPRB,4.7420E-01_JPRB,5.0861E-01_JPRB,5.3858E-01_JPRB,5.6428E-01_JPRB/)
3657
3658
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART12',1,ZHOOK_HANDLE)
3659 1 END SUBROUTINE PART12
3660
3661
3662 1 SUBROUTINE PART13
3663
3664 REAL(KIND=JPRB) :: ZHOOK_HANDLE
3665
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART13',0,ZHOOK_HANDLE)
3666
3667
3668 KBO( :,29, 4) = (/&
3669
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7351E-01_JPRB,4.0404E-01_JPRB,4.3062E-01_JPRB,4.5356E-01_JPRB,4.7355E-01_JPRB/)
3670 KBO( :,30, 4) = (/&
3671
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1877E-01_JPRB,3.4252E-01_JPRB,3.6291E-01_JPRB,3.8087E-01_JPRB,3.9669E-01_JPRB/)
3672 KBO( :,31, 4) = (/&
3673
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7097E-01_JPRB,2.8918E-01_JPRB,3.0519E-01_JPRB,3.1945E-01_JPRB,3.3218E-01_JPRB/)
3674 KBO( :,32, 4) = (/&
3675
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2933E-01_JPRB,2.4355E-01_JPRB,2.5629E-01_JPRB,2.6778E-01_JPRB,2.7819E-01_JPRB/)
3676 KBO( :,33, 4) = (/&
3677
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9352E-01_JPRB,2.0488E-01_JPRB,2.1514E-01_JPRB,2.2453E-01_JPRB,2.3322E-01_JPRB/)
3678 KBO( :,34, 4) = (/&
3679
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6266E-01_JPRB,1.7186E-01_JPRB,1.8021E-01_JPRB,1.8806E-01_JPRB,1.9533E-01_JPRB/)
3680 KBO( :,35, 4) = (/&
3681
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3588E-01_JPRB,1.4344E-01_JPRB,1.5044E-01_JPRB,1.5708E-01_JPRB,1.6319E-01_JPRB/)
3682 KBO( :,36, 4) = (/&
3683
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1281E-01_JPRB,1.1914E-01_JPRB,1.2508E-01_JPRB,1.3072E-01_JPRB,1.3587E-01_JPRB/)
3684 KBO( :,37, 4) = (/&
3685
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.2816E-02_JPRB,9.8205E-02_JPRB,1.0328E-01_JPRB,1.0804E-01_JPRB,1.1242E-01_JPRB/)
3686 KBO( :,38, 4) = (/&
3687
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.6370E-02_JPRB,8.0963E-02_JPRB,8.5283E-02_JPRB,8.9321E-02_JPRB,9.2973E-02_JPRB/)
3688 KBO( :,39, 4) = (/&
3689
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.2888E-02_JPRB,6.6805E-02_JPRB,7.0475E-02_JPRB,7.3875E-02_JPRB,7.6971E-02_JPRB/)
3690 KBO( :,40, 4) = (/&
3691
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1396E-02_JPRB,5.4708E-02_JPRB,5.7829E-02_JPRB,6.0714E-02_JPRB,6.3350E-02_JPRB/)
3692 KBO( :,41, 4) = (/&
3693
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1955E-02_JPRB,4.4762E-02_JPRB,4.7396E-02_JPRB,4.9843E-02_JPRB,5.2102E-02_JPRB/)
3694 KBO( :,42, 4) = (/&
3695
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.4234E-02_JPRB,3.6611E-02_JPRB,3.8848E-02_JPRB,4.0922E-02_JPRB,4.2851E-02_JPRB/)
3696 KBO( :,43, 4) = (/&
3697
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7815E-02_JPRB,2.9825E-02_JPRB,3.1727E-02_JPRB,3.3492E-02_JPRB,3.5154E-02_JPRB/)
3698 KBO( :,44, 4) = (/&
3699
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2537E-02_JPRB,2.4240E-02_JPRB,2.5867E-02_JPRB,2.7378E-02_JPRB,2.8807E-02_JPRB/)
3700 KBO( :,45, 4) = (/&
3701
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8246E-02_JPRB,1.9697E-02_JPRB,2.1085E-02_JPRB,2.2374E-02_JPRB,2.3604E-02_JPRB/)
3702 KBO( :,46, 4) = (/&
3703
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4728E-02_JPRB,1.5964E-02_JPRB,1.7142E-02_JPRB,1.8251E-02_JPRB,1.9308E-02_JPRB/)
3704 KBO( :,47, 4) = (/&
3705
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1818E-02_JPRB,1.2873E-02_JPRB,1.3878E-02_JPRB,1.4831E-02_JPRB,1.5740E-02_JPRB/)
3706 KBO( :,48, 4) = (/&
3707
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.4657E-03_JPRB,1.0367E-02_JPRB,1.1228E-02_JPRB,1.2052E-02_JPRB,1.2833E-02_JPRB/)
3708 KBO( :,49, 4) = (/&
3709
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.5680E-03_JPRB,8.3421E-03_JPRB,9.0805E-03_JPRB,9.7902E-03_JPRB,1.0464E-02_JPRB/)
3710 KBO( :,50, 4) = (/&
3711
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0502E-03_JPRB,6.7078E-03_JPRB,7.3374E-03_JPRB,7.9442E-03_JPRB,8.5226E-03_JPRB/)
3712 KBO( :,51, 4) = (/&
3713
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8299E-03_JPRB,5.3854E-03_JPRB,5.9216E-03_JPRB,6.4376E-03_JPRB,6.9334E-03_JPRB/)
3714 KBO( :,52, 4) = (/&
3715
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8467E-03_JPRB,4.3164E-03_JPRB,4.7737E-03_JPRB,5.2128E-03_JPRB,5.6384E-03_JPRB/)
3716 KBO( :,53, 4) = (/&
3717
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0576E-03_JPRB,3.4544E-03_JPRB,3.8447E-03_JPRB,4.2192E-03_JPRB,4.5847E-03_JPRB/)
3718 KBO( :,54, 4) = (/&
3719
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4302E-03_JPRB,2.7614E-03_JPRB,3.0899E-03_JPRB,3.4056E-03_JPRB,3.7134E-03_JPRB/)
3720 KBO( :,55, 4) = (/&
3721
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9293E-03_JPRB,2.2038E-03_JPRB,2.4777E-03_JPRB,2.7424E-03_JPRB,2.9994E-03_JPRB/)
3722 KBO( :,56, 4) = (/&
3723
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5286E-03_JPRB,1.7562E-03_JPRB,1.9841E-03_JPRB,2.2060E-03_JPRB,2.4199E-03_JPRB/)
3724 KBO( :,57, 4) = (/&
3725
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2085E-03_JPRB,1.3971E-03_JPRB,1.5864E-03_JPRB,1.7724E-03_JPRB,1.9514E-03_JPRB/)
3726 KBO( :,58, 4) = (/&
3727
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.5537E-04_JPRB,1.1118E-03_JPRB,1.2685E-03_JPRB,1.4237E-03_JPRB,1.5733E-03_JPRB/)
3728 KBO( :,59, 4) = (/&
3729
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.7590E-04_JPRB,9.0437E-04_JPRB,1.0323E-03_JPRB,1.1597E-03_JPRB,1.2822E-03_JPRB/)
3730 KBO( :,13, 5) = (/&
3731
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.9141E+00_JPRB,7.1545E+00_JPRB,7.4046E+00_JPRB,7.6833E+00_JPRB,7.9432E+00_JPRB/)
3732 KBO( :,14, 5) = (/&
3733
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0755E+00_JPRB,6.2987E+00_JPRB,6.5306E+00_JPRB,6.7873E+00_JPRB,7.0278E+00_JPRB/)
3734 KBO( :,15, 5) = (/&
3735
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.3116E+00_JPRB,5.5269E+00_JPRB,5.7512E+00_JPRB,5.9835E+00_JPRB,6.2117E+00_JPRB/)
3736 KBO( :,16, 5) = (/&
3737
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6343E+00_JPRB,4.8449E+00_JPRB,5.0585E+00_JPRB,5.2837E+00_JPRB,5.5069E+00_JPRB/)
3738 KBO( :,17, 5) = (/&
3739
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.0419E+00_JPRB,4.2430E+00_JPRB,4.4508E+00_JPRB,4.6718E+00_JPRB,4.8821E+00_JPRB/)
3740 KBO( :,18, 5) = (/&
3741
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5281E+00_JPRB,3.7196E+00_JPRB,3.9254E+00_JPRB,4.1289E+00_JPRB,4.3250E+00_JPRB/)
3742 KBO( :,19, 5) = (/&
3743
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0859E+00_JPRB,3.2697E+00_JPRB,3.4594E+00_JPRB,3.6428E+00_JPRB,3.8279E+00_JPRB/)
3744 KBO( :,20, 5) = (/&
3745
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7073E+00_JPRB,2.8768E+00_JPRB,3.0450E+00_JPRB,3.2129E+00_JPRB,3.3880E+00_JPRB/)
3746 KBO( :,21, 5) = (/&
3747
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3737E+00_JPRB,2.5247E+00_JPRB,2.6757E+00_JPRB,2.8327E+00_JPRB,2.9960E+00_JPRB/)
3748 KBO( :,22, 5) = (/&
3749
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0857E+00_JPRB,2.2199E+00_JPRB,2.3591E+00_JPRB,2.5039E+00_JPRB,2.6519E+00_JPRB/)
3750 KBO( :,23, 5) = (/&
3751
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8289E+00_JPRB,1.9512E+00_JPRB,2.0778E+00_JPRB,2.2081E+00_JPRB,2.3436E+00_JPRB/)
3752 KBO( :,24, 5) = (/&
3753
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6014E+00_JPRB,1.7122E+00_JPRB,1.8266E+00_JPRB,1.9454E+00_JPRB,2.0684E+00_JPRB/)
3754 KBO( :,25, 5) = (/&
3755
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3998E+00_JPRB,1.4999E+00_JPRB,1.6048E+00_JPRB,1.7138E+00_JPRB,1.8217E+00_JPRB/)
3756 KBO( :,26, 5) = (/&
3757
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2210E+00_JPRB,1.3132E+00_JPRB,1.4097E+00_JPRB,1.5070E+00_JPRB,1.6011E+00_JPRB/)
3758 KBO( :,27, 5) = (/&
3759
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0633E+00_JPRB,1.1477E+00_JPRB,1.2343E+00_JPRB,1.3197E+00_JPRB,1.4013E+00_JPRB/)
3760 KBO( :,28, 5) = (/&
3761
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.2471E-01_JPRB,1.0003E+00_JPRB,1.0762E+00_JPRB,1.1506E+00_JPRB,1.2207E+00_JPRB/)
3762 KBO( :,29, 5) = (/&
3763
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.0378E-01_JPRB,8.6991E-01_JPRB,9.3571E-01_JPRB,9.9918E-01_JPRB,1.0579E+00_JPRB/)
3764 KBO( :,30, 5) = (/&
3765
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.9745E-01_JPRB,7.5481E-01_JPRB,8.1124E-01_JPRB,8.6394E-01_JPRB,9.1132E-01_JPRB/)
3766 KBO( :,31, 5) = (/&
3767
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0465E-01_JPRB,6.5420E-01_JPRB,7.0129E-01_JPRB,7.4415E-01_JPRB,7.8220E-01_JPRB/)
3768 KBO( :,32, 5) = (/&
3769
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.2389E-01_JPRB,5.6576E-01_JPRB,6.0408E-01_JPRB,6.3888E-01_JPRB,6.7018E-01_JPRB/)
3770 KBO( :,33, 5) = (/&
3771
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5339E-01_JPRB,4.8777E-01_JPRB,5.1895E-01_JPRB,5.4778E-01_JPRB,5.7413E-01_JPRB/)
3772 KBO( :,34, 5) = (/&
3773
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.9043E-01_JPRB,4.1838E-01_JPRB,4.4436E-01_JPRB,4.6859E-01_JPRB,4.9150E-01_JPRB/)
3774 KBO( :,35, 5) = (/&
3775
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3304E-01_JPRB,3.5641E-01_JPRB,3.7837E-01_JPRB,3.9937E-01_JPRB,4.1969E-01_JPRB/)
3776 KBO( :,36, 5) = (/&
3777
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8159E-01_JPRB,3.0146E-01_JPRB,3.2042E-01_JPRB,3.3894E-01_JPRB,3.5721E-01_JPRB/)
3778 KBO( :,37, 5) = (/&
3779
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3528E-01_JPRB,2.5243E-01_JPRB,2.6898E-01_JPRB,2.8542E-01_JPRB,3.0190E-01_JPRB/)
3780 KBO( :,38, 5) = (/&
3781
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9653E-01_JPRB,2.1135E-01_JPRB,2.2593E-01_JPRB,2.4055E-01_JPRB,2.5537E-01_JPRB/)
3782 KBO( :,39, 5) = (/&
3783
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6424E-01_JPRB,1.7712E-01_JPRB,1.9008E-01_JPRB,2.0314E-01_JPRB,2.1645E-01_JPRB/)
3784 KBO( :,40, 5) = (/&
3785
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3599E-01_JPRB,1.4712E-01_JPRB,1.5856E-01_JPRB,1.7013E-01_JPRB,1.8191E-01_JPRB/)
3786 KBO( :,41, 5) = (/&
3787
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1240E-01_JPRB,1.2208E-01_JPRB,1.3208E-01_JPRB,1.4229E-01_JPRB,1.5269E-01_JPRB/)
3788 KBO( :,42, 5) = (/&
3789
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.2848E-02_JPRB,1.0126E-01_JPRB,1.1003E-01_JPRB,1.1902E-01_JPRB,1.2816E-01_JPRB/)
3790 KBO( :,43, 5) = (/&
3791
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.6272E-02_JPRB,8.3551E-02_JPRB,9.1173E-02_JPRB,9.9059E-02_JPRB,1.0710E-01_JPRB/)
3792 KBO( :,44, 5) = (/&
3793
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.2420E-02_JPRB,6.8705E-02_JPRB,7.5347E-02_JPRB,8.2255E-02_JPRB,8.9304E-02_JPRB/)
3794 KBO( :,45, 5) = (/&
3795
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1037E-02_JPRB,5.6461E-02_JPRB,6.2222E-02_JPRB,6.8245E-02_JPRB,7.4410E-02_JPRB/)
3796 KBO( :,46, 5) = (/&
3797
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1575E-02_JPRB,4.6220E-02_JPRB,5.1187E-02_JPRB,5.6431E-02_JPRB,6.1814E-02_JPRB/)
3798 KBO( :,47, 5) = (/&
3799
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3624E-02_JPRB,3.7569E-02_JPRB,4.1825E-02_JPRB,4.6358E-02_JPRB,5.1051E-02_JPRB/)
3800 KBO( :,48, 5) = (/&
3801
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7133E-02_JPRB,3.0477E-02_JPRB,3.4127E-02_JPRB,3.8049E-02_JPRB,4.2137E-02_JPRB/)
3802 KBO( :,49, 5) = (/&
3803
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1850E-02_JPRB,2.4695E-02_JPRB,2.7812E-02_JPRB,3.1199E-02_JPRB,3.4749E-02_JPRB/)
3804 KBO( :,50, 5) = (/&
3805
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7588E-02_JPRB,1.9999E-02_JPRB,2.2640E-02_JPRB,2.5547E-02_JPRB,2.8612E-02_JPRB/)
3806 KBO( :,51, 5) = (/&
3807
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4133E-02_JPRB,1.6172E-02_JPRB,1.8401E-02_JPRB,2.0880E-02_JPRB,2.3515E-02_JPRB/)
3808 KBO( :,52, 5) = (/&
3809
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1330E-02_JPRB,1.3052E-02_JPRB,1.4932E-02_JPRB,1.7041E-02_JPRB,1.9304E-02_JPRB/)
3810 KBO( :,53, 5) = (/&
3811
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.0563E-03_JPRB,1.0511E-02_JPRB,1.2096E-02_JPRB,1.3890E-02_JPRB,1.5837E-02_JPRB/)
3812 KBO( :,54, 5) = (/&
3813
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.2337E-03_JPRB,8.4542E-03_JPRB,9.7774E-03_JPRB,1.1280E-02_JPRB,1.2936E-02_JPRB/)
3814 KBO( :,55, 5) = (/&
3815
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.7674E-03_JPRB,6.7888E-03_JPRB,7.8837E-03_JPRB,9.1276E-03_JPRB,1.0528E-02_JPRB/)
3816 KBO( :,56, 5) = (/&
3817
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5854E-03_JPRB,5.4402E-03_JPRB,6.3461E-03_JPRB,7.3755E-03_JPRB,8.5458E-03_JPRB/)
3818 KBO( :,57, 5) = (/&
3819
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6334E-03_JPRB,4.3489E-03_JPRB,5.0994E-03_JPRB,5.9486E-03_JPRB,6.9270E-03_JPRB/)
3820 KBO( :,58, 5) = (/&
3821
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8784E-03_JPRB,3.4761E-03_JPRB,4.0992E-03_JPRB,4.7976E-03_JPRB,5.6122E-03_JPRB/)
3822 KBO( :,59, 5) = (/&
3823
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3567E-03_JPRB,2.8551E-03_JPRB,3.3744E-03_JPRB,3.9529E-03_JPRB,4.6311E-03_JPRB/)
3824 KBO( :,13, 6) = (/&
3825
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3830E+01_JPRB,1.4015E+01_JPRB,1.4160E+01_JPRB,1.4307E+01_JPRB,1.4522E+01_JPRB/)
3826 KBO( :,14, 6) = (/&
3827
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2340E+01_JPRB,1.2516E+01_JPRB,1.2660E+01_JPRB,1.2793E+01_JPRB,1.2966E+01_JPRB/)
3828 KBO( :,15, 6) = (/&
3829
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0924E+01_JPRB,1.1092E+01_JPRB,1.1224E+01_JPRB,1.1351E+01_JPRB,1.1516E+01_JPRB/)
3830 KBO( :,16, 6) = (/&
3831
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.6024E+00_JPRB,9.7501E+00_JPRB,9.8836E+00_JPRB,1.0029E+01_JPRB,1.0212E+01_JPRB/)
3832 KBO( :,17, 6) = (/&
3833
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.3708E+00_JPRB,8.5153E+00_JPRB,8.6644E+00_JPRB,8.8329E+00_JPRB,9.0401E+00_JPRB/)
3834 KBO( :,18, 6) = (/&
3835
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.2569E+00_JPRB,7.4102E+00_JPRB,7.5767E+00_JPRB,7.7740E+00_JPRB,8.0051E+00_JPRB/)
3836 KBO( :,19, 6) = (/&
3837
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.2750E+00_JPRB,6.4411E+00_JPRB,6.6283E+00_JPRB,6.8499E+00_JPRB,7.0924E+00_JPRB/)
3838 KBO( :,20, 6) = (/&
3839
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.4324E+00_JPRB,5.6127E+00_JPRB,5.8201E+00_JPRB,6.0515E+00_JPRB,6.2952E+00_JPRB/)
3840 KBO( :,21, 6) = (/&
3841
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7199E+00_JPRB,4.9098E+00_JPRB,5.1220E+00_JPRB,5.3512E+00_JPRB,5.5929E+00_JPRB/)
3842 KBO( :,22, 6) = (/&
3843
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1275E+00_JPRB,4.3173E+00_JPRB,4.5250E+00_JPRB,4.7472E+00_JPRB,4.9873E+00_JPRB/)
3844 KBO( :,23, 6) = (/&
3845
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6186E+00_JPRB,3.8008E+00_JPRB,4.0007E+00_JPRB,4.2194E+00_JPRB,4.4546E+00_JPRB/)
3846 KBO( :,24, 6) = (/&
3847
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1789E+00_JPRB,3.3535E+00_JPRB,3.5481E+00_JPRB,3.7602E+00_JPRB,3.9826E+00_JPRB/)
3848 KBO( :,25, 6) = (/&
3849
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8009E+00_JPRB,2.9702E+00_JPRB,3.1571E+00_JPRB,3.3553E+00_JPRB,3.5661E+00_JPRB/)
3850 KBO( :,26, 6) = (/&
3851
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4787E+00_JPRB,2.6417E+00_JPRB,2.8161E+00_JPRB,3.0035E+00_JPRB,3.2026E+00_JPRB/)
3852 KBO( :,27, 6) = (/&
3853
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1990E+00_JPRB,2.3537E+00_JPRB,2.5197E+00_JPRB,2.6976E+00_JPRB,2.8845E+00_JPRB/)
3854 KBO( :,28, 6) = (/&
3855
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9523E+00_JPRB,2.1013E+00_JPRB,2.2618E+00_JPRB,2.4297E+00_JPRB,2.6035E+00_JPRB/)
3856 KBO( :,29, 6) = (/&
3857
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7370E+00_JPRB,1.8823E+00_JPRB,2.0367E+00_JPRB,2.1958E+00_JPRB,2.3561E+00_JPRB/)
3858 KBO( :,30, 6) = (/&
3859
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5497E+00_JPRB,1.6904E+00_JPRB,1.8375E+00_JPRB,1.9876E+00_JPRB,2.1376E+00_JPRB/)
3860 KBO( :,31, 6) = (/&
3861
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3874E+00_JPRB,1.5222E+00_JPRB,1.6617E+00_JPRB,1.8040E+00_JPRB,1.9446E+00_JPRB/)
3862 KBO( :,32, 6) = (/&
3863
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2460E+00_JPRB,1.3738E+00_JPRB,1.5067E+00_JPRB,1.6408E+00_JPRB,1.7720E+00_JPRB/)
3864 KBO( :,33, 6) = (/&
3865
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1223E+00_JPRB,1.2436E+00_JPRB,1.3697E+00_JPRB,1.4955E+00_JPRB,1.6172E+00_JPRB/)
3866 KBO( :,34, 6) = (/&
3867
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0099E+00_JPRB,1.1249E+00_JPRB,1.2434E+00_JPRB,1.3608E+00_JPRB,1.4735E+00_JPRB/)
3868 KBO( :,35, 6) = (/&
3869
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.0209E-01_JPRB,1.0096E+00_JPRB,1.1199E+00_JPRB,1.2299E+00_JPRB,1.3354E+00_JPRB/)
3870 KBO( :,36, 6) = (/&
3871
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9733E-01_JPRB,8.9688E-01_JPRB,9.9932E-01_JPRB,1.1023E+00_JPRB,1.2028E+00_JPRB/)
3872 KBO( :,37, 6) = (/&
3873
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.9211E-01_JPRB,7.8344E-01_JPRB,8.7821E-01_JPRB,9.7443E-01_JPRB,1.0708E+00_JPRB/)
3874 KBO( :,38, 6) = (/&
3875
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0006E-01_JPRB,6.8377E-01_JPRB,7.7149E-01_JPRB,8.6171E-01_JPRB,9.5413E-01_JPRB/)
3876 KBO( :,39, 6) = (/&
3877
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.2043E-01_JPRB,5.9726E-01_JPRB,6.7852E-01_JPRB,7.6343E-01_JPRB,8.5244E-01_JPRB/)
3878 KBO( :,40, 6) = (/&
3879
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4416E-01_JPRB,5.1399E-01_JPRB,5.8862E-01_JPRB,6.6792E-01_JPRB,7.5268E-01_JPRB/)
3880 KBO( :,41, 6) = (/&
3881
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7776E-01_JPRB,4.4092E-01_JPRB,5.0931E-01_JPRB,5.8308E-01_JPRB,6.6368E-01_JPRB/)
3882 KBO( :,42, 6) = (/&
3883
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2073E-01_JPRB,3.7777E-01_JPRB,4.4039E-01_JPRB,5.0902E-01_JPRB,5.8559E-01_JPRB/)
3884 KBO( :,43, 6) = (/&
3885
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6920E-01_JPRB,3.2022E-01_JPRB,3.7707E-01_JPRB,4.4047E-01_JPRB,5.1263E-01_JPRB/)
3886 KBO( :,44, 6) = (/&
3887
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2419E-01_JPRB,2.6949E-01_JPRB,3.2089E-01_JPRB,3.7919E-01_JPRB,4.4668E-01_JPRB/)
3888 KBO( :,45, 6) = (/&
3889
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8610E-01_JPRB,2.2623E-01_JPRB,2.7250E-01_JPRB,3.2589E-01_JPRB,3.8881E-01_JPRB/)
3890 KBO( :,46, 6) = (/&
3891
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5321E-01_JPRB,1.8844E-01_JPRB,2.2973E-01_JPRB,2.7826E-01_JPRB,3.3646E-01_JPRB/)
3892 KBO( :,47, 6) = (/&
3893
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2434E-01_JPRB,1.5480E-01_JPRB,1.9116E-01_JPRB,2.3462E-01_JPRB,2.8768E-01_JPRB/)
3894 KBO( :,48, 6) = (/&
3895
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0036E-01_JPRB,1.2653E-01_JPRB,1.5835E-01_JPRB,1.9711E-01_JPRB,2.4528E-01_JPRB/)
3896 KBO( :,49, 6) = (/&
3897
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.0612E-02_JPRB,1.0295E-01_JPRB,1.3061E-01_JPRB,1.6496E-01_JPRB,2.0845E-01_JPRB/)
3898 KBO( :,50, 6) = (/&
3899
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.4743E-02_JPRB,8.3670E-02_JPRB,1.0758E-01_JPRB,1.3777E-01_JPRB,1.7673E-01_JPRB/)
3900 KBO( :,51, 6) = (/&
3901
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1836E-02_JPRB,6.7752E-02_JPRB,8.8282E-02_JPRB,1.1466E-01_JPRB,1.4926E-01_JPRB/)
3902 KBO( :,52, 6) = (/&
3903
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1270E-02_JPRB,5.4579E-02_JPRB,7.2088E-02_JPRB,9.5008E-02_JPRB,1.2557E-01_JPRB/)
3904 KBO( :,53, 6) = (/&
3905
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2703E-02_JPRB,4.3723E-02_JPRB,5.8551E-02_JPRB,7.8358E-02_JPRB,1.0523E-01_JPRB/)
3906 KBO( :,54, 6) = (/&
3907
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5932E-02_JPRB,3.5025E-02_JPRB,4.7496E-02_JPRB,6.4433E-02_JPRB,8.7763E-02_JPRB/)
3908 KBO( :,55, 6) = (/&
3909
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0516E-02_JPRB,2.7980E-02_JPRB,3.8384E-02_JPRB,5.2720E-02_JPRB,7.2773E-02_JPRB/)
3910 KBO( :,56, 6) = (/&
3911
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6157E-02_JPRB,2.2243E-02_JPRB,3.0860E-02_JPRB,4.2933E-02_JPRB,6.0054E-02_JPRB/)
3912 KBO( :,57, 6) = (/&
3913
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2662E-02_JPRB,1.7594E-02_JPRB,2.4676E-02_JPRB,3.4773E-02_JPRB,4.9299E-02_JPRB/)
3914 KBO( :,58, 6) = (/&
3915
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.9314E-03_JPRB,1.3912E-02_JPRB,1.9723E-02_JPRB,2.8150E-02_JPRB,4.0439E-02_JPRB/)
3916 KBO( :,59, 6) = (/&
3917
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.2224E-03_JPRB,1.1623E-02_JPRB,1.6659E-02_JPRB,2.4055E-02_JPRB,3.5006E-02_JPRB/)
3918 KBO( :,13, 7) = (/&
3919
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6335E+01_JPRB,2.6343E+01_JPRB,2.6317E+01_JPRB,2.6278E+01_JPRB,2.6240E+01_JPRB/)
3920 KBO( :,14, 7) = (/&
3921
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4335E+01_JPRB,2.4368E+01_JPRB,2.4378E+01_JPRB,2.4360E+01_JPRB,2.4346E+01_JPRB/)
3922 KBO( :,15, 7) = (/&
3923
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2209E+01_JPRB,2.2271E+01_JPRB,2.2317E+01_JPRB,2.2351E+01_JPRB,2.2363E+01_JPRB/)
3924 KBO( :,16, 7) = (/&
3925
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0041E+01_JPRB,2.0151E+01_JPRB,2.0235E+01_JPRB,2.0297E+01_JPRB,2.0322E+01_JPRB/)
3926 KBO( :,17, 7) = (/&
3927
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7927E+01_JPRB,1.8060E+01_JPRB,1.8168E+01_JPRB,1.8242E+01_JPRB,1.8304E+01_JPRB/)
3928 KBO( :,18, 7) = (/&
3929
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5898E+01_JPRB,1.6045E+01_JPRB,1.6164E+01_JPRB,1.6266E+01_JPRB,1.6378E+01_JPRB/)
3930 KBO( :,19, 7) = (/&
3931
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3992E+01_JPRB,1.4142E+01_JPRB,1.4282E+01_JPRB,1.4427E+01_JPRB,1.4606E+01_JPRB/)
3932 KBO( :,20, 7) = (/&
3933
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2229E+01_JPRB,1.2396E+01_JPRB,1.2574E+01_JPRB,1.2781E+01_JPRB,1.3031E+01_JPRB/)
3934 KBO( :,21, 7) = (/&
3935
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0639E+01_JPRB,1.0839E+01_JPRB,1.1068E+01_JPRB,1.1335E+01_JPRB,1.1649E+01_JPRB/)
3936 KBO( :,22, 7) = (/&
3937
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.2636E+00_JPRB,9.5053E+00_JPRB,9.7840E+00_JPRB,1.0108E+01_JPRB,1.0461E+01_JPRB/)
3938 KBO( :,23, 7) = (/&
3939
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.0952E+00_JPRB,8.3738E+00_JPRB,8.6908E+00_JPRB,9.0366E+00_JPRB,9.4060E+00_JPRB/)
3940 KBO( :,24, 7) = (/&
3941
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.1130E+00_JPRB,7.4146E+00_JPRB,7.7429E+00_JPRB,8.0993E+00_JPRB,8.4864E+00_JPRB/)
3942 KBO( :,25, 7) = (/&
3943
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.2837E+00_JPRB,6.5877E+00_JPRB,6.9205E+00_JPRB,7.2883E+00_JPRB,7.6912E+00_JPRB/)
3944 KBO( :,26, 7) = (/&
3945
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.5745E+00_JPRB,5.8760E+00_JPRB,6.2151E+00_JPRB,6.5923E+00_JPRB,7.0080E+00_JPRB/)
3946 KBO( :,27, 7) = (/&
3947
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.9643E+00_JPRB,5.2682E+00_JPRB,5.6134E+00_JPRB,5.9978E+00_JPRB,6.4129E+00_JPRB/)
3948 KBO( :,28, 7) = (/&
3949
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4473E+00_JPRB,4.7539E+00_JPRB,5.1020E+00_JPRB,5.4857E+00_JPRB,5.8980E+00_JPRB/)
3950 KBO( :,29, 7) = (/&
3951
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.0139E+00_JPRB,4.3228E+00_JPRB,4.6679E+00_JPRB,5.0477E+00_JPRB,5.4611E+00_JPRB/)
3952 KBO( :,30, 7) = (/&
3953
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6503E+00_JPRB,3.9570E+00_JPRB,4.2982E+00_JPRB,4.6765E+00_JPRB,5.0904E+00_JPRB/)
3954 KBO( :,31, 7) = (/&
3955
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3458E+00_JPRB,3.6492E+00_JPRB,3.9896E+00_JPRB,4.3657E+00_JPRB,4.7803E+00_JPRB/)
3956 KBO( :,32, 7) = (/&
3957
2/2
✓ Branch 0 taken 5 times.
✓ Branch 1 taken 1 times.
6 & 3.0885E+00_JPRB,3.3924E+00_JPRB,3.7326E+00_JPRB,4.1089E+00_JPRB,4.5242E+00_JPRB/)
3958
3959
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART13',1,ZHOOK_HANDLE)
3960 1 END SUBROUTINE PART13
3961
3962
3963 1 SUBROUTINE PART14
3964
3965 REAL(KIND=JPRB) :: ZHOOK_HANDLE
3966
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART14',0,ZHOOK_HANDLE)
3967
3968
3969 KBO( :,33, 7) = (/&
3970
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8733E+00_JPRB,3.1791E+00_JPRB,3.5210E+00_JPRB,3.8996E+00_JPRB,4.3193E+00_JPRB/)
3971 KBO( :,34, 7) = (/&
3972
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6844E+00_JPRB,2.9924E+00_JPRB,3.3348E+00_JPRB,3.7181E+00_JPRB,4.1445E+00_JPRB/)
3973 KBO( :,35, 7) = (/&
3974
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4984E+00_JPRB,2.8075E+00_JPRB,3.1505E+00_JPRB,3.5359E+00_JPRB,3.9675E+00_JPRB/)
3975 KBO( :,36, 7) = (/&
3976
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3072E+00_JPRB,2.6159E+00_JPRB,2.9582E+00_JPRB,3.3431E+00_JPRB,3.7763E+00_JPRB/)
3977 KBO( :,37, 7) = (/&
3978
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0954E+00_JPRB,2.4005E+00_JPRB,2.7380E+00_JPRB,3.1168E+00_JPRB,3.5461E+00_JPRB/)
3979 KBO( :,38, 7) = (/&
3980
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9034E+00_JPRB,2.2055E+00_JPRB,2.5402E+00_JPRB,2.9151E+00_JPRB,3.3403E+00_JPRB/)
3981 KBO( :,39, 7) = (/&
3982
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7317E+00_JPRB,2.0312E+00_JPRB,2.3647E+00_JPRB,2.7379E+00_JPRB,3.1615E+00_JPRB/)
3983 KBO( :,40, 7) = (/&
3984
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5481E+00_JPRB,1.8407E+00_JPRB,2.1704E+00_JPRB,2.5377E+00_JPRB,2.9544E+00_JPRB/)
3985 KBO( :,41, 7) = (/&
3986
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3778E+00_JPRB,1.6628E+00_JPRB,1.9879E+00_JPRB,2.3508E+00_JPRB,2.7602E+00_JPRB/)
3987 KBO( :,42, 7) = (/&
3988
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2232E+00_JPRB,1.4999E+00_JPRB,1.8203E+00_JPRB,2.1797E+00_JPRB,2.5828E+00_JPRB/)
3989 KBO( :,43, 7) = (/&
3990
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0698E+00_JPRB,1.3347E+00_JPRB,1.6469E+00_JPRB,2.0008E+00_JPRB,2.3963E+00_JPRB/)
3991 KBO( :,44, 7) = (/&
3992
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.2588E-01_JPRB,1.1760E+00_JPRB,1.4777E+00_JPRB,1.8247E+00_JPRB,2.2132E+00_JPRB/)
3993 KBO( :,45, 7) = (/&
3994
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9702E-01_JPRB,1.0315E+00_JPRB,1.3210E+00_JPRB,1.6600E+00_JPRB,2.0420E+00_JPRB/)
3995 KBO( :,46, 7) = (/&
3996
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.7818E-01_JPRB,8.9459E-01_JPRB,1.1684E+00_JPRB,1.4973E+00_JPRB,1.8716E+00_JPRB/)
3997 KBO( :,47, 7) = (/&
3998
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.6580E-01_JPRB,7.6097E-01_JPRB,1.0151E+00_JPRB,1.3286E+00_JPRB,1.6923E+00_JPRB/)
3999 KBO( :,48, 7) = (/&
4000
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6791E-01_JPRB,6.4213E-01_JPRB,8.7532E-01_JPRB,1.1714E+00_JPRB,1.5227E+00_JPRB/)
4001 KBO( :,49, 7) = (/&
4002
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8353E-01_JPRB,5.3743E-01_JPRB,7.4923E-01_JPRB,1.0257E+00_JPRB,1.3624E+00_JPRB/)
4003 KBO( :,50, 7) = (/&
4004
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1398E-01_JPRB,4.4906E-01_JPRB,6.4014E-01_JPRB,8.9685E-01_JPRB,1.2172E+00_JPRB/)
4005 KBO( :,51, 7) = (/&
4006
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5573E-01_JPRB,3.7326E-01_JPRB,5.4427E-01_JPRB,7.8065E-01_JPRB,1.0832E+00_JPRB/)
4007 KBO( :,52, 7) = (/&
4008
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0647E-01_JPRB,3.0764E-01_JPRB,4.5931E-01_JPRB,6.7487E-01_JPRB,9.5820E-01_JPRB/)
4009 KBO( :,53, 7) = (/&
4010
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6527E-01_JPRB,2.5130E-01_JPRB,3.8436E-01_JPRB,5.7911E-01_JPRB,8.4227E-01_JPRB/)
4011 KBO( :,54, 7) = (/&
4012
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3250E-01_JPRB,2.0520E-01_JPRB,3.2144E-01_JPRB,4.9663E-01_JPRB,7.3948E-01_JPRB/)
4013 KBO( :,55, 7) = (/&
4014
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0586E-01_JPRB,1.6687E-01_JPRB,2.6744E-01_JPRB,4.2379E-01_JPRB,6.4623E-01_JPRB/)
4015 KBO( :,56, 7) = (/&
4016
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.3917E-02_JPRB,1.3459E-01_JPRB,2.2056E-01_JPRB,3.5886E-01_JPRB,5.6114E-01_JPRB/)
4017 KBO( :,57, 7) = (/&
4018
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.5997E-02_JPRB,1.0758E-01_JPRB,1.8019E-01_JPRB,3.0131E-01_JPRB,4.8364E-01_JPRB/)
4019 KBO( :,58, 7) = (/&
4020
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1899E-02_JPRB,8.5940E-02_JPRB,1.4705E-01_JPRB,2.5263E-01_JPRB,4.1642E-01_JPRB/)
4021 KBO( :,59, 7) = (/&
4022
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4275E-02_JPRB,7.4915E-02_JPRB,1.3121E-01_JPRB,2.3019E-01_JPRB,3.8591E-01_JPRB/)
4023 KBO( :,13, 8) = (/&
4024
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.0965E+01_JPRB,5.0361E+01_JPRB,4.9768E+01_JPRB,4.9177E+01_JPRB,4.8632E+01_JPRB/)
4025 KBO( :,14, 8) = (/&
4026
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.9580E+01_JPRB,4.9133E+01_JPRB,4.8669E+01_JPRB,4.8207E+01_JPRB,4.7744E+01_JPRB/)
4027 KBO( :,15, 8) = (/&
4028
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7755E+01_JPRB,4.7423E+01_JPRB,4.7054E+01_JPRB,4.6684E+01_JPRB,4.6310E+01_JPRB/)
4029 KBO( :,16, 8) = (/&
4030
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5437E+01_JPRB,4.5197E+01_JPRB,4.4948E+01_JPRB,4.4674E+01_JPRB,4.4398E+01_JPRB/)
4031 KBO( :,17, 8) = (/&
4032
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.2668E+01_JPRB,4.2548E+01_JPRB,4.2401E+01_JPRB,4.2228E+01_JPRB,4.2024E+01_JPRB/)
4033 KBO( :,18, 8) = (/&
4034
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.9590E+01_JPRB,3.9566E+01_JPRB,3.9492E+01_JPRB,3.9393E+01_JPRB,3.9273E+01_JPRB/)
4035 KBO( :,19, 8) = (/&
4036
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6298E+01_JPRB,3.6335E+01_JPRB,3.6351E+01_JPRB,3.6334E+01_JPRB,3.6282E+01_JPRB/)
4037 KBO( :,20, 8) = (/&
4038
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2906E+01_JPRB,3.3017E+01_JPRB,3.3099E+01_JPRB,3.3142E+01_JPRB,3.3168E+01_JPRB/)
4039 KBO( :,21, 8) = (/&
4040
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9547E+01_JPRB,2.9709E+01_JPRB,2.9845E+01_JPRB,2.9969E+01_JPRB,3.0103E+01_JPRB/)
4041 KBO( :,22, 8) = (/&
4042
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6311E+01_JPRB,2.6524E+01_JPRB,2.6733E+01_JPRB,2.6954E+01_JPRB,2.7222E+01_JPRB/)
4043 KBO( :,23, 8) = (/&
4044
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3277E+01_JPRB,2.3556E+01_JPRB,2.3854E+01_JPRB,2.4204E+01_JPRB,2.4638E+01_JPRB/)
4045 KBO( :,24, 8) = (/&
4046
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0517E+01_JPRB,2.0874E+01_JPRB,2.1304E+01_JPRB,2.1801E+01_JPRB,2.2391E+01_JPRB/)
4047 KBO( :,25, 8) = (/&
4048
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8081E+01_JPRB,1.8550E+01_JPRB,1.9103E+01_JPRB,1.9746E+01_JPRB,2.0474E+01_JPRB/)
4049 KBO( :,26, 8) = (/&
4050
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6011E+01_JPRB,1.6594E+01_JPRB,1.7264E+01_JPRB,1.8029E+01_JPRB,1.8873E+01_JPRB/)
4051 KBO( :,27, 8) = (/&
4052
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4287E+01_JPRB,1.4961E+01_JPRB,1.5728E+01_JPRB,1.6587E+01_JPRB,1.7528E+01_JPRB/)
4053 KBO( :,28, 8) = (/&
4054
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2856E+01_JPRB,1.3605E+01_JPRB,1.4442E+01_JPRB,1.5375E+01_JPRB,1.6398E+01_JPRB/)
4055 KBO( :,29, 8) = (/&
4056
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1675E+01_JPRB,1.2478E+01_JPRB,1.3380E+01_JPRB,1.4384E+01_JPRB,1.5477E+01_JPRB/)
4057 KBO( :,30, 8) = (/&
4058
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0695E+01_JPRB,1.1550E+01_JPRB,1.2511E+01_JPRB,1.3578E+01_JPRB,1.4743E+01_JPRB/)
4059 KBO( :,31, 8) = (/&
4060
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.8981E+00_JPRB,1.0807E+01_JPRB,1.1824E+01_JPRB,1.2957E+01_JPRB,1.4200E+01_JPRB/)
4061 KBO( :,32, 8) = (/&
4062
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.2617E+00_JPRB,1.0217E+01_JPRB,1.1294E+01_JPRB,1.2501E+01_JPRB,1.3819E+01_JPRB/)
4063 KBO( :,33, 8) = (/&
4064
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.7596E+00_JPRB,9.7694E+00_JPRB,1.0911E+01_JPRB,1.2196E+01_JPRB,1.3598E+01_JPRB/)
4065 KBO( :,34, 8) = (/&
4066
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.3433E+00_JPRB,9.4056E+00_JPRB,1.0617E+01_JPRB,1.1977E+01_JPRB,1.3459E+01_JPRB/)
4067 KBO( :,35, 8) = (/&
4068
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9357E+00_JPRB,9.0427E+00_JPRB,1.0314E+01_JPRB,1.1736E+01_JPRB,1.3286E+01_JPRB/)
4069 KBO( :,36, 8) = (/&
4070
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.5046E+00_JPRB,8.6413E+00_JPRB,9.9524E+00_JPRB,1.1425E+01_JPRB,1.3024E+01_JPRB/)
4071 KBO( :,37, 8) = (/&
4072
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.9879E+00_JPRB,8.1265E+00_JPRB,9.4503E+00_JPRB,1.0942E+01_JPRB,1.2567E+01_JPRB/)
4073 KBO( :,38, 8) = (/&
4074
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.5288E+00_JPRB,7.6643E+00_JPRB,8.9952E+00_JPRB,1.0502E+01_JPRB,1.2144E+01_JPRB/)
4075 KBO( :,39, 8) = (/&
4076
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.1286E+00_JPRB,7.2600E+00_JPRB,8.5928E+00_JPRB,1.0109E+01_JPRB,1.1767E+01_JPRB/)
4077 KBO( :,40, 8) = (/&
4078
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.6684E+00_JPRB,6.7740E+00_JPRB,8.0799E+00_JPRB,9.5804E+00_JPRB,1.1233E+01_JPRB/)
4079 KBO( :,41, 8) = (/&
4080
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.2402E+00_JPRB,6.3138E+00_JPRB,7.5882E+00_JPRB,9.0624E+00_JPRB,1.0701E+01_JPRB/)
4081 KBO( :,42, 8) = (/&
4082
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8506E+00_JPRB,5.8918E+00_JPRB,7.1323E+00_JPRB,8.5740E+00_JPRB,1.0194E+01_JPRB/)
4083 KBO( :,43, 8) = (/&
4084
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4438E+00_JPRB,5.4412E+00_JPRB,6.6345E+00_JPRB,8.0293E+00_JPRB,9.6145E+00_JPRB/)
4085 KBO( :,44, 8) = (/&
4086
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.0493E+00_JPRB,4.9983E+00_JPRB,6.1400E+00_JPRB,7.4797E+00_JPRB,9.0187E+00_JPRB/)
4087 KBO( :,45, 8) = (/&
4088
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6876E+00_JPRB,4.5888E+00_JPRB,5.6785E+00_JPRB,6.9623E+00_JPRB,8.4500E+00_JPRB/)
4089 KBO( :,46, 8) = (/&
4090
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3383E+00_JPRB,4.1880E+00_JPRB,5.2207E+00_JPRB,6.4454E+00_JPRB,7.8745E+00_JPRB/)
4091 KBO( :,47, 8) = (/&
4092
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9856E+00_JPRB,3.7780E+00_JPRB,4.7472E+00_JPRB,5.9041E+00_JPRB,7.2615E+00_JPRB/)
4093 KBO( :,48, 8) = (/&
4094
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6572E+00_JPRB,3.4003E+00_JPRB,4.3078E+00_JPRB,5.3986E+00_JPRB,6.6852E+00_JPRB/)
4095 KBO( :,49, 8) = (/&
4096
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3488E+00_JPRB,3.0535E+00_JPRB,3.9013E+00_JPRB,4.9276E+00_JPRB,6.1472E+00_JPRB/)
4097 KBO( :,50, 8) = (/&
4098
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0729E+00_JPRB,2.7473E+00_JPRB,3.5436E+00_JPRB,4.5091E+00_JPRB,5.6655E+00_JPRB/)
4099 KBO( :,51, 8) = (/&
4100
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8206E+00_JPRB,2.4651E+00_JPRB,3.2190E+00_JPRB,4.1264E+00_JPRB,5.2204E+00_JPRB/)
4101 KBO( :,52, 8) = (/&
4102
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5859E+00_JPRB,2.1977E+00_JPRB,2.9176E+00_JPRB,3.7698E+00_JPRB,4.8036E+00_JPRB/)
4103 KBO( :,53, 8) = (/&
4104
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3682E+00_JPRB,1.9445E+00_JPRB,2.6333E+00_JPRB,3.4378E+00_JPRB,4.4138E+00_JPRB/)
4105 KBO( :,54, 8) = (/&
4106
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1812E+00_JPRB,1.7215E+00_JPRB,2.3803E+00_JPRB,3.1453E+00_JPRB,4.0633E+00_JPRB/)
4107 KBO( :,55, 8) = (/&
4108
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0150E+00_JPRB,1.5193E+00_JPRB,2.1463E+00_JPRB,2.8770E+00_JPRB,3.7398E+00_JPRB/)
4109 KBO( :,56, 8) = (/&
4110
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.6368E-01_JPRB,1.3309E+00_JPRB,1.9241E+00_JPRB,2.6237E+00_JPRB,3.4375E+00_JPRB/)
4111 KBO( :,57, 8) = (/&
4112
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.2682E-01_JPRB,1.1556E+00_JPRB,1.7137E+00_JPRB,2.3824E+00_JPRB,3.1551E+00_JPRB/)
4113 KBO( :,58, 8) = (/&
4114
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0967E-01_JPRB,1.0012E+00_JPRB,1.5247E+00_JPRB,2.1627E+00_JPRB,2.9020E+00_JPRB/)
4115 KBO( :,59, 8) = (/&
4116
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.5853E-01_JPRB,9.3598E-01_JPRB,1.4448E+00_JPRB,2.0692E+00_JPRB,2.7925E+00_JPRB/)
4117 KBO( :,13, 9) = (/&
4118
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.9288E+01_JPRB,9.7856E+01_JPRB,9.6419E+01_JPRB,9.4961E+01_JPRB,9.3473E+01_JPRB/)
4119 KBO( :,14, 9) = (/&
4120
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0412E+02_JPRB,1.0269E+02_JPRB,1.0123E+02_JPRB,9.9736E+01_JPRB,9.8238E+01_JPRB/)
4121 KBO( :,15, 9) = (/&
4122
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0817E+02_JPRB,1.0679E+02_JPRB,1.0540E+02_JPRB,1.0396E+02_JPRB,1.0249E+02_JPRB/)
4123 KBO( :,16, 9) = (/&
4124
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1129E+02_JPRB,1.1004E+02_JPRB,1.0873E+02_JPRB,1.0740E+02_JPRB,1.0603E+02_JPRB/)
4125 KBO( :,17, 9) = (/&
4126
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1340E+02_JPRB,1.1230E+02_JPRB,1.1113E+02_JPRB,1.0995E+02_JPRB,1.0873E+02_JPRB/)
4127 KBO( :,18, 9) = (/&
4128
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1434E+02_JPRB,1.1342E+02_JPRB,1.1248E+02_JPRB,1.1144E+02_JPRB,1.1034E+02_JPRB/)
4129 KBO( :,19, 9) = (/&
4130
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1401E+02_JPRB,1.1333E+02_JPRB,1.1256E+02_JPRB,1.1172E+02_JPRB,1.1083E+02_JPRB/)
4131 KBO( :,20, 9) = (/&
4132
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1234E+02_JPRB,1.1193E+02_JPRB,1.1143E+02_JPRB,1.1085E+02_JPRB,1.1019E+02_JPRB/)
4133 KBO( :,21, 9) = (/&
4134
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0946E+02_JPRB,1.0935E+02_JPRB,1.0914E+02_JPRB,1.0884E+02_JPRB,1.0846E+02_JPRB/)
4135 KBO( :,22, 9) = (/&
4136
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0557E+02_JPRB,1.0577E+02_JPRB,1.0588E+02_JPRB,1.0590E+02_JPRB,1.0584E+02_JPRB/)
4137 KBO( :,23, 9) = (/&
4138
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0094E+02_JPRB,1.0149E+02_JPRB,1.0194E+02_JPRB,1.0233E+02_JPRB,1.0260E+02_JPRB/)
4139 KBO( :,24, 9) = (/&
4140
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.5817E+01_JPRB,9.6736E+01_JPRB,9.7569E+01_JPRB,9.8330E+01_JPRB,9.9010E+01_JPRB/)
4141 KBO( :,25, 9) = (/&
4142
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.0469E+01_JPRB,9.1797E+01_JPRB,9.3074E+01_JPRB,9.4238E+01_JPRB,9.5339E+01_JPRB/)
4143 KBO( :,26, 9) = (/&
4144
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.5212E+01_JPRB,8.6963E+01_JPRB,8.8676E+01_JPRB,9.0313E+01_JPRB,9.1842E+01_JPRB/)
4145 KBO( :,27, 9) = (/&
4146
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.0235E+01_JPRB,8.2437E+01_JPRB,8.4599E+01_JPRB,8.6731E+01_JPRB,8.8747E+01_JPRB/)
4147 KBO( :,28, 9) = (/&
4148
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.5722E+01_JPRB,7.8382E+01_JPRB,8.1040E+01_JPRB,8.3660E+01_JPRB,8.6177E+01_JPRB/)
4149 KBO( :,29, 9) = (/&
4150
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.1851E+01_JPRB,7.4992E+01_JPRB,7.8130E+01_JPRB,8.1223E+01_JPRB,8.4209E+01_JPRB/)
4151 KBO( :,30, 9) = (/&
4152
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.8679E+01_JPRB,7.2286E+01_JPRB,7.5891E+01_JPRB,7.9421E+01_JPRB,8.2811E+01_JPRB/)
4153 KBO( :,31, 9) = (/&
4154
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.6225E+01_JPRB,7.0279E+01_JPRB,7.4326E+01_JPRB,7.8245E+01_JPRB,8.1966E+01_JPRB/)
4155 KBO( :,32, 9) = (/&
4156
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.4479E+01_JPRB,6.8946E+01_JPRB,7.3367E+01_JPRB,7.7627E+01_JPRB,8.1643E+01_JPRB/)
4157 KBO( :,33, 9) = (/&
4158
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.3393E+01_JPRB,6.8225E+01_JPRB,7.2967E+01_JPRB,7.7506E+01_JPRB,8.1771E+01_JPRB/)
4159 KBO( :,34, 9) = (/&
4160
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.2705E+01_JPRB,6.7842E+01_JPRB,7.2848E+01_JPRB,7.7622E+01_JPRB,8.2086E+01_JPRB/)
4161 KBO( :,35, 9) = (/&
4162
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.1970E+01_JPRB,6.7369E+01_JPRB,7.2611E+01_JPRB,7.7614E+01_JPRB,8.2278E+01_JPRB/)
4163 KBO( :,36, 9) = (/&
4164
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0967E+01_JPRB,6.6598E+01_JPRB,7.2072E+01_JPRB,7.7300E+01_JPRB,8.2185E+01_JPRB/)
4165 KBO( :,37, 9) = (/&
4166
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.9279E+01_JPRB,6.5142E+01_JPRB,7.0846E+01_JPRB,7.6292E+01_JPRB,8.1436E+01_JPRB/)
4167 KBO( :,38, 9) = (/&
4168
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.7701E+01_JPRB,6.3776E+01_JPRB,6.9699E+01_JPRB,7.5382E+01_JPRB,8.0760E+01_JPRB/)
4169 KBO( :,39, 9) = (/&
4170
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.6270E+01_JPRB,6.2546E+01_JPRB,6.8688E+01_JPRB,7.4617E+01_JPRB,8.0162E+01_JPRB/)
4171 KBO( :,40, 9) = (/&
4172
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.4230E+01_JPRB,6.0690E+01_JPRB,6.6996E+01_JPRB,7.3138E+01_JPRB,7.8857E+01_JPRB/)
4173 KBO( :,41, 9) = (/&
4174
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.2156E+01_JPRB,5.8758E+01_JPRB,6.5235E+01_JPRB,7.1572E+01_JPRB,7.7464E+01_JPRB/)
4175 KBO( :,42, 9) = (/&
4176
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.0129E+01_JPRB,5.6855E+01_JPRB,6.3499E+01_JPRB,7.0016E+01_JPRB,7.6080E+01_JPRB/)
4177 KBO( :,43, 9) = (/&
4178
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7760E+01_JPRB,5.4598E+01_JPRB,6.1399E+01_JPRB,6.8099E+01_JPRB,7.4350E+01_JPRB/)
4179 KBO( :,44, 9) = (/&
4180
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5249E+01_JPRB,5.2184E+01_JPRB,5.9131E+01_JPRB,6.6010E+01_JPRB,7.2452E+01_JPRB/)
4181 KBO( :,45, 9) = (/&
4182
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.2770E+01_JPRB,4.9790E+01_JPRB,5.6875E+01_JPRB,6.3919E+01_JPRB,7.0547E+01_JPRB/)
4183 KBO( :,46, 9) = (/&
4184
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.0163E+01_JPRB,4.7243E+01_JPRB,5.4479E+01_JPRB,6.1655E+01_JPRB,6.8464E+01_JPRB/)
4185 KBO( :,47, 9) = (/&
4186
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7279E+01_JPRB,4.4372E+01_JPRB,5.1688E+01_JPRB,5.9007E+01_JPRB,6.6000E+01_JPRB/)
4187 KBO( :,48, 9) = (/&
4188
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.4455E+01_JPRB,4.1531E+01_JPRB,4.8914E+01_JPRB,5.6355E+01_JPRB,6.3516E+01_JPRB/)
4189 KBO( :,49, 9) = (/&
4190
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1707E+01_JPRB,3.8733E+01_JPRB,4.6179E+01_JPRB,5.3719E+01_JPRB,6.1038E+01_JPRB/)
4191 KBO( :,50, 9) = (/&
4192
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9168E+01_JPRB,3.6084E+01_JPRB,4.3531E+01_JPRB,5.1127E+01_JPRB,5.8574E+01_JPRB/)
4193 KBO( :,51, 9) = (/&
4194
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6765E+01_JPRB,3.3523E+01_JPRB,4.0920E+01_JPRB,4.8550E+01_JPRB,5.6098E+01_JPRB/)
4195 KBO( :,52, 9) = (/&
4196
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4432E+01_JPRB,3.1037E+01_JPRB,3.8359E+01_JPRB,4.5995E+01_JPRB,5.3635E+01_JPRB/)
4197 KBO( :,53, 9) = (/&
4198
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2208E+01_JPRB,2.8629E+01_JPRB,3.5855E+01_JPRB,4.3474E+01_JPRB,5.1186E+01_JPRB/)
4199 KBO( :,54, 9) = (/&
4200
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0205E+01_JPRB,2.6401E+01_JPRB,3.3414E+01_JPRB,4.0973E+01_JPRB,4.8699E+01_JPRB/)
4201 KBO( :,55, 9) = (/&
4202
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8353E+01_JPRB,2.4282E+01_JPRB,3.1024E+01_JPRB,3.8470E+01_JPRB,4.6173E+01_JPRB/)
4203 KBO( :,56, 9) = (/&
4204
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6601E+01_JPRB,2.2262E+01_JPRB,2.8733E+01_JPRB,3.6003E+01_JPRB,4.3640E+01_JPRB/)
4205 KBO( :,57, 9) = (/&
4206
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4942E+01_JPRB,2.0332E+01_JPRB,2.6541E+01_JPRB,3.3571E+01_JPRB,4.1137E+01_JPRB/)
4207 KBO( :,58, 9) = (/&
4208
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3455E+01_JPRB,1.8580E+01_JPRB,2.4530E+01_JPRB,3.1284E+01_JPRB,3.8733E+01_JPRB/)
4209 KBO( :,59, 9) = (/&
4210
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2865E+01_JPRB,1.7859E+01_JPRB,2.3642E+01_JPRB,3.0152E+01_JPRB,3.7359E+01_JPRB/)
4211 KBO( :,13,10) = (/&
4212
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4836E+02_JPRB,1.4604E+02_JPRB,1.4370E+02_JPRB,1.4155E+02_JPRB,1.3951E+02_JPRB/)
4213 KBO( :,14,10) = (/&
4214
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6431E+02_JPRB,1.6174E+02_JPRB,1.5931E+02_JPRB,1.5707E+02_JPRB,1.5447E+02_JPRB/)
4215 KBO( :,15,10) = (/&
4216
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8088E+02_JPRB,1.7844E+02_JPRB,1.7598E+02_JPRB,1.7321E+02_JPRB,1.7049E+02_JPRB/)
4217 KBO( :,16,10) = (/&
4218
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9837E+02_JPRB,1.9582E+02_JPRB,1.9294E+02_JPRB,1.9007E+02_JPRB,1.8732E+02_JPRB/)
4219 KBO( :,17,10) = (/&
4220
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1550E+02_JPRB,2.1268E+02_JPRB,2.0959E+02_JPRB,2.0637E+02_JPRB,2.0299E+02_JPRB/)
4221 KBO( :,18,10) = (/&
4222
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3147E+02_JPRB,2.2811E+02_JPRB,2.2491E+02_JPRB,2.2179E+02_JPRB,2.1873E+02_JPRB/)
4223 KBO( :,19,10) = (/&
4224
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4561E+02_JPRB,2.4282E+02_JPRB,2.3998E+02_JPRB,2.3673E+02_JPRB,2.3333E+02_JPRB/)
4225 KBO( :,20,10) = (/&
4226
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5875E+02_JPRB,2.5597E+02_JPRB,2.5299E+02_JPRB,2.4975E+02_JPRB,2.4650E+02_JPRB/)
4227 KBO( :,21,10) = (/&
4228
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6956E+02_JPRB,2.6694E+02_JPRB,2.6416E+02_JPRB,2.6126E+02_JPRB,2.5829E+02_JPRB/)
4229 KBO( :,22,10) = (/&
4230
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7742E+02_JPRB,2.7556E+02_JPRB,2.7346E+02_JPRB,2.7109E+02_JPRB,2.6822E+02_JPRB/)
4231 KBO( :,23,10) = (/&
4232
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8259E+02_JPRB,2.8167E+02_JPRB,2.8054E+02_JPRB,2.7877E+02_JPRB,2.7640E+02_JPRB/)
4233 KBO( :,24,10) = (/&
4234
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8579E+02_JPRB,2.8593E+02_JPRB,2.8555E+02_JPRB,2.8452E+02_JPRB,2.8281E+02_JPRB/)
4235 KBO( :,25,10) = (/&
4236
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8759E+02_JPRB,2.8855E+02_JPRB,2.8897E+02_JPRB,2.8899E+02_JPRB,2.8805E+02_JPRB/)
4237 KBO( :,26,10) = (/&
4238
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8827E+02_JPRB,2.9039E+02_JPRB,2.9171E+02_JPRB,2.9254E+02_JPRB,2.9232E+02_JPRB/)
4239 KBO( :,27,10) = (/&
4240
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8831E+02_JPRB,2.9160E+02_JPRB,2.9410E+02_JPRB,2.9547E+02_JPRB,2.9582E+02_JPRB/)
4241 KBO( :,28,10) = (/&
4242
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8830E+02_JPRB,2.9281E+02_JPRB,2.9591E+02_JPRB,2.9817E+02_JPRB,2.9880E+02_JPRB/)
4243 KBO( :,29,10) = (/&
4244
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8819E+02_JPRB,2.9390E+02_JPRB,2.9762E+02_JPRB,3.0035E+02_JPRB,3.0140E+02_JPRB/)
4245 KBO( :,30,10) = (/&
4246
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8853E+02_JPRB,2.9509E+02_JPRB,2.9931E+02_JPRB,3.0230E+02_JPRB,3.0384E+02_JPRB/)
4247 KBO( :,31,10) = (/&
4248
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8941E+02_JPRB,2.9638E+02_JPRB,3.0093E+02_JPRB,3.0407E+02_JPRB,3.0610E+02_JPRB/)
4249 KBO( :,32,10) = (/&
4250
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9067E+02_JPRB,2.9787E+02_JPRB,3.0275E+02_JPRB,3.0577E+02_JPRB,3.0795E+02_JPRB/)
4251 KBO( :,33,10) = (/&
4252
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9222E+02_JPRB,2.9942E+02_JPRB,3.0456E+02_JPRB,3.0752E+02_JPRB,3.0966E+02_JPRB/)
4253 KBO( :,34,10) = (/&
4254
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9363E+02_JPRB,3.0091E+02_JPRB,3.0608E+02_JPRB,3.0904E+02_JPRB,3.1115E+02_JPRB/)
4255 KBO( :,35,10) = (/&
4256
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9423E+02_JPRB,3.0182E+02_JPRB,3.0717E+02_JPRB,3.1018E+02_JPRB,3.1229E+02_JPRB/)
4257 KBO( :,36,10) = (/&
4258
2/2
✓ Branch 0 taken 5 times.
✓ Branch 1 taken 1 times.
6 & 2.9400E+02_JPRB,3.0205E+02_JPRB,3.0771E+02_JPRB,3.1091E+02_JPRB,3.1314E+02_JPRB/)
4259
4260
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART14',1,ZHOOK_HANDLE)
4261 1 END SUBROUTINE PART14
4262
4263
4264 1 SUBROUTINE PART15
4265
4266 REAL(KIND=JPRB) :: ZHOOK_HANDLE
4267
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART15',0,ZHOOK_HANDLE)
4268
4269
4270 KBO( :,37,10) = (/&
4271
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9277E+02_JPRB,3.0116E+02_JPRB,3.0745E+02_JPRB,3.1132E+02_JPRB,3.1369E+02_JPRB/)
4272 KBO( :,38,10) = (/&
4273
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9103E+02_JPRB,3.0008E+02_JPRB,3.0698E+02_JPRB,3.1126E+02_JPRB,3.1405E+02_JPRB/)
4274 KBO( :,39,10) = (/&
4275
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8923E+02_JPRB,2.9890E+02_JPRB,3.0637E+02_JPRB,3.1107E+02_JPRB,3.1517E+02_JPRB/)
4276 KBO( :,40,10) = (/&
4277
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8609E+02_JPRB,2.9711E+02_JPRB,3.0497E+02_JPRB,3.1036E+02_JPRB,3.1550E+02_JPRB/)
4278 KBO( :,41,10) = (/&
4279
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8252E+02_JPRB,2.9448E+02_JPRB,3.0316E+02_JPRB,3.0942E+02_JPRB,3.1556E+02_JPRB/)
4280 KBO( :,42,10) = (/&
4281
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7862E+02_JPRB,2.9160E+02_JPRB,3.0113E+02_JPRB,3.0834E+02_JPRB,3.1556E+02_JPRB/)
4282 KBO( :,43,10) = (/&
4283
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7361E+02_JPRB,2.8779E+02_JPRB,2.9836E+02_JPRB,3.0666E+02_JPRB,3.1512E+02_JPRB/)
4284 KBO( :,44,10) = (/&
4285
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6782E+02_JPRB,2.8324E+02_JPRB,2.9499E+02_JPRB,3.0453E+02_JPRB,3.1441E+02_JPRB/)
4286 KBO( :,45,10) = (/&
4287
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6165E+02_JPRB,2.7823E+02_JPRB,2.9120E+02_JPRB,3.0219E+02_JPRB,3.1362E+02_JPRB/)
4288 KBO( :,46,10) = (/&
4289
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5462E+02_JPRB,2.7249E+02_JPRB,2.8693E+02_JPRB,2.9929E+02_JPRB,3.1228E+02_JPRB/)
4290 KBO( :,47,10) = (/&
4291
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4622E+02_JPRB,2.6556E+02_JPRB,2.8145E+02_JPRB,2.9525E+02_JPRB,3.0983E+02_JPRB/)
4292 KBO( :,48,10) = (/&
4293
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3713E+02_JPRB,2.5803E+02_JPRB,2.7541E+02_JPRB,2.9095E+02_JPRB,3.0719E+02_JPRB/)
4294 KBO( :,49,10) = (/&
4295
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2739E+02_JPRB,2.4986E+02_JPRB,2.6881E+02_JPRB,2.8662E+02_JPRB,3.0453E+02_JPRB/)
4296 KBO( :,50,10) = (/&
4297
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1772E+02_JPRB,2.4169E+02_JPRB,2.6202E+02_JPRB,2.8158E+02_JPRB,3.0094E+02_JPRB/)
4298 KBO( :,51,10) = (/&
4299
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0784E+02_JPRB,2.3330E+02_JPRB,2.5496E+02_JPRB,2.7591E+02_JPRB,2.9666E+02_JPRB/)
4300 KBO( :,52,10) = (/&
4301
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9746E+02_JPRB,2.2442E+02_JPRB,2.4742E+02_JPRB,2.7004E+02_JPRB,2.9216E+02_JPRB/)
4302 KBO( :,53,10) = (/&
4303
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8667E+02_JPRB,2.1498E+02_JPRB,2.3949E+02_JPRB,2.6404E+02_JPRB,2.8766E+02_JPRB/)
4304 KBO( :,54,10) = (/&
4305
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7641E+02_JPRB,2.0557E+02_JPRB,2.3152E+02_JPRB,2.5629E+02_JPRB,2.8134E+02_JPRB/)
4306 KBO( :,55,10) = (/&
4307
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6630E+02_JPRB,1.9645E+02_JPRB,2.2352E+02_JPRB,2.4801E+02_JPRB,2.7356E+02_JPRB/)
4308 KBO( :,56,10) = (/&
4309
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5594E+02_JPRB,1.8700E+02_JPRB,2.1520E+02_JPRB,2.3992E+02_JPRB,2.6576E+02_JPRB/)
4310 KBO( :,57,10) = (/&
4311
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4539E+02_JPRB,1.7728E+02_JPRB,2.0648E+02_JPRB,2.3204E+02_JPRB,2.5725E+02_JPRB/)
4312 KBO( :,58,10) = (/&
4313
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3524E+02_JPRB,1.6780E+02_JPRB,1.9789E+02_JPRB,2.2459E+02_JPRB,2.4918E+02_JPRB/)
4314 KBO( :,59,10) = (/&
4315
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3112E+02_JPRB,1.6391E+02_JPRB,1.9433E+02_JPRB,2.2152E+02_JPRB,2.4535E+02_JPRB/)
4316 KBO( :,13,11) = (/&
4317
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6552E+02_JPRB,1.6259E+02_JPRB,1.5976E+02_JPRB,1.5701E+02_JPRB,1.5440E+02_JPRB/)
4318 KBO( :,14,11) = (/&
4319
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8516E+02_JPRB,1.8233E+02_JPRB,1.7933E+02_JPRB,1.7635E+02_JPRB,1.7362E+02_JPRB/)
4320 KBO( :,15,11) = (/&
4321
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0794E+02_JPRB,2.0481E+02_JPRB,2.0174E+02_JPRB,1.9859E+02_JPRB,1.9534E+02_JPRB/)
4322 KBO( :,16,11) = (/&
4323
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3251E+02_JPRB,2.2934E+02_JPRB,2.2596E+02_JPRB,2.2193E+02_JPRB,2.1747E+02_JPRB/)
4324 KBO( :,17,11) = (/&
4325
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5822E+02_JPRB,2.5449E+02_JPRB,2.5028E+02_JPRB,2.4575E+02_JPRB,2.4111E+02_JPRB/)
4326 KBO( :,18,11) = (/&
4327
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8377E+02_JPRB,2.7983E+02_JPRB,2.7512E+02_JPRB,2.7022E+02_JPRB,2.6507E+02_JPRB/)
4328 KBO( :,19,11) = (/&
4329
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0872E+02_JPRB,3.0403E+02_JPRB,2.9887E+02_JPRB,2.9373E+02_JPRB,2.8833E+02_JPRB/)
4330 KBO( :,20,11) = (/&
4331
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3154E+02_JPRB,3.2667E+02_JPRB,3.2149E+02_JPRB,3.1658E+02_JPRB,3.1110E+02_JPRB/)
4332 KBO( :,21,11) = (/&
4333
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5303E+02_JPRB,3.4859E+02_JPRB,3.4368E+02_JPRB,3.3863E+02_JPRB,3.3281E+02_JPRB/)
4334 KBO( :,22,11) = (/&
4335
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7308E+02_JPRB,3.6866E+02_JPRB,3.6382E+02_JPRB,3.5853E+02_JPRB,3.5259E+02_JPRB/)
4336 KBO( :,23,11) = (/&
4337
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.9085E+02_JPRB,3.8660E+02_JPRB,3.8185E+02_JPRB,3.7650E+02_JPRB,3.7123E+02_JPRB/)
4338 KBO( :,24,11) = (/&
4339
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.0631E+02_JPRB,4.0255E+02_JPRB,3.9828E+02_JPRB,3.9348E+02_JPRB,3.8793E+02_JPRB/)
4340 KBO( :,25,11) = (/&
4341
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1938E+02_JPRB,4.1686E+02_JPRB,4.1282E+02_JPRB,4.0821E+02_JPRB,4.0269E+02_JPRB/)
4342 KBO( :,26,11) = (/&
4343
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.3004E+02_JPRB,4.2864E+02_JPRB,4.2545E+02_JPRB,4.2097E+02_JPRB,4.1544E+02_JPRB/)
4344 KBO( :,27,11) = (/&
4345
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.3932E+02_JPRB,4.3875E+02_JPRB,4.3604E+02_JPRB,4.3201E+02_JPRB,4.2641E+02_JPRB/)
4346 KBO( :,28,11) = (/&
4347
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4708E+02_JPRB,4.4715E+02_JPRB,4.4516E+02_JPRB,4.4121E+02_JPRB,4.3584E+02_JPRB/)
4348 KBO( :,29,11) = (/&
4349
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5390E+02_JPRB,4.5431E+02_JPRB,4.5282E+02_JPRB,4.4905E+02_JPRB,4.4353E+02_JPRB/)
4350 KBO( :,30,11) = (/&
4351
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5978E+02_JPRB,4.6051E+02_JPRB,4.5914E+02_JPRB,4.5563E+02_JPRB,4.4966E+02_JPRB/)
4352 KBO( :,31,11) = (/&
4353
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6502E+02_JPRB,4.6582E+02_JPRB,4.6429E+02_JPRB,4.6092E+02_JPRB,4.5451E+02_JPRB/)
4354 KBO( :,32,11) = (/&
4355
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6952E+02_JPRB,4.7023E+02_JPRB,4.6854E+02_JPRB,4.6499E+02_JPRB,4.5830E+02_JPRB/)
4356 KBO( :,33,11) = (/&
4357
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7348E+02_JPRB,4.7409E+02_JPRB,4.7192E+02_JPRB,4.6794E+02_JPRB,4.6103E+02_JPRB/)
4358 KBO( :,34,11) = (/&
4359
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7685E+02_JPRB,4.7731E+02_JPRB,4.7475E+02_JPRB,4.7028E+02_JPRB,4.6319E+02_JPRB/)
4360 KBO( :,35,11) = (/&
4361
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7958E+02_JPRB,4.8002E+02_JPRB,4.7736E+02_JPRB,4.7259E+02_JPRB,4.6551E+02_JPRB/)
4362 KBO( :,36,11) = (/&
4363
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8169E+02_JPRB,4.8240E+02_JPRB,4.7987E+02_JPRB,4.7499E+02_JPRB,4.6813E+02_JPRB/)
4364 KBO( :,37,11) = (/&
4365
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8298E+02_JPRB,4.8446E+02_JPRB,4.8243E+02_JPRB,4.7809E+02_JPRB,4.7147E+02_JPRB/)
4366 KBO( :,38,11) = (/&
4367
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8394E+02_JPRB,4.8606E+02_JPRB,4.8459E+02_JPRB,4.8068E+02_JPRB,4.7405E+02_JPRB/)
4368 KBO( :,39,11) = (/&
4369
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8451E+02_JPRB,4.8733E+02_JPRB,4.8637E+02_JPRB,4.8291E+02_JPRB,4.7658E+02_JPRB/)
4370 KBO( :,40,11) = (/&
4371
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8421E+02_JPRB,4.8736E+02_JPRB,4.8800E+02_JPRB,4.8523E+02_JPRB,4.7946E+02_JPRB/)
4372 KBO( :,41,11) = (/&
4373
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8335E+02_JPRB,4.8764E+02_JPRB,4.8927E+02_JPRB,4.8717E+02_JPRB,4.8206E+02_JPRB/)
4374 KBO( :,42,11) = (/&
4375
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8204E+02_JPRB,4.8748E+02_JPRB,4.9006E+02_JPRB,4.8875E+02_JPRB,4.8434E+02_JPRB/)
4376 KBO( :,43,11) = (/&
4377
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7975E+02_JPRB,4.8654E+02_JPRB,4.9041E+02_JPRB,4.9008E+02_JPRB,4.8652E+02_JPRB/)
4378 KBO( :,44,11) = (/&
4379
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7655E+02_JPRB,4.8494E+02_JPRB,4.9019E+02_JPRB,4.9098E+02_JPRB,4.8839E+02_JPRB/)
4380 KBO( :,45,11) = (/&
4381
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7253E+02_JPRB,4.8276E+02_JPRB,4.8943E+02_JPRB,4.9145E+02_JPRB,4.9003E+02_JPRB/)
4382 KBO( :,46,11) = (/&
4383
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6734E+02_JPRB,4.7968E+02_JPRB,4.8743E+02_JPRB,4.9144E+02_JPRB,4.9142E+02_JPRB/)
4384 KBO( :,47,11) = (/&
4385
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6037E+02_JPRB,4.7532E+02_JPRB,4.8503E+02_JPRB,4.9075E+02_JPRB,4.9230E+02_JPRB/)
4386 KBO( :,48,11) = (/&
4387
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.5226E+02_JPRB,4.6987E+02_JPRB,4.8198E+02_JPRB,4.8932E+02_JPRB,4.9295E+02_JPRB/)
4388 KBO( :,49,11) = (/&
4389
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4290E+02_JPRB,4.6342E+02_JPRB,4.7813E+02_JPRB,4.8707E+02_JPRB,4.9364E+02_JPRB/)
4390 KBO( :,50,11) = (/&
4391
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.3303E+02_JPRB,4.5634E+02_JPRB,4.7362E+02_JPRB,4.8430E+02_JPRB,4.9319E+02_JPRB/)
4392 KBO( :,51,11) = (/&
4393
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.2231E+02_JPRB,4.4854E+02_JPRB,4.6823E+02_JPRB,4.8097E+02_JPRB,4.9173E+02_JPRB/)
4394 KBO( :,52,11) = (/&
4395
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1028E+02_JPRB,4.3983E+02_JPRB,4.6194E+02_JPRB,4.7695E+02_JPRB,4.9018E+02_JPRB/)
4396 KBO( :,53,11) = (/&
4397
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.9747E+02_JPRB,4.3006E+02_JPRB,4.5475E+02_JPRB,4.7218E+02_JPRB,4.8896E+02_JPRB/)
4398 KBO( :,54,11) = (/&
4399
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8468E+02_JPRB,4.1991E+02_JPRB,4.4737E+02_JPRB,4.6699E+02_JPRB,4.8405E+02_JPRB/)
4400 KBO( :,55,11) = (/&
4401
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7148E+02_JPRB,4.0953E+02_JPRB,4.3953E+02_JPRB,4.6157E+02_JPRB,4.7789E+02_JPRB/)
4402 KBO( :,56,11) = (/&
4403
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5741E+02_JPRB,3.9825E+02_JPRB,4.3092E+02_JPRB,4.5516E+02_JPRB,4.7290E+02_JPRB/)
4404 KBO( :,57,11) = (/&
4405
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.4261E+02_JPRB,3.8598E+02_JPRB,4.2152E+02_JPRB,4.4813E+02_JPRB,4.6777E+02_JPRB/)
4406 KBO( :,58,11) = (/&
4407
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2780E+02_JPRB,3.7359E+02_JPRB,4.1192E+02_JPRB,4.4072E+02_JPRB,4.6249E+02_JPRB/)
4408 KBO( :,59,11) = (/&
4409
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2152E+02_JPRB,3.6839E+02_JPRB,4.0780E+02_JPRB,4.3751E+02_JPRB,4.6016E+02_JPRB/)
4410 KBO( :,13,12) = (/&
4411
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8421E+02_JPRB,1.8166E+02_JPRB,1.7879E+02_JPRB,1.7574E+02_JPRB,1.7251E+02_JPRB/)
4412 KBO( :,14,12) = (/&
4413
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0903E+02_JPRB,2.0619E+02_JPRB,2.0324E+02_JPRB,1.9988E+02_JPRB,1.9636E+02_JPRB/)
4414 KBO( :,15,12) = (/&
4415
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3780E+02_JPRB,2.3442E+02_JPRB,2.3068E+02_JPRB,2.2666E+02_JPRB,2.2225E+02_JPRB/)
4416 KBO( :,16,12) = (/&
4417
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7012E+02_JPRB,2.6570E+02_JPRB,2.6084E+02_JPRB,2.5612E+02_JPRB,2.5162E+02_JPRB/)
4418 KBO( :,17,12) = (/&
4419
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0507E+02_JPRB,2.9990E+02_JPRB,2.9472E+02_JPRB,2.8913E+02_JPRB,2.8362E+02_JPRB/)
4420 KBO( :,18,12) = (/&
4421
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.4264E+02_JPRB,3.3653E+02_JPRB,3.3027E+02_JPRB,3.2388E+02_JPRB,3.1713E+02_JPRB/)
4422 KBO( :,19,12) = (/&
4423
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8113E+02_JPRB,3.7455E+02_JPRB,3.6765E+02_JPRB,3.6040E+02_JPRB,3.5292E+02_JPRB/)
4424 KBO( :,20,12) = (/&
4425
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.2119E+02_JPRB,4.1426E+02_JPRB,4.0655E+02_JPRB,3.9813E+02_JPRB,3.8981E+02_JPRB/)
4426 KBO( :,21,12) = (/&
4427
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6191E+02_JPRB,4.5363E+02_JPRB,4.4508E+02_JPRB,4.3611E+02_JPRB,4.2662E+02_JPRB/)
4428 KBO( :,22,12) = (/&
4429
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.0045E+02_JPRB,4.9187E+02_JPRB,4.8228E+02_JPRB,4.7267E+02_JPRB,4.6269E+02_JPRB/)
4430 KBO( :,23,12) = (/&
4431
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.3771E+02_JPRB,5.2859E+02_JPRB,5.1832E+02_JPRB,5.0803E+02_JPRB,4.9670E+02_JPRB/)
4432 KBO( :,24,12) = (/&
4433
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.7227E+02_JPRB,5.6260E+02_JPRB,5.5214E+02_JPRB,5.4076E+02_JPRB,5.2846E+02_JPRB/)
4434 KBO( :,25,12) = (/&
4435
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0401E+02_JPRB,5.9384E+02_JPRB,5.8279E+02_JPRB,5.7065E+02_JPRB,5.5724E+02_JPRB/)
4436 KBO( :,26,12) = (/&
4437
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.3275E+02_JPRB,6.2182E+02_JPRB,6.0975E+02_JPRB,5.9668E+02_JPRB,5.8248E+02_JPRB/)
4438 KBO( :,27,12) = (/&
4439
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.5788E+02_JPRB,6.4612E+02_JPRB,6.3329E+02_JPRB,6.1912E+02_JPRB,6.0393E+02_JPRB/)
4440 KBO( :,28,12) = (/&
4441
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.7977E+02_JPRB,6.6741E+02_JPRB,6.5368E+02_JPRB,6.3839E+02_JPRB,6.2186E+02_JPRB/)
4442 KBO( :,29,12) = (/&
4443
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.9860E+02_JPRB,6.8540E+02_JPRB,6.7056E+02_JPRB,6.5407E+02_JPRB,6.3669E+02_JPRB/)
4444 KBO( :,30,12) = (/&
4445
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.1428E+02_JPRB,7.0014E+02_JPRB,6.8436E+02_JPRB,6.6687E+02_JPRB,6.4843E+02_JPRB/)
4446 KBO( :,31,12) = (/&
4447
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.2707E+02_JPRB,7.1224E+02_JPRB,6.9535E+02_JPRB,6.7679E+02_JPRB,6.5732E+02_JPRB/)
4448 KBO( :,32,12) = (/&
4449
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.3739E+02_JPRB,7.2161E+02_JPRB,7.0352E+02_JPRB,6.8424E+02_JPRB,6.6374E+02_JPRB/)
4450 KBO( :,33,12) = (/&
4451
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.4529E+02_JPRB,7.2852E+02_JPRB,7.0939E+02_JPRB,6.8945E+02_JPRB,6.6810E+02_JPRB/)
4452 KBO( :,34,12) = (/&
4453
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.5166E+02_JPRB,7.3380E+02_JPRB,7.1390E+02_JPRB,6.9344E+02_JPRB,6.7141E+02_JPRB/)
4454 KBO( :,35,12) = (/&
4455
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.5785E+02_JPRB,7.3918E+02_JPRB,7.1874E+02_JPRB,6.9799E+02_JPRB,6.7527E+02_JPRB/)
4456 KBO( :,36,12) = (/&
4457
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.6435E+02_JPRB,7.4538E+02_JPRB,7.2454E+02_JPRB,7.0358E+02_JPRB,6.8040E+02_JPRB/)
4458 KBO( :,37,12) = (/&
4459
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.7161E+02_JPRB,7.5340E+02_JPRB,7.3251E+02_JPRB,7.1089E+02_JPRB,6.8800E+02_JPRB/)
4460 KBO( :,38,12) = (/&
4461
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.7853E+02_JPRB,7.6067E+02_JPRB,7.3983E+02_JPRB,7.1816E+02_JPRB,6.9536E+02_JPRB/)
4462 KBO( :,39,12) = (/&
4463
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.8464E+02_JPRB,7.6713E+02_JPRB,7.4647E+02_JPRB,7.2475E+02_JPRB,7.0178E+02_JPRB/)
4464 KBO( :,40,12) = (/&
4465
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9160E+02_JPRB,7.7414E+02_JPRB,7.5465E+02_JPRB,7.3306E+02_JPRB,7.1009E+02_JPRB/)
4466 KBO( :,41,12) = (/&
4467
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9795E+02_JPRB,7.8137E+02_JPRB,7.6252E+02_JPRB,7.4117E+02_JPRB,7.1825E+02_JPRB/)
4468 KBO( :,42,12) = (/&
4469
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.0363E+02_JPRB,7.8805E+02_JPRB,7.6985E+02_JPRB,7.4880E+02_JPRB,7.2604E+02_JPRB/)
4470 KBO( :,43,12) = (/&
4471
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.0918E+02_JPRB,7.9503E+02_JPRB,7.7774E+02_JPRB,7.5724E+02_JPRB,7.3478E+02_JPRB/)
4472 KBO( :,44,12) = (/&
4473
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.1405E+02_JPRB,8.0171E+02_JPRB,7.8561E+02_JPRB,7.6584E+02_JPRB,7.4379E+02_JPRB/)
4474 KBO( :,45,12) = (/&
4475
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.1783E+02_JPRB,8.0759E+02_JPRB,7.9294E+02_JPRB,7.7397E+02_JPRB,7.5240E+02_JPRB/)
4476 KBO( :,46,12) = (/&
4477
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.2078E+02_JPRB,8.1309E+02_JPRB,8.0010E+02_JPRB,7.8201E+02_JPRB,7.6131E+02_JPRB/)
4478 KBO( :,47,12) = (/&
4479
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.2288E+02_JPRB,8.1791E+02_JPRB,8.0688E+02_JPRB,7.9031E+02_JPRB,7.7082E+02_JPRB/)
4480 KBO( :,48,12) = (/&
4481
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.2365E+02_JPRB,8.2167E+02_JPRB,8.1273E+02_JPRB,7.9796E+02_JPRB,7.7963E+02_JPRB/)
4482 KBO( :,49,12) = (/&
4483
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.2287E+02_JPRB,8.2431E+02_JPRB,8.1763E+02_JPRB,8.0487E+02_JPRB,7.8791E+02_JPRB/)
4484 KBO( :,50,12) = (/&
4485
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.2045E+02_JPRB,8.2549E+02_JPRB,8.2124E+02_JPRB,8.1073E+02_JPRB,7.9521E+02_JPRB/)
4486 KBO( :,51,12) = (/&
4487
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.1647E+02_JPRB,8.2526E+02_JPRB,8.2370E+02_JPRB,8.1563E+02_JPRB,8.0180E+02_JPRB/)
4488 KBO( :,52,12) = (/&
4489
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.1121E+02_JPRB,8.2367E+02_JPRB,8.2531E+02_JPRB,8.1967E+02_JPRB,8.0788E+02_JPRB/)
4490 KBO( :,53,12) = (/&
4491
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.0411E+02_JPRB,8.2055E+02_JPRB,8.2579E+02_JPRB,8.2272E+02_JPRB,8.1321E+02_JPRB/)
4492 KBO( :,54,12) = (/&
4493
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9588E+02_JPRB,8.1607E+02_JPRB,8.2504E+02_JPRB,8.2471E+02_JPRB,8.1743E+02_JPRB/)
4494 KBO( :,55,12) = (/&
4495
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.8606E+02_JPRB,8.1098E+02_JPRB,8.2328E+02_JPRB,8.2571E+02_JPRB,8.2076E+02_JPRB/)
4496 KBO( :,56,12) = (/&
4497
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.7445E+02_JPRB,8.0478E+02_JPRB,8.2051E+02_JPRB,8.2610E+02_JPRB,8.2295E+02_JPRB/)
4498 KBO( :,57,12) = (/&
4499
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.6082E+02_JPRB,7.9711E+02_JPRB,8.1649E+02_JPRB,8.2552E+02_JPRB,8.2493E+02_JPRB/)
4500 KBO( :,58,12) = (/&
4501
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.4626E+02_JPRB,7.8808E+02_JPRB,8.1174E+02_JPRB,8.2409E+02_JPRB,8.2621E+02_JPRB/)
4502 KBO( :,59,12) = (/&
4503
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.3987E+02_JPRB,7.8401E+02_JPRB,8.0954E+02_JPRB,8.2334E+02_JPRB,8.2653E+02_JPRB/)
4504 KBO( :,13,13) = (/&
4505
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0706E+02_JPRB,2.0275E+02_JPRB,1.9960E+02_JPRB,1.9642E+02_JPRB,1.9325E+02_JPRB/)
4506 KBO( :,14,13) = (/&
4507
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3740E+02_JPRB,2.3314E+02_JPRB,2.2927E+02_JPRB,2.2508E+02_JPRB,2.2071E+02_JPRB/)
4508 KBO( :,15,13) = (/&
4509
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7338E+02_JPRB,2.6831E+02_JPRB,2.6304E+02_JPRB,2.5795E+02_JPRB,2.5294E+02_JPRB/)
4510 KBO( :,16,13) = (/&
4511
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1308E+02_JPRB,3.0705E+02_JPRB,3.0154E+02_JPRB,2.9582E+02_JPRB,2.8990E+02_JPRB/)
4512 KBO( :,17,13) = (/&
4513
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5766E+02_JPRB,3.5096E+02_JPRB,3.4421E+02_JPRB,3.3769E+02_JPRB,3.3070E+02_JPRB/)
4514 KBO( :,18,13) = (/&
4515
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.0731E+02_JPRB,3.9992E+02_JPRB,3.9262E+02_JPRB,3.8506E+02_JPRB,3.7703E+02_JPRB/)
4516 KBO( :,19,13) = (/&
4517
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6388E+02_JPRB,4.5553E+02_JPRB,4.4668E+02_JPRB,4.3762E+02_JPRB,4.2783E+02_JPRB/)
4518 KBO( :,20,13) = (/&
4519
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.2583E+02_JPRB,5.1576E+02_JPRB,5.0510E+02_JPRB,4.9383E+02_JPRB,4.8218E+02_JPRB/)
4520 KBO( :,21,13) = (/&
4521
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.9116E+02_JPRB,5.7950E+02_JPRB,5.6656E+02_JPRB,5.5310E+02_JPRB,5.3897E+02_JPRB/)
4522 KBO( :,22,13) = (/&
4523
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.5823E+02_JPRB,6.4391E+02_JPRB,6.2839E+02_JPRB,6.1210E+02_JPRB,5.9534E+02_JPRB/)
4524 KBO( :,23,13) = (/&
4525
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.2542E+02_JPRB,7.0808E+02_JPRB,6.8952E+02_JPRB,6.6991E+02_JPRB,6.4969E+02_JPRB/)
4526 KBO( :,24,13) = (/&
4527
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.9029E+02_JPRB,7.7002E+02_JPRB,7.4790E+02_JPRB,7.2486E+02_JPRB,7.0140E+02_JPRB/)
4528 KBO( :,25,13) = (/&
4529
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.5203E+02_JPRB,8.2748E+02_JPRB,8.0207E+02_JPRB,7.7556E+02_JPRB,7.4909E+02_JPRB/)
4530 KBO( :,26,13) = (/&
4531
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.0879E+02_JPRB,8.8008E+02_JPRB,8.5133E+02_JPRB,8.2123E+02_JPRB,7.9187E+02_JPRB/)
4532 KBO( :,27,13) = (/&
4533
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.5929E+02_JPRB,9.2767E+02_JPRB,8.9539E+02_JPRB,8.6200E+02_JPRB,8.2944E+02_JPRB/)
4534 KBO( :,28,13) = (/&
4535
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0038E+03_JPRB,9.6874E+02_JPRB,9.3346E+02_JPRB,8.9698E+02_JPRB,8.6129E+02_JPRB/)
4536 KBO( :,29,13) = (/&
4537
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0414E+03_JPRB,1.0031E+03_JPRB,9.6490E+02_JPRB,9.2572E+02_JPRB,8.8715E+02_JPRB/)
4538 KBO( :,30,13) = (/&
4539
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0721E+03_JPRB,1.0311E+03_JPRB,9.9002E+02_JPRB,9.4833E+02_JPRB,9.0740E+02_JPRB/)
4540 KBO( :,31,13) = (/&
4541
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0964E+03_JPRB,1.0523E+03_JPRB,1.0091E+03_JPRB,9.6516E+02_JPRB,9.2258E+02_JPRB/)
4542 KBO( :,32,13) = (/&
4543
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1144E+03_JPRB,1.0680E+03_JPRB,1.0228E+03_JPRB,9.7704E+02_JPRB,9.3296E+02_JPRB/)
4544 KBO( :,33,13) = (/&
4545
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1268E+03_JPRB,1.0785E+03_JPRB,1.0318E+03_JPRB,9.8453E+02_JPRB,9.3914E+02_JPRB/)
4546 KBO( :,34,13) = (/&
4547
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1363E+03_JPRB,1.0866E+03_JPRB,1.0383E+03_JPRB,9.8991E+02_JPRB,9.4342E+02_JPRB/)
4548 KBO( :,35,13) = (/&
4549
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1468E+03_JPRB,1.0959E+03_JPRB,1.0463E+03_JPRB,9.9687E+02_JPRB,9.4938E+02_JPRB/)
4550 KBO( :,36,13) = (/&
4551
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1600E+03_JPRB,1.1078E+03_JPRB,1.0572E+03_JPRB,1.0067E+03_JPRB,9.5830E+02_JPRB/)
4552 KBO( :,37,13) = (/&
4553
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1790E+03_JPRB,1.1257E+03_JPRB,1.0738E+03_JPRB,1.0220E+03_JPRB,9.7295E+02_JPRB/)
4554 KBO( :,38,13) = (/&
4555
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1965E+03_JPRB,1.1423E+03_JPRB,1.0895E+03_JPRB,1.0368E+03_JPRB,9.8736E+02_JPRB/)
4556 KBO( :,39,13) = (/&
4557
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2126E+03_JPRB,1.1577E+03_JPRB,1.1039E+03_JPRB,1.0505E+03_JPRB,1.0002E+03_JPRB/)
4558 KBO( :,40,13) = (/&
4559
2/2
✓ Branch 0 taken 5 times.
✓ Branch 1 taken 1 times.
6 & 1.2331E+03_JPRB,1.1780E+03_JPRB,1.1227E+03_JPRB,1.0686E+03_JPRB,1.0174E+03_JPRB/)
4560
4561
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART15',1,ZHOOK_HANDLE)
4562 1 END SUBROUTINE PART15
4563
4564
4565 1 SUBROUTINE PART16
4566
4567 REAL(KIND=JPRB) :: ZHOOK_HANDLE
4568
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART16',0,ZHOOK_HANDLE)
4569
4570
4571 KBO( :,41,13) = (/&
4572
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2534E+03_JPRB,1.1977E+03_JPRB,1.1416E+03_JPRB,1.0868E+03_JPRB,1.0348E+03_JPRB/)
4573 KBO( :,42,13) = (/&
4574
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2728E+03_JPRB,1.2168E+03_JPRB,1.1600E+03_JPRB,1.1045E+03_JPRB,1.0518E+03_JPRB/)
4575 KBO( :,43,13) = (/&
4576
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2945E+03_JPRB,1.2387E+03_JPRB,1.1810E+03_JPRB,1.1249E+03_JPRB,1.0714E+03_JPRB/)
4577 KBO( :,44,13) = (/&
4578
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3174E+03_JPRB,1.2614E+03_JPRB,1.2031E+03_JPRB,1.1464E+03_JPRB,1.0923E+03_JPRB/)
4579 KBO( :,45,13) = (/&
4580
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3398E+03_JPRB,1.2836E+03_JPRB,1.2250E+03_JPRB,1.1678E+03_JPRB,1.1130E+03_JPRB/)
4581 KBO( :,46,13) = (/&
4582
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3628E+03_JPRB,1.3065E+03_JPRB,1.2489E+03_JPRB,1.1905E+03_JPRB,1.1348E+03_JPRB/)
4583 KBO( :,47,13) = (/&
4584
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3873E+03_JPRB,1.3317E+03_JPRB,1.2742E+03_JPRB,1.2156E+03_JPRB,1.1587E+03_JPRB/)
4585 KBO( :,48,13) = (/&
4586
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4108E+03_JPRB,1.3565E+03_JPRB,1.2991E+03_JPRB,1.2406E+03_JPRB,1.1829E+03_JPRB/)
4587 KBO( :,49,13) = (/&
4588
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4335E+03_JPRB,1.3803E+03_JPRB,1.3234E+03_JPRB,1.2654E+03_JPRB,1.2072E+03_JPRB/)
4589 KBO( :,50,13) = (/&
4590
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4541E+03_JPRB,1.4021E+03_JPRB,1.3460E+03_JPRB,1.2885E+03_JPRB,1.2302E+03_JPRB/)
4591 KBO( :,51,13) = (/&
4592
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4730E+03_JPRB,1.4228E+03_JPRB,1.3681E+03_JPRB,1.3104E+03_JPRB,1.2525E+03_JPRB/)
4593 KBO( :,52,13) = (/&
4594
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4907E+03_JPRB,1.4427E+03_JPRB,1.3898E+03_JPRB,1.3321E+03_JPRB,1.2744E+03_JPRB/)
4595 KBO( :,53,13) = (/&
4596
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5061E+03_JPRB,1.4619E+03_JPRB,1.4106E+03_JPRB,1.3539E+03_JPRB,1.2962E+03_JPRB/)
4597 KBO( :,54,13) = (/&
4598
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5192E+03_JPRB,1.4794E+03_JPRB,1.4292E+03_JPRB,1.3736E+03_JPRB,1.3161E+03_JPRB/)
4599 KBO( :,55,13) = (/&
4600
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5309E+03_JPRB,1.4941E+03_JPRB,1.4465E+03_JPRB,1.3926E+03_JPRB,1.3351E+03_JPRB/)
4601 KBO( :,56,13) = (/&
4602
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5407E+03_JPRB,1.5075E+03_JPRB,1.4630E+03_JPRB,1.4106E+03_JPRB,1.3542E+03_JPRB/)
4603 KBO( :,57,13) = (/&
4604
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5484E+03_JPRB,1.5197E+03_JPRB,1.4789E+03_JPRB,1.4283E+03_JPRB,1.3728E+03_JPRB/)
4605 KBO( :,58,13) = (/&
4606
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5535E+03_JPRB,1.5303E+03_JPRB,1.4929E+03_JPRB,1.4443E+03_JPRB,1.3902E+03_JPRB/)
4607 KBO( :,59,13) = (/&
4608
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5550E+03_JPRB,1.5344E+03_JPRB,1.4983E+03_JPRB,1.4507E+03_JPRB,1.3972E+03_JPRB/)
4609 KBO( :,13,14) = (/&
4610
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5200E+02_JPRB,2.4567E+02_JPRB,2.3912E+02_JPRB,2.3261E+02_JPRB,2.2671E+02_JPRB/)
4611 KBO( :,14,14) = (/&
4612
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8356E+02_JPRB,2.7567E+02_JPRB,2.6762E+02_JPRB,2.6041E+02_JPRB,2.5414E+02_JPRB/)
4613 KBO( :,15,14) = (/&
4614
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2000E+02_JPRB,3.1086E+02_JPRB,3.0278E+02_JPRB,2.9520E+02_JPRB,2.8835E+02_JPRB/)
4615 KBO( :,16,14) = (/&
4616
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6501E+02_JPRB,3.5545E+02_JPRB,3.4663E+02_JPRB,3.3835E+02_JPRB,3.3040E+02_JPRB/)
4617 KBO( :,17,14) = (/&
4618
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.2043E+02_JPRB,4.1003E+02_JPRB,4.0038E+02_JPRB,3.9117E+02_JPRB,3.8254E+02_JPRB/)
4619 KBO( :,18,14) = (/&
4620
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8684E+02_JPRB,4.7541E+02_JPRB,4.6423E+02_JPRB,4.5366E+02_JPRB,4.4317E+02_JPRB/)
4621 KBO( :,19,14) = (/&
4622
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.6352E+02_JPRB,5.4977E+02_JPRB,5.3699E+02_JPRB,5.2451E+02_JPRB,5.1166E+02_JPRB/)
4623 KBO( :,20,14) = (/&
4624
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.4946E+02_JPRB,6.3281E+02_JPRB,6.1710E+02_JPRB,6.0187E+02_JPRB,5.8639E+02_JPRB/)
4625 KBO( :,21,14) = (/&
4626
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.4362E+02_JPRB,7.2356E+02_JPRB,7.0410E+02_JPRB,6.8448E+02_JPRB,6.6564E+02_JPRB/)
4627 KBO( :,22,14) = (/&
4628
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.4333E+02_JPRB,8.1844E+02_JPRB,7.9450E+02_JPRB,7.7017E+02_JPRB,7.4626E+02_JPRB/)
4629 KBO( :,23,14) = (/&
4630
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.4680E+02_JPRB,9.1686E+02_JPRB,8.8724E+02_JPRB,8.5711E+02_JPRB,8.2794E+02_JPRB/)
4631 KBO( :,24,14) = (/&
4632
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0528E+03_JPRB,1.0161E+03_JPRB,9.7917E+02_JPRB,9.4320E+02_JPRB,9.0772E+02_JPRB/)
4633 KBO( :,25,14) = (/&
4634
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1567E+03_JPRB,1.1128E+03_JPRB,1.0684E+03_JPRB,1.0249E+03_JPRB,9.8260E+02_JPRB/)
4635 KBO( :,26,14) = (/&
4636
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.2530E+03_JPRB,1.2021E+03_JPRB,1.1497E+03_JPRB,1.0989E+03_JPRB,1.0499E+03_JPRB/)
4637 KBO( :,27,14) = (/&
4638
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3414E+03_JPRB,1.2817E+03_JPRB,1.2215E+03_JPRB,1.1632E+03_JPRB,1.1083E+03_JPRB/)
4639 KBO( :,28,14) = (/&
4640
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4184E+03_JPRB,1.3503E+03_JPRB,1.2822E+03_JPRB,1.2175E+03_JPRB,1.1569E+03_JPRB/)
4641 KBO( :,29,14) = (/&
4642
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4829E+03_JPRB,1.4069E+03_JPRB,1.3322E+03_JPRB,1.2616E+03_JPRB,1.1958E+03_JPRB/)
4643 KBO( :,30,14) = (/&
4644
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5347E+03_JPRB,1.4521E+03_JPRB,1.3719E+03_JPRB,1.2961E+03_JPRB,1.2258E+03_JPRB/)
4645 KBO( :,31,14) = (/&
4646
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.5740E+03_JPRB,1.4863E+03_JPRB,1.4011E+03_JPRB,1.3213E+03_JPRB,1.2473E+03_JPRB/)
4647 KBO( :,32,14) = (/&
4648
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6019E+03_JPRB,1.5104E+03_JPRB,1.4212E+03_JPRB,1.3381E+03_JPRB,1.2613E+03_JPRB/)
4649 KBO( :,33,14) = (/&
4650
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6206E+03_JPRB,1.5254E+03_JPRB,1.4335E+03_JPRB,1.3478E+03_JPRB,1.2690E+03_JPRB/)
4651 KBO( :,34,14) = (/&
4652
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6343E+03_JPRB,1.5362E+03_JPRB,1.4422E+03_JPRB,1.3545E+03_JPRB,1.2743E+03_JPRB/)
4653 KBO( :,35,14) = (/&
4654
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6513E+03_JPRB,1.5505E+03_JPRB,1.4543E+03_JPRB,1.3647E+03_JPRB,1.2829E+03_JPRB/)
4655 KBO( :,36,14) = (/&
4656
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6747E+03_JPRB,1.5711E+03_JPRB,1.4723E+03_JPRB,1.3806E+03_JPRB,1.2969E+03_JPRB/)
4657 KBO( :,37,14) = (/&
4658
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7119E+03_JPRB,1.6037E+03_JPRB,1.5018E+03_JPRB,1.4086E+03_JPRB,1.3210E+03_JPRB/)
4659 KBO( :,38,14) = (/&
4660
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7464E+03_JPRB,1.6348E+03_JPRB,1.5298E+03_JPRB,1.4339E+03_JPRB,1.3446E+03_JPRB/)
4661 KBO( :,39,14) = (/&
4662
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7785E+03_JPRB,1.6638E+03_JPRB,1.5560E+03_JPRB,1.4575E+03_JPRB,1.3661E+03_JPRB/)
4663 KBO( :,40,14) = (/&
4664
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8213E+03_JPRB,1.7031E+03_JPRB,1.5916E+03_JPRB,1.4897E+03_JPRB,1.3957E+03_JPRB/)
4665 KBO( :,41,14) = (/&
4666
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8650E+03_JPRB,1.7429E+03_JPRB,1.6279E+03_JPRB,1.5226E+03_JPRB,1.4260E+03_JPRB/)
4667 KBO( :,42,14) = (/&
4668
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9083E+03_JPRB,1.7822E+03_JPRB,1.6638E+03_JPRB,1.5553E+03_JPRB,1.4560E+03_JPRB/)
4669 KBO( :,43,14) = (/&
4670
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9590E+03_JPRB,1.8282E+03_JPRB,1.7062E+03_JPRB,1.5939E+03_JPRB,1.4914E+03_JPRB/)
4671 KBO( :,44,14) = (/&
4672
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0135E+03_JPRB,1.8780E+03_JPRB,1.7518E+03_JPRB,1.6354E+03_JPRB,1.5294E+03_JPRB/)
4673 KBO( :,45,14) = (/&
4674
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0686E+03_JPRB,1.9283E+03_JPRB,1.7978E+03_JPRB,1.6776E+03_JPRB,1.5679E+03_JPRB/)
4675 KBO( :,46,14) = (/&
4676
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1281E+03_JPRB,1.9824E+03_JPRB,1.8468E+03_JPRB,1.7228E+03_JPRB,1.6096E+03_JPRB/)
4677 KBO( :,47,14) = (/&
4678
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1954E+03_JPRB,2.0435E+03_JPRB,1.9031E+03_JPRB,1.7740E+03_JPRB,1.6572E+03_JPRB/)
4679 KBO( :,48,14) = (/&
4680
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2648E+03_JPRB,2.1064E+03_JPRB,1.9610E+03_JPRB,1.8268E+03_JPRB,1.7061E+03_JPRB/)
4681 KBO( :,49,14) = (/&
4682
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3361E+03_JPRB,2.1712E+03_JPRB,2.0209E+03_JPRB,1.8815E+03_JPRB,1.7562E+03_JPRB/)
4683 KBO( :,50,14) = (/&
4684
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4045E+03_JPRB,2.2339E+03_JPRB,2.0788E+03_JPRB,1.9343E+03_JPRB,1.8042E+03_JPRB/)
4685 KBO( :,51,14) = (/&
4686
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4726E+03_JPRB,2.2963E+03_JPRB,2.1361E+03_JPRB,1.9873E+03_JPRB,1.8522E+03_JPRB/)
4687 KBO( :,52,14) = (/&
4688
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5428E+03_JPRB,2.3607E+03_JPRB,2.1949E+03_JPRB,2.0419E+03_JPRB,1.9016E+03_JPRB/)
4689 KBO( :,53,14) = (/&
4690
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6141E+03_JPRB,2.4269E+03_JPRB,2.2555E+03_JPRB,2.0978E+03_JPRB,1.9528E+03_JPRB/)
4691 KBO( :,54,14) = (/&
4692
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6807E+03_JPRB,2.4886E+03_JPRB,2.3128E+03_JPRB,2.1502E+03_JPRB,2.0011E+03_JPRB/)
4693 KBO( :,55,14) = (/&
4694
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7459E+03_JPRB,2.5495E+03_JPRB,2.3693E+03_JPRB,2.2020E+03_JPRB,2.0486E+03_JPRB/)
4695 KBO( :,56,14) = (/&
4696
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8130E+03_JPRB,2.6116E+03_JPRB,2.4267E+03_JPRB,2.2548E+03_JPRB,2.0964E+03_JPRB/)
4697 KBO( :,57,14) = (/&
4698
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8820E+03_JPRB,2.6749E+03_JPRB,2.4855E+03_JPRB,2.3093E+03_JPRB,2.1460E+03_JPRB/)
4699 KBO( :,58,14) = (/&
4700
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9481E+03_JPRB,2.7364E+03_JPRB,2.5424E+03_JPRB,2.3624E+03_JPRB,2.1944E+03_JPRB/)
4701 KBO( :,59,14) = (/&
4702
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9753E+03_JPRB,2.7616E+03_JPRB,2.5658E+03_JPRB,2.3843E+03_JPRB,2.2142E+03_JPRB/)
4703 KBO( :,13,15) = (/&
4704
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0496E+02_JPRB,3.0081E+02_JPRB,2.9676E+02_JPRB,2.9051E+02_JPRB,2.8450E+02_JPRB/)
4705 KBO( :,14,15) = (/&
4706
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.4462E+02_JPRB,3.4099E+02_JPRB,3.3527E+02_JPRB,3.3016E+02_JPRB,3.2406E+02_JPRB/)
4707 KBO( :,15,15) = (/&
4708
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8936E+02_JPRB,3.8628E+02_JPRB,3.8183E+02_JPRB,3.7492E+02_JPRB,3.6807E+02_JPRB/)
4709 KBO( :,16,15) = (/&
4710
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4332E+02_JPRB,4.3856E+02_JPRB,4.3430E+02_JPRB,4.2589E+02_JPRB,4.1877E+02_JPRB/)
4711 KBO( :,17,15) = (/&
4712
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.0835E+02_JPRB,5.0183E+02_JPRB,4.9489E+02_JPRB,4.8561E+02_JPRB,4.7621E+02_JPRB/)
4713 KBO( :,18,15) = (/&
4714
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.8677E+02_JPRB,5.7885E+02_JPRB,5.6791E+02_JPRB,5.5537E+02_JPRB,5.4279E+02_JPRB/)
4715 KBO( :,19,15) = (/&
4716
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.8130E+02_JPRB,6.6815E+02_JPRB,6.5194E+02_JPRB,6.3561E+02_JPRB,6.1955E+02_JPRB/)
4717 KBO( :,20,15) = (/&
4718
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 7.8879E+02_JPRB,7.7015E+02_JPRB,7.4875E+02_JPRB,7.2676E+02_JPRB,7.0600E+02_JPRB/)
4719 KBO( :,21,15) = (/&
4720
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.1167E+02_JPRB,8.8542E+02_JPRB,8.5728E+02_JPRB,8.2924E+02_JPRB,8.0222E+02_JPRB/)
4721 KBO( :,22,15) = (/&
4722
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0456E+03_JPRB,1.0104E+03_JPRB,9.7413E+02_JPRB,9.3830E+02_JPRB,9.0416E+02_JPRB/)
4723 KBO( :,23,15) = (/&
4724
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1890E+03_JPRB,1.1427E+03_JPRB,1.0964E+03_JPRB,1.0517E+03_JPRB,1.0073E+03_JPRB/)
4725 KBO( :,24,15) = (/&
4726
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3341E+03_JPRB,1.2769E+03_JPRB,1.2199E+03_JPRB,1.1637E+03_JPRB,1.1097E+03_JPRB/)
4727 KBO( :,25,15) = (/&
4728
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4777E+03_JPRB,1.4064E+03_JPRB,1.3371E+03_JPRB,1.2692E+03_JPRB,1.2051E+03_JPRB/)
4729 KBO( :,26,15) = (/&
4730
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6127E+03_JPRB,1.5257E+03_JPRB,1.4439E+03_JPRB,1.3652E+03_JPRB,1.2908E+03_JPRB/)
4731 KBO( :,27,15) = (/&
4732
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7363E+03_JPRB,1.6345E+03_JPRB,1.5403E+03_JPRB,1.4516E+03_JPRB,1.3681E+03_JPRB/)
4733 KBO( :,28,15) = (/&
4734
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8456E+03_JPRB,1.7310E+03_JPRB,1.6252E+03_JPRB,1.5262E+03_JPRB,1.4343E+03_JPRB/)
4735 KBO( :,29,15) = (/&
4736
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.9374E+03_JPRB,1.8114E+03_JPRB,1.6953E+03_JPRB,1.5870E+03_JPRB,1.4880E+03_JPRB/)
4737 KBO( :,30,15) = (/&
4738
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0123E+03_JPRB,1.8759E+03_JPRB,1.7509E+03_JPRB,1.6347E+03_JPRB,1.5297E+03_JPRB/)
4739 KBO( :,31,15) = (/&
4740
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0695E+03_JPRB,1.9241E+03_JPRB,1.7919E+03_JPRB,1.6696E+03_JPRB,1.5595E+03_JPRB/)
4741 KBO( :,32,15) = (/&
4742
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1098E+03_JPRB,1.9573E+03_JPRB,1.8199E+03_JPRB,1.6927E+03_JPRB,1.5791E+03_JPRB/)
4743 KBO( :,33,15) = (/&
4744
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1350E+03_JPRB,1.9776E+03_JPRB,1.8360E+03_JPRB,1.7058E+03_JPRB,1.5896E+03_JPRB/)
4745 KBO( :,34,15) = (/&
4746
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1531E+03_JPRB,1.9921E+03_JPRB,1.8473E+03_JPRB,1.7146E+03_JPRB,1.5966E+03_JPRB/)
4747 KBO( :,35,15) = (/&
4748
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1773E+03_JPRB,2.0121E+03_JPRB,1.8641E+03_JPRB,1.7288E+03_JPRB,1.6085E+03_JPRB/)
4749 KBO( :,36,15) = (/&
4750
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2124E+03_JPRB,2.0424E+03_JPRB,1.8903E+03_JPRB,1.7515E+03_JPRB,1.6285E+03_JPRB/)
4751 KBO( :,37,15) = (/&
4752
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.2692E+03_JPRB,2.0922E+03_JPRB,1.9342E+03_JPRB,1.7916E+03_JPRB,1.6630E+03_JPRB/)
4753 KBO( :,38,15) = (/&
4754
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3243E+03_JPRB,2.1400E+03_JPRB,1.9765E+03_JPRB,1.8290E+03_JPRB,1.6948E+03_JPRB/)
4755 KBO( :,39,15) = (/&
4756
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3761E+03_JPRB,2.1849E+03_JPRB,2.0163E+03_JPRB,1.8643E+03_JPRB,1.7262E+03_JPRB/)
4757 KBO( :,40,15) = (/&
4758
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4467E+03_JPRB,2.2470E+03_JPRB,2.0711E+03_JPRB,1.9128E+03_JPRB,1.7697E+03_JPRB/)
4759 KBO( :,41,15) = (/&
4760
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5197E+03_JPRB,2.3108E+03_JPRB,2.1276E+03_JPRB,1.9630E+03_JPRB,1.8147E+03_JPRB/)
4761 KBO( :,42,15) = (/&
4762
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5927E+03_JPRB,2.3746E+03_JPRB,2.1839E+03_JPRB,2.0131E+03_JPRB,1.8595E+03_JPRB/)
4763 KBO( :,43,15) = (/&
4764
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6795E+03_JPRB,2.4509E+03_JPRB,2.2509E+03_JPRB,2.0729E+03_JPRB,1.9127E+03_JPRB/)
4765 KBO( :,44,15) = (/&
4766
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7746E+03_JPRB,2.5346E+03_JPRB,2.3244E+03_JPRB,2.1382E+03_JPRB,1.9711E+03_JPRB/)
4767 KBO( :,45,15) = (/&
4768
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8725E+03_JPRB,2.6210E+03_JPRB,2.4001E+03_JPRB,2.2052E+03_JPRB,2.0310E+03_JPRB/)
4769 KBO( :,46,15) = (/&
4770
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9808E+03_JPRB,2.7160E+03_JPRB,2.4820E+03_JPRB,2.2786E+03_JPRB,2.0965E+03_JPRB/)
4771 KBO( :,47,15) = (/&
4772
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1065E+03_JPRB,2.8260E+03_JPRB,2.5776E+03_JPRB,2.3630E+03_JPRB,2.1714E+03_JPRB/)
4773 KBO( :,48,15) = (/&
4774
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2382E+03_JPRB,2.9414E+03_JPRB,2.6779E+03_JPRB,2.4515E+03_JPRB,2.2491E+03_JPRB/)
4775 KBO( :,49,15) = (/&
4776
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.3769E+03_JPRB,3.0628E+03_JPRB,2.7828E+03_JPRB,2.5435E+03_JPRB,2.3301E+03_JPRB/)
4777 KBO( :,50,15) = (/&
4778
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.5153E+03_JPRB,3.1825E+03_JPRB,2.8860E+03_JPRB,2.6340E+03_JPRB,2.4097E+03_JPRB/)
4779 KBO( :,51,15) = (/&
4780
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6567E+03_JPRB,3.3043E+03_JPRB,2.9915E+03_JPRB,2.7258E+03_JPRB,2.4905E+03_JPRB/)
4781 KBO( :,52,15) = (/&
4782
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.8059E+03_JPRB,3.4316E+03_JPRB,3.1018E+03_JPRB,2.8218E+03_JPRB,2.5746E+03_JPRB/)
4783 KBO( :,53,15) = (/&
4784
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.9647E+03_JPRB,3.5659E+03_JPRB,3.2181E+03_JPRB,2.9226E+03_JPRB,2.6623E+03_JPRB/)
4785 KBO( :,54,15) = (/&
4786
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1182E+03_JPRB,3.6932E+03_JPRB,3.3305E+03_JPRB,3.0197E+03_JPRB,2.7461E+03_JPRB/)
4787 KBO( :,55,15) = (/&
4788
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.2719E+03_JPRB,3.8244E+03_JPRB,3.4429E+03_JPRB,3.1156E+03_JPRB,2.8302E+03_JPRB/)
4789 KBO( :,56,15) = (/&
4790
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4321E+03_JPRB,3.9623E+03_JPRB,3.5606E+03_JPRB,3.2171E+03_JPRB,2.9172E+03_JPRB/)
4791 KBO( :,57,15) = (/&
4792
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6005E+03_JPRB,4.1071E+03_JPRB,3.6841E+03_JPRB,3.3227E+03_JPRB,3.0093E+03_JPRB/)
4793 KBO( :,58,15) = (/&
4794
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.7711E+03_JPRB,4.2512E+03_JPRB,3.8068E+03_JPRB,3.4270E+03_JPRB,3.1000E+03_JPRB/)
4795 KBO( :,59,15) = (/&
4796
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.8435E+03_JPRB,4.3113E+03_JPRB,3.8580E+03_JPRB,3.4704E+03_JPRB,3.1379E+03_JPRB/)
4797 KBO( :,13,16) = (/&
4798
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6480E+02_JPRB,3.5145E+02_JPRB,3.4350E+02_JPRB,3.3674E+02_JPRB,3.3295E+02_JPRB/)
4799 KBO( :,14,16) = (/&
4800
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.3305E+02_JPRB,4.2002E+02_JPRB,4.0834E+02_JPRB,4.0114E+02_JPRB,3.9514E+02_JPRB/)
4801 KBO( :,15,16) = (/&
4802
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1021E+02_JPRB,4.9566E+02_JPRB,4.8445E+02_JPRB,4.7500E+02_JPRB,4.6664E+02_JPRB/)
4803 KBO( :,16,16) = (/&
4804
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.0095E+02_JPRB,5.8332E+02_JPRB,5.7034E+02_JPRB,5.5793E+02_JPRB,5.4743E+02_JPRB/)
4805 KBO( :,17,16) = (/&
4806
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.9984E+02_JPRB,6.8135E+02_JPRB,6.6501E+02_JPRB,6.5003E+02_JPRB,6.3773E+02_JPRB/)
4807 KBO( :,18,16) = (/&
4808
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 8.1052E+02_JPRB,7.8978E+02_JPRB,7.6911E+02_JPRB,7.5277E+02_JPRB,7.3709E+02_JPRB/)
4809 KBO( :,19,16) = (/&
4810
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 9.3185E+02_JPRB,9.0651E+02_JPRB,8.8287E+02_JPRB,8.6357E+02_JPRB,8.4262E+02_JPRB/)
4811 KBO( :,20,16) = (/&
4812
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.0617E+03_JPRB,1.0323E+03_JPRB,1.0033E+03_JPRB,9.7715E+02_JPRB,9.5295E+02_JPRB/)
4813 KBO( :,21,16) = (/&
4814
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.1955E+03_JPRB,1.1605E+03_JPRB,1.1266E+03_JPRB,1.0931E+03_JPRB,1.0626E+03_JPRB/)
4815 KBO( :,22,16) = (/&
4816
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.3313E+03_JPRB,1.2888E+03_JPRB,1.2452E+03_JPRB,1.2039E+03_JPRB,1.1668E+03_JPRB/)
4817 KBO( :,23,16) = (/&
4818
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.4677E+03_JPRB,1.4171E+03_JPRB,1.3647E+03_JPRB,1.3122E+03_JPRB,1.2693E+03_JPRB/)
4819 KBO( :,24,16) = (/&
4820
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.6031E+03_JPRB,1.5431E+03_JPRB,1.4805E+03_JPRB,1.4214E+03_JPRB,1.3711E+03_JPRB/)
4821 KBO( :,25,16) = (/&
4822
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.7446E+03_JPRB,1.6761E+03_JPRB,1.6075E+03_JPRB,1.5354E+03_JPRB,1.4755E+03_JPRB/)
4823 KBO( :,26,16) = (/&
4824
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 1.8991E+03_JPRB,1.8163E+03_JPRB,1.7331E+03_JPRB,1.6466E+03_JPRB,1.5750E+03_JPRB/)
4825 KBO( :,27,16) = (/&
4826
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.0473E+03_JPRB,1.9486E+03_JPRB,1.8508E+03_JPRB,1.7507E+03_JPRB,1.6645E+03_JPRB/)
4827 KBO( :,28,16) = (/&
4828
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.1841E+03_JPRB,2.0672E+03_JPRB,1.9532E+03_JPRB,1.8416E+03_JPRB,1.7427E+03_JPRB/)
4829 KBO( :,29,16) = (/&
4830
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3013E+03_JPRB,2.1668E+03_JPRB,2.0380E+03_JPRB,1.9159E+03_JPRB,1.8061E+03_JPRB/)
4831 KBO( :,30,16) = (/&
4832
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.3968E+03_JPRB,2.2468E+03_JPRB,2.1057E+03_JPRB,1.9742E+03_JPRB,1.8547E+03_JPRB/)
4833 KBO( :,31,16) = (/&
4834
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.4698E+03_JPRB,2.3066E+03_JPRB,2.1555E+03_JPRB,2.0162E+03_JPRB,1.8899E+03_JPRB/)
4835 KBO( :,32,16) = (/&
4836
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5212E+03_JPRB,2.3480E+03_JPRB,2.1899E+03_JPRB,2.0439E+03_JPRB,1.9131E+03_JPRB/)
4837 KBO( :,33,16) = (/&
4838
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5535E+03_JPRB,2.3733E+03_JPRB,2.2102E+03_JPRB,2.0593E+03_JPRB,1.9261E+03_JPRB/)
4839 KBO( :,34,16) = (/&
4840
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.5772E+03_JPRB,2.3915E+03_JPRB,2.2247E+03_JPRB,2.0705E+03_JPRB,1.9349E+03_JPRB/)
4841 KBO( :,35,16) = (/&
4842
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6073E+03_JPRB,2.4161E+03_JPRB,2.2452E+03_JPRB,2.0872E+03_JPRB,1.9493E+03_JPRB/)
4843 KBO( :,36,16) = (/&
4844
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.6509E+03_JPRB,2.4529E+03_JPRB,2.2766E+03_JPRB,2.1138E+03_JPRB,1.9720E+03_JPRB/)
4845 KBO( :,37,16) = (/&
4846
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7188E+03_JPRB,2.5136E+03_JPRB,2.3285E+03_JPRB,2.1597E+03_JPRB,2.0114E+03_JPRB/)
4847 KBO( :,38,16) = (/&
4848
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.7845E+03_JPRB,2.5721E+03_JPRB,2.3785E+03_JPRB,2.2030E+03_JPRB,2.0515E+03_JPRB/)
4849 KBO( :,39,16) = (/&
4850
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.8472E+03_JPRB,2.6270E+03_JPRB,2.4254E+03_JPRB,2.2449E+03_JPRB,2.0875E+03_JPRB/)
4851 KBO( :,40,16) = (/&
4852
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 2.9330E+03_JPRB,2.6993E+03_JPRB,2.4900E+03_JPRB,2.3030E+03_JPRB,2.1374E+03_JPRB/)
4853 KBO( :,41,16) = (/&
4854
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.0218E+03_JPRB,2.7769E+03_JPRB,2.5568E+03_JPRB,2.3631E+03_JPRB,2.1888E+03_JPRB/)
4855 KBO( :,42,16) = (/&
4856
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.1113E+03_JPRB,2.8546E+03_JPRB,2.6243E+03_JPRB,2.4236E+03_JPRB,2.2399E+03_JPRB/)
4857 KBO( :,43,16) = (/&
4858
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.2191E+03_JPRB,2.9464E+03_JPRB,2.7051E+03_JPRB,2.4953E+03_JPRB,2.3016E+03_JPRB/)
4859 KBO( :,44,16) = (/&
4860
2/2
✓ Branch 0 taken 5 times.
✓ Branch 1 taken 1 times.
6 & 3.3385E+03_JPRB,3.0469E+03_JPRB,2.7942E+03_JPRB,2.5737E+03_JPRB,2.3700E+03_JPRB/)
4861
4862
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART16',1,ZHOOK_HANDLE)
4863 1 END SUBROUTINE PART16
4864
4865
4866 1 SUBROUTINE PART17
4867
4868 REAL(KIND=JPRB) :: ZHOOK_HANDLE
4869
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART17',0,ZHOOK_HANDLE)
4870
4871
4872 KBO( :,45,16) = (/&
4873
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.4626E+03_JPRB,3.1506E+03_JPRB,2.8863E+03_JPRB,2.6539E+03_JPRB,2.4394E+03_JPRB/)
4874 KBO( :,46,16) = (/&
4875
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.6001E+03_JPRB,3.2642E+03_JPRB,2.9874E+03_JPRB,2.7413E+03_JPRB,2.5151E+03_JPRB/)
4876 KBO( :,47,16) = (/&
4877
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.7610E+03_JPRB,3.3965E+03_JPRB,3.1046E+03_JPRB,2.8425E+03_JPRB,2.6031E+03_JPRB/)
4878 KBO( :,48,16) = (/&
4879
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 3.9321E+03_JPRB,3.5361E+03_JPRB,3.2276E+03_JPRB,2.9476E+03_JPRB,2.6982E+03_JPRB/)
4880 KBO( :,49,16) = (/&
4881
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.1176E+03_JPRB,3.6899E+03_JPRB,3.3583E+03_JPRB,3.0595E+03_JPRB,2.7974E+03_JPRB/)
4882 KBO( :,50,16) = (/&
4883
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.3032E+03_JPRB,3.8456E+03_JPRB,3.4873E+03_JPRB,3.1701E+03_JPRB,2.8952E+03_JPRB/)
4884 KBO( :,51,16) = (/&
4885
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.4935E+03_JPRB,4.0060E+03_JPRB,3.6203E+03_JPRB,3.2826E+03_JPRB,2.9949E+03_JPRB/)
4886 KBO( :,52,16) = (/&
4887
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.6944E+03_JPRB,4.1760E+03_JPRB,3.7596E+03_JPRB,3.4020E+03_JPRB,3.0994E+03_JPRB/)
4888 KBO( :,53,16) = (/&
4889
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 4.9137E+03_JPRB,4.3562E+03_JPRB,3.9079E+03_JPRB,3.5294E+03_JPRB,3.2093E+03_JPRB/)
4890 KBO( :,54,16) = (/&
4891
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.1332E+03_JPRB,4.5465E+03_JPRB,4.0538E+03_JPRB,3.6533E+03_JPRB,3.3147E+03_JPRB/)
4892 KBO( :,55,16) = (/&
4893
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.3615E+03_JPRB,4.7268E+03_JPRB,4.2040E+03_JPRB,3.7715E+03_JPRB,3.4204E+03_JPRB/)
4894 KBO( :,56,16) = (/&
4895
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.6101E+03_JPRB,4.9206E+03_JPRB,4.3611E+03_JPRB,3.9031E+03_JPRB,3.5302E+03_JPRB/)
4896 KBO( :,57,16) = (/&
4897
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 5.8786E+03_JPRB,5.1280E+03_JPRB,4.5273E+03_JPRB,4.0416E+03_JPRB,3.6469E+03_JPRB/)
4898 KBO( :,58,16) = (/&
4899
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.1495E+03_JPRB,5.3426E+03_JPRB,4.6971E+03_JPRB,4.1821E+03_JPRB,3.7629E+03_JPRB/)
4900 KBO( :,59,16) = (/&
4901
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 5 times.
6 & 6.2646E+03_JPRB,5.4342E+03_JPRB,4.7694E+03_JPRB,4.2411E+03_JPRB,3.8114E+03_JPRB/)
4902
4903 ! The array SELFREFO contains the coefficient of the water vapor
4904 ! self-continuum (including the energy term). The first index
4905 ! refers to temperature in 7.2 degree increments. For instance,
4906 ! JT = 1 refers to a temperature of 245.6, JT = 2 refers to 252.8,
4907 ! etc. The second index runs over the g-channel (1 to 16).
4908
4909 SELFREFO( :, 1) = (/&
4910 & 5.19175E-02_JPRB, 4.28815E-02_JPRB, 3.54182E-02_JPRB, 2.92539E-02_JPRB, 2.41624E-02_JPRB,&
4911
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.99571E-02_JPRB, 1.64836E-02_JPRB, 1.36148E-02_JPRB, 1.12452E-02_JPRB, 9.28801E-03_JPRB/)
4912 SELFREFO( :, 2) = (/&
4913 & 4.36985E-02_JPRB, 3.78503E-02_JPRB, 3.27848E-02_JPRB, 2.83973E-02_JPRB, 2.45969E-02_JPRB,&
4914
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 2.13051E-02_JPRB, 1.84538E-02_JPRB, 1.59842E-02_JPRB, 1.38450E-02_JPRB, 1.19921E-02_JPRB/)
4915 SELFREFO( :, 3) = (/&
4916 & 4.25575E-02_JPRB, 3.71214E-02_JPRB, 3.23797E-02_JPRB, 2.82437E-02_JPRB, 2.46360E-02_JPRB,&
4917
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 2.14891E-02_JPRB, 1.87442E-02_JPRB, 1.63499E-02_JPRB, 1.42615E-02_JPRB, 1.24398E-02_JPRB/)
4918 SELFREFO( :, 4) = (/&
4919 & 4.03854E-02_JPRB, 3.54677E-02_JPRB, 3.11488E-02_JPRB, 2.73558E-02_JPRB, 2.40247E-02_JPRB,&
4920
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 2.10992E-02_JPRB, 1.85300E-02_JPRB, 1.62736E-02_JPRB, 1.42920E-02_JPRB, 1.25517E-02_JPRB/)
4921 SELFREFO( :, 5) = (/&
4922 & 3.95070E-02_JPRB, 3.46726E-02_JPRB, 3.04297E-02_JPRB, 2.67060E-02_JPRB, 2.34380E-02_JPRB,&
4923
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 2.05699E-02_JPRB, 1.80528E-02_JPRB, 1.58437E-02_JPRB, 1.39049E-02_JPRB, 1.22034E-02_JPRB/)
4924 SELFREFO( :, 6) = (/&
4925 & 3.89748E-02_JPRB, 3.40186E-02_JPRB, 2.96926E-02_JPRB, 2.59168E-02_JPRB, 2.26211E-02_JPRB,&
4926
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.97445E-02_JPRB, 1.72337E-02_JPRB, 1.50422E-02_JPRB, 1.31293E-02_JPRB, 1.14597E-02_JPRB/)
4927 SELFREFO( :, 7) = (/&
4928 & 3.85527E-02_JPRB, 3.36561E-02_JPRB, 2.93815E-02_JPRB, 2.56497E-02_JPRB, 2.23920E-02_JPRB,&
4929
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.95480E-02_JPRB, 1.70652E-02_JPRB, 1.48977E-02_JPRB, 1.30056E-02_JPRB, 1.13537E-02_JPRB/)
4930 SELFREFO( :, 8) = (/&
4931 & 3.78212E-02_JPRB, 3.30614E-02_JPRB, 2.89005E-02_JPRB, 2.52633E-02_JPRB, 2.20839E-02_JPRB,&
4932
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.93046E-02_JPRB, 1.68751E-02_JPRB, 1.47513E-02_JPRB, 1.28948E-02_JPRB, 1.12720E-02_JPRB/)
4933 SELFREFO( :, 9) = (/&
4934 & 3.68624E-02_JPRB, 3.22676E-02_JPRB, 2.82456E-02_JPRB, 2.47248E-02_JPRB, 2.16429E-02_JPRB,&
4935
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.89452E-02_JPRB, 1.65838E-02_JPRB, 1.45166E-02_JPRB, 1.27072E-02_JPRB, 1.11233E-02_JPRB/)
4936 SELFREFO( :,10) = (/&
4937 & 3.63135E-02_JPRB, 3.19332E-02_JPRB, 2.80813E-02_JPRB, 2.46940E-02_JPRB, 2.17154E-02_JPRB,&
4938
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.90960E-02_JPRB, 1.67926E-02_JPRB, 1.47670E-02_JPRB, 1.29857E-02_JPRB, 1.14193E-02_JPRB/)
4939 SELFREFO( :,11) = (/&
4940 & 3.60018E-02_JPRB, 3.17294E-02_JPRB, 2.79640E-02_JPRB, 2.46454E-02_JPRB, 2.17207E-02_JPRB,&
4941
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.91430E-02_JPRB, 1.68713E-02_JPRB, 1.48691E-02_JPRB, 1.31045E-02_JPRB, 1.15494E-02_JPRB/)
4942 SELFREFO( :,12) = (/&
4943 & 3.65147E-02_JPRB, 3.19158E-02_JPRB, 2.78962E-02_JPRB, 2.43827E-02_JPRB, 2.13118E-02_JPRB,&
4944
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.86277E-02_JPRB, 1.62816E-02_JPRB, 1.42310E-02_JPRB, 1.24386E-02_JPRB, 1.08720E-02_JPRB/)
4945 SELFREFO( :,13) = (/&
4946 & 3.72684E-02_JPRB, 3.23732E-02_JPRB, 2.81210E-02_JPRB, 2.44274E-02_JPRB, 2.12189E-02_JPRB,&
4947
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.84318E-02_JPRB, 1.60108E-02_JPRB, 1.39078E-02_JPRB, 1.20810E-02_JPRB, 1.04942E-02_JPRB/)
4948 SELFREFO( :,14) = (/&
4949 & 3.87604E-02_JPRB, 3.34099E-02_JPRB, 2.87979E-02_JPRB, 2.48226E-02_JPRB, 2.13960E-02_JPRB,&
4950
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.84425E-02_JPRB, 1.58967E-02_JPRB, 1.37023E-02_JPRB, 1.18108E-02_JPRB, 1.01804E-02_JPRB/)
4951 SELFREFO( :,15) = (/&
4952 & 3.51227E-02_JPRB, 3.05052E-02_JPRB, 2.64947E-02_JPRB, 2.30115E-02_JPRB, 1.99862E-02_JPRB,&
4953
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.73586E-02_JPRB, 1.50765E-02_JPRB, 1.30944E-02_JPRB, 1.13729E-02_JPRB, 9.87775E-03_JPRB/)
4954 SELFREFO( :,16) = (/&
4955 & 3.51227E-02_JPRB, 3.05052E-02_JPRB, 2.64947E-02_JPRB, 2.30115E-02_JPRB, 1.99862E-02_JPRB,&
4956
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 10 times.
11 & 1.73586E-02_JPRB, 1.50765E-02_JPRB, 1.30944E-02_JPRB, 1.13729E-02_JPRB, 9.87775E-03_JPRB/)
4957
4958 FRACREFAO( :, 1) = (/&
4959 & 0.16461779_JPRB, 0.14889984_JPRB, 0.14233345_JPRB, 0.13156526_JPRB,&
4960 & 0.11679733_JPRB, 0.09988949_JPRB, 0.08078653_JPRB, 0.06006384_JPRB,&
4961 & 0.04028391_JPRB, 0.00435899_JPRB, 0.00359173_JPRB, 0.00281707_JPRB,&
4962
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00206767_JPRB, 0.00135012_JPRB, 0.00050720_JPRB, 0.00007146_JPRB/)
4963 FRACREFAO( :, 2) = (/&
4964 & 0.16442357_JPRB, 0.14944240_JPRB, 0.14245804_JPRB, 0.13111183_JPRB,&
4965 & 0.11688625_JPRB, 0.09983791_JPRB, 0.08085148_JPRB, 0.05993948_JPRB,&
4966 & 0.04028057_JPRB, 0.00435939_JPRB, 0.00358708_JPRB, 0.00284036_JPRB,&
4967
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00208869_JPRB, 0.00133256_JPRB, 0.00049260_JPRB, 0.00006931_JPRB/)
4968 FRACREFAO( :, 3) = (/&
4969 & 0.16368519_JPRB, 0.15018989_JPRB, 0.14262174_JPRB, 0.13084342_JPRB,&
4970 & 0.11682195_JPRB, 0.09996257_JPRB, 0.08074036_JPRB, 0.05985692_JPRB,&
4971 & 0.04045362_JPRB, 0.00436208_JPRB, 0.00358257_JPRB, 0.00287122_JPRB,&
4972
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00211004_JPRB, 0.00133804_JPRB, 0.00049260_JPRB, 0.00006931_JPRB/)
4973 FRACREFAO( :, 4) = (/&
4974 & 0.16274056_JPRB, 0.15133780_JPRB, 0.14228874_JPRB, 0.13081114_JPRB,&
4975 & 0.11688486_JPRB, 0.09979610_JPRB, 0.08073687_JPRB, 0.05996741_JPRB,&
4976 & 0.04040616_JPRB, 0.00439869_JPRB, 0.00368910_JPRB, 0.00293041_JPRB,&
4977
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00211604_JPRB, 0.00133536_JPRB, 0.00049260_JPRB, 0.00006931_JPRB/)
4978 FRACREFAO( :, 5) = (/&
4979 & 0.16176532_JPRB, 0.15207882_JPRB, 0.14226955_JPRB, 0.13079646_JPRB,&
4980 & 0.11688191_JPRB, 0.09966998_JPRB, 0.08066384_JPRB, 0.06020275_JPRB,&
4981 & 0.04047901_JPRB, 0.00446696_JPRB, 0.00377456_JPRB, 0.00294410_JPRB,&
4982
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00211082_JPRB, 0.00133536_JPRB, 0.00049260_JPRB, 0.00006931_JPRB/)
4983 FRACREFAO( :, 6) = (/&
4984 & 0.15993737_JPRB, 0.15305527_JPRB, 0.14259829_JPRB, 0.13078023_JPRB,&
4985 & 0.11686983_JPRB, 0.09980131_JPRB, 0.08058286_JPRB, 0.06031430_JPRB,&
4986 & 0.04082833_JPRB, 0.00450509_JPRB, 0.00377574_JPRB, 0.00294823_JPRB,&
4987
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00210977_JPRB, 0.00133302_JPRB, 0.00049260_JPRB, 0.00006931_JPRB/)
4988 FRACREFAO( :, 7) = (/&
4989 & 0.15371189_JPRB, 0.15592396_JPRB, 0.14430280_JPRB, 0.13076764_JPRB,&
4990 & 0.11720382_JPRB, 0.10023471_JPRB, 0.08066396_JPRB, 0.06073554_JPRB,&
4991 & 0.04121581_JPRB, 0.00451202_JPRB, 0.00377832_JPRB, 0.00294609_JPRB,&
4992
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00210943_JPRB, 0.00133336_JPRB, 0.00049260_JPRB, 0.00006931_JPRB/)
4993 FRACREFAO( :, 8) = (/&
4994 & 0.14262275_JPRB, 0.14572631_JPRB, 0.14560597_JPRB, 0.13736825_JPRB,&
4995 & 0.12271351_JPRB, 0.10419556_JPRB, 0.08294533_JPRB, 0.06199794_JPRB,&
4996 & 0.04157615_JPRB, 0.00452842_JPRB, 0.00377704_JPRB, 0.00293852_JPRB,&
4997
2/2
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 16 times.
17 & 0.00211034_JPRB, 0.00133278_JPRB, 0.00049259_JPRB, 0.00006931_JPRB/)
4998 FRACREFAO( :, 9) = (/&
4999 & 0.14500433_JPRB, 0.14590444_JPRB, 0.14430299_JPRB, 0.13770708_JPRB,&
5000 & 0.12288283_JPRB, 0.10350952_JPRB, 0.08269450_JPRB, 0.06130579_JPRB,&
5001 & 0.04144571_JPRB, 0.00452096_JPRB, 0.00377382_JPRB, 0.00294532_JPRB,&
5002
2/2
✓ Branch 0 taken 16 times.
✓ Branch 1 taken 1 times.
17 & 0.00210943_JPRB, 0.00133228_JPRB, 0.00049260_JPRB, 0.00006931_JPRB/)
5003
5004
1/2
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
1 IF (LHOOK) CALL DR_HOOK('RRTM_KGB7:PART17',1,ZHOOK_HANDLE)
5005 1 END SUBROUTINE PART17
5006
5007
5008 END SUBROUTINE RRTM_KGB7
5009