initial upload

This commit is contained in:
2025-12-17 11:00:57 +08:00
parent 2bc7b24a71
commit a09a73537f
4614 changed files with 3478433 additions and 2 deletions

View File

@@ -0,0 +1,63 @@
* test quality on refined and reconnected mesh
cmo/create/3dmesh/
cmo/addatt/3dmesh/boron
cmo/modatt/3dmesh/boron/ioflag/gx/
cmo/modatt/3dmesh/boron/interp/linear/
surface/cube/reflect/box/.0,.0,.0/1.,1.,1./
surface/mid/intrface/plane/0,0,.5/1,0,.5/1,1,.5
region/upper/le cube and ge mid /
region/lower/le cube and lt mid /
mregion/mupper/le cube and gt mid /
mregion/mlower/le cube and lt mid /
createpts/xyz/3,3,3/0.,0.,0./1.,1.,1./1,1,1/
setpts
connect
settets
* begin compare no refine
quality/aspect
quality/volume
quality/angle/gt/90.
* end compare no refine
refine/maxsize///edge/1,0,0/0.01,0.0,0.0/
recon
refine/constant/boron/linear/edge/1,0,0/1.3+20/
cmo setatt 3dmesh idebug 2
* begin compare refine 1
quality/aspect
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
* end compare refine 1
recon
* begin compare recon
quality/aspect
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
* end compare recon
recon
* begin compare recon 2
quality/aspect/y
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
quality/volume/material
cmo/status
* end compare recon 2
* check sorted array
sort / xyz / bins
* begin compare sort
cmo/printatt/3dmesh/i_index/1,20,1
cmo/printatt/3dmesh/j_index/1,20,1
* end compare sort
*END
finish

View File

@@ -0,0 +1,63 @@
* test quality on refined and reconnected mesh
cmo/create/3dmesh/
cmo/addatt/3dmesh/boron
cmo/modatt/3dmesh/boron/ioflag/gx/
cmo/modatt/3dmesh/boron/interp/linear/
surface/cube/reflect/box/.0,.0,.0/1.,1.,1./
surface/mid/intrface/plane/0,0,.5/1,0,.5/1,1,.5
region/upper/le cube and ge mid /
region/lower/le cube and lt mid /
mregion/mupper/le cube and gt mid /
mregion/mlower/le cube and lt mid /
createpts/xyz/3,3,3/0.,0.,0./1.,1.,1./1,1,1/
setpts
connect
settets
* begin compare no refine
quality/aspect
quality/volume
quality/angle/gt/90.
* end compare no refine
refine/maxsize///edge/1,0,0/0.01,0.0,0.0/
recon
refine/constant/boron/linear/edge/1,0,0/1.3+20/
cmo setatt 3dmesh idebug 2
* begin compare refine 1
quality/aspect
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
* end compare refine 1
recon
* begin compare recon
quality/aspect
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
* end compare recon
recon
* begin compare recon 2
quality/aspect/y
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
quality/volume/material
cmo/status
* end compare recon 2
* check sorted array
sort / xyz / bins
* begin compare sort
cmo/printatt/3dmesh/i_index/1,20,1
cmo/printatt/3dmesh/j_index/1,20,1
* end compare sort
*END
finish

View File

@@ -0,0 +1,41 @@
cmo/create/3dmesh/
cmo/addatt/3dmesh/boron
cmo/modatt/3dmesh/boron/ioflag/gx/
cmo/modatt/3dmesh/boron/interp/linear/
surface/cube/reflect/box/.0,.0,.0/1.,1.,1./
surface/mid/intrface/plane/0,0,.5/1,0,.5/1,1,.5
region/upper/le cube and ge mid/
region/lower/le cube and lt mid/
mregion/mupper/le cube and gt mid/
mregion/mlower/le cube and lt mid/
createpts/xyz/3,3,3/0.,0.,0./1.,1.,1./1,1,1/
setpts
connect
settets
quality/aspect
quality/volume
quality/angle/gt/90.
refine/maxsize///edge/1,0,0/0.01,0.0,0.0/
recon
refine/constant/boron/linear/edge/1,0,0/1.3+20/
cmo setatt 3dmesh idebug 2
quality/aspect
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
recon
quality/aspect
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
recon
quality/aspect/y
quality/volume
quality/angle/gt/90.
quality/taylor/boron/1.e-1/
quality/volume/material
cmo/status
sort/xyz/bins
cmo/printatt/3dmesh/i_index/1,20,1
cmo/printatt/3dmesh/j_index/1,20,1
finish

View File

@@ -0,0 +1,563 @@
* * * * * * * * * * * * * * * * * * * * * * * * *
* * *
* * Program: LaGriT V3.330 Linux *
* * date_compile: 2021/10/15 test *
* * Run Time: 2021/Nov 9 10:11:58 *
* * Manual: http://lagrit.lanl.gov *
* * *
* * * * * * * * * * * * * * * * * * * * * * * * *
-----oOo-----
LaGriT V3 LA-CC-15-069 https://github.com/lanl/LaGriT
Copyright 2016. Triad National Security, LLC. All rights reserved. This
program was produced under U.S. Government contract 89233218CNA000001
for Los Alamos National Laboratory (LANL), which is operated by Triad
National Security, LLC for the U.S. Department of Energy/National Nuclear
Security Administration. All rights in the program are reserved by Triad
National Security, LLC, and the U.S. Department of Energy/National Nuclear
Security Administration. The Government is granted for itself and others
acting on its behalf a nonexclusive, paid-up, irrevocable worldwide license
in this material to reproduce, prepare derivative works, distribute copies
to the public, perform publicly and display publicly, and to permit others to
do so. This software is open source and available under the BSD-3 License.
-----oOo-----
Output log file: outx3dgen
Command log file: logx3dgen
* test quality on refined and reconnected mesh
cmo/create/3dmesh/
cmo/addatt/3dmesh/boron
cmo/modatt/3dmesh/boron/ioflag/gx/
cmo/modatt/3dmesh/boron/interp/linear/
surface/cube/reflect/box/.0,.0,.0/1.,1.,1./
cmo/addatt//ncon50/INT/scalar/scalar/constant/permanent/l/0
finish
cmo/addatt//nconbnd/INT/scalar/scalar/constant/permanent/l/0
finish
cmo/addatt//icontab/VINT/scalar/ncon50/constant/permanent/l/0.0
finish
surface/mid/intrface/plane/0,0,.5/1,0,.5/1,1,.5
The unit vector for mid is 0.0000000i -0.0000000j 1.0000000k
region/upper/le cube and ge mid/
region/lower/le cube and lt mid/
mregion/mupper/le cube and gt mid/
mregion/mlower/le cube and lt mid/
createpts/xyz/3,3,3/0.,0.,0./1.,1.,1./1,1,1/
RZ GENERATED POINTS 1 TO 27
setpts
FOR icr 1 TYPE surface 1 0 0 THERE ARE 26 POINTS
FOR imt= 1 NAME= mupper THERE ARE 9 POINTS
FOR imt= 2 NAME= mlower THERE ARE 9 POINTS
FOR imt= 3 NAME= intrface THERE ARE 9 POINTS
connect
Coordinates of enclosing tetrahedron are:
-0.20000D+01 -0.75000D+00 -0.75000D+00
0.50000D+00 -0.75000D+00 0.42500D+01
0.30000D+01 -0.75000D+00 -0.75000D+00
0.50000D+00 0.42500D+01 0.50000D+00
Successfully eliminated all multimaterial connections.
The mesh is now complete!
LaGriT FINISH: connect
settets
Adding 18 interface-coupled points.
* begin compare no refine
quality/aspect
epsilonl, epsilonaspect: 3.8459254E-13 5.6885628E-38
--------------------------------------------
elements with aspect ratio < .01: 0
elements with aspect ratio b/w .01 and .02: 0
elements with aspect ratio b/w .02 and .05: 0
elements with aspect ratio b/w .05 and .1 : 0
elements with aspect ratio b/w .1 and .2 : 0
elements with aspect ratio b/w .2 and .5 : 0
elements with aspect ratio b/w .5 and 1. : 48
min aspect ratio = 0.6230E+00 max aspect ratio = 0.7321E+00
-----------------------------------------------------------
48 total elements evaluated.
quality/volume
epsilonvol: 2.2204460E-13
---------------------------------------
All elements have volume 2.0833333E-02
-----------------------------------------------------------
48 total elements evaluated.
quality/angle/gt/90.
------------------------------------------
elements with angles > 90.000: 16
tets with angles > 90.000: 16
min angle = 35.264 max angle = 125.264
-----------------------------------------------------------
48 total elements evaluated.
* end compare no refine
refine/maxsize///edge/1,0,0/0.01,0.0,0.0/
refine edges:
Refine edges: 98
Edge_add iteration: 1 98
Edge-refined tets: old= 48 new= 92
Edge_add iteration: 2 83
Edge-refined tets: old= 92 new= 176
Edge_add iteration: 3 58
Edge-refined tets: old= 176 new= 320
Edge_add iteration: 4 13
Edge-refined tets: old= 320 new= 384
settets/newtets
Interface node converted to interior 52
Interface node converted to interior 55
Interface node converted to interior 71
Interface node converted to interior 73
Interface node converted to interior 94
Interface node converted to interior 95
Interface node converted to interior 114
Interface node converted to interior 139
Adding 32 interface-coupled points.
finish
recon
RECON3D reconnection loop: 1
recon2: MFLIP NEWLEN FOR iremov with: 4
filholes: reset number of elements: 381
recon2: ntets= 384 nface= 52 nflips= 41
niter= 3 negvol= 0 nbface= 48
recon2 set new node and element total: 175 384
RECON: done.
refine/constant/boron/linear/edge/1,0,0/1.3+20/
refine edges:
Refine edges: 0
cmo setatt 3dmesh idebug 2
1 values reset for attribute idebug
* begin compare refine 1
quality/aspect
epsilonl, epsilonaspect: 3.8459254E-13 5.6885628E-38
--------------------------------------------
elements with aspect ratio < .01: 0
elements with aspect ratio b/w .01 and .02: 0
elements with aspect ratio b/w .02 and .05: 0
elements with aspect ratio b/w .05 and .1 : 1
elements with aspect ratio b/w .1 and .2 : 13
elements with aspect ratio b/w .2 and .5 : 100
elements with aspect ratio b/w .5 and 1. : 270
min aspect ratio = 0.9087E-01 max aspect ratio = 0.7321E+00
-----------------------------------------------------------
384 total elements evaluated.
quality/volume
epsilonvol: 2.2204460E-13
---------------------------------------
All elements have volume 2.6041667E-03
-----------------------------------------------------------
384 total elements evaluated.
quality/angle/gt/90.
------------------------------------------
elements with angles > 90.000: 207
tets with angles > 90.000: 207
min angle = 10.025 max angle = 162.285
-----------------------------------------------------------
384 total elements evaluated.
quality/taylor/boron/1.e-1/
Max abs Taylor error = .0000000000000E+00
cmo/addatt//quality_taylor_len/INT/scalar/scalar/constant//x/0
finish
------------------------------------------
Num edges with Taylor error exceeding abs( 0.1000000): 0
-------------------------------------------
cmo/delatt//quality_taylor_len
finish
-----------------------------------------------------------
384 total elements evaluated.
* end compare refine 1
recon
RECON3D reconnection loop: 1
recon2: MFLIP NEWLEN FOR iremov with: 4
niters: 0
n22: 0
n32: 0
n23: 0
n23i: 0
n32i: 0
n32x: 0
n44: 0
n44i: 0
n20r: 0
n20b: 0
n10: 0
recon2 - 384 52 0 0 0# 0.000E+00
recon2: ntets= 384 nface= 52 nflips= 0
niter= 0 negvol= 0 nbface= 48
recon2 set new node and element total: 175 384
RECON: done.
* begin compare recon
quality/aspect
epsilonl, epsilonaspect: 3.8459254E-13 5.6885628E-38
--------------------------------------------
elements with aspect ratio < .01: 0
elements with aspect ratio b/w .01 and .02: 0
elements with aspect ratio b/w .02 and .05: 0
elements with aspect ratio b/w .05 and .1 : 1
elements with aspect ratio b/w .1 and .2 : 13
elements with aspect ratio b/w .2 and .5 : 100
elements with aspect ratio b/w .5 and 1. : 270
min aspect ratio = 0.9087E-01 max aspect ratio = 0.7321E+00
-----------------------------------------------------------
384 total elements evaluated.
quality/volume
epsilonvol: 2.2204460E-13
---------------------------------------
All elements have volume 2.6041667E-03
-----------------------------------------------------------
384 total elements evaluated.
quality/angle/gt/90.
------------------------------------------
elements with angles > 90.000: 207
tets with angles > 90.000: 207
min angle = 10.025 max angle = 162.285
-----------------------------------------------------------
384 total elements evaluated.
quality/taylor/boron/1.e-1/
Max abs Taylor error = .0000000000000E+00
cmo/addatt//quality_taylor_len/INT/scalar/scalar/constant//x/0
finish
------------------------------------------
Num edges with Taylor error exceeding abs( 0.1000000): 0
-------------------------------------------
cmo/delatt//quality_taylor_len
finish
-----------------------------------------------------------
384 total elements evaluated.
* end compare recon
recon
RECON3D reconnection loop: 1
recon2: MFLIP NEWLEN FOR iremov with: 4
niters: 0
n22: 0
n32: 0
n23: 0
n23i: 0
n32i: 0
n32x: 0
n44: 0
n44i: 0
n20r: 0
n20b: 0
n10: 0
recon2 - 384 52 0 0 0# 0.000E+00
recon2: ntets= 384 nface= 52 nflips= 0
niter= 0 negvol= 0 nbface= 48
recon2 set new node and element total: 175 384
RECON: done.
* begin compare recon 2
quality/aspect/y
cmo/addatt//aratio/VDOUBLE/scalar/nelements
finish
epsilonl, epsilonaspect: 3.8459254E-13 5.6885628E-38
--------------------------------------------
elements with aspect ratio < .01: 0
elements with aspect ratio b/w .01 and .02: 0
elements with aspect ratio b/w .02 and .05: 0
elements with aspect ratio b/w .05 and .1 : 1
elements with aspect ratio b/w .1 and .2 : 13
elements with aspect ratio b/w .2 and .5 : 100
elements with aspect ratio b/w .5 and 1. : 270
min aspect ratio = 0.9087E-01 max aspect ratio = 0.7321E+00
-----------------------------------------------------------
384 total elements evaluated.
quality/volume
epsilonvol: 2.2204460E-13
---------------------------------------
All elements have volume 2.6041667E-03
-----------------------------------------------------------
384 total elements evaluated.
quality/angle/gt/90.
------------------------------------------
elements with angles > 90.000: 207
tets with angles > 90.000: 207
min angle = 10.025 max angle = 162.285
-----------------------------------------------------------
384 total elements evaluated.
quality/taylor/boron/1.e-1/
Max abs Taylor error = .0000000000000E+00
cmo/addatt//quality_taylor_len/INT/scalar/scalar/constant//x/0
finish
------------------------------------------
Num edges with Taylor error exceeding abs( 0.1000000): 0
-------------------------------------------
cmo/delatt//quality_taylor_len
finish
-----------------------------------------------------------
384 total elements evaluated.
quality/volume/material
QUALITY TOTALS for 2 MATERIALS:
...........................................................
eltset/-etmp-/itetclr/eq/1/
THE ELTSET -etmp- HAS 192 ELEMENTS
1 2 3 4 6 7 9 10
11 12 13 16 17 18 19 22
24 26 29 31 33 34 41 43
49 50 51 52 53 54 55 56
63 64 66 67 68 69 70 71
72 73 74 88 89 90 93 94
95 96 97 98 99 101 102 103
104 105 106 107 108 109 110 111
126 127 128 131 132 134 135 146
147 148 149 150 151 152 153 154
155 156 157 158 159 160 171 177
178 180 181 182 183 184 185 186
187 188 189 190 191 192 193 194
195 196 197 198 199 200 201 202
203 204 205 206 207 208 212 213
225 226 236 239 240 243 244 245
246 247 248 249 251 252 253 254
255 256 257 258 261 262 266 269
270 271 272 281 282 283 284 285
286 287 306 307 310 311 321 322
323 324 325 326 327 328 329 330
333 334 339 340 346 347 348 349
353 354 355 356 362 363 364 369
374 375 376 377 378 379 382 384
finish
epsilonvol: 2.2204460E-13
---------------------------------------
VOLUMES for ELEMENT COLOR 1
...........................
All elements have volume 2.6041667E-03
eltset/-etmp-/delete/
ELTSET -etmp- DELETED
finish
eltset/-etmp-/itetclr/eq/2/
THE ELTSET -etmp- HAS 192 ELEMENTS
5 8 14 15 20 21 23 25
27 28 30 32 35 36 37 38
39 40 42 44 45 46 47 48
57 58 59 60 61 62 65 75
76 77 78 79 80 81 82 83
84 85 86 87 91 92 100 112
113 114 115 116 117 118 119 120
121 122 123 124 125 129 130 133
136 137 138 139 140 141 142 143
144 145 161 162 163 164 165 166
167 168 169 170 172 173 174 175
176 179 209 210 211 214 215 216
217 218 219 220 221 222 223 224
227 228 229 230 231 232 233 234
235 237 238 241 242 250 259 260
263 264 265 267 268 273 274 275
276 277 278 279 280 288 289 290
291 292 293 294 295 296 297 298
299 300 301 302 303 304 305 308
309 312 313 314 315 316 317 318
319 320 331 332 335 336 337 338
341 342 343 344 345 350 351 352
357 358 359 360 361 365 366 367
368 370 371 372 373 380 381 383
finish
---------------------------------------
VOLUMES for ELEMENT COLOR 2
...........................
All elements have volume 2.6041667E-03
eltset/-etmp-/delete/
ELTSET -etmp- DELETED
finish
---------------------------------------
SUMMARY VOLUME/AREA of ELEMENT COLORS for 3dmesh 1 2
...........................................................
Color Num. Elements Volume Fractional Volume
1 192 0.5000000E+00 0.500000000
2 192 0.5000000E+00 0.500000000
Total elements: 384 Total Volume: 0.1000000E+01
-----------------------------------------------------------
384 total elements evaluated.
cmo/status
The current-mesh-object(CMO) is: 3dmesh
1 Mesh Object name: 3dmesh
number of nodes = 175 number of elements = 384
dimensions geometry = 3 element type = tet
dimensions topology = 3 4 nodes 4 faces 6 edges
boundary flag = 16000000 status = active
NAME TYPE RANK LENGTH INTER PERSI IO VALUE
1 -def- VDOU scalar nnodes linea tempo agl 0.000E+00
2 scalar INT scalar scalar const perma l 1.000E+00
3 vector INT scalar scalar const perma l 3.000E+00
4 nnodes INT scalar scalar const perma l 1.750E+02
5 nedges INT scalar scalar const perma l 0.000E+00
6 nfaces INT scalar scalar const perma l 0.000E+00
7 nelements INT scalar scalar const perma l 3.840E+02
8 mbndry INT scalar scalar const perma l 1.600E+07
9 ndimensions_top INT scalar scalar const perma l 3.000E+00
10 ndimensions_geo INT scalar scalar const perma l 3.000E+00
11 nodes_per_eleme INT scalar scalar const perma l 4.000E+00
12 edges_per_eleme INT scalar scalar const perma l 6.000E+00
13 faces_per_eleme INT scalar scalar const perma l 4.000E+00
14 isetwd VDOU scalar nnodes or perma l 0.000E+00
15 ialias VINT scalar nnodes seque perma l 0.000E+00
16 imt1 VINT scalar nnodes max perma gal 0.000E+00
17 itp1 VINT scalar nnodes min perma gal 0.000E+00
18 icr1 VINT scalar nnodes min perma gal 0.000E+00
19 isn1 VINT scalar nnodes user perma gal 0.000E+00
20 xic VDOU scalar nnodes linea perma l 0.000E+00
21 yic VDOU scalar nnodes linea perma l 0.000E+00
22 zic VDOU scalar nnodes linea perma l 0.000E+00
23 xtetwd VDOU scalar nelements or perma l 0.000E+00
24 itetclr VINT scalar nelements user perma l 0.000E+00
25 itettyp VINT scalar nelements user perma l 0.000E+00
26 itetoff VINT scalar nelements user perma l 0.000E+00
27 jtetoff VINT scalar nelements user perma l 0.000E+00
28 itet VINT nodes_per_ nelements user perma l 0.000E+00
29 jtet VINT faces_per_ nelements user perma l 0.000E+00
30 ipolydat CHAR scalar scalar const perma l no
31 vor2d CHAR scalar scalar const perma l yes
32 vor3d CHAR scalar scalar const perma l no
33 epsilon REAL scalar scalar const perma l 1.000E-15
34 epsilonl REAL scalar scalar const perma l 3.846E-13
35 epsilona REAL scalar scalar const perma l 6.661E-13
36 epsilonv REAL scalar scalar const perma l 2.220E-13
37 ipointi INT scalar scalar const perma l 1.760E+02
38 ipointj INT scalar scalar const perma l 1.750E+02
39 idebug INT scalar scalar const perma l 2.000E+00
40 itypconv_sm INT scalar scalar const perma l 1.000E+00
41 maxiter_sm INT scalar scalar const perma l 2.500E+01
42 tolconv_sm REAL scalar scalar const perma l 1.000E+00
43 nnfreq INT scalar scalar const perma l 1.000E+00
44 ivoronoi INT scalar scalar const perma l 1.000E+00
45 iopt2to2 INT scalar scalar const perma l 2.000E+00
46 dumptype CHAR scalar scalar const perma l binary
47 velname CHAR scalar scalar const perma l vels
48 densname CHAR scalar scalar const perma l ric
49 presname CHAR scalar scalar const perma l pic
50 enername CHAR scalar scalar const perma l eic
51 xmin REAL scalar scalar const perma l 0.000E+00
52 ymin REAL scalar scalar const perma l 0.000E+00
53 zmin REAL scalar scalar const perma l 0.000E+00
54 xmax REAL scalar scalar const perma l 1.000E+00
55 ymax REAL scalar scalar const perma l 1.000E+00
56 zmax REAL scalar scalar const perma l 1.000E+00
57 kdtree_level INT scalar scalar const perma l 0.000E+00
58 max_number_sets INT scalar scalar const perma l 6.400E+01
59 number_of_psets INT scalar scalar const perma l 0.000E+00
60 number_of_eltse INT scalar scalar const perma l 0.000E+00
61 psetnames VCHA scalar max_number_sets const perma l
62 eltsetnames VCHA scalar max_number_sets const perma l
63 geom_name CHAR scalar max_number_sets const perma l -defaultge
64 fsetnames VCHA scalar max_number_sets const perma l
65 number_of_fsets INT scalar scalar const perma l 0.000E+00
66 boron VDOU scalar nnodes linea tempo gx 0.000E+00
67 ncon50 INT scalar scalar const perma l 2.500E+03
68 nconbnd INT scalar scalar const perma l 1.000E+00
69 icontab VINT scalar ncon50 const perma l 0.000E+00
70 aratio VDOU scalar nelements linea tempo agl 0.000E+00
* end compare recon 2
* check sorted array
sort/xyz/bins
sort/-def-/bins/ascending/i_index/xic
cmo/addatt/3dmesh/i_index/vint/scalar/nnodes///gax/0
finish
SORT: order key written to attribute: i_index
finish
sort/-def-/bins/ascending/j_index/yic
cmo/addatt/3dmesh/j_index/vint/scalar/nnodes///gax/0
finish
SORT: order key written to attribute: j_index
finish
sort/-def-/bins/ascending/k_index/zic
cmo/addatt/3dmesh/k_index/vint/scalar/nnodes///gax/0
finish
SORT: order key written to attribute: k_index
finish
* begin compare sort
cmo/printatt/3dmesh/i_index/1,20,1
Attribute: i_index
1 1
2 3
3 5
4 1
5 3
6 5
7 1
8 3
9 5
10 1
11 3
12 5
13 1
14 3
15 5
16 1
17 3
18 5
19 1
20 3
cmo/printatt/3dmesh/j_index/1,20,1
Attribute: j_index
1 1
2 1
3 1
4 3
5 3
6 3
7 5
8 5
9 5
10 1
11 1
12 1
13 3
14 3
15 3
16 5
17 5
18 5
19 1
20 1
* end compare sort
*END
finish
LaGriT successfully completed