ParaMonte Fortran 2.0.0
Parallel Monte Carlo and Machine Learning Library
See the latest version documentation.
pm_arrayRefine::getRefined Interface Reference

Generate a refined version of the input array by the specified weight and skip.
More...

Detailed Description

Generate a refined version of the input array by the specified weight and skip.

Parameters
[in]array: The input contiguous array of shape (:) or (:,:) of either
  1. type character of kind any supported by the processor (e.g., SK, SKA, SKD , or SKU) or
  2. type integer of kind any supported by the processor (e.g., IK, IK8, IK16, IK32, or IK64) or
  3. type logical of kind any supported by the processor (e.g., LK) or
  4. type complex of kind any supported by the processor (e.g., CK, CK32, CK64, or CK128) or
  5. type real of kind any supported by the processor (e.g., RK, RK32, RK64, or RK128)
or,
  1. scalar character of kind any supported by the processor (e.g., SK, SKA, SKD , or SKU),
containing the array that has to be refined.
[in]dim: The input scalar of type integer of default kind IK representing the axis of array(:,:) along which array must be refined.
(optional, it must be present if and only if array is of shape (:,:).)
[in]weight: The input vector of
  1. type integer of default kind IK,
of size size(array, dim) containing the weights of individual elements of the input array.
[in]skip: The input scalar of type integer of default kind IK representing the number of elements to skip in the input sequence.
Returns
arrayRefined : The output allocatable array of the same type, kind, and shape as the input array, containing the refined unweighted version of the input array.
The returned array is unweighted to preserve the purity of the procedure.
See setRefined for an alternative interface.


Possible calling interfaces ⛓

use pm_arrayRefine, only: getRefined
arrayRefined = getRefined(array, weight, skip) ! scalar character objects.
arrayRefined(:) = getRefined(array(:), weight, skip) ! all intrinsic array objects.
arrayRefined(:,:) = getRefined(array(:,:), dim, weight, skip) ! all intrinsic array objects.
!
pm_arrayRefine::getRefined
Generate a refined version of the input array by the specified weight and skip.
Definition: pm_arrayRefine.F90:154
pm_arrayRefine
This module contains procedures and generic interfaces for refining (thinning) (weighted) arrays of a...
Definition: pm_arrayRefine.F90:60
Warning
The condition 0 < skip must hold.
The condition dim == 1 .or. dim == 2 must hold.
The condition size(weight) == size(array) must hold when array is rank 1.
The condition size(weight) == size(array, dim) must hold when array is rank 2.
These conditions are verified only if the library is built with the preprocessor macro CHECK_ENABLED=1.
The pure procedure(s) documented herein become impure when the ParaMonte library is compiled with preprocessor macro CHECK_ENABLED=1.
By default, these procedures are pure in release build and impure in debug and testing builds.
Note
See pm_arrayCopy for refining unweighted strings and arrays.
See also
setRefined
getCompact
getVerbose
pm_arrayCopy


Example usage ⛓

1program example
2
3 use pm_arrayVerbose, only: getVerbose
4 use pm_arrayRefine, only: getRefined
5 use pm_arrayChoice, only: getChoice
6 use pm_distUnif, only: getUnifRand
7 use pm_distBern, only: isHead
8 use pm_kind, only: SK, IK, LK
9 use pm_io, only: display_type
10
11 implicit none
12
13 type(display_type) :: disp
14 integer(IK) :: nsam, itry, ntry = 10
15 disp = display_type(file = "main.out.F90")
16
17 call disp%skip()
18 call disp%show("!%%%%%%%%%%%%%%%%%")
19 call disp%show("! Refine 1D array.")
20 call disp%show("!%%%%%%%%%%%%%%%%%")
21 call disp%skip()
22
23 block
24
25 block
26 use pm_kind, only: TKG => SK ! all kinds are supported.
27 character(:,TKG), allocatable :: array
28 integer(IK), allocatable :: weight(:)
29 integer(IK) :: skip
30 do itry = 1, ntry
31 call disp%show("nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
32 nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
33 call disp%show("nsam")
34 call disp%show( nsam )
35 call disp%show("skip")
36 call disp%show( skip )
37 call disp%show("weight = getUnifRand(-1, 9, nsam)")
38 weight = getUnifRand(-1, 9, nsam)
39 call disp%show("weight")
40 call disp%show( weight )
41 call disp%show("array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))")
42 array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
43 call disp%show("array")
44 call disp%show( array , deliml = TKG_"""" )
45 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0))")
46 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0)) , deliml = TKG_"""" )
47 call disp%show("array = getRefined(array, weight, skip)")
48 array = getRefined(array, weight, skip)
49 call disp%show("array")
50 call disp%show( array , deliml = TKG_"""" )
51 call disp%skip()
52 end do
53 end block
54
55 block
56 use pm_kind, only: TKG => SK ! all kinds are supported.
57 character(2,TKG), allocatable :: array(:)
58 integer(IK), allocatable :: weight(:)
59 integer(IK) :: skip
60 do itry = 1, ntry
61 call disp%show("nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
62 nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
63 call disp%show("nsam")
64 call disp%show( nsam )
65 call disp%show("skip")
66 call disp%show( skip )
67 call disp%show("weight = getUnifRand(-1, 9, nsam)")
68 weight = getUnifRand(-1, 9, nsam)
69 call disp%show("weight")
70 call disp%show( weight )
71 call disp%show("array = getUnifRand('AA', 'ZZ', nsam)")
72 array = getUnifRand('AA', 'ZZ', nsam)
73 call disp%show("array")
74 call disp%show( array , deliml = TKG_"""" )
75 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0))")
76 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0)) , deliml = TKG_"""" )
77 call disp%show("array = getRefined(array, weight, skip)")
78 array = getRefined(array, weight, skip)
79 call disp%show("array")
80 call disp%show( array , deliml = TKG_"""" )
81 call disp%skip()
82 end do
83 end block
84
85 block
86 use pm_kind, only: TKG => IK ! all kinds are supported.
87 integer(TKG), allocatable :: array(:)
88 integer(IK), allocatable :: weight(:)
89 integer(IK) :: skip
90 do itry = 1, ntry
91 call disp%show("nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
92 nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
93 call disp%show("nsam")
94 call disp%show( nsam )
95 call disp%show("skip")
96 call disp%show( skip )
97 call disp%show("weight = getUnifRand(-1, 9, nsam)")
98 weight = getUnifRand(-1, 9, nsam)
99 call disp%show("weight")
100 call disp%show( weight )
101 call disp%show("array = getUnifRand(0, 9, nsam)")
102 array = getUnifRand(0, 9, nsam)
103 call disp%show("array")
104 call disp%show( array )
105 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0))")
106 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0)) )
107 call disp%show("array = getRefined(array, weight, skip)")
108 array = getRefined(array, weight, skip)
109 call disp%show("array")
110 call disp%show( array )
111 call disp%skip()
112 end do
113 end block
114
115 block
116 use pm_kind, only: TKG => LK ! all kinds are supported.
117 logical(TKG), allocatable :: array(:)
118 integer(IK), allocatable :: weight(:)
119 integer(IK) :: skip
120 do itry = 1, ntry
121 call disp%show("nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
122 nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
123 call disp%show("nsam")
124 call disp%show( nsam )
125 call disp%show("skip")
126 call disp%show( skip )
127 call disp%show("weight = getUnifRand(-1, 9, nsam)")
128 weight = getUnifRand(-1, 9, nsam)
129 call disp%show("weight")
130 call disp%show( weight )
131 call disp%show("array = getUnifRand(.false., .true., nsam)")
132 array = getUnifRand(.false., .true., nsam)
133 call disp%show("array")
134 call disp%show( array )
135 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0))")
136 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0)) )
137 call disp%show("array = getRefined(array, weight, skip)")
138 array = getRefined(array, weight, skip)
139 call disp%show("array")
140 call disp%show( array )
141 call disp%skip()
142 end do
143 end block
144
145 block
146 use pm_kind, only: TKG => CKS ! all kinds are supported.
147 complex(TKG), allocatable :: array(:)
148 integer(IK), allocatable :: weight(:)
149 integer(IK) :: skip
150 do itry = 1, ntry
151 call disp%show("nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
152 nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
153 call disp%show("nsam")
154 call disp%show( nsam )
155 call disp%show("skip")
156 call disp%show( skip )
157 call disp%show("weight = getUnifRand(-1, 9, nsam)")
158 weight = getUnifRand(-1, 9, nsam)
159 call disp%show("weight")
160 call disp%show( weight )
161 call disp%show("array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)")
162 array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
163 call disp%show("array")
164 call disp%show( array )
165 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0))")
166 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0)) )
167 call disp%show("array = getRefined(array, weight, skip)")
168 array = getRefined(array, weight, skip)
169 call disp%show("array")
170 call disp%show( array )
171 call disp%skip()
172 end do
173 end block
174
175 block
176 use pm_kind, only: TKG => RKS ! all kinds are supported.
177 real(TKG), allocatable :: array(:)
178 integer(IK), allocatable :: weight(:)
179 integer(IK) :: skip
180 do itry = 1, ntry
181 call disp%show("nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
182 nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
183 call disp%show("nsam")
184 call disp%show( nsam )
185 call disp%show("skip")
186 call disp%show( skip )
187 call disp%show("weight = getUnifRand(-1, 9, nsam)")
188 weight = getUnifRand(-1, 9, nsam)
189 call disp%show("weight")
190 call disp%show( weight )
191 call disp%show("array = getUnifRand(0, 9, nsam)")
192 array = getUnifRand(0, 9, nsam)
193 call disp%show("array")
194 call disp%show( array )
195 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0))")
196 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0)) )
197 call disp%show("array = getRefined(array, weight, skip)")
198 array = getRefined(array, weight, skip)
199 call disp%show("array")
200 call disp%show( array )
201 call disp%skip()
202 end do
203 end block
204
205 end block
206
207 call disp%skip()
208 call disp%show("!%%%%%%%%%%%%%%%%%")
209 call disp%show("! Refine 2D array.")
210 call disp%show("!%%%%%%%%%%%%%%%%%")
211 call disp%skip()
212
213 block
214
215 integer(IK) :: dim, ndim
216
217 block
218 use pm_kind, only: TKG => SK ! all kinds are supported.
219 character(2,TKG), allocatable :: array(:,:), arref(:,:)
220 integer(IK), allocatable :: weight(:)
221 integer(IK) :: skip
222 do itry = 1, ntry
223 call disp%show("dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
224 dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
225 call disp%show("[dim, ndim, nsam]")
226 call disp%show( [dim, ndim, nsam] )
227 call disp%show("skip")
228 call disp%show( skip )
229 call disp%show("weight = getUnifRand(-1, 9, nsam)")
230 weight = getUnifRand(-1, 9, nsam)
231 call disp%show("weight")
232 call disp%show( weight )
233 call disp%show("array = getUnifRand('AA', 'ZZ', ndim, nsam)")
234 array = getUnifRand('AA', 'ZZ', ndim, nsam)
235 call disp%show("array")
236 call disp%show( array , deliml = TKG_"""" )
237 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0), dim)")
238 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0), dim) , deliml = TKG_"""" )
239 call disp%show("arref = getRefined(array, dim, weight, skip)")
240 arref = getRefined(array, dim, weight, skip)
241 call disp%show("arref")
242 call disp%show( arref , deliml = TKG_"""" )
243 call disp%show("arref = getRefined(transpose(array), 3_IK - dim, weight, skip)")
244 arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
245 call disp%show("arref")
246 call disp%show( arref , deliml = TKG_"""" )
247 call disp%skip()
248 end do
249 end block
250
251 block
252 use pm_kind, only: TKG => IK ! all kinds are supported.
253 integer(TKG), allocatable :: array(:,:), arref(:,:)
254 integer(IK), allocatable :: weight(:)
255 integer(IK) :: skip
256 do itry = 1, ntry
257 call disp%show("dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
258 dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
259 call disp%show("[dim, ndim, nsam]")
260 call disp%show( [dim, ndim, nsam] )
261 call disp%show("skip")
262 call disp%show( skip )
263 call disp%show("weight = getUnifRand(-1, 9, nsam)")
264 weight = getUnifRand(-1, 9, nsam)
265 call disp%show("weight")
266 call disp%show( weight )
267 call disp%show("array = getUnifRand(0, 9, ndim, nsam)")
268 array = getUnifRand(0, 9, ndim, nsam)
269 call disp%show("array")
270 call disp%show( array )
271 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0), dim)")
272 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0), dim) )
273 call disp%show("arref = getRefined(array, dim, weight, skip)")
274 arref = getRefined(array, dim, weight, skip)
275 call disp%show("arref")
276 call disp%show( arref )
277 call disp%show("arref = getRefined(transpose(array), 3_IK - dim, weight, skip)")
278 arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
279 call disp%show("arref")
280 call disp%show( arref )
281 call disp%skip()
282 end do
283 end block
284
285 block
286 use pm_kind, only: TKG => LK ! all kinds are supported.
287 logical(TKG), allocatable :: array(:,:), arref(:,:)
288 integer(IK), allocatable :: weight(:)
289 integer(IK) :: skip
290 do itry = 1, ntry
291 call disp%show("dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
292 dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
293 call disp%show("[dim, ndim, nsam]")
294 call disp%show( [dim, ndim, nsam] )
295 call disp%show("skip")
296 call disp%show( skip )
297 call disp%show("weight = getUnifRand(-1, 9, nsam)")
298 weight = getUnifRand(-1, 9, nsam)
299 call disp%show("weight")
300 call disp%show( weight )
301 call disp%show("array = getUnifRand(.false., .true., ndim, nsam)")
302 array = getUnifRand(.false., .true., ndim, nsam)
303 call disp%show("array")
304 call disp%show( array )
305 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0), dim)")
306 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0), dim) )
307 call disp%show("arref = getRefined(array, dim, weight, skip)")
308 arref = getRefined(array, dim, weight, skip)
309 call disp%show("arref")
310 call disp%show( arref )
311 call disp%show("arref = getRefined(transpose(array), 3_IK - dim, weight, skip)")
312 arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
313 call disp%show("arref")
314 call disp%show( arref )
315 call disp%skip()
316 end do
317 end block
318
319 block
320 use pm_kind, only: TKG => CKS ! all kinds are supported.
321 complex(TKG), allocatable :: array(:,:), arref(:,:)
322 integer(IK), allocatable :: weight(:)
323 integer(IK) :: skip
324 do itry = 1, ntry
325 call disp%show("dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
326 dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
327 call disp%show("[dim, ndim, nsam]")
328 call disp%show( [dim, ndim, nsam] )
329 call disp%show("skip")
330 call disp%show( skip )
331 call disp%show("weight = getUnifRand(-1, 9, nsam)")
332 weight = getUnifRand(-1, 9, nsam)
333 call disp%show("weight")
334 call disp%show( weight )
335 call disp%show("array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)")
336 array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
337 call disp%show("array")
338 call disp%show( array )
339 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0), dim)")
340 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0), dim) )
341 call disp%show("arref = getRefined(array, dim, weight, skip)")
342 arref = getRefined(array, dim, weight, skip)
343 call disp%show("arref")
344 call disp%show( arref )
345 call disp%show("arref = getRefined(transpose(array), 3_IK - dim, weight, skip)")
346 arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
347 call disp%show("arref")
348 call disp%show( arref )
349 call disp%skip()
350 end do
351 end block
352
353 block
354 use pm_kind, only: TKG => RKS ! all kinds are supported.
355 real(TKG), allocatable :: array(:,:), arref(:,:)
356 integer(IK), allocatable :: weight(:)
357 integer(IK) :: skip
358 do itry = 1, ntry
359 call disp%show("dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)")
360 dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
361 call disp%show("[dim, ndim, nsam]")
362 call disp%show( [dim, ndim, nsam] )
363 call disp%show("skip")
364 call disp%show( skip )
365 call disp%show("weight = getUnifRand(-1, 9, nsam)")
366 weight = getUnifRand(-1, 9, nsam)
367 call disp%show("weight")
368 call disp%show( weight )
369 call disp%show("array = getUnifRand(0, 9, ndim, nsam)")
370 array = getUnifRand(0, 9, ndim, nsam)
371 call disp%show("array")
372 call disp%show( array )
373 call disp%show("getVerbose(array, weight, sum(weight, mask = weight > 0), dim)")
374 call disp%show( getVerbose(array, weight, sum(weight, mask = weight > 0), dim) )
375 call disp%show("arref = getRefined(array, dim, weight, skip)")
376 arref = getRefined(array, dim, weight, skip)
377 call disp%show("arref")
378 call disp%show( arref )
379 call disp%show("arref = getRefined(transpose(array), 3_IK - dim, weight, skip)")
380 arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
381 call disp%show("arref")
382 call disp%show( arref )
383 call disp%skip()
384 end do
385 end block
386
387 end block
388
389end program example
pm_arrayChoice::getChoice
Select a single (or multiple) element(s) from the input array of intrinsic type of arbitrary kind ran...
Definition: pm_arrayChoice.F90:137
pm_arrayVerbose::getVerbose
Generate an equally-weighted (verbose or flattened) array of the input weighted array of rank 1 or 2.
Definition: pm_arrayVerbose.F90:142
pm_distBern::isHead
Generate and return a scalar (or a vector of length size or an array of the same shape as the input p...
Definition: pm_distBern.F90:160
pm_distUnif::getUnifRand
Generate and return a scalar or a contiguous array of rank 1 of length s1 of randomly uniformly distr...
Definition: pm_distUnif.F90:4150
pm_io::show
This is a generic method of the derived type display_type with pass attribute.
Definition: pm_io.F90:11726
pm_io::skip
This is a generic method of the derived type display_type with pass attribute.
Definition: pm_io.F90:11508
pm_arrayChoice
This module contains procedures and generic interfaces for selecting uniformly-distributed or arbitra...
Definition: pm_arrayChoice.F90:38
pm_arrayVerbose
This module contains procedures and generic interfaces for flattening (duplicating the elements of) a...
Definition: pm_arrayVerbose.F90:38
pm_distBern
This module contains classes and procedures for generating Bernoulli-distributed random numbers.
Definition: pm_distBern.F90:39
pm_distUnif
This module contains classes and procedures for computing various statistical quantities related to t...
Definition: pm_distUnif.F90:274
pm_io
This module contains classes and procedures for input/output (IO) or generic display operations on st...
Definition: pm_io.F90:252
pm_io::disp
type(display_type) disp
This is a scalar module variable an object of type display_type for general display.
Definition: pm_io.F90:11393
pm_kind
This module defines the relevant Fortran kind type-parameters frequently used in the ParaMonte librar...
Definition: pm_kind.F90:268
pm_kind::LK
integer, parameter LK
The default logical kind in the ParaMonte library: kind(.true.) in Fortran, kind(....
Definition: pm_kind.F90:541
pm_kind::CKS
integer, parameter CKS
The single-precision complex kind in Fortran mode. On most platforms, this is a 32-bit real kind.
Definition: pm_kind.F90:570
pm_kind::IK
integer, parameter IK
The default integer kind in the ParaMonte library: int32 in Fortran, c_int32_t in C-Fortran Interoper...
Definition: pm_kind.F90:540
pm_kind::SK
integer, parameter SK
The default character kind in the ParaMonte library: kind("a") in Fortran, c_char in C-Fortran Intero...
Definition: pm_kind.F90:539
pm_kind::RKS
integer, parameter RKS
The single-precision real kind in Fortran mode. On most platforms, this is an 32-bit real kind.
Definition: pm_kind.F90:567
pm_io::display_type
Generate and return an object of type display_type.
Definition: pm_io.F90:10282

Example Unix compile command via Intel ifort compiler ⛓
1#!/usr/bin/env sh
2rm main.exe
3ifort -fpp -standard-semantics -O3 -Wl,-rpath,../../../lib -I../../../inc main.F90 ../../../lib/libparamonte* -o main.exe
4./main.exe

Example Windows Batch compile command via Intel ifort compiler ⛓
1del main.exe
2set PATH=..\..\..\lib;%PATH%
3ifort /fpp /standard-semantics /O3 /I:..\..\..\include main.F90 ..\..\..\lib\libparamonte*.lib /exe:main.exe
4main.exe

Example Unix / MinGW compile command via GNU gfortran compiler ⛓
1#!/usr/bin/env sh
2rm main.exe
3gfortran -cpp -ffree-line-length-none -O3 -Wl,-rpath,../../../lib -I../../../inc main.F90 ../../../lib/libparamonte* -o main.exe
4./main.exe

Example output ⛓
1
2!%%%%%%%%%%%%%%%%%
3! Refine 1D array.
4!%%%%%%%%%%%%%%%%%
5
6nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
7nsam
8+2
9skip
10+2
11weight = getUnifRand(-1, 9, nsam)
12weight
13+6, +0
14array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
15array
16"PG"
17getVerbose(array, weight, sum(weight, mask = weight > 0))
18"PPPPPP"
19array = getRefined(array, weight, skip)
20array
21"PPP"
22
23nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
24nsam
25+2
26skip
27+1
28weight = getUnifRand(-1, 9, nsam)
29weight
30+0, +1
31array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
32array
33"BO"
34getVerbose(array, weight, sum(weight, mask = weight > 0))
35"O"
36array = getRefined(array, weight, skip)
37array
38"O"
39
40nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
41nsam
42+3
43skip
44+1
45weight = getUnifRand(-1, 9, nsam)
46weight
47+8, +2, +2
48array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
49array
50"RIW"
51getVerbose(array, weight, sum(weight, mask = weight > 0))
52"RRRRRRRRIIWW"
53array = getRefined(array, weight, skip)
54array
55"RRRRRRRRIIWW"
56
57nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
58nsam
59+4
60skip
61+3
62weight = getUnifRand(-1, 9, nsam)
63weight
64+6, +8, +9, +0
65array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
66array
67"EJWQ"
68getVerbose(array, weight, sum(weight, mask = weight > 0))
69"EEEEEEJJJJJJJJWWWWWWWWW"
70array = getRefined(array, weight, skip)
71array
72"EEJJWWW"
73
74nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
75nsam
76+2
77skip
78+4
79weight = getUnifRand(-1, 9, nsam)
80weight
81+0, +1
82array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
83array
84"AW"
85getVerbose(array, weight, sum(weight, mask = weight > 0))
86"W"
87array = getRefined(array, weight, skip)
88array
89""
90
91nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
92nsam
93+1
94skip
95+2
96weight = getUnifRand(-1, 9, nsam)
97weight
98+1
99array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
100array
101"N"
102getVerbose(array, weight, sum(weight, mask = weight > 0))
103"N"
104array = getRefined(array, weight, skip)
105array
106""
107
108nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
109nsam
110+8
111skip
112+1
113weight = getUnifRand(-1, 9, nsam)
114weight
115+6, +9, +5, +5, +3, +8, +1, +4
116array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
117array
118"XLULHHQG"
119getVerbose(array, weight, sum(weight, mask = weight > 0))
120"XXXXXXLLLLLLLLLUUUUULLLLLHHHHHHHHHHHQGGGG"
121array = getRefined(array, weight, skip)
122array
123"XXXXXXLLLLLLLLLUUUUULLLLLHHHHHHHHHHHQGGGG"
124
125nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
126nsam
127+6
128skip
129+3
130weight = getUnifRand(-1, 9, nsam)
131weight
132+5, +9, +5, +1, +6, +9
133array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
134array
135"OGBXUQ"
136getVerbose(array, weight, sum(weight, mask = weight > 0))
137"OOOOOGGGGGGGGGBBBBBXUUUUUUQQQQQQQQQ"
138array = getRefined(array, weight, skip)
139array
140"OGGGBBUUQQQ"
141
142nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
143nsam
144+5
145skip
146+2
147weight = getUnifRand(-1, 9, nsam)
148weight
149+4, +8, +7, +4, +6
150array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
151array
152"EJXMA"
153getVerbose(array, weight, sum(weight, mask = weight > 0))
154"EEEEJJJJJJJJXXXXXXXMMMMAAAAAA"
155array = getRefined(array, weight, skip)
156array
157"EEJJJJXXXMMAAA"
158
159nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
160nsam
161+4
162skip
163+2
164weight = getUnifRand(-1, 9, nsam)
165weight
166+9, +2, +6, +5
167array = getUnifRand(repeat('A', nsam), repeat('Z', nsam))
168array
169"QKDP"
170getVerbose(array, weight, sum(weight, mask = weight > 0))
171"QQQQQQQQQKKDDDDDDPPPPP"
172array = getRefined(array, weight, skip)
173array
174"QQQQKDDDPPP"
175
176nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
177nsam
178+0
179skip
180+1
181weight = getUnifRand(-1, 9, nsam)
182weight
183
184array = getUnifRand('AA', 'ZZ', nsam)
185array
186
187getVerbose(array, weight, sum(weight, mask = weight > 0))
188
189array = getRefined(array, weight, skip)
190array
191
192
193nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
194nsam
195+0
196skip
197+2
198weight = getUnifRand(-1, 9, nsam)
199weight
200
201array = getUnifRand('AA', 'ZZ', nsam)
202array
203
204getVerbose(array, weight, sum(weight, mask = weight > 0))
205
206array = getRefined(array, weight, skip)
207array
208
209
210nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
211nsam
212+2
213skip
214+2
215weight = getUnifRand(-1, 9, nsam)
216weight
217-1, +6
218array = getUnifRand('AA', 'ZZ', nsam)
219array
220"AF", "TN"
221getVerbose(array, weight, sum(weight, mask = weight > 0))
222"TN", "TN", "TN", "TN", "TN", "TN"
223array = getRefined(array, weight, skip)
224array
225"TN", "TN", "TN"
226
227nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
228nsam
229+4
230skip
231+3
232weight = getUnifRand(-1, 9, nsam)
233weight
234+1, +3, +8, +3
235array = getUnifRand('AA', 'ZZ', nsam)
236array
237"GT", "RC", "RX", "SO"
238getVerbose(array, weight, sum(weight, mask = weight > 0))
239"GT", "RC", "RC", "RC", "RX", "RX", "RX", "RX", "RX", "RX", "RX", "RX", "SO", "SO", "SO"
240array = getRefined(array, weight, skip)
241array
242"RC", "RX", "RX", "RX", "SO"
243
244nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
245nsam
246+5
247skip
248+2
249weight = getUnifRand(-1, 9, nsam)
250weight
251-1, +4, +3, +9, -1
252array = getUnifRand('AA', 'ZZ', nsam)
253array
254"XK", "IU", "HD", "BY", "ZG"
255getVerbose(array, weight, sum(weight, mask = weight > 0))
256"IU", "IU", "IU", "IU", "HD", "HD", "HD", "BY", "BY", "BY", "BY", "BY", "BY", "BY", "BY", "BY"
257array = getRefined(array, weight, skip)
258array
259"IU", "IU", "HD", "BY", "BY", "BY", "BY", "BY"
260
261nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
262nsam
263+0
264skip
265+4
266weight = getUnifRand(-1, 9, nsam)
267weight
268
269array = getUnifRand('AA', 'ZZ', nsam)
270array
271
272getVerbose(array, weight, sum(weight, mask = weight > 0))
273
274array = getRefined(array, weight, skip)
275array
276
277
278nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
279nsam
280+4
281skip
282+2
283weight = getUnifRand(-1, 9, nsam)
284weight
285+2, +4, +1, +9
286array = getUnifRand('AA', 'ZZ', nsam)
287array
288"WK", "IY", "GD", "HQ"
289getVerbose(array, weight, sum(weight, mask = weight > 0))
290"WK", "WK", "IY", "IY", "IY", "IY", "GD", "HQ", "HQ", "HQ", "HQ", "HQ", "HQ", "HQ", "HQ", "HQ"
291array = getRefined(array, weight, skip)
292array
293"WK", "IY", "IY", "HQ", "HQ", "HQ", "HQ", "HQ"
294
295nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
296nsam
297+0
298skip
299+1
300weight = getUnifRand(-1, 9, nsam)
301weight
302
303array = getUnifRand('AA', 'ZZ', nsam)
304array
305
306getVerbose(array, weight, sum(weight, mask = weight > 0))
307
308array = getRefined(array, weight, skip)
309array
310
311
312nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
313nsam
314+6
315skip
316+2
317weight = getUnifRand(-1, 9, nsam)
318weight
319+9, +9, +2, +9, +1, +2
320array = getUnifRand('AA', 'ZZ', nsam)
321array
322"IJ", "XN", "JQ", "XI", "DF", "OB"
323getVerbose(array, weight, sum(weight, mask = weight > 0))
324"IJ", "IJ", "IJ", "IJ", "IJ", "IJ", "IJ", "IJ", "IJ", "XN", "XN", "XN", "XN", "XN", "XN", "XN", "XN", "XN", "JQ", "JQ", "XI", "XI", "XI", "XI", "XI", "XI", "XI", "XI", "XI", "DF", "OB", "OB"
325array = getRefined(array, weight, skip)
326array
327"IJ", "IJ", "IJ", "IJ", "XN", "XN", "XN", "XN", "XN", "JQ", "XI", "XI", "XI", "XI", "DF", "OB"
328
329nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
330nsam
331+5
332skip
333+3
334weight = getUnifRand(-1, 9, nsam)
335weight
336+0, -1, +4, +4, +8
337array = getUnifRand('AA', 'ZZ', nsam)
338array
339"JS", "UT", "WG", "VS", "DZ"
340getVerbose(array, weight, sum(weight, mask = weight > 0))
341"WG", "WG", "WG", "WG", "VS", "VS", "VS", "VS", "DZ", "DZ", "DZ", "DZ", "DZ", "DZ", "DZ", "DZ"
342array = getRefined(array, weight, skip)
343array
344"WG", "VS", "DZ", "DZ", "DZ"
345
346nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
347nsam
348+7
349skip
350+3
351weight = getUnifRand(-1, 9, nsam)
352weight
353+5, +5, +5, +8, +6, +8, +0
354array = getUnifRand(0, 9, nsam)
355array
356+0, +9, +1, +2, +5, +4, +3
357getVerbose(array, weight, sum(weight, mask = weight > 0))
358+0, +0, +0, +0, +0, +9, +9, +9, +9, +9, +1, +1, +1, +1, +1, +2, +2, +2, +2, +2, +2, +2, +2, +5, +5, +5, +5, +5, +5, +4, +4, +4, +4, +4, +4, +4, +4
359array = getRefined(array, weight, skip)
360array
361+0, +9, +9, +1, +1, +2, +2, +5, +5, +4, +4, +4
362
363nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
364nsam
365+7
366skip
367+2
368weight = getUnifRand(-1, 9, nsam)
369weight
370+0, +3, +5, +9, +7, +3, -1
371array = getUnifRand(0, 9, nsam)
372array
373+7, +7, +0, +2, +3, +9, +4
374getVerbose(array, weight, sum(weight, mask = weight > 0))
375+7, +7, +7, +0, +0, +0, +0, +0, +2, +2, +2, +2, +2, +2, +2, +2, +2, +3, +3, +3, +3, +3, +3, +3, +9, +9, +9
376array = getRefined(array, weight, skip)
377array
378+7, +0, +0, +0, +2, +2, +2, +2, +3, +3, +3, +3, +9
379
380nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
381nsam
382+3
383skip
384+3
385weight = getUnifRand(-1, 9, nsam)
386weight
387+9, +9, +9
388array = getUnifRand(0, 9, nsam)
389array
390+8, +1, +7
391getVerbose(array, weight, sum(weight, mask = weight > 0))
392+8, +8, +8, +8, +8, +8, +8, +8, +8, +1, +1, +1, +1, +1, +1, +1, +1, +1, +7, +7, +7, +7, +7, +7, +7, +7, +7
393array = getRefined(array, weight, skip)
394array
395+8, +8, +8, +1, +1, +1, +7, +7, +7
396
397nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
398nsam
399+0
400skip
401+1
402weight = getUnifRand(-1, 9, nsam)
403weight
404
405array = getUnifRand(0, 9, nsam)
406array
407
408getVerbose(array, weight, sum(weight, mask = weight > 0))
409
410array = getRefined(array, weight, skip)
411array
412
413
414nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
415nsam
416+3
417skip
418+2
419weight = getUnifRand(-1, 9, nsam)
420weight
421+2, +4, +0
422array = getUnifRand(0, 9, nsam)
423array
424+3, +6, +8
425getVerbose(array, weight, sum(weight, mask = weight > 0))
426+3, +3, +6, +6, +6, +6
427array = getRefined(array, weight, skip)
428array
429+3, +6, +6
430
431nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
432nsam
433+0
434skip
435+2
436weight = getUnifRand(-1, 9, nsam)
437weight
438
439array = getUnifRand(0, 9, nsam)
440array
441
442getVerbose(array, weight, sum(weight, mask = weight > 0))
443
444array = getRefined(array, weight, skip)
445array
446
447
448nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
449nsam
450+1
451skip
452+4
453weight = getUnifRand(-1, 9, nsam)
454weight
455+2
456array = getUnifRand(0, 9, nsam)
457array
458+3
459getVerbose(array, weight, sum(weight, mask = weight > 0))
460+3, +3
461array = getRefined(array, weight, skip)
462array
463
464
465nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
466nsam
467+1
468skip
469+3
470weight = getUnifRand(-1, 9, nsam)
471weight
472+9
473array = getUnifRand(0, 9, nsam)
474array
475+2
476getVerbose(array, weight, sum(weight, mask = weight > 0))
477+2, +2, +2, +2, +2, +2, +2, +2, +2
478array = getRefined(array, weight, skip)
479array
480+2, +2, +2
481
482nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
483nsam
484+9
485skip
486+1
487weight = getUnifRand(-1, 9, nsam)
488weight
489+7, +7, +7, -1, +5, -1, +2, +3, +6
490array = getUnifRand(0, 9, nsam)
491array
492+3, +4, +9, +5, +7, +2, +8, +6, +3
493getVerbose(array, weight, sum(weight, mask = weight > 0))
494+3, +3, +3, +3, +3, +3, +3, +4, +4, +4, +4, +4, +4, +4, +9, +9, +9, +9, +9, +9, +9, +7, +7, +7, +7, +7, +8, +8, +6, +6, +6, +3, +3, +3, +3, +3, +3
495array = getRefined(array, weight, skip)
496array
497+3, +3, +3, +3, +3, +3, +3, +4, +4, +4, +4, +4, +4, +4, +9, +9, +9, +9, +9, +9, +9, +7, +7, +7, +7, +7, +8, +8, +6, +6, +6, +3, +3, +3, +3, +3, +3
498
499nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
500nsam
501+7
502skip
503+3
504weight = getUnifRand(-1, 9, nsam)
505weight
506+8, +3, +9, +5, +5, +1, +5
507array = getUnifRand(0, 9, nsam)
508array
509+2, +9, +9, +9, +4, +9, +4
510getVerbose(array, weight, sum(weight, mask = weight > 0))
511+2, +2, +2, +2, +2, +2, +2, +2, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +9, +4, +4, +4, +4, +4, +9, +4, +4, +4, +4, +4
512array = getRefined(array, weight, skip)
513array
514+2, +2, +9, +9, +9, +9, +9, +9, +4, +4, +4, +4
515
516nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
517nsam
518+2
519skip
520+4
521weight = getUnifRand(-1, 9, nsam)
522weight
523+9, -1
524array = getUnifRand(.false., .true., nsam)
525array
526T, T
527getVerbose(array, weight, sum(weight, mask = weight > 0))
528T, T, T, T, T, T, T, T, T
529array = getRefined(array, weight, skip)
530array
531T, T
532
533nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
534nsam
535+9
536skip
537+2
538weight = getUnifRand(-1, 9, nsam)
539weight
540+7, +3, +5, +6, +6, +2, +0, +2, +7
541array = getUnifRand(.false., .true., nsam)
542array
543T, T, F, F, T, T, F, T, T
544getVerbose(array, weight, sum(weight, mask = weight > 0))
545T, T, T, T, T, T, T, T, T, T, F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T
546array = getRefined(array, weight, skip)
547array
548T, T, T, T, T, F, F, F, F, F, T, T, T, T, T, T, T, T, T
549
550nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
551nsam
552+7
553skip
554+4
555weight = getUnifRand(-1, 9, nsam)
556weight
557+0, +1, +7, +1, +9, +8, +3
558array = getUnifRand(.false., .true., nsam)
559array
560T, T, T, T, F, T, F
561getVerbose(array, weight, sum(weight, mask = weight > 0))
562T, T, T, T, T, T, T, T, T, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, T, T, F, F, F
563array = getRefined(array, weight, skip)
564array
565T, T, F, F, T, T, F
566
567nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
568nsam
569+2
570skip
571+1
572weight = getUnifRand(-1, 9, nsam)
573weight
574+7, +2
575array = getUnifRand(.false., .true., nsam)
576array
577T, T
578getVerbose(array, weight, sum(weight, mask = weight > 0))
579T, T, T, T, T, T, T, T, T
580array = getRefined(array, weight, skip)
581array
582T, T, T, T, T, T, T, T, T
583
584nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
585nsam
586+6
587skip
588+1
589weight = getUnifRand(-1, 9, nsam)
590weight
591+5, +5, -1, +5, +3, +5
592array = getUnifRand(.false., .true., nsam)
593array
594F, F, F, T, T, F
595getVerbose(array, weight, sum(weight, mask = weight > 0))
596F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, T, T, F, F, F, F, F
597array = getRefined(array, weight, skip)
598array
599F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, T, T, F, F, F, F, F
600
601nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
602nsam
603+6
604skip
605+1
606weight = getUnifRand(-1, 9, nsam)
607weight
608+4, +7, -1, +9, +5, +4
609array = getUnifRand(.false., .true., nsam)
610array
611F, F, T, T, T, T
612getVerbose(array, weight, sum(weight, mask = weight > 0))
613F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T
614array = getRefined(array, weight, skip)
615array
616F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T
617
618nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
619nsam
620+1
621skip
622+2
623weight = getUnifRand(-1, 9, nsam)
624weight
625+3
626array = getUnifRand(.false., .true., nsam)
627array
628F
629getVerbose(array, weight, sum(weight, mask = weight > 0))
630F, F, F
631array = getRefined(array, weight, skip)
632array
633F
634
635nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
636nsam
637+6
638skip
639+4
640weight = getUnifRand(-1, 9, nsam)
641weight
642+6, +8, +1, -1, +5, +2
643array = getUnifRand(.false., .true., nsam)
644array
645T, F, F, T, F, T
646getVerbose(array, weight, sum(weight, mask = weight > 0))
647T, T, T, T, T, T, F, F, F, F, F, F, F, F, F, F, F, F, F, F, T, T
648array = getRefined(array, weight, skip)
649array
650T, F, F, F, F
651
652nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
653nsam
654+1
655skip
656+1
657weight = getUnifRand(-1, 9, nsam)
658weight
659+1
660array = getUnifRand(.false., .true., nsam)
661array
662F
663getVerbose(array, weight, sum(weight, mask = weight > 0))
664F
665array = getRefined(array, weight, skip)
666array
667F
668
669nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
670nsam
671+8
672skip
673+1
674weight = getUnifRand(-1, 9, nsam)
675weight
676+2, +9, +1, +5, -1, +1, +7, +6
677array = getUnifRand(.false., .true., nsam)
678array
679F, F, T, T, T, F, T, F
680getVerbose(array, weight, sum(weight, mask = weight > 0))
681F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, F, T, T, T, T, T, T, T, F, F, F, F, F, F
682array = getRefined(array, weight, skip)
683array
684F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, F, T, T, T, T, T, T, T, F, F, F, F, F, F
685
686nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
687nsam
688+5
689skip
690+4
691weight = getUnifRand(-1, 9, nsam)
692weight
693+2, +1, +9, +8, +2
694array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
695array
696(+3.00000000, +8.00000000), (+9.00000000, +3.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+6.00000000, +4.00000000)
697getVerbose(array, weight, sum(weight, mask = weight > 0))
698(+3.00000000, +8.00000000), (+3.00000000, +8.00000000), (+9.00000000, +3.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+6.00000000, +4.00000000), (+6.00000000, +4.00000000)
699array = getRefined(array, weight, skip)
700array
701(+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000)
702
703nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
704nsam
705+0
706skip
707+1
708weight = getUnifRand(-1, 9, nsam)
709weight
710
711array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
712array
713
714getVerbose(array, weight, sum(weight, mask = weight > 0))
715
716array = getRefined(array, weight, skip)
717array
718
719
720nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
721nsam
722+5
723skip
724+4
725weight = getUnifRand(-1, 9, nsam)
726weight
727+7, +7, -1, +8, -1
728array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
729array
730(+6.00000000, +1.00000000), (+2.00000000, +1.00000000), (+5.00000000, +0.00000000), (+0.00000000, +0.00000000), (+7.00000000, +6.00000000)
731getVerbose(array, weight, sum(weight, mask = weight > 0))
732(+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000)
733array = getRefined(array, weight, skip)
734array
735(+6.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000)
736
737nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
738nsam
739+1
740skip
741+4
742weight = getUnifRand(-1, 9, nsam)
743weight
744+4
745array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
746array
747(+2.00000000, +1.00000000)
748getVerbose(array, weight, sum(weight, mask = weight > 0))
749(+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000)
750array = getRefined(array, weight, skip)
751array
752(+2.00000000, +1.00000000)
753
754nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
755nsam
756+1
757skip
758+1
759weight = getUnifRand(-1, 9, nsam)
760weight
761+1
762array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
763array
764(+7.00000000, +4.00000000)
765getVerbose(array, weight, sum(weight, mask = weight > 0))
766(+7.00000000, +4.00000000)
767array = getRefined(array, weight, skip)
768array
769(+7.00000000, +4.00000000)
770
771nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
772nsam
773+7
774skip
775+1
776weight = getUnifRand(-1, 9, nsam)
777weight
778-1, +0, +1, +4, +5, +1, +7
779array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
780array
781(+1.00000000, +7.00000000), (+7.00000000, +8.00000000), (+6.00000000, +8.00000000), (+5.00000000, +0.00000000), (+7.00000000, +6.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000)
782getVerbose(array, weight, sum(weight, mask = weight > 0))
783(+6.00000000, +8.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000)
784array = getRefined(array, weight, skip)
785array
786(+6.00000000, +8.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +6.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000), (+7.00000000, +5.00000000)
787
788nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
789nsam
790+6
791skip
792+3
793weight = getUnifRand(-1, 9, nsam)
794weight
795+2, +6, +6, +9, +9, +0
796array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
797array
798(+2.00000000, +0.00000000), (+0.00000000, +0.00000000), (+8.00000000, +5.00000000), (+6.00000000, +3.00000000), (+2.00000000, +6.00000000), (+1.00000000, +0.00000000)
799getVerbose(array, weight, sum(weight, mask = weight > 0))
800(+2.00000000, +0.00000000), (+2.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+8.00000000, +5.00000000), (+8.00000000, +5.00000000), (+8.00000000, +5.00000000), (+8.00000000, +5.00000000), (+8.00000000, +5.00000000), (+8.00000000, +5.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000)
801array = getRefined(array, weight, skip)
802array
803(+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+8.00000000, +5.00000000), (+8.00000000, +5.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000), (+2.00000000, +6.00000000)
804
805nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
806nsam
807+3
808skip
809+2
810weight = getUnifRand(-1, 9, nsam)
811weight
812+3, +4, +7
813array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
814array
815(+2.00000000, +3.00000000), (+3.00000000, +1.00000000), (+4.00000000, +5.00000000)
816getVerbose(array, weight, sum(weight, mask = weight > 0))
817(+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000)
818array = getRefined(array, weight, skip)
819array
820(+2.00000000, +3.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000), (+4.00000000, +5.00000000)
821
822nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
823nsam
824+6
825skip
826+1
827weight = getUnifRand(-1, 9, nsam)
828weight
829+9, +5, -1, +6, +4, -1
830array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
831array
832(+4.00000000, +8.00000000), (+9.00000000, +3.00000000), (+2.00000000, +4.00000000), (+7.00000000, +7.00000000), (+2.00000000, +5.00000000), (+8.00000000, +0.00000000)
833getVerbose(array, weight, sum(weight, mask = weight > 0))
834(+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+2.00000000, +5.00000000), (+2.00000000, +5.00000000), (+2.00000000, +5.00000000), (+2.00000000, +5.00000000)
835array = getRefined(array, weight, skip)
836array
837(+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+9.00000000, +3.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+2.00000000, +5.00000000), (+2.00000000, +5.00000000), (+2.00000000, +5.00000000), (+2.00000000, +5.00000000)
838
839nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
840nsam
841+8
842skip
843+1
844weight = getUnifRand(-1, 9, nsam)
845weight
846+2, +8, +9, +1, +2, -1, +3, +7
847array = cmplx(getUnifRand(0, 9, nsam), getUnifRand(0, 9, nsam), TKG)
848array
849(+2.00000000, +1.00000000), (+9.00000000, +0.00000000), (+6.00000000, +0.00000000), (+7.00000000, +6.00000000), (+9.00000000, +1.00000000), (+6.00000000, +3.00000000), (+1.00000000, +8.00000000), (+5.00000000, +4.00000000)
850getVerbose(array, weight, sum(weight, mask = weight > 0))
851(+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+7.00000000, +6.00000000), (+9.00000000, +1.00000000), (+9.00000000, +1.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000)
852array = getRefined(array, weight, skip)
853array
854(+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+7.00000000, +6.00000000), (+9.00000000, +1.00000000), (+9.00000000, +1.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000)
855
856nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
857nsam
858+8
859skip
860+4
861weight = getUnifRand(-1, 9, nsam)
862weight
863+9, +1, +2, +4, -1, +2, +8, +6
864array = getUnifRand(0, 9, nsam)
865array
866+0.00000000, +3.00000000, +3.00000000, +0.00000000, +4.00000000, +8.00000000, +7.00000000, +4.00000000
867getVerbose(array, weight, sum(weight, mask = weight > 0))
868+0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +3.00000000, +3.00000000, +3.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +8.00000000, +8.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000
869array = getRefined(array, weight, skip)
870array
871+0.00000000, +0.00000000, +3.00000000, +0.00000000, +7.00000000, +7.00000000, +4.00000000, +4.00000000
872
873nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
874nsam
875+7
876skip
877+1
878weight = getUnifRand(-1, 9, nsam)
879weight
880+2, +4, +0, +3, +8, +3, +2
881array = getUnifRand(0, 9, nsam)
882array
883+4.00000000, +4.00000000, +6.00000000, +8.00000000, +1.00000000, +9.00000000, +0.00000000
884getVerbose(array, weight, sum(weight, mask = weight > 0))
885+4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +8.00000000, +8.00000000, +8.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +9.00000000, +9.00000000, +9.00000000, +0.00000000, +0.00000000
886array = getRefined(array, weight, skip)
887array
888+4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +8.00000000, +8.00000000, +8.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +9.00000000, +9.00000000, +9.00000000, +0.00000000, +0.00000000
889
890nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
891nsam
892+5
893skip
894+1
895weight = getUnifRand(-1, 9, nsam)
896weight
897+5, +5, +1, +0, +8
898array = getUnifRand(0, 9, nsam)
899array
900+2.00000000, +8.00000000, +7.00000000, +5.00000000, +5.00000000
901getVerbose(array, weight, sum(weight, mask = weight > 0))
902+2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +7.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000
903array = getRefined(array, weight, skip)
904array
905+2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +7.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000
906
907nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
908nsam
909+2
910skip
911+4
912weight = getUnifRand(-1, 9, nsam)
913weight
914+1, +9
915array = getUnifRand(0, 9, nsam)
916array
917+3.00000000, +2.00000000
918getVerbose(array, weight, sum(weight, mask = weight > 0))
919+3.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000
920array = getRefined(array, weight, skip)
921array
922+2.00000000, +2.00000000
923
924nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
925nsam
926+7
927skip
928+3
929weight = getUnifRand(-1, 9, nsam)
930weight
931+6, -1, +3, +4, +6, -1, +3
932array = getUnifRand(0, 9, nsam)
933array
934+8.00000000, +0.00000000, +6.00000000, +0.00000000, +4.00000000, +6.00000000, +2.00000000
935getVerbose(array, weight, sum(weight, mask = weight > 0))
936+8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +6.00000000, +6.00000000, +6.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +2.00000000, +2.00000000, +2.00000000
937array = getRefined(array, weight, skip)
938array
939+8.00000000, +8.00000000, +6.00000000, +0.00000000, +4.00000000, +4.00000000, +2.00000000
940
941nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
942nsam
943+8
944skip
945+2
946weight = getUnifRand(-1, 9, nsam)
947weight
948+9, +1, +7, +3, -1, +0, -1, +8
949array = getUnifRand(0, 9, nsam)
950array
951+7.00000000, +7.00000000, +9.00000000, +5.00000000, +1.00000000, +9.00000000, +4.00000000, +8.00000000
952getVerbose(array, weight, sum(weight, mask = weight > 0))
953+7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +5.00000000, +5.00000000, +5.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000
954array = getRefined(array, weight, skip)
955array
956+7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +9.00000000, +9.00000000, +9.00000000, +5.00000000, +5.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000
957
958nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
959nsam
960+4
961skip
962+1
963weight = getUnifRand(-1, 9, nsam)
964weight
965+1, +8, +5, +0
966array = getUnifRand(0, 9, nsam)
967array
968+9.00000000, +5.00000000, +5.00000000, +7.00000000
969getVerbose(array, weight, sum(weight, mask = weight > 0))
970+9.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000
971array = getRefined(array, weight, skip)
972array
973+9.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000
974
975nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
976nsam
977+4
978skip
979+4
980weight = getUnifRand(-1, 9, nsam)
981weight
982+7, +6, +4, -1
983array = getUnifRand(0, 9, nsam)
984array
985+9.00000000, +7.00000000, +1.00000000, +6.00000000
986getVerbose(array, weight, sum(weight, mask = weight > 0))
987+9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000
988array = getRefined(array, weight, skip)
989array
990+9.00000000, +7.00000000, +7.00000000, +1.00000000
991
992nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
993nsam
994+5
995skip
996+3
997weight = getUnifRand(-1, 9, nsam)
998weight
999+9, +5, +1, +8, +2
1000array = getUnifRand(0, 9, nsam)
1001array
1002+8.00000000, +4.00000000, +9.00000000, +3.00000000, +8.00000000
1003getVerbose(array, weight, sum(weight, mask = weight > 0))
1004+8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +9.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +8.00000000, +8.00000000
1005array = getRefined(array, weight, skip)
1006array
1007+8.00000000, +8.00000000, +8.00000000, +4.00000000, +9.00000000, +3.00000000, +3.00000000, +8.00000000
1008
1009nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1010nsam
1011+9
1012skip
1013+2
1014weight = getUnifRand(-1, 9, nsam)
1015weight
1016+9, +5, +6, +3, -1, +4, +8, +1, +2
1017array = getUnifRand(0, 9, nsam)
1018array
1019+1.00000000, +4.00000000, +3.00000000, +3.00000000, +5.00000000, +6.00000000, +2.00000000, +9.00000000, +2.00000000
1020getVerbose(array, weight, sum(weight, mask = weight > 0))
1021+1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +4.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +6.00000000, +6.00000000, +6.00000000, +6.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +9.00000000, +2.00000000, +2.00000000
1022array = getRefined(array, weight, skip)
1023array
1024+1.00000000, +1.00000000, +1.00000000, +1.00000000, +4.00000000, +4.00000000, +4.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +6.00000000, +6.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +9.00000000, +2.00000000
1025
1026
1027!%%%%%%%%%%%%%%%%%
1028! Refine 2D array.
1029!%%%%%%%%%%%%%%%%%
1030
1031dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1032[dim, ndim, nsam]
1033+2, +0, +9
1034skip
1035+2
1036weight = getUnifRand(-1, 9, nsam)
1037weight
1038+1, +4, -1, +1, +1, +1, +3, +6, +8
1039array = getUnifRand('AA', 'ZZ', ndim, nsam)
1040array
1041getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1042arref = getRefined(array, dim, weight, skip)
1043arref
1044arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1045arref
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1060[dim, ndim, nsam]
1061+2, +2, +8
1062skip
1063+2
1064weight = getUnifRand(-1, 9, nsam)
1065weight
1066-1, +6, +7, +1, +3, -1, -1, +5
1067array = getUnifRand('AA', 'ZZ', ndim, nsam)
1068array
1069"NN", "RK", "GN", "BH", "OO", "YG", "IC", "BI"
1070"EQ", "GX", "BJ", "WK", "MN", "RC", "TP", "OJ"
1071getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1072"RK", "RK", "RK", "RK", "RK", "RK", "GN", "GN", "GN", "GN", "GN", "GN", "GN", "BH", "OO", "OO", "OO", "BI", "BI", "BI", "BI", "BI"
1073"GX", "GX", "GX", "GX", "GX", "GX", "BJ", "BJ", "BJ", "BJ", "BJ", "BJ", "BJ", "WK", "MN", "MN", "MN", "OJ", "OJ", "OJ", "OJ", "OJ"
1074arref = getRefined(array, dim, weight, skip)
1075arref
1076"RK", "RK", "RK", "GN", "GN", "GN", "BH", "OO", "BI", "BI", "BI"
1077"GX", "GX", "GX", "BJ", "BJ", "BJ", "WK", "MN", "OJ", "OJ", "OJ"
1078arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1079arref
1080"RK", "GX"
1081"RK", "GX"
1082"RK", "GX"
1083"GN", "BJ"
1084"GN", "BJ"
1085"GN", "BJ"
1086"BH", "WK"
1087"OO", "MN"
1088"BI", "OJ"
1089"BI", "OJ"
1090"BI", "OJ"
1091
1092dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1093[dim, ndim, nsam]
1094+2, +2, +1
1095skip
1096+2
1097weight = getUnifRand(-1, 9, nsam)
1098weight
1099+2
1100array = getUnifRand('AA', 'ZZ', ndim, nsam)
1101array
1102"BC"
1103"BB"
1104getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1105"BC", "BC"
1106"BB", "BB"
1107arref = getRefined(array, dim, weight, skip)
1108arref
1109"BC"
1110"BB"
1111arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1112arref
1113"BC", "BB"
1114
1115dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1116[dim, ndim, nsam]
1117+2, +0, +1
1118skip
1119+3
1120weight = getUnifRand(-1, 9, nsam)
1121weight
1122+6
1123array = getUnifRand('AA', 'ZZ', ndim, nsam)
1124array
1125getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1126arref = getRefined(array, dim, weight, skip)
1127arref
1128arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1129arref
1130
1131
1132
1133dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1134[dim, ndim, nsam]
1135+2, +3, +4
1136skip
1137+3
1138weight = getUnifRand(-1, 9, nsam)
1139weight
1140+7, +6, +2, -1
1141array = getUnifRand('AA', 'ZZ', ndim, nsam)
1142array
1143"OZ", "UK", "CZ", "KV"
1144"IP", "DS", "YD", "SV"
1145"QD", "DH", "FE", "GT"
1146getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1147"OZ", "OZ", "OZ", "OZ", "OZ", "OZ", "OZ", "UK", "UK", "UK", "UK", "UK", "UK", "CZ", "CZ"
1148"IP", "IP", "IP", "IP", "IP", "IP", "IP", "DS", "DS", "DS", "DS", "DS", "DS", "YD", "YD"
1149"QD", "QD", "QD", "QD", "QD", "QD", "QD", "DH", "DH", "DH", "DH", "DH", "DH", "FE", "FE"
1150arref = getRefined(array, dim, weight, skip)
1151arref
1152"OZ", "OZ", "UK", "UK", "CZ"
1153"IP", "IP", "DS", "DS", "YD"
1154"QD", "QD", "DH", "DH", "FE"
1155arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1156arref
1157"OZ", "IP", "QD"
1158"OZ", "IP", "QD"
1159"UK", "DS", "DH"
1160"UK", "DS", "DH"
1161"CZ", "YD", "FE"
1162
1163dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1164[dim, ndim, nsam]
1165+2, +2, +4
1166skip
1167+4
1168weight = getUnifRand(-1, 9, nsam)
1169weight
1170-1, +4, +6, +0
1171array = getUnifRand('AA', 'ZZ', ndim, nsam)
1172array
1173"EE", "WV", "BW", "VS"
1174"GI", "EX", "SG", "UV"
1175getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1176"WV", "WV", "WV", "WV", "BW", "BW", "BW", "BW", "BW", "BW"
1177"EX", "EX", "EX", "EX", "SG", "SG", "SG", "SG", "SG", "SG"
1178arref = getRefined(array, dim, weight, skip)
1179arref
1180"WV", "BW"
1181"EX", "SG"
1182arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1183arref
1184"WV", "EX"
1185"BW", "SG"
1186
1187dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1188[dim, ndim, nsam]
1189+2, +3, +8
1190skip
1191+3
1192weight = getUnifRand(-1, 9, nsam)
1193weight
1194+6, +8, +0, +9, +2, +5, +8, +2
1195array = getUnifRand('AA', 'ZZ', ndim, nsam)
1196array
1197"QZ", "HM", "LI", "YK", "UI", "GB", "KX", "KE"
1198"BW", "YI", "NL", "VQ", "AT", "EY", "GI", "BG"
1199"VK", "TD", "KU", "DB", "TM", "CS", "FS", "HC"
1200getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1201"QZ", "QZ", "QZ", "QZ", "QZ", "QZ", "HM", "HM", "HM", "HM", "HM", "HM", "HM", "HM", "YK", "YK", "YK", "YK", "YK", "YK", "YK", "YK", "YK", "UI", "UI", "GB", "GB", "GB", "GB", "GB", "KX", "KX", "KX", "KX", "KX", "KX", "KX", "KX", "KE", "KE"
1202"BW", "BW", "BW", "BW", "BW", "BW", "YI", "YI", "YI", "YI", "YI", "YI", "YI", "YI", "VQ", "VQ", "VQ", "VQ", "VQ", "VQ", "VQ", "VQ", "VQ", "AT", "AT", "EY", "EY", "EY", "EY", "EY", "GI", "GI", "GI", "GI", "GI", "GI", "GI", "GI", "BG", "BG"
1203"VK", "VK", "VK", "VK", "VK", "VK", "TD", "TD", "TD", "TD", "TD", "TD", "TD", "TD", "DB", "DB", "DB", "DB", "DB", "DB", "DB", "DB", "DB", "TM", "TM", "CS", "CS", "CS", "CS", "CS", "FS", "FS", "FS", "FS", "FS", "FS", "FS", "FS", "HC", "HC"
1204arref = getRefined(array, dim, weight, skip)
1205arref
1206"QZ", "QZ", "HM", "HM", "YK", "YK", "YK", "UI", "GB", "GB", "KX", "KX", "KE"
1207"BW", "BW", "YI", "YI", "VQ", "VQ", "VQ", "AT", "EY", "EY", "GI", "GI", "BG"
1208"VK", "VK", "TD", "TD", "DB", "DB", "DB", "TM", "CS", "CS", "FS", "FS", "HC"
1209arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1210arref
1211"QZ", "BW", "VK"
1212"QZ", "BW", "VK"
1213"HM", "YI", "TD"
1214"HM", "YI", "TD"
1215"YK", "VQ", "DB"
1216"YK", "VQ", "DB"
1217"YK", "VQ", "DB"
1218"UI", "AT", "TM"
1219"GB", "EY", "CS"
1220"GB", "EY", "CS"
1221"KX", "GI", "FS"
1222"KX", "GI", "FS"
1223"KE", "BG", "HC"
1224
1225dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1226[dim, ndim, nsam]
1227+2, +1, +7
1228skip
1229+2
1230weight = getUnifRand(-1, 9, nsam)
1231weight
1232+9, +3, +7, +3, +9, +3, +6
1233array = getUnifRand('AA', 'ZZ', ndim, nsam)
1234array
1235"UY", "XZ", "VF", "YU", "CO", "DY", "RW"
1236getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1237"UY", "UY", "UY", "UY", "UY", "UY", "UY", "UY", "UY", "XZ", "XZ", "XZ", "VF", "VF", "VF", "VF", "VF", "VF", "VF", "YU", "YU", "YU", "CO", "CO", "CO", "CO", "CO", "CO", "CO", "CO", "CO", "DY", "DY", "DY", "RW", "RW", "RW", "RW", "RW", "RW"
1238arref = getRefined(array, dim, weight, skip)
1239arref
1240"UY", "UY", "UY", "UY", "XZ", "XZ", "VF", "VF", "VF", "YU", "YU", "CO", "CO", "CO", "CO", "DY", "DY", "RW", "RW", "RW"
1241arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1242arref
1243"UY"
1244"UY"
1245"UY"
1246"UY"
1247"XZ"
1248"XZ"
1249"VF"
1250"VF"
1251"VF"
1252"YU"
1253"YU"
1254"CO"
1255"CO"
1256"CO"
1257"CO"
1258"DY"
1259"DY"
1260"RW"
1261"RW"
1262"RW"
1263
1264dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1265[dim, ndim, nsam]
1266+2, +1, +0
1267skip
1268+1
1269weight = getUnifRand(-1, 9, nsam)
1270weight
1271
1272array = getUnifRand('AA', 'ZZ', ndim, nsam)
1273array
1274
1275getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1276
1277arref = getRefined(array, dim, weight, skip)
1278arref
1279
1280arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1281arref
1282
1283dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1284[dim, ndim, nsam]
1285+2, +0, +6
1286skip
1287+3
1288weight = getUnifRand(-1, 9, nsam)
1289weight
1290+5, +1, +8, +4, +7, +4
1291array = getUnifRand('AA', 'ZZ', ndim, nsam)
1292array
1293getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1294arref = getRefined(array, dim, weight, skip)
1295arref
1296arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1297arref
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1309[dim, ndim, nsam]
1310+2, +3, +9
1311skip
1312+1
1313weight = getUnifRand(-1, 9, nsam)
1314weight
1315+6, +1, +7, +8, +0, +5, +0, +0, +9
1316array = getUnifRand(0, 9, ndim, nsam)
1317array
1318+2, +3, +3, +2, +6, +9, +8, +9, +8
1319+9, +0, +6, +5, +8, +5, +4, +7, +6
1320+2, +7, +4, +0, +6, +6, +6, +6, +1
1321getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1322+2, +2, +2, +2, +2, +2, +3, +3, +3, +3, +3, +3, +3, +3, +2, +2, +2, +2, +2, +2, +2, +2, +9, +9, +9, +9, +9, +8, +8, +8, +8, +8, +8, +8, +8, +8
1323+9, +9, +9, +9, +9, +9, +0, +6, +6, +6, +6, +6, +6, +6, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +6, +6, +6, +6, +6, +6, +6, +6, +6
1324+2, +2, +2, +2, +2, +2, +7, +4, +4, +4, +4, +4, +4, +4, +0, +0, +0, +0, +0, +0, +0, +0, +6, +6, +6, +6, +6, +1, +1, +1, +1, +1, +1, +1, +1, +1
1325arref = getRefined(array, dim, weight, skip)
1326arref
1327+2, +2, +2, +2, +2, +2, +3, +3, +3, +3, +3, +3, +3, +3, +2, +2, +2, +2, +2, +2, +2, +2, +9, +9, +9, +9, +9, +8, +8, +8, +8, +8, +8, +8, +8, +8
1328+9, +9, +9, +9, +9, +9, +0, +6, +6, +6, +6, +6, +6, +6, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +6, +6, +6, +6, +6, +6, +6, +6, +6
1329+2, +2, +2, +2, +2, +2, +7, +4, +4, +4, +4, +4, +4, +4, +0, +0, +0, +0, +0, +0, +0, +0, +6, +6, +6, +6, +6, +1, +1, +1, +1, +1, +1, +1, +1, +1
1330arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1331arref
1332+2, +9, +2
1333+2, +9, +2
1334+2, +9, +2
1335+2, +9, +2
1336+2, +9, +2
1337+2, +9, +2
1338+3, +0, +7
1339+3, +6, +4
1340+3, +6, +4
1341+3, +6, +4
1342+3, +6, +4
1343+3, +6, +4
1344+3, +6, +4
1345+3, +6, +4
1346+2, +5, +0
1347+2, +5, +0
1348+2, +5, +0
1349+2, +5, +0
1350+2, +5, +0
1351+2, +5, +0
1352+2, +5, +0
1353+2, +5, +0
1354+9, +5, +6
1355+9, +5, +6
1356+9, +5, +6
1357+9, +5, +6
1358+9, +5, +6
1359+8, +6, +1
1360+8, +6, +1
1361+8, +6, +1
1362+8, +6, +1
1363+8, +6, +1
1364+8, +6, +1
1365+8, +6, +1
1366+8, +6, +1
1367+8, +6, +1
1368
1369dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1370[dim, ndim, nsam]
1371+2, +1, +0
1372skip
1373+4
1374weight = getUnifRand(-1, 9, nsam)
1375weight
1376
1377array = getUnifRand(0, 9, ndim, nsam)
1378array
1379
1380getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1381
1382arref = getRefined(array, dim, weight, skip)
1383arref
1384
1385arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1386arref
1387
1388dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1389[dim, ndim, nsam]
1390+2, +3, +1
1391skip
1392+3
1393weight = getUnifRand(-1, 9, nsam)
1394weight
1395+2
1396array = getUnifRand(0, 9, ndim, nsam)
1397array
1398+0
1399+7
1400+7
1401getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1402+0, +0
1403+7, +7
1404+7, +7
1405arref = getRefined(array, dim, weight, skip)
1406arref
1407
1408
1409
1410arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1411arref
1412
1413dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1414[dim, ndim, nsam]
1415+2, +2, +7
1416skip
1417+4
1418weight = getUnifRand(-1, 9, nsam)
1419weight
1420+0, +7, +3, -1, +0, +9, +0
1421array = getUnifRand(0, 9, ndim, nsam)
1422array
1423+4, +8, +5, +8, +0, +5, +3
1424+5, +4, +5, +7, +0, +7, +6
1425getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1426+8, +8, +8, +8, +8, +8, +8, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5, +5
1427+4, +4, +4, +4, +4, +4, +4, +5, +5, +5, +7, +7, +7, +7, +7, +7, +7, +7, +7
1428arref = getRefined(array, dim, weight, skip)
1429arref
1430+8, +5, +5, +5
1431+4, +5, +7, +7
1432arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1433arref
1434+8, +4
1435+5, +5
1436+5, +7
1437+5, +7
1438
1439dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1440[dim, ndim, nsam]
1441+2, +2, +3
1442skip
1443+3
1444weight = getUnifRand(-1, 9, nsam)
1445weight
1446+8, +0, +2
1447array = getUnifRand(0, 9, ndim, nsam)
1448array
1449+9, +5, +7
1450+6, +3, +2
1451getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1452+9, +9, +9, +9, +9, +9, +9, +9, +7, +7
1453+6, +6, +6, +6, +6, +6, +6, +6, +2, +2
1454arref = getRefined(array, dim, weight, skip)
1455arref
1456+9, +9, +7
1457+6, +6, +2
1458arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1459arref
1460+9, +6
1461+9, +6
1462+7, +2
1463
1464dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1465[dim, ndim, nsam]
1466+2, +1, +1
1467skip
1468+2
1469weight = getUnifRand(-1, 9, nsam)
1470weight
1471-1
1472array = getUnifRand(0, 9, ndim, nsam)
1473array
1474+5
1475getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1476
1477arref = getRefined(array, dim, weight, skip)
1478arref
1479
1480arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1481arref
1482
1483dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1484[dim, ndim, nsam]
1485+2, +0, +7
1486skip
1487+3
1488weight = getUnifRand(-1, 9, nsam)
1489weight
1490+5, +7, +8, +2, +8, +9, +9
1491array = getUnifRand(0, 9, ndim, nsam)
1492array
1493getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1494arref = getRefined(array, dim, weight, skip)
1495arref
1496arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1497arref
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1516[dim, ndim, nsam]
1517+2, +1, +1
1518skip
1519+2
1520weight = getUnifRand(-1, 9, nsam)
1521weight
1522+9
1523array = getUnifRand(0, 9, ndim, nsam)
1524array
1525+2
1526getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1527+2, +2, +2, +2, +2, +2, +2, +2, +2
1528arref = getRefined(array, dim, weight, skip)
1529arref
1530+2, +2, +2, +2
1531arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1532arref
1533+2
1534+2
1535+2
1536+2
1537
1538dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1539[dim, ndim, nsam]
1540+2, +0, +4
1541skip
1542+3
1543weight = getUnifRand(-1, 9, nsam)
1544weight
1545+6, +3, +1, +0
1546array = getUnifRand(0, 9, ndim, nsam)
1547array
1548getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1549arref = getRefined(array, dim, weight, skip)
1550arref
1551arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1552arref
1553
1554
1555
1556
1557dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1558[dim, ndim, nsam]
1559+2, +2, +9
1560skip
1561+2
1562weight = getUnifRand(-1, 9, nsam)
1563weight
1564+7, +8, +6, +1, +2, +5, -1, +3, -1
1565array = getUnifRand(0, 9, ndim, nsam)
1566array
1567+1, +8, +3, +7, +2, +2, +3, +4, +6
1568+7, +6, +2, +2, +6, +1, +1, +7, +1
1569getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1570+1, +1, +1, +1, +1, +1, +1, +8, +8, +8, +8, +8, +8, +8, +8, +3, +3, +3, +3, +3, +3, +7, +2, +2, +2, +2, +2, +2, +2, +4, +4, +4
1571+7, +7, +7, +7, +7, +7, +7, +6, +6, +6, +6, +6, +6, +6, +6, +2, +2, +2, +2, +2, +2, +2, +6, +6, +1, +1, +1, +1, +1, +7, +7, +7
1572arref = getRefined(array, dim, weight, skip)
1573arref
1574+1, +1, +1, +8, +8, +8, +8, +3, +3, +3, +7, +2, +2, +2, +4, +4
1575+7, +7, +7, +6, +6, +6, +6, +2, +2, +2, +2, +6, +1, +1, +7, +7
1576arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1577arref
1578+1, +7
1579+1, +7
1580+1, +7
1581+8, +6
1582+8, +6
1583+8, +6
1584+8, +6
1585+3, +2
1586+3, +2
1587+3, +2
1588+7, +2
1589+2, +6
1590+2, +1
1591+2, +1
1592+4, +7
1593+4, +7
1594
1595dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1596[dim, ndim, nsam]
1597+2, +2, +8
1598skip
1599+3
1600weight = getUnifRand(-1, 9, nsam)
1601weight
1602+0, +5, +2, +2, +6, +8, +6, +0
1603array = getUnifRand(.false., .true., ndim, nsam)
1604array
1605F, F, T, T, T, T, T, T
1606T, F, T, T, F, F, T, T
1607getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1608F, F, F, F, F, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T
1609F, F, F, F, F, T, T, T, T, F, F, F, F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T
1610arref = getRefined(array, dim, weight, skip)
1611arref
1612F, T, T, T, T, T, T, T, T
1613F, T, T, F, F, F, F, T, T
1614arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1615arref
1616F, F
1617T, T
1618T, T
1619T, F
1620T, F
1621T, F
1622T, F
1623T, T
1624T, T
1625
1626dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1627[dim, ndim, nsam]
1628+2, +3, +1
1629skip
1630+4
1631weight = getUnifRand(-1, 9, nsam)
1632weight
1633+2
1634array = getUnifRand(.false., .true., ndim, nsam)
1635array
1636T
1637F
1638F
1639getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1640T, T
1641F, F
1642F, F
1643arref = getRefined(array, dim, weight, skip)
1644arref
1645
1646
1647
1648arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1649arref
1650
1651dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1652[dim, ndim, nsam]
1653+2, +1, +9
1654skip
1655+3
1656weight = getUnifRand(-1, 9, nsam)
1657weight
1658+2, +2, +0, +1, +4, +6, +9, +7, +2
1659array = getUnifRand(.false., .true., ndim, nsam)
1660array
1661T, T, T, F, T, T, F, T, T
1662getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1663T, T, T, T, F, T, T, T, T, T, T, T, T, T, T, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T, T, T, T
1664arref = getRefined(array, dim, weight, skip)
1665arref
1666T, T, T, T, T, F, F, F, T, T, T
1667arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1668arref
1669T
1670T
1671T
1672T
1673T
1674F
1675F
1676F
1677T
1678T
1679T
1680
1681dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1682[dim, ndim, nsam]
1683+2, +1, +7
1684skip
1685+3
1686weight = getUnifRand(-1, 9, nsam)
1687weight
1688+0, +2, +2, +7, +6, +2, +8
1689array = getUnifRand(.false., .true., ndim, nsam)
1690array
1691F, F, F, T, T, T, T
1692getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1693F, F, F, F, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T, T
1694arref = getRefined(array, dim, weight, skip)
1695arref
1696F, T, T, T, T, T, T, T, T
1697arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1698arref
1699F
1700T
1701T
1702T
1703T
1704T
1705T
1706T
1707T
1708
1709dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1710[dim, ndim, nsam]
1711+2, +3, +2
1712skip
1713+2
1714weight = getUnifRand(-1, 9, nsam)
1715weight
1716+4, +1
1717array = getUnifRand(.false., .true., ndim, nsam)
1718array
1719T, F
1720T, F
1721F, F
1722getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1723T, T, T, T, F
1724T, T, T, T, F
1725F, F, F, F, F
1726arref = getRefined(array, dim, weight, skip)
1727arref
1728T, T
1729T, T
1730F, F
1731arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1732arref
1733T, T, F
1734T, T, F
1735
1736dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1737[dim, ndim, nsam]
1738+2, +0, +0
1739skip
1740+2
1741weight = getUnifRand(-1, 9, nsam)
1742weight
1743
1744array = getUnifRand(.false., .true., ndim, nsam)
1745array
1746getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1747arref = getRefined(array, dim, weight, skip)
1748arref
1749arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1750arref
1751
1752dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1753[dim, ndim, nsam]
1754+2, +3, +7
1755skip
1756+1
1757weight = getUnifRand(-1, 9, nsam)
1758weight
1759+3, +0, +6, +1, +5, +6, +0
1760array = getUnifRand(.false., .true., ndim, nsam)
1761array
1762F, T, T, F, F, F, F
1763F, F, F, F, F, T, F
1764T, T, F, F, F, T, F
1765getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1766F, F, F, T, T, T, T, T, T, F, F, F, F, F, F, F, F, F, F, F, F
1767F, F, F, F, F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T
1768T, T, T, F, F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T
1769arref = getRefined(array, dim, weight, skip)
1770arref
1771F, F, F, T, T, T, T, T, T, F, F, F, F, F, F, F, F, F, F, F, F
1772F, F, F, F, F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T
1773T, T, T, F, F, F, F, F, F, F, F, F, F, F, F, T, T, T, T, T, T
1774arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1775arref
1776F, F, T
1777F, F, T
1778F, F, T
1779T, F, F
1780T, F, F
1781T, F, F
1782T, F, F
1783T, F, F
1784T, F, F
1785F, F, F
1786F, F, F
1787F, F, F
1788F, F, F
1789F, F, F
1790F, F, F
1791F, T, T
1792F, T, T
1793F, T, T
1794F, T, T
1795F, T, T
1796F, T, T
1797
1798dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1799[dim, ndim, nsam]
1800+2, +2, +2
1801skip
1802+2
1803weight = getUnifRand(-1, 9, nsam)
1804weight
1805+4, +0
1806array = getUnifRand(.false., .true., ndim, nsam)
1807array
1808F, F
1809F, T
1810getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1811F, F, F, F
1812F, F, F, F
1813arref = getRefined(array, dim, weight, skip)
1814arref
1815F, F
1816F, F
1817arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1818arref
1819F, F
1820F, F
1821
1822dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1823[dim, ndim, nsam]
1824+2, +2, +4
1825skip
1826+2
1827weight = getUnifRand(-1, 9, nsam)
1828weight
1829+3, +2, +7, +9
1830array = getUnifRand(.false., .true., ndim, nsam)
1831array
1832T, F, F, F
1833F, T, T, F
1834getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1835T, T, T, F, F, F, F, F, F, F, F, F, F, F, F, F, F, F, F, F, F
1836F, F, F, T, T, T, T, T, T, T, T, T, F, F, F, F, F, F, F, F, F
1837arref = getRefined(array, dim, weight, skip)
1838arref
1839T, F, F, F, F, F, F, F, F, F
1840F, T, T, T, T, T, F, F, F, F
1841arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1842arref
1843T, F
1844F, T
1845F, T
1846F, T
1847F, T
1848F, T
1849F, F
1850F, F
1851F, F
1852F, F
1853
1854dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1855[dim, ndim, nsam]
1856+2, +3, +0
1857skip
1858+1
1859weight = getUnifRand(-1, 9, nsam)
1860weight
1861
1862array = getUnifRand(.false., .true., ndim, nsam)
1863array
1864
1865
1866
1867getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1868
1869
1870
1871arref = getRefined(array, dim, weight, skip)
1872arref
1873
1874
1875
1876arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1877arref
1878
1879dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1880[dim, ndim, nsam]
1881+2, +3, +9
1882skip
1883+2
1884weight = getUnifRand(-1, 9, nsam)
1885weight
1886+4, +5, +9, +2, +5, +8, +1, +4, +9
1887array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
1888array
1889(+8.00000000, +2.00000000), (+0.00000000, +7.00000000), (+0.00000000, +0.00000000), (+8.00000000, +9.00000000), (+3.00000000, +0.00000000), (+9.00000000, +8.00000000), (+6.00000000, +0.00000000), (+3.00000000, +1.00000000), (+0.00000000, +7.00000000)
1890(+2.00000000, +0.00000000), (+9.00000000, +0.00000000), (+7.00000000, +2.00000000), (+0.00000000, +0.00000000), (+7.00000000, +0.00000000), (+5.00000000, +0.00000000), (+2.00000000, +7.00000000), (+1.00000000, +4.00000000), (+5.00000000, +1.00000000)
1891(+8.00000000, +1.00000000), (+8.00000000, +3.00000000), (+6.00000000, +8.00000000), (+0.00000000, +4.00000000), (+6.00000000, +7.00000000), (+3.00000000, +3.00000000), (+3.00000000, +0.00000000), (+5.00000000, +0.00000000), (+3.00000000, +4.00000000)
1892getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1893(+8.00000000, +2.00000000), (+8.00000000, +2.00000000), (+8.00000000, +2.00000000), (+8.00000000, +2.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+8.00000000, +9.00000000), (+8.00000000, +9.00000000), (+3.00000000, +0.00000000), (+3.00000000, +0.00000000), (+3.00000000, +0.00000000), (+3.00000000, +0.00000000), (+3.00000000, +0.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+6.00000000, +0.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000)
1894(+2.00000000, +0.00000000), (+2.00000000, +0.00000000), (+2.00000000, +0.00000000), (+2.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+2.00000000, +7.00000000), (+1.00000000, +4.00000000), (+1.00000000, +4.00000000), (+1.00000000, +4.00000000), (+1.00000000, +4.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000)
1895(+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+0.00000000, +4.00000000), (+0.00000000, +4.00000000), (+6.00000000, +7.00000000), (+6.00000000, +7.00000000), (+6.00000000, +7.00000000), (+6.00000000, +7.00000000), (+6.00000000, +7.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000)
1896arref = getRefined(array, dim, weight, skip)
1897arref
1898(+8.00000000, +2.00000000), (+8.00000000, +2.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+8.00000000, +9.00000000), (+3.00000000, +0.00000000), (+3.00000000, +0.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+9.00000000, +8.00000000), (+6.00000000, +0.00000000), (+3.00000000, +1.00000000), (+3.00000000, +1.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000), (+0.00000000, +7.00000000)
1899(+2.00000000, +0.00000000), (+2.00000000, +0.00000000), (+9.00000000, +0.00000000), (+9.00000000, +0.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+0.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+2.00000000, +7.00000000), (+1.00000000, +4.00000000), (+1.00000000, +4.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000), (+5.00000000, +1.00000000)
1900(+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+6.00000000, +8.00000000), (+0.00000000, +4.00000000), (+6.00000000, +7.00000000), (+6.00000000, +7.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000), (+3.00000000, +4.00000000)
1901arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1902arref
1903(+8.00000000, +2.00000000), (+2.00000000, +0.00000000), (+8.00000000, +1.00000000)
1904(+8.00000000, +2.00000000), (+2.00000000, +0.00000000), (+8.00000000, +1.00000000)
1905(+0.00000000, +7.00000000), (+9.00000000, +0.00000000), (+8.00000000, +3.00000000)
1906(+0.00000000, +7.00000000), (+9.00000000, +0.00000000), (+8.00000000, +3.00000000)
1907(+0.00000000, +0.00000000), (+7.00000000, +2.00000000), (+6.00000000, +8.00000000)
1908(+0.00000000, +0.00000000), (+7.00000000, +2.00000000), (+6.00000000, +8.00000000)
1909(+0.00000000, +0.00000000), (+7.00000000, +2.00000000), (+6.00000000, +8.00000000)
1910(+0.00000000, +0.00000000), (+7.00000000, +2.00000000), (+6.00000000, +8.00000000)
1911(+0.00000000, +0.00000000), (+7.00000000, +2.00000000), (+6.00000000, +8.00000000)
1912(+8.00000000, +9.00000000), (+0.00000000, +0.00000000), (+0.00000000, +4.00000000)
1913(+3.00000000, +0.00000000), (+7.00000000, +0.00000000), (+6.00000000, +7.00000000)
1914(+3.00000000, +0.00000000), (+7.00000000, +0.00000000), (+6.00000000, +7.00000000)
1915(+9.00000000, +8.00000000), (+5.00000000, +0.00000000), (+3.00000000, +3.00000000)
1916(+9.00000000, +8.00000000), (+5.00000000, +0.00000000), (+3.00000000, +3.00000000)
1917(+9.00000000, +8.00000000), (+5.00000000, +0.00000000), (+3.00000000, +3.00000000)
1918(+9.00000000, +8.00000000), (+5.00000000, +0.00000000), (+3.00000000, +3.00000000)
1919(+6.00000000, +0.00000000), (+2.00000000, +7.00000000), (+3.00000000, +0.00000000)
1920(+3.00000000, +1.00000000), (+1.00000000, +4.00000000), (+5.00000000, +0.00000000)
1921(+3.00000000, +1.00000000), (+1.00000000, +4.00000000), (+5.00000000, +0.00000000)
1922(+0.00000000, +7.00000000), (+5.00000000, +1.00000000), (+3.00000000, +4.00000000)
1923(+0.00000000, +7.00000000), (+5.00000000, +1.00000000), (+3.00000000, +4.00000000)
1924(+0.00000000, +7.00000000), (+5.00000000, +1.00000000), (+3.00000000, +4.00000000)
1925(+0.00000000, +7.00000000), (+5.00000000, +1.00000000), (+3.00000000, +4.00000000)
1926
1927dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1928[dim, ndim, nsam]
1929+2, +1, +3
1930skip
1931+2
1932weight = getUnifRand(-1, 9, nsam)
1933weight
1934+4, -1, -1
1935array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
1936array
1937(+7.00000000, +3.00000000), (+0.00000000, +3.00000000), (+8.00000000, +1.00000000)
1938getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1939(+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000)
1940arref = getRefined(array, dim, weight, skip)
1941arref
1942(+7.00000000, +3.00000000), (+7.00000000, +3.00000000)
1943arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1944arref
1945(+7.00000000, +3.00000000)
1946(+7.00000000, +3.00000000)
1947
1948dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1949[dim, ndim, nsam]
1950+2, +3, +0
1951skip
1952+2
1953weight = getUnifRand(-1, 9, nsam)
1954weight
1955
1956array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
1957array
1958
1959
1960
1961getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1962
1963
1964
1965arref = getRefined(array, dim, weight, skip)
1966arref
1967
1968
1969
1970arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1971arref
1972
1973dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
1974[dim, ndim, nsam]
1975+2, +0, +3
1976skip
1977+1
1978weight = getUnifRand(-1, 9, nsam)
1979weight
1980+4, +0, +7
1981array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
1982array
1983getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
1984arref = getRefined(array, dim, weight, skip)
1985arref
1986arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
1987arref
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2001[dim, ndim, nsam]
2002+2, +3, +1
2003skip
2004+2
2005weight = getUnifRand(-1, 9, nsam)
2006weight
2007+2
2008array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
2009array
2010(+2.00000000, +1.00000000)
2011(+8.00000000, +9.00000000)
2012(+1.00000000, +4.00000000)
2013getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2014(+2.00000000, +1.00000000), (+2.00000000, +1.00000000)
2015(+8.00000000, +9.00000000), (+8.00000000, +9.00000000)
2016(+1.00000000, +4.00000000), (+1.00000000, +4.00000000)
2017arref = getRefined(array, dim, weight, skip)
2018arref
2019(+2.00000000, +1.00000000)
2020(+8.00000000, +9.00000000)
2021(+1.00000000, +4.00000000)
2022arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2023arref
2024(+2.00000000, +1.00000000), (+8.00000000, +9.00000000), (+1.00000000, +4.00000000)
2025
2026dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2027[dim, ndim, nsam]
2028+2, +1, +1
2029skip
2030+4
2031weight = getUnifRand(-1, 9, nsam)
2032weight
2033+9
2034array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
2035array
2036(+8.00000000, +3.00000000)
2037getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2038(+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000), (+8.00000000, +3.00000000)
2039arref = getRefined(array, dim, weight, skip)
2040arref
2041(+8.00000000, +3.00000000), (+8.00000000, +3.00000000)
2042arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2043arref
2044(+8.00000000, +3.00000000)
2045(+8.00000000, +3.00000000)
2046
2047dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2048[dim, ndim, nsam]
2049+2, +3, +4
2050skip
2051+1
2052weight = getUnifRand(-1, 9, nsam)
2053weight
2054+9, +9, +8, +8
2055array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
2056array
2057(+6.00000000, +3.00000000), (+0.00000000, +6.00000000), (+3.00000000, +2.00000000), (+5.00000000, +4.00000000)
2058(+7.00000000, +2.00000000), (+6.00000000, +1.00000000), (+9.00000000, +6.00000000), (+3.00000000, +6.00000000)
2059(+3.00000000, +3.00000000), (+7.00000000, +7.00000000), (+2.00000000, +1.00000000), (+7.00000000, +1.00000000)
2060getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2061(+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000)
2062(+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000)
2063(+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000)
2064arref = getRefined(array, dim, weight, skip)
2065arref
2066(+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+6.00000000, +3.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+0.00000000, +6.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000), (+5.00000000, +4.00000000)
2067(+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+7.00000000, +2.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+6.00000000, +1.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+9.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000), (+3.00000000, +6.00000000)
2068(+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+3.00000000, +3.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+7.00000000, +7.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+2.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000), (+7.00000000, +1.00000000)
2069arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2070arref
2071(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2072(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2073(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2074(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2075(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2076(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2077(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2078(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2079(+6.00000000, +3.00000000), (+7.00000000, +2.00000000), (+3.00000000, +3.00000000)
2080(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2081(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2082(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2083(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2084(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2085(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2086(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2087(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2088(+0.00000000, +6.00000000), (+6.00000000, +1.00000000), (+7.00000000, +7.00000000)
2089(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2090(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2091(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2092(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2093(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2094(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2095(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2096(+3.00000000, +2.00000000), (+9.00000000, +6.00000000), (+2.00000000, +1.00000000)
2097(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2098(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2099(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2100(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2101(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2102(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2103(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2104(+5.00000000, +4.00000000), (+3.00000000, +6.00000000), (+7.00000000, +1.00000000)
2105
2106dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2107[dim, ndim, nsam]
2108+2, +0, +0
2109skip
2110+1
2111weight = getUnifRand(-1, 9, nsam)
2112weight
2113
2114array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
2115array
2116getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2117arref = getRefined(array, dim, weight, skip)
2118arref
2119arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2120arref
2121
2122dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2123[dim, ndim, nsam]
2124+2, +3, +9
2125skip
2126+4
2127weight = getUnifRand(-1, 9, nsam)
2128weight
2129+4, +7, +3, +8, +0, +7, +7, +2, +0
2130array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
2131array
2132(+7.00000000, +9.00000000), (+7.00000000, +3.00000000), (+5.00000000, +7.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +8.00000000), (+2.00000000, +3.00000000), (+1.00000000, +2.00000000), (+7.00000000, +0.00000000)
2133(+9.00000000, +2.00000000), (+1.00000000, +8.00000000), (+5.00000000, +5.00000000), (+7.00000000, +8.00000000), (+8.00000000, +4.00000000), (+5.00000000, +6.00000000), (+6.00000000, +9.00000000), (+4.00000000, +0.00000000), (+5.00000000, +4.00000000)
2134(+7.00000000, +0.00000000), (+7.00000000, +4.00000000), (+1.00000000, +3.00000000), (+5.00000000, +0.00000000), (+2.00000000, +1.00000000), (+9.00000000, +7.00000000), (+4.00000000, +8.00000000), (+0.00000000, +1.00000000), (+0.00000000, +9.00000000)
2135getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2136(+7.00000000, +9.00000000), (+7.00000000, +9.00000000), (+7.00000000, +9.00000000), (+7.00000000, +9.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+7.00000000, +3.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +8.00000000), (+0.00000000, +8.00000000), (+0.00000000, +8.00000000), (+0.00000000, +8.00000000), (+0.00000000, +8.00000000), (+0.00000000, +8.00000000), (+0.00000000, +8.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000), (+1.00000000, +2.00000000), (+1.00000000, +2.00000000)
2137(+9.00000000, +2.00000000), (+9.00000000, +2.00000000), (+9.00000000, +2.00000000), (+9.00000000, +2.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+1.00000000, +8.00000000), (+5.00000000, +5.00000000), (+5.00000000, +5.00000000), (+5.00000000, +5.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+5.00000000, +6.00000000), (+5.00000000, +6.00000000), (+5.00000000, +6.00000000), (+5.00000000, +6.00000000), (+5.00000000, +6.00000000), (+5.00000000, +6.00000000), (+5.00000000, +6.00000000), (+6.00000000, +9.00000000), (+6.00000000, +9.00000000), (+6.00000000, +9.00000000), (+6.00000000, +9.00000000), (+6.00000000, +9.00000000), (+6.00000000, +9.00000000), (+6.00000000, +9.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000)
2138(+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +0.00000000), (+7.00000000, +4.00000000), (+7.00000000, +4.00000000), (+7.00000000, +4.00000000), (+7.00000000, +4.00000000), (+7.00000000, +4.00000000), (+7.00000000, +4.00000000), (+7.00000000, +4.00000000), (+1.00000000, +3.00000000), (+1.00000000, +3.00000000), (+1.00000000, +3.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+9.00000000, +7.00000000), (+9.00000000, +7.00000000), (+9.00000000, +7.00000000), (+9.00000000, +7.00000000), (+9.00000000, +7.00000000), (+9.00000000, +7.00000000), (+9.00000000, +7.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000)
2139arref = getRefined(array, dim, weight, skip)
2140arref
2141(+7.00000000, +9.00000000), (+7.00000000, +3.00000000), (+5.00000000, +7.00000000), (+0.00000000, +1.00000000), (+0.00000000, +1.00000000), (+0.00000000, +8.00000000), (+0.00000000, +8.00000000), (+2.00000000, +3.00000000), (+2.00000000, +3.00000000)
2142(+9.00000000, +2.00000000), (+1.00000000, +8.00000000), (+5.00000000, +5.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+5.00000000, +6.00000000), (+5.00000000, +6.00000000), (+6.00000000, +9.00000000), (+6.00000000, +9.00000000)
2143(+7.00000000, +0.00000000), (+7.00000000, +4.00000000), (+1.00000000, +3.00000000), (+5.00000000, +0.00000000), (+5.00000000, +0.00000000), (+9.00000000, +7.00000000), (+9.00000000, +7.00000000), (+4.00000000, +8.00000000), (+4.00000000, +8.00000000)
2144arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2145arref
2146(+7.00000000, +9.00000000), (+9.00000000, +2.00000000), (+7.00000000, +0.00000000)
2147(+7.00000000, +3.00000000), (+1.00000000, +8.00000000), (+7.00000000, +4.00000000)
2148(+5.00000000, +7.00000000), (+5.00000000, +5.00000000), (+1.00000000, +3.00000000)
2149(+0.00000000, +1.00000000), (+7.00000000, +8.00000000), (+5.00000000, +0.00000000)
2150(+0.00000000, +1.00000000), (+7.00000000, +8.00000000), (+5.00000000, +0.00000000)
2151(+0.00000000, +8.00000000), (+5.00000000, +6.00000000), (+9.00000000, +7.00000000)
2152(+0.00000000, +8.00000000), (+5.00000000, +6.00000000), (+9.00000000, +7.00000000)
2153(+2.00000000, +3.00000000), (+6.00000000, +9.00000000), (+4.00000000, +8.00000000)
2154(+2.00000000, +3.00000000), (+6.00000000, +9.00000000), (+4.00000000, +8.00000000)
2155
2156dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2157[dim, ndim, nsam]
2158+2, +2, +9
2159skip
2160+3
2161weight = getUnifRand(-1, 9, nsam)
2162weight
2163+7, +7, +1, +8, +5, +6, +9, +1, +8
2164array = cmplx(getUnifRand(0, 9, ndim, nsam), getUnifRand(0, 9, ndim, nsam), TKG)
2165array
2166(+6.00000000, +5.00000000), (+4.00000000, +0.00000000), (+9.00000000, +8.00000000), (+2.00000000, +9.00000000), (+7.00000000, +8.00000000), (+8.00000000, +1.00000000), (+5.00000000, +2.00000000), (+3.00000000, +3.00000000), (+8.00000000, +6.00000000)
2167(+7.00000000, +8.00000000), (+3.00000000, +2.00000000), (+3.00000000, +5.00000000), (+5.00000000, +7.00000000), (+9.00000000, +1.00000000), (+9.00000000, +4.00000000), (+6.00000000, +0.00000000), (+4.00000000, +7.00000000), (+0.00000000, +0.00000000)
2168getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2169(+6.00000000, +5.00000000), (+6.00000000, +5.00000000), (+6.00000000, +5.00000000), (+6.00000000, +5.00000000), (+6.00000000, +5.00000000), (+6.00000000, +5.00000000), (+6.00000000, +5.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000), (+9.00000000, +8.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+3.00000000, +3.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000)
2170(+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +5.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+9.00000000, +1.00000000), (+9.00000000, +1.00000000), (+9.00000000, +1.00000000), (+9.00000000, +1.00000000), (+9.00000000, +1.00000000), (+9.00000000, +4.00000000), (+9.00000000, +4.00000000), (+9.00000000, +4.00000000), (+9.00000000, +4.00000000), (+9.00000000, +4.00000000), (+9.00000000, +4.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+4.00000000, +7.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000)
2171arref = getRefined(array, dim, weight, skip)
2172arref
2173(+6.00000000, +5.00000000), (+6.00000000, +5.00000000), (+4.00000000, +0.00000000), (+4.00000000, +0.00000000), (+9.00000000, +8.00000000), (+2.00000000, +9.00000000), (+2.00000000, +9.00000000), (+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+8.00000000, +1.00000000), (+8.00000000, +1.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+5.00000000, +2.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000), (+8.00000000, +6.00000000)
2174(+7.00000000, +8.00000000), (+7.00000000, +8.00000000), (+3.00000000, +2.00000000), (+3.00000000, +2.00000000), (+3.00000000, +5.00000000), (+5.00000000, +7.00000000), (+5.00000000, +7.00000000), (+9.00000000, +1.00000000), (+9.00000000, +1.00000000), (+9.00000000, +4.00000000), (+9.00000000, +4.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+6.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000), (+0.00000000, +0.00000000)
2175arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2176arref
2177(+6.00000000, +5.00000000), (+7.00000000, +8.00000000)
2178(+6.00000000, +5.00000000), (+7.00000000, +8.00000000)
2179(+4.00000000, +0.00000000), (+3.00000000, +2.00000000)
2180(+4.00000000, +0.00000000), (+3.00000000, +2.00000000)
2181(+9.00000000, +8.00000000), (+3.00000000, +5.00000000)
2182(+2.00000000, +9.00000000), (+5.00000000, +7.00000000)
2183(+2.00000000, +9.00000000), (+5.00000000, +7.00000000)
2184(+7.00000000, +8.00000000), (+9.00000000, +1.00000000)
2185(+7.00000000, +8.00000000), (+9.00000000, +1.00000000)
2186(+8.00000000, +1.00000000), (+9.00000000, +4.00000000)
2187(+8.00000000, +1.00000000), (+9.00000000, +4.00000000)
2188(+5.00000000, +2.00000000), (+6.00000000, +0.00000000)
2189(+5.00000000, +2.00000000), (+6.00000000, +0.00000000)
2190(+5.00000000, +2.00000000), (+6.00000000, +0.00000000)
2191(+8.00000000, +6.00000000), (+0.00000000, +0.00000000)
2192(+8.00000000, +6.00000000), (+0.00000000, +0.00000000)
2193(+8.00000000, +6.00000000), (+0.00000000, +0.00000000)
2194
2195dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2196[dim, ndim, nsam]
2197+2, +1, +3
2198skip
2199+2
2200weight = getUnifRand(-1, 9, nsam)
2201weight
2202+0, +0, +1
2203array = getUnifRand(0, 9, ndim, nsam)
2204array
2205+1.00000000, +1.00000000, +5.00000000
2206getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2207+5.00000000
2208arref = getRefined(array, dim, weight, skip)
2209arref
2210
2211arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2212arref
2213
2214dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2215[dim, ndim, nsam]
2216+2, +1, +0
2217skip
2218+4
2219weight = getUnifRand(-1, 9, nsam)
2220weight
2221
2222array = getUnifRand(0, 9, ndim, nsam)
2223array
2224
2225getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2226
2227arref = getRefined(array, dim, weight, skip)
2228arref
2229
2230arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2231arref
2232
2233dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2234[dim, ndim, nsam]
2235+2, +3, +1
2236skip
2237+2
2238weight = getUnifRand(-1, 9, nsam)
2239weight
2240+2
2241array = getUnifRand(0, 9, ndim, nsam)
2242array
2243+9.00000000
2244+1.00000000
2245+0.00000000
2246getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2247+9.00000000, +9.00000000
2248+1.00000000, +1.00000000
2249+0.00000000, +0.00000000
2250arref = getRefined(array, dim, weight, skip)
2251arref
2252+9.00000000
2253+1.00000000
2254+0.00000000
2255arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2256arref
2257+9.00000000, +1.00000000, +0.00000000
2258
2259dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2260[dim, ndim, nsam]
2261+2, +1, +7
2262skip
2263+4
2264weight = getUnifRand(-1, 9, nsam)
2265weight
2266+6, +1, +2, +4, +1, +0, +7
2267array = getUnifRand(0, 9, ndim, nsam)
2268array
2269+0.00000000, +3.00000000, +3.00000000, +9.00000000, +9.00000000, +7.00000000, +1.00000000
2270getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2271+0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +3.00000000, +3.00000000, +3.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000
2272arref = getRefined(array, dim, weight, skip)
2273arref
2274+0.00000000, +3.00000000, +9.00000000, +1.00000000, +1.00000000
2275arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2276arref
2277+0.00000000
2278+3.00000000
2279+9.00000000
2280+1.00000000
2281+1.00000000
2282
2283dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2284[dim, ndim, nsam]
2285+2, +0, +7
2286skip
2287+2
2288weight = getUnifRand(-1, 9, nsam)
2289weight
2290+7, -1, +5, +8, +3, -1, +5
2291array = getUnifRand(0, 9, ndim, nsam)
2292array
2293getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2294arref = getRefined(array, dim, weight, skip)
2295arref
2296arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2297arref
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2314[dim, ndim, nsam]
2315+2, +2, +5
2316skip
2317+1
2318weight = getUnifRand(-1, 9, nsam)
2319weight
2320+4, +7, +8, +1, +2
2321array = getUnifRand(0, 9, ndim, nsam)
2322array
2323+5.00000000, +2.00000000, +0.00000000, +3.00000000, +4.00000000
2324+1.00000000, +5.00000000, +1.00000000, +2.00000000, +3.00000000
2325getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2326+5.00000000, +5.00000000, +5.00000000, +5.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +3.00000000, +4.00000000, +4.00000000
2327+1.00000000, +1.00000000, +1.00000000, +1.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +2.00000000, +3.00000000, +3.00000000
2328arref = getRefined(array, dim, weight, skip)
2329arref
2330+5.00000000, +5.00000000, +5.00000000, +5.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +3.00000000, +4.00000000, +4.00000000
2331+1.00000000, +1.00000000, +1.00000000, +1.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +2.00000000, +3.00000000, +3.00000000
2332arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2333arref
2334+5.00000000, +1.00000000
2335+5.00000000, +1.00000000
2336+5.00000000, +1.00000000
2337+5.00000000, +1.00000000
2338+2.00000000, +5.00000000
2339+2.00000000, +5.00000000
2340+2.00000000, +5.00000000
2341+2.00000000, +5.00000000
2342+2.00000000, +5.00000000
2343+2.00000000, +5.00000000
2344+2.00000000, +5.00000000
2345+0.00000000, +1.00000000
2346+0.00000000, +1.00000000
2347+0.00000000, +1.00000000
2348+0.00000000, +1.00000000
2349+0.00000000, +1.00000000
2350+0.00000000, +1.00000000
2351+0.00000000, +1.00000000
2352+0.00000000, +1.00000000
2353+3.00000000, +2.00000000
2354+4.00000000, +3.00000000
2355+4.00000000, +3.00000000
2356
2357dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2358[dim, ndim, nsam]
2359+2, +2, +2
2360skip
2361+3
2362weight = getUnifRand(-1, 9, nsam)
2363weight
2364+7, +2
2365array = getUnifRand(0, 9, ndim, nsam)
2366array
2367+8.00000000, +3.00000000
2368+7.00000000, +8.00000000
2369getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2370+8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +3.00000000, +3.00000000
2371+7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +8.00000000, +8.00000000
2372arref = getRefined(array, dim, weight, skip)
2373arref
2374+8.00000000, +8.00000000, +3.00000000
2375+7.00000000, +7.00000000, +8.00000000
2376arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2377arref
2378+8.00000000, +7.00000000
2379+8.00000000, +7.00000000
2380+3.00000000, +8.00000000
2381
2382dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2383[dim, ndim, nsam]
2384+2, +1, +8
2385skip
2386+4
2387weight = getUnifRand(-1, 9, nsam)
2388weight
2389+7, +5, +1, +4, +6, +6, +0, -1
2390array = getUnifRand(0, 9, ndim, nsam)
2391array
2392+3.00000000, +1.00000000, +7.00000000, +2.00000000, +3.00000000, +0.00000000, +9.00000000, +5.00000000
2393getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2394+3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +7.00000000, +2.00000000, +2.00000000, +2.00000000, +2.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000
2395arref = getRefined(array, dim, weight, skip)
2396arref
2397+3.00000000, +1.00000000, +1.00000000, +2.00000000, +3.00000000, +0.00000000, +0.00000000
2398arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2399arref
2400+3.00000000
2401+1.00000000
2402+1.00000000
2403+2.00000000
2404+3.00000000
2405+0.00000000
2406+0.00000000
2407
2408dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2409[dim, ndim, nsam]
2410+2, +2, +5
2411skip
2412+2
2413weight = getUnifRand(-1, 9, nsam)
2414weight
2415+1, +9, -1, +5, +9
2416array = getUnifRand(0, 9, ndim, nsam)
2417array
2418+0.00000000, +0.00000000, +3.00000000, +7.00000000, +9.00000000
2419+0.00000000, +3.00000000, +7.00000000, +8.00000000, +1.00000000
2420getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2421+0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +7.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000
2422+0.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000
2423arref = getRefined(array, dim, weight, skip)
2424arref
2425+0.00000000, +0.00000000, +0.00000000, +0.00000000, +0.00000000, +7.00000000, +7.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000
2426+3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +8.00000000, +8.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000
2427arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2428arref
2429+0.00000000, +3.00000000
2430+0.00000000, +3.00000000
2431+0.00000000, +3.00000000
2432+0.00000000, +3.00000000
2433+0.00000000, +3.00000000
2434+7.00000000, +8.00000000
2435+7.00000000, +8.00000000
2436+9.00000000, +1.00000000
2437+9.00000000, +1.00000000
2438+9.00000000, +1.00000000
2439+9.00000000, +1.00000000
2440+9.00000000, +1.00000000
2441
2442dim = 2; ndim = merge(0, getUnifRand(1, 3), isHead(.1)); nsam = getUnifRand(0, 9); skip = getUnifRand(1, 4)
2443[dim, ndim, nsam]
2444+2, +3, +6
2445skip
2446+2
2447weight = getUnifRand(-1, 9, nsam)
2448weight
2449+2, -1, -1, +9, +7, +2
2450array = getUnifRand(0, 9, ndim, nsam)
2451array
2452+2.00000000, +8.00000000, +7.00000000, +5.00000000, +8.00000000, +8.00000000
2453+8.00000000, +1.00000000, +0.00000000, +3.00000000, +1.00000000, +2.00000000
2454+8.00000000, +0.00000000, +6.00000000, +9.00000000, +6.00000000, +3.00000000
2455getVerbose(array, weight, sum(weight, mask = weight > 0), dim)
2456+2.00000000, +2.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000
2457+8.00000000, +8.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +2.00000000, +2.00000000
2458+8.00000000, +8.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +6.00000000, +6.00000000, +6.00000000, +6.00000000, +6.00000000, +6.00000000, +6.00000000, +3.00000000, +3.00000000
2459arref = getRefined(array, dim, weight, skip)
2460arref
2461+2.00000000, +5.00000000, +5.00000000, +5.00000000, +5.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000, +8.00000000
2462+8.00000000, +3.00000000, +3.00000000, +3.00000000, +3.00000000, +1.00000000, +1.00000000, +1.00000000, +1.00000000, +2.00000000
2463+8.00000000, +9.00000000, +9.00000000, +9.00000000, +9.00000000, +6.00000000, +6.00000000, +6.00000000, +6.00000000, +3.00000000
2464arref = getRefined(transpose(array), 3_IK - dim, weight, skip)
2465arref
2466+2.00000000, +8.00000000, +8.00000000
2467+5.00000000, +3.00000000, +9.00000000
2468+5.00000000, +3.00000000, +9.00000000
2469+5.00000000, +3.00000000, +9.00000000
2470+5.00000000, +3.00000000, +9.00000000
2471+8.00000000, +1.00000000, +6.00000000
2472+8.00000000, +1.00000000, +6.00000000
2473+8.00000000, +1.00000000, +6.00000000
2474+8.00000000, +1.00000000, +6.00000000
2475+8.00000000, +2.00000000, +3.00000000
2476
2477
Test:
test_pm_arrayRefine
Bug:

Status: Unresolved
Source: GNU Fortran Compiler gfortran version 10.3-12, Intel Classic Fortran Compiler ifort version 2021-2022
Description: Intel Classic Fortran Compiler ifort and GNU Fortran Compiler gfortran share a common bug with opposing behavior.
Intel Classic Fortran Compiler ifort cannot handle assumed-length allocatable output arguments of type character.
GNU Fortran Compiler gfortran cannot handle deferred-length allocatable output arguments of type character.

Remedy (as of ParaMonte Library version 2.0.0): For now, a preprocessor macro defines two separate interfaces for the two compilers so that both compilers can compile this file.
This minor interface difference should not impact the usage of this module with different compilers.


Final Remarks ⛓

If you believe this algorithm or its documentation can be improved, we appreciate your contribution and help to edit this page's documentation and source file on GitHub.
For details on the naming abbreviations, see this page.
For details on the naming conventions, see this page.
This software is distributed under the MIT license with additional terms outlined below.

  1. If you use any parts or concepts from this library to any extent, please acknowledge the usage by citing the relevant publications of the ParaMonte library.
  2. If you regenerate any parts/ideas from this library in a programming environment other than those currently supported by this ParaMonte library (i.e., other than C, C++, Fortran, MATLAB, Python, R), please also ask the end users to cite this original ParaMonte library.

This software is available to the public under a highly permissive license.
Help us justify its continued development and maintenance by acknowledging its benefit to society, distributing it, and contributing to it.

Copyright
Computational Data Science Lab
Author:
Amir Shahmoradi, Saturday 1:48 AM, August 20, 2016, Institute for Computational Engineering and Sciences, UT Austin, TX

Definition at line 154 of file pm_arrayRefine.F90.

The documentation for this interface was generated from the following file: