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

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,157 @@
# Tutorial LaGriT Introduction
# Step 3. Assign Materials to the Tet Mesh
# Using commands pset, regions, and interpolation
define IN_FILE 02_tet_mesh.inp
define OUT_FILE tet_colors.inp
define IN_FILE 01_hex_mesh.inp
define OUT_FILE hex_colors.inp
# Read the IN_FILE to color materials
read/avs/ IN_FILE / mo_mat
cmo/status/mo_mat/ brief
cmo/select/mo_mat
# -----------------------------------------------------------
# Assign materials by Selected sets
# define some elevations for layers between Z= 0 and 80
define MAT1_Ztop 40.
define MAT2_Ztop 62.
# SELECT NODE SETS based on attribute zic (Z coordinate)
pset/pmat1/attribute zic/1,0,0/ lt MAT1_Ztop
pset/pmat2/attribute zic/1,0,0/ lt MAT2_Ztop
pset/pmat3/attribute zic/1,0,0/ ge MAT2_Ztop
# SET NODE IMT in order such that last overwrites previous
# layer 2 overwrites layer 3, layer 1 overwrites layer 2
cmo/setatt/mo_mat/imt/ pset,get,pmat3 / 3
cmo/setatt/mo_mat/imt/ pset,get,pmat2 / 2
cmo/setatt/mo_mat/imt/ pset,get,pmat1 / 1
# SELECT ELEMENT SETS based on point sets
# Use inclusive for any node of element is in set
eltset/emat1/inclusive/pset,get,pmat1
eltset/emat2/inclusive/pset,get,pmat2
eltset/emat3/inclusive/pset,get,pmat3
# SET ELEMENT ITETCLR in order
cmo/setatt/mo_mat/itetclr/eltset,get,emat3/ 3
cmo/setatt/mo_mat/itetclr/eltset,get,emat2/ 2
cmo/setatt/mo_mat/itetclr/eltset,get,emat1/ 1
# write a temporary file to view colors so far
dump/ tmp_layers.inp / mo_mat
# -----------------------------------------------------------
# Assign materials by Surfaces and Regions
# Create surfaces to define a fourth material
cmo / create / motmp
cmo / select / motmp
# Create a quad mesh based on corner coordinates
# The surface must be equal or larger than the mesh domain
quadxy / 10 5 /-1. -1. 10. /100.1 -1. 100./ &
100.1 51. 100./ -1. 51. 10.
createpts/brick/xyz/ 10 5 1 /1,0,0/connect
hextotet/4/ mosurf1 / motmp
cmo / printatt / mosurf1 / -xyz- / minmax
dump/ tmp_surf1.inp / mosurf1
# Create a second surface offset from first
offsetsurf/ mosurf2 / mosurf1 / 15.
dump/ tmp_surf2.inp / mosurf2
# Define mesh objects as surfaces for geometry
# Make mesh current so geometry is assigned to it
cmo / select / mo_mat
surface / s_mosurf1 / reflect / sheet / mosurf1
surface / s_mosurf2 / reflect / sheet / mosurf2
# Define region between the surfaces
region/ r_slant / ge s_mosurf1 and le s_mosurf2
# Select node and element sets in the slanted region
pset/ pslant / region / r_slant
eltset/ eslant / region / r_slant
# SET element and node materials
cmo/ setatt / mo_mat / imt / pset,get,pslant / 4
cmo/ setatt / mo_mat / itetclr / eltset,get,eslant / 4
# set boundary and interface nodes
resetpts/itp
dump / OUT_FILE / mo_mat
cmo / status / mo_mat / brief
# uncomment Early finish to check results
# finish
# -----------------------------------------------------------
# Assign materials by Interpolation
# This will preserve the stair-step interfaces of materials
# remove unneeded mesh objects
cmo/delete/motmp
cmo/delete/mosurf1
cmo/delete/mosurf2
cmo/list
# Read tet mesh from Step 2
read/avs/ 02_tet_mesh.inp / mo_tet
cmo/select/mo_tet
interpolate/map/mo_tet/ itetclr /1,0,0/ mo_mat itetclr
interpolate/voronoi/mo_tet/ imt /1,0,0/ mo_mat imt
# check interpolated values
cmo/printatt/mo_tet/imt minmax
cmo/printatt/mo_tet/itetclr minmax
# Set boundary nodes and write view file
resetpts/itp
dump/avs/tet_interp_materials.inp mo_tet
# -----------------------------------------------------------
# Report Material Quantities
# Report minmax for node and element materials
cmo/select/mo_tet
cmo/printatt/mo_tet/ imt minmax
cmo/printatt/mo_tet/ itetclr minmax
# Report element volumes by material
quality/ volume / material
# Report node imt quantities
# These are what FEHM will use
dump/zone_imt/ tet / mo_tet
# Report node voronoi volume totals by node material
# First add attribute vorvol, then report sums
cmo addatt/mo_tet/vor_volume/vorvol
pset/p1/attribute/imt/1,0,0/ eq 1
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/ eq 2
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/ eq 3
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/ eq 4
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
finish

View File

@@ -0,0 +1,157 @@
# Tutorial LaGriT Introduction
# Step 3. Assign Materials to the Tet Mesh
# Using commands pset, regions, and interpolation
define IN_FILE 02_tet_mesh.inp
define OUT_FILE tet_colors.inp
define IN_FILE 01_hex_mesh.inp
define OUT_FILE hex_colors.inp
# Read the IN_FILE to color materials
read/avs/ IN_FILE / mo_mat
cmo/status/mo_mat/ brief
cmo/select/mo_mat
# -----------------------------------------------------------
# Assign materials by Selected sets
# define some elevations for layers between Z= 0 and 80
define MAT1_Ztop 40.
define MAT2_Ztop 62.
# SELECT NODE SETS based on attribute zic (Z coordinate)
pset/pmat1/attribute zic/1,0,0/ lt MAT1_Ztop
pset/pmat2/attribute zic/1,0,0/ lt MAT2_Ztop
pset/pmat3/attribute zic/1,0,0/ ge MAT2_Ztop
# SET NODE IMT in order such that last overwrites previous
# layer 2 overwrites layer 3, layer 1 overwrites layer 2
cmo/setatt/mo_mat/imt/ pset,get,pmat3 / 3
cmo/setatt/mo_mat/imt/ pset,get,pmat2 / 2
cmo/setatt/mo_mat/imt/ pset,get,pmat1 / 1
# SELECT ELEMENT SETS based on point sets
# Use inclusive for any node of element is in set
eltset/emat1/inclusive/pset,get,pmat1
eltset/emat2/inclusive/pset,get,pmat2
eltset/emat3/inclusive/pset,get,pmat3
# SET ELEMENT ITETCLR in order
cmo/setatt/mo_mat/itetclr/eltset,get,emat3/ 3
cmo/setatt/mo_mat/itetclr/eltset,get,emat2/ 2
cmo/setatt/mo_mat/itetclr/eltset,get,emat1/ 1
# write a temporary file to view colors so far
dump/ tmp_layers.inp / mo_mat
# -----------------------------------------------------------
# Assign materials by Surfaces and Regions
# Create surfaces to define a fourth material
cmo / create / motmp
cmo / select / motmp
# Create a quad mesh based on corner coordinates
# The surface must be equal or larger than the mesh domain
quadxy / 10 5 /-1. -1. 10. /100.1 -1. 100./ &
100.1 51. 100./ -1. 51. 10.
createpts/brick/xyz/ 10 5 1 /1,0,0/connect
hextotet/4/ mosurf1 / motmp
cmo / printatt / mosurf1 / -xyz- / minmax
dump/ tmp_surf1.inp / mosurf1
# Create a second surface offset from first
offsetsurf/ mosurf2 / mosurf1 / 15.
dump/ tmp_surf2.inp / mosurf2
# Define mesh objects as surfaces for geometry
# Make mesh current so geometry is assigned to it
cmo / select / mo_mat
surface / s_mosurf1 / reflect / sheet / mosurf1
surface / s_mosurf2 / reflect / sheet / mosurf2
# Define region between the surfaces
region/ r_slant / ge s_mosurf1 and le s_mosurf2
# Select node and element sets in the slanted region
pset/ pslant / region / r_slant
eltset/ eslant / region / r_slant
# SET element and node materials
cmo/ setatt / mo_mat / imt / pset,get,pslant / 4
cmo/ setatt / mo_mat / itetclr / eltset,get,eslant / 4
# set boundary and interface nodes
resetpts/itp
dump / OUT_FILE / mo_mat
cmo / status / mo_mat / brief
# uncomment Early finish to check results
# finish
# -----------------------------------------------------------
# Assign materials by Interpolation
# This will preserve the stair-step interfaces of materials
# remove unneeded mesh objects
cmo/delete/motmp
cmo/delete/mosurf1
cmo/delete/mosurf2
cmo/list
# Read tet mesh from Step 2
read/avs/ 02_tet_mesh.inp / mo_tet
cmo/select/mo_tet
interpolate/map/mo_tet/ itetclr /1,0,0/ mo_mat itetclr
interpolate/voronoi/mo_tet/ imt /1,0,0/ mo_mat imt
# check interpolated values
cmo/printatt/mo_tet/imt minmax
cmo/printatt/mo_tet/itetclr minmax
# Set boundary nodes and write view file
resetpts/itp
dump/avs/tet_interp_materials.inp mo_tet
# -----------------------------------------------------------
# Report Material Quantities
# Report minmax for node and element materials
cmo/select/mo_tet
cmo/printatt/mo_tet/ imt minmax
cmo/printatt/mo_tet/ itetclr minmax
# Report element volumes by material
quality/ volume / material
# Report node imt quantities
# These are what FEHM will use
dump/zone_imt/ tet / mo_tet
# Report node voronoi volume totals by node material
# First add attribute vorvol, then report sums
cmo addatt/mo_tet/vor_volume/vorvol
pset/p1/attribute/imt/1,0,0/ eq 1
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/ eq 2
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/ eq 3
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/ eq 4
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
finish

View File

@@ -0,0 +1,583 @@
* * * * * * * * * * * * * * * * * * * * * * * * *
* * *
* * Program: LaGriT V3.3.4 Linux *
* * Compiler Name: GNU *
* * Compiler Version: 9.4.0 *
* * Date Compile: 2024/05/06 *
* * Run Time: 2025/Jan 28 17:40:45 *
* * Manual: https://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: lagrit.out
Command log file: lagrit.log
# LaGriT Tutorial Example 3
# Assign materials based on methods pset, regions, and interpolation
define IN_FILE 02_tet_mesh.inp
define OUT_FILE tet_colors.inp
define IN_FILE 01_hex_mesh.inp
define OUT_FILE hex_colors.inp
# Read the IN_FILE to color materials
read/avs/IN_FILE/mo_mat
geniee
finish
cmo/status/brief
The current-mesh-object(CMO) is: mo_mat
1 Mesh Object name: mo_mat
number of nodes = 1122 number of elements = 800
dimensions geometry = 3 element type = hex
dimensions topology = 3 8 nodes 6 faces 12 edges
boundary flag = 16000000 status = active
finish
cmo/status/mo_mat/brief
The current-mesh-object(CMO) is: mo_mat
1 Mesh Object name: mo_mat
number of nodes = 1122 number of elements = 800
dimensions geometry = 3 element type = hex
dimensions topology = 3 8 nodes 6 faces 12 edges
boundary flag = 16000000 status = active
cmo/select/mo_mat
# -----------------------------------------------------------
# Assign materials by Selected sets
# define some elevations for layers between Z= 0 and 80
define MAT1_Ztop 40.
define MAT2_Ztop 62.
# SELECT NODE SETS based on attribute zic (Z coordinate)
pset/pmat1/attribute zic/1,0,0/lt MAT1_Ztop
THE PSET pmat1 HAS 528 POINTS
pset/pmat2/attribute zic/1,0,0/lt MAT2_Ztop
THE PSET pmat2 HAS 858 POINTS
pset/pmat3/attribute zic/1,0,0/ge MAT2_Ztop
THE PSET pmat3 HAS 264 POINTS
# SET NODE IMT in order such that last overwrites previous
# layer 2 overwrites layer 3, layer 1 overwrites layer 2
cmo/setatt/mo_mat/imt/pset,get,pmat3/3
264 values reset for attribute imt1
cmo/setatt/mo_mat/imt/pset,get,pmat2/2
858 values reset for attribute imt1
cmo/setatt/mo_mat/imt/pset,get,pmat1/1
528 values reset for attribute imt1
# SELECT ELEMENT SETS based on point sets
# Use inclusive for any node of element is in set
eltset/emat1/inclusive/pset,get,pmat1
THE ELTSET emat1 HAS 400 ELEMENTS
eltset/emat2/inclusive/pset,get,pmat2
THE ELTSET emat2 HAS 650 ELEMENTS
eltset/emat3/inclusive/pset,get,pmat3
THE ELTSET emat3 HAS 200 ELEMENTS
# SET ELEMENT ITETCLR in order
cmo/setatt/mo_mat/itetclr/eltset,get,emat3/3
200 values reset for attribute itetclr
cmo/setatt/mo_mat/itetclr/eltset,get,emat2/2
650 values reset for attribute itetclr
cmo/setatt/mo_mat/itetclr/eltset,get,emat1/1
400 values reset for attribute itetclr
# write a temporary file to view colors so far
dump/tmp_layers.inp/mo_mat
dump/avs/tmp_layers.inp/mo_mat
cmo/modatt/-def-/-def-/ioflag/x
finish
finish
# -----------------------------------------------------------
# Assign materials by Surfaces and Regions
# Create surfaces to define a fourth material
cmo/create/motmp
cmo/select/motmp
# Create a quad mesh based on corner coordinates
# The surface must be equal or larger than the mesh domain
quadxy/10 5/-1. -1. 10./100.1 -1. 100./100.1 51. 100./-1. 51. 10.
QUADXY GENERATED POINTS 1 TO 50
createpts/brick/xyz/10 5 1/1,0,0/connect
Number of nodes: 50
Number of elements: 36
Number of negative volume elements: 0
Total volume: 0.703850494352E+04
hextotet/4/mosurf1/motmp
iremove_vol= 0 iremove_dup= 0 icheckpt= 1
Input Mesh type qua using option 4
Element Material ID, min/max/range: 1 1 0
Epsilon-dist, distmax, distmin: -1.5039540E-05 2.2618778E+02 1.6900000E+02
Epsilon-volume, volmax: 1.9551403E-04 1.9551403E+02
cmo/addatt/mosurf1/iign/vint/scalar/nnodes/-def-/-def-/gx/-def-
finish
WARNING: Volumes le zero not removed, nelements= 144
No duplicate points
WARNING: Duplicate points not removed, nnodes = 86
cmo/printatt/mosurf1/-xyz-/minmax
ATTRIBUTE NAME MIN MAX DIFFERENCE LENGTH
xic -1.000000000E+00 1.001000000E+02 1.011000000E+02 86
yic -1.000000000E+00 5.100000000E+01 5.200000000E+01 86
zic 1.000000000E+01 1.000000000E+02 9.000000000E+01 86
dump/tmp_surf1.inp/mosurf1
dump/avs/tmp_surf1.inp/mosurf1
cmo/modatt/-def-/-def-/ioflag/x
finish
finish
# Create a second surface offset from first
offsetsurf/mosurf2/mosurf1/15.
dump/tmp_surf2.inp/mosurf2
dump/avs/tmp_surf2.inp/mosurf2
cmo/modatt/-def-/-def-/ioflag/x
finish
finish
# Define mesh objects as surfaces for geometry
# Make mesh current so geometry is assigned to it
cmo/select/mo_mat
surface/s_mosurf1/reflect/sheet/mosurf1
cmo/addatt//v2/INT/scalar/scalar/constant/permanent//2.0
finish
cmo/addatt//linkt/VINT/v2/nelements//permanent/x/0.0
finish
cmo/addatt//v12/INT/scalar/scalar/constant/permanent//12.0
finish
cmo/addatt//sbox/VDOUBLE/v12/nelements/linear/permanent/x/0.0
finish
log/tty/off
finish
cmo/DELATT/s_mosurf1 isetwd
finish
cmo/DELATT/s_mosurf1 ialias
finish
cmo/DELATT/s_mosurf1 imt1
finish
cmo/DELATT/s_mosurf1 itp1
finish
cmo/DELATT/s_mosurf1 icr1
finish
cmo/DELATT/s_mosurf1 isn1
finish
cmo/DELATT/s_mosurf1 xtetwd
finish
cmo/DELATT/s_mosurf1 itetclr
finish
log/tty/on
finish
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/s_mosurf2/reflect/sheet/mosurf2
cmo/addatt//v2/INT/scalar/scalar/constant/permanent//2.0
finish
cmo/addatt//linkt/VINT/v2/nelements//permanent/x/0.0
finish
cmo/addatt//v12/INT/scalar/scalar/constant/permanent//12.0
finish
cmo/addatt//sbox/VDOUBLE/v12/nelements/linear/permanent/x/0.0
finish
log/tty/off
finish
cmo/DELATT/s_mosurf2 isetwd
finish
cmo/DELATT/s_mosurf2 ialias
finish
cmo/DELATT/s_mosurf2 imt1
finish
cmo/DELATT/s_mosurf2 itp1
finish
cmo/DELATT/s_mosurf2 icr1
finish
cmo/DELATT/s_mosurf2 isn1
finish
cmo/DELATT/s_mosurf2 xtetwd
finish
cmo/DELATT/s_mosurf2 itetclr
finish
log/tty/on
finish
# Define region between the surfaces
region/r_slant/ge s_mosurf1 and le s_mosurf2
# Select node and element sets in the slanted region
pset/pslant/region/r_slant
THE PSET pslant HAS 180 POINTS
eltset/eslant/region/r_slant
THE ELTSET eslant HAS 130 ELEMENTS
# SET element and node materials
cmo/setatt/mo_mat/imt/pset,get,pslant/4
180 values reset for attribute imt1
cmo/setatt/mo_mat/itetclr/eltset,get,eslant/4
130 values reset for attribute itetclr
# set boundary and interface nodes
resetpts/itp
geniee
finish
dump/OUT_FILE/mo_mat
dump/avs/hex_colors.inp/mo_mat
cmo/modatt/-def-/-def-/ioflag/x
finish
finish
cmo/status/mo_mat/brief
The current-mesh-object(CMO) is: mo_mat
1 Mesh Object name: mo_mat
number of nodes = 1122 number of elements = 800
dimensions geometry = 3 element type = hex
dimensions topology = 3 8 nodes 6 faces 12 edges
boundary flag = 16000000 status = active
# uncomment Early finish to check results
# finish
# -----------------------------------------------------------
# Assign materials by Interpolation
# This will preserve the stair-step interfaces of materials
# remove unneeded mesh objects
cmo/delete/motmp
Released Mesh Object: motmp
cmo/delete/mosurf1
Released Mesh Object: mosurf1
cmo/delete/mosurf2
Released Mesh Object: mosurf2
cmo/list
The current-mesh-object(CMO) is: mo_mat
0 Mesh Object name: -default-
1 Mesh Object name: mo_mat
2 Mesh Object name: s_mosurf1
3 Mesh Object name: s_mosurf2
# Read tet mesh from Step 2
read/avs/02_tet_mesh.inp/mo_tet
geniee
finish
cmo/status/brief
The current-mesh-object(CMO) is: mo_tet
1 Mesh Object name: mo_mat
number of nodes = 1122 number of elements = 800
dimensions geometry = 3 element type = hex
dimensions topology = 3 8 nodes 6 faces 12 edges
boundary flag = 16000000 status = inactive
2 Mesh Object name: s_mosurf1
number of nodes = 86 number of elements = 144
dimensions geometry = 3 element type = tri
dimensions topology = 2 3 nodes 3 faces 3 edges
boundary flag = 16000000 status = inactive
3 Mesh Object name: s_mosurf2
number of nodes = 86 number of elements = 144
dimensions geometry = 3 element type = tri
dimensions topology = 2 3 nodes 3 faces 3 edges
boundary flag = 16000000 status = inactive
4 Mesh Object name: mo_tet
number of nodes = 1122 number of elements = 4800
dimensions geometry = 3 element type = tet
dimensions topology = 3 4 nodes 4 faces 6 edges
boundary flag = 16000000 status = active
finish
cmo/select/mo_tet
interpolate/map/mo_tet/itetclr/1,0,0/mo_mat itetclr
elements in indexed set = 4800
INTRP METHOD: map FUNCTION: user
TIEBREAKER: maxtie FLAG: plus1 0.500000000000E+01
cmo select mo_mat
finish
cmo kdtree build
cmo/addatt//v2/INT/scalar/scalar/constant/temporary//2.0
finish
cmo/addatt//linkt/VINT/v2/nelements//temporary/x/0.0
finish
cmo/addatt//v12/INT/scalar/scalar/constant/temporary//12.0
finish
cmo/addatt//sbox/VDOUBLE/v12/nelements/linear/temporary/x/0.0
finish
finish
cmo setatt mo_mat idebug/0
1 values reset for attribute idebug
finish
Build kdtree done - assign the enclosing element for each.
Sink point Elems Searched Elements Found Percent Done
1201 1201 1201 25 %
2401 2401 2401 50 %
3601 3601 3601 75 %
4800 4800 4800 100%
Total Source Elements: 800
Total Sink Centroids: 4800
interpolate/map done.
cmo select mo_tet
finish
cmo kdtree release
cmo/DELATT/mo_mat/sbox
finish
cmo/DELATT/mo_mat/v12
finish
cmo/DELATT/mo_mat/linkt
finish
cmo/DELATT/mo_mat/v2
finish
finish
interpolate/voronoi/mo_tet/imt/1,0,0/mo_mat imt
nodes in indexed point set = 1122
INTRP METHOD: voronoi FUNCTION: max
TIEBREAKER: maxtie FLAG: plus1 0.500000000000E+01
Build kdtree0 done - assign nearest node for each.
Sink point Points Searched Points Found Percent Done
282 282 282 25 %
563 563 563 50 %
844 844 844 75 %
1122 1122 1122 100%
Total Source Nodes: 1122
Total Sink Nodes: 1122
interpolate/voronoi done.
cmo select mo_tet
finish
cmo kdtree release
finish
# check interpolated values
cmo/printatt/mo_tet/imt minmax
ATTRIBUTE NAME MIN MAX DIFFERENCE LENGTH
imt1 1 4 3 1122
cmo/printatt/mo_tet/itetclr minmax
ATTRIBUTE NAME MIN MAX DIFFERENCE LENGTH
itetclr 1 4 3 4800
# Set boundary nodes and write view file
resetpts/itp
geniee
finish
dump/avs/tet_interp_materials.inp mo_tet
cmo/modatt/-def-/-def-/ioflag/x
finish
# -----------------------------------------------------------
# Report Material Quantities
# Report minmax for node and element materials
cmo/select/mo_tet
cmo/printatt/mo_tet/imt minmax
ATTRIBUTE NAME MIN MAX DIFFERENCE LENGTH
imt1 1 4 3 1122
cmo/printatt/mo_tet/itetclr minmax
ATTRIBUTE NAME MIN MAX DIFFERENCE LENGTH
itetclr 1 4 3 4800
# Report element volumes by material
quality/volume/material
QUALITY TOTALS for 4 MATERIALS:
...........................................................
eltset/-etmp-/itetclr/eq/1/
THE ELTSET -etmp- HAS 2160 ELEMENTS
finish
epsilonvol: 8.8817842E-08
---------------------------------------
VOLUMES for ELEMENT COLOR 1
...........................
All elements have volume 8.3333333E+01
eltset/-etmp-/delete/
ELTSET -etmp- DELETED
finish
eltset/-etmp-/itetclr/eq/2/
THE ELTSET -etmp- HAS 1140 ELEMENTS
finish
---------------------------------------
VOLUMES for ELEMENT COLOR 2
...........................
All elements have volume 8.3333333E+01
eltset/-etmp-/delete/
ELTSET -etmp- DELETED
finish
eltset/-etmp-/itetclr/eq/3/
THE ELTSET -etmp- HAS 720 ELEMENTS
finish
---------------------------------------
VOLUMES for ELEMENT COLOR 3
...........................
All elements have volume 8.3333333E+01
eltset/-etmp-/delete/
ELTSET -etmp- DELETED
finish
eltset/-etmp-/itetclr/eq/4/
THE ELTSET -etmp- HAS 780 ELEMENTS
finish
---------------------------------------
VOLUMES for ELEMENT COLOR 4
...........................
All elements have volume 8.3333333E+01
eltset/-etmp-/delete/
ELTSET -etmp- DELETED
finish
---------------------------------------
SUMMARY VOLUME/AREA of ELEMENT COLORS for mo_tet 1 4
...........................................................
Color Num. Elements Volume Fractional Volume
1 2160 0.1800000E+06 0.450000000
2 1140 0.9500000E+05 0.237500000
3 720 0.6000000E+05 0.150000000
4 780 0.6500000E+05 0.162500000
Total elements: 4800 Total Volume: 0.4000000E+06
-----------------------------------------------------------
4800 total elements evaluated.
# Report node imt quantities
# These are what FEHM will use
dump/zone_imt/tet/mo_tet
*********dump_material_lists********
Minimum material ID value = 1
Maximum material ID value = 4
Total possible materials = 4
Material 1 has 468 nodes. #nodes/nnodes is 0.417112290859
Material 2 has 270 nodes. #nodes/nnodes is 0.240641713142
Material 3 has 204 nodes. #nodes/nnodes is 0.181818187237
Material 4 has 180 nodes. #nodes/nnodes is 0.160427808762
# Report node voronoi volume totals by node material
# First add attribute vorvol, then report sums
cmo addatt/mo_tet/vor_volume/vorvol
ADDATT/voronoi_volume: creating new attribute: vorvol
AMatbld3d_stor: Matrix compress_eps: 0.1000000E-07
AMatbld3d_stor: Local epsilon: 0.1000000E-14
AMatbld3d_stor: *****Zero Negative Coefficients ******
AMatbld3d_stor: Number of 'zero' (< compress_eps) coefs 0
AMatbld3d_stor: npoints = 1122 ncoefs = 7144
AMatbld3d_stor: Number of unique coefs = 4133
AMatbld3d_stor: Maximum num. connections to a node = 7
AMatbld3d_stor: Volume min = 6.2500000E+01
AMatbld3d_stor: Volume max = 5.0000000E+02
AMatbld3d_stor: Total Volume: 4.0000000E+05
AMatbld3d_stor: abs(Aij/xij) min = 0.0000000E+00
AMatbld3d_stor: abs(Aij/xij) max = 2.0000000E+01
AMatbld3d_stor: (Aij/xij) max = 0.0000000E+00
AMatbld3d_stor: (Aij/xij) min = -2.0000000E+01
AMatbld3d_stor Matrix coefficient values stored as scalar area/distance
AMatbld3d_stor Matrix compression used for graph, not coefficient values
mo_tet attribute with voronoi volumes created with name vorvol
*** SPARSE COEFFICIENT MATRIX _gstor SUCCESSFUL ***
3D Matrix Coefficient file written with name -notset-
pset/p1/attribute/imt/1,0,0/eq 1
THE PSET p1 HAS 468 POINTS
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
nodes in indexed point set = 468
sink attribute being created: cmo = mo_tet att = vol_tot
cmo/addatt/mo_tet/vol_tot/REAL/scalar/scalar/constant/permanent/
finish
468 values summed from attribute vorvol
vorvol sum = 0.167500000000E+06
cmo select mo_tet
finish
pset/p1/attribute/imt/1,0,0/eq 2
THE PSET p1 HAS 270 POINTS
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
nodes in indexed point set = 270
270 values summed from attribute vorvol
vorvol sum = 0.100000000000E+06
cmo select mo_tet
finish
pset/p1/attribute/imt/1,0,0/eq 3
THE PSET p1 HAS 204 POINTS
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
nodes in indexed point set = 204
204 values summed from attribute vorvol
vorvol sum = 0.650000000000E+05
cmo select mo_tet
finish
pset/p1/attribute/imt/1,0,0/eq 4
THE PSET p1 HAS 180 POINTS
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
nodes in indexed point set = 180
180 values summed from attribute vorvol
vorvol sum = 0.675000000000E+05
cmo select mo_tet
finish
finish
LaGriT successfully completed

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,69 @@
define IN_FILE 02_tet_mesh.inp
define OUT_FILE tet_colors.inp
define IN_FILE 01_hex_mesh.inp
define OUT_FILE hex_colors.inp
read/avs/IN_FILE/mo_mat
cmo/status/mo_mat/brief
cmo/select/mo_mat
define MAT1_Ztop 40.
define MAT2_Ztop 62.
pset/pmat1/attribute zic/1,0,0/lt MAT1_Ztop
pset/pmat2/attribute zic/1,0,0/lt MAT2_Ztop
pset/pmat3/attribute zic/1,0,0/ge MAT2_Ztop
cmo/setatt/mo_mat/imt/pset,get,pmat3/3
cmo/setatt/mo_mat/imt/pset,get,pmat2/2
cmo/setatt/mo_mat/imt/pset,get,pmat1/1
eltset/emat1/inclusive/pset,get,pmat1
eltset/emat2/inclusive/pset,get,pmat2
eltset/emat3/inclusive/pset,get,pmat3
cmo/setatt/mo_mat/itetclr/eltset,get,emat3/3
cmo/setatt/mo_mat/itetclr/eltset,get,emat2/2
cmo/setatt/mo_mat/itetclr/eltset,get,emat1/1
dump/tmp_layers.inp/mo_mat
cmo/create/motmp
cmo/select/motmp
quadxy/10 5/-1. -1. 10./100.1 -1. 100./100.1 51. 100./-1. 51. 10.
createpts/brick/xyz/10 5 1/1,0,0/connect
hextotet/4/mosurf1/motmp
cmo/printatt/mosurf1/-xyz-/minmax
dump/tmp_surf1.inp/mosurf1
offsetsurf/mosurf2/mosurf1/15.
dump/tmp_surf2.inp/mosurf2
cmo/select/mo_mat
surface/s_mosurf1/reflect/sheet/mosurf1
surface/s_mosurf2/reflect/sheet/mosurf2
region/r_slant/ge s_mosurf1 and le s_mosurf2
pset/pslant/region/r_slant
eltset/eslant/region/r_slant
cmo/setatt/mo_mat/imt/pset,get,pslant/4
cmo/setatt/mo_mat/itetclr/eltset,get,eslant/4
resetpts/itp
dump/OUT_FILE/mo_mat
cmo/status/mo_mat/brief
cmo/delete/motmp
cmo/delete/mosurf1
cmo/delete/mosurf2
cmo/list
read/avs/02_tet_mesh.inp/mo_tet
cmo/select/mo_tet
interpolate/map/mo_tet/itetclr/1,0,0/mo_mat itetclr
interpolate/voronoi/mo_tet/imt/1,0,0/mo_mat imt
cmo/printatt/mo_tet/imt minmax
cmo/printatt/mo_tet/itetclr minmax
resetpts/itp
dump/avs/tet_interp_materials.inp mo_tet
cmo/select/mo_tet
cmo/printatt/mo_tet/imt minmax
cmo/printatt/mo_tet/itetclr minmax
quality/volume/material
dump/zone_imt/tet/mo_tet
cmo addatt/mo_tet/vor_volume/vorvol
pset/p1/attribute/imt/1,0,0/eq 1
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/eq 2
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/eq 3
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
pset/p1/attribute/imt/1,0,0/eq 4
math/sum/mo_tet/vol_tot/pset,get,p1/mo_tet/vorvol
finish

Binary file not shown.

After

Width:  |  Height:  |  Size: 2.0 MiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 476 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 650 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 542 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 489 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 743 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 750 KiB

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,128 @@
zone
00001
nnum
468
1 2 3 4 5 6 7 8 9 10
11 12 13 14 15 16 17 18 19 20
21 22 23 24 25 26 27 28 29 30
31 32 33 34 35 36 37 38 39 40
41 42 43 44 45 46 47 48 49 50
51 52 53 54 55 56 57 58 59 60
61 62 63 64 65 66 67 68 69 70
71 72 73 74 75 76 77 78 79 80
81 82 83 84 85 86 87 88 89 90
91 92 93 94 95 96 97 98 99 100
101 102 103 104 105 106 107 108 109 110
111 112 113 114 115 116 117 118 119 120
121 122 123 124 125 126 127 128 129 130
131 132 133 134 135 136 137 138 139 140
141 142 143 144 145 146 147 148 149 150
151 152 153 154 155 156 157 158 159 160
161 162 163 164 165 166 167 168 169 170
171 172 173 174 175 176 177 178 179 180
181 182 183 184 185 186 187 188 189 190
191 192 193 194 195 196 197 198 200 201
202 203 204 205 206 207 208 209 211 212
213 214 215 216 217 218 219 220 222 223
224 225 226 227 228 229 230 231 233 234
235 236 237 238 239 240 241 242 244 245
246 247 248 249 250 251 252 253 255 256
257 258 259 260 261 262 263 264 267 268
269 270 271 272 273 274 275 278 279 280
281 282 283 284 285 286 289 290 291 292
293 294 295 296 297 300 301 302 303 304
305 306 307 308 311 312 313 314 315 316
317 318 319 322 323 324 325 326 327 328
329 330 333 334 335 336 337 338 339 340
341 344 345 346 347 348 349 350 351 352
355 356 357 358 359 360 361 362 363 366
367 368 369 370 371 372 373 374 377 378
379 380 381 382 383 384 385 388 389 390
391 392 393 394 395 396 400 401 402 403
404 405 406 407 411 412 413 414 415 416
417 418 422 423 424 425 426 427 428 429
433 434 435 436 437 438 439 440 444 445
446 447 448 449 450 451 455 456 457 458
459 460 461 462 463 466 467 468 469 470
471 472 473 474 477 478 479 480 481 482
483 484 485 488 489 490 491 492 493 494
495 496 499 500 501 502 503 504 505 506
507 510 511 512 513 514 515 516 517 518
521 522 523 524 525 526 527 528
00002
nnum
270
529 530 533 534 535 536 537 538 539 540
541 544 545 546 547 548 549 550 551 552
555 556 557 558 559 560 561 562 563 566
567 568 569 570 571 572 573 574 577 578
579 580 581 582 583 584 585 588 589 590
591 592 593 594 595 596 599 600 601 602
603 604 605 606 607 610 611 612 613 614
615 616 617 618 621 622 623 624 625 626
627 628 629 632 633 634 635 636 637 638
639 640 643 644 645 646 647 648 649 650
651 654 655 656 657 658 659 660 661 662
663 666 667 668 669 670 671 672 673 674
677 678 679 680 681 682 683 684 685 688
689 690 691 692 693 694 695 696 699 700
701 702 703 704 705 706 707 710 711 712
713 714 715 716 717 718 721 722 723 724
725 726 727 728 729 732 733 734 735 736
737 738 739 740 743 744 745 746 747 748
749 750 751 754 755 756 757 758 759 760
761 762 765 766 767 768 769 770 771 772
773 776 777 778 779 780 781 782 783 784
787 788 789 790 791 792 793 794 795 796
799 800 801 802 803 804 805 806 807 810
811 812 813 814 815 816 817 818 821 822
823 824 825 826 827 828 829 832 833 834
835 836 837 838 839 840 843 844 845 846
847 848 849 850 851 854 855 856 857 858
00003
nnum
204
859 860 861 862 866 867 868 869 870 871
872 873 877 878 879 880 881 882 883 884
888 889 890 891 892 893 894 895 899 900
901 902 903 904 905 906 910 911 912 913
914 915 916 917 921 922 923 924 925 926
927 928 929 932 933 934 935 936 937 938
939 940 943 944 945 946 947 948 949 950
951 954 955 956 957 958 959 960 961 962
965 966 967 968 969 970 971 972 973 976
977 978 979 980 981 982 983 984 987 988
989 990 991 992 993 994 995 999 1000 1001
1002 1003 1004 1005 1006 1010 1011 1012 1013 1014
1015 1016 1017 1021 1022 1023 1024 1025 1026 1027
1028 1032 1033 1034 1035 1036 1037 1038 1039 1043
1044 1045 1046 1047 1048 1049 1050 1054 1055 1056
1057 1058 1059 1060 1061 1062 1065 1066 1067 1068
1069 1070 1071 1072 1073 1076 1077 1078 1079 1080
1081 1082 1083 1084 1087 1088 1089 1090 1091 1092
1093 1094 1095 1098 1099 1100 1101 1102 1103 1104
1105 1106 1109 1110 1111 1112 1113 1114 1115 1116
1117 1120 1121 1122
00004
nnum
180
199 210 221 232 243 254 265 266 276 277
287 288 298 299 309 310 320 321 331 332
342 343 353 354 364 365 375 376 386 387
397 398 399 408 409 410 419 420 421 430
431 432 441 442 443 452 453 454 464 465
475 476 486 487 497 498 508 509 519 520
531 532 542 543 553 554 564 565 575 576
586 587 597 598 608 609 619 620 630 631
641 642 652 653 664 665 675 676 686 687
697 698 708 709 719 720 730 731 741 742
752 753 763 764 774 775 785 786 797 798
808 809 819 820 830 831 841 842 852 853
863 864 865 874 875 876 885 886 887 896
897 898 907 908 909 918 919 920 930 931
941 942 952 953 963 964 974 975 985 986
996 997 998 1007 1008 1009 1018 1019 1020 1029
1030 1031 1040 1041 1042 1051 1052 1053 1063 1064
1074 1075 1085 1086 1096 1097 1107 1108 1118 1119
stop

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,322 @@
86 144 4 0 0
001 -1.000000000000E+00 -1.000000000000E+00 1.000000000000E+01
002 1.023333333333E+01 -1.000000000000E+00 2.000000000000E+01
003 2.146666666667E+01 -1.000000000000E+00 3.000000000000E+01
004 3.270000000000E+01 -1.000000000000E+00 4.000000000000E+01
005 4.393333333333E+01 -1.000000000000E+00 5.000000000000E+01
006 5.516666666667E+01 -1.000000000000E+00 6.000000000000E+01
007 6.640000000000E+01 -1.000000000000E+00 7.000000000000E+01
008 7.763333333333E+01 -1.000000000000E+00 8.000000000000E+01
009 8.886666666667E+01 -1.000000000000E+00 9.000000000000E+01
010 1.001000000000E+02 -1.000000000000E+00 1.000000000000E+02
011 -1.000000000000E+00 1.200000000000E+01 1.000000000000E+01
012 1.023333333333E+01 1.200000000000E+01 2.000000000000E+01
013 2.146666666667E+01 1.200000000000E+01 3.000000000000E+01
014 3.270000000000E+01 1.200000000000E+01 4.000000000000E+01
015 4.393333333333E+01 1.200000000000E+01 5.000000000000E+01
016 5.516666666667E+01 1.200000000000E+01 6.000000000000E+01
017 6.640000000000E+01 1.200000000000E+01 7.000000000000E+01
018 7.763333333333E+01 1.200000000000E+01 8.000000000000E+01
019 8.886666666667E+01 1.200000000000E+01 9.000000000000E+01
020 1.001000000000E+02 1.200000000000E+01 1.000000000000E+02
021 -1.000000000000E+00 2.500000000000E+01 1.000000000000E+01
022 1.023333333333E+01 2.500000000000E+01 2.000000000000E+01
023 2.146666666667E+01 2.500000000000E+01 3.000000000000E+01
024 3.270000000000E+01 2.500000000000E+01 4.000000000000E+01
025 4.393333333333E+01 2.500000000000E+01 5.000000000000E+01
026 5.516666666667E+01 2.500000000000E+01 6.000000000000E+01
027 6.640000000000E+01 2.500000000000E+01 7.000000000000E+01
028 7.763333333333E+01 2.500000000000E+01 8.000000000000E+01
029 8.886666666667E+01 2.500000000000E+01 9.000000000000E+01
030 1.001000000000E+02 2.500000000000E+01 1.000000000000E+02
031 -1.000000000000E+00 3.800000000000E+01 1.000000000000E+01
032 1.023333333333E+01 3.800000000000E+01 2.000000000000E+01
033 2.146666666667E+01 3.800000000000E+01 3.000000000000E+01
034 3.270000000000E+01 3.800000000000E+01 4.000000000000E+01
035 4.393333333333E+01 3.800000000000E+01 5.000000000000E+01
036 5.516666666667E+01 3.800000000000E+01 6.000000000000E+01
037 6.640000000000E+01 3.800000000000E+01 7.000000000000E+01
038 7.763333333333E+01 3.800000000000E+01 8.000000000000E+01
039 8.886666666667E+01 3.800000000000E+01 9.000000000000E+01
040 1.001000000000E+02 3.800000000000E+01 1.000000000000E+02
041 -1.000000000000E+00 5.100000000000E+01 1.000000000000E+01
042 1.023333333333E+01 5.100000000000E+01 2.000000000000E+01
043 2.146666666667E+01 5.100000000000E+01 3.000000000000E+01
044 3.270000000000E+01 5.100000000000E+01 4.000000000000E+01
045 4.393333333333E+01 5.100000000000E+01 5.000000000000E+01
046 5.516666666667E+01 5.100000000000E+01 6.000000000000E+01
047 6.640000000000E+01 5.100000000000E+01 7.000000000000E+01
048 7.763333333333E+01 5.100000000000E+01 8.000000000000E+01
049 8.886666666667E+01 5.100000000000E+01 9.000000000000E+01
050 1.001000000000E+02 5.100000000000E+01 1.000000000000E+02
051 4.616666666667E+00 5.500000000000E+00 1.500000000000E+01
052 1.585000000000E+01 5.500000000000E+00 2.500000000000E+01
053 2.708333333333E+01 5.500000000000E+00 3.500000000000E+01
054 3.831666666667E+01 5.500000000000E+00 4.500000000000E+01
055 4.955000000000E+01 5.500000000000E+00 5.500000000000E+01
056 6.078333333333E+01 5.500000000000E+00 6.500000000000E+01
057 7.201666666667E+01 5.500000000000E+00 7.500000000000E+01
058 8.325000000000E+01 5.500000000000E+00 8.500000000000E+01
059 9.448333333333E+01 5.500000000000E+00 9.500000000000E+01
060 4.616666666667E+00 1.850000000000E+01 1.500000000000E+01
061 1.585000000000E+01 1.850000000000E+01 2.500000000000E+01
062 2.708333333333E+01 1.850000000000E+01 3.500000000000E+01
063 3.831666666667E+01 1.850000000000E+01 4.500000000000E+01
064 4.955000000000E+01 1.850000000000E+01 5.500000000000E+01
065 6.078333333333E+01 1.850000000000E+01 6.500000000000E+01
066 7.201666666667E+01 1.850000000000E+01 7.500000000000E+01
067 8.325000000000E+01 1.850000000000E+01 8.500000000000E+01
068 9.448333333333E+01 1.850000000000E+01 9.500000000000E+01
069 4.616666666667E+00 3.150000000000E+01 1.500000000000E+01
070 1.585000000000E+01 3.150000000000E+01 2.500000000000E+01
071 2.708333333333E+01 3.150000000000E+01 3.500000000000E+01
072 3.831666666667E+01 3.150000000000E+01 4.500000000000E+01
073 4.955000000000E+01 3.150000000000E+01 5.500000000000E+01
074 6.078333333333E+01 3.150000000000E+01 6.500000000000E+01
075 7.201666666667E+01 3.150000000000E+01 7.500000000000E+01
076 8.325000000000E+01 3.150000000000E+01 8.500000000000E+01
077 9.448333333333E+01 3.150000000000E+01 9.500000000000E+01
078 4.616666666667E+00 4.450000000000E+01 1.500000000000E+01
079 1.585000000000E+01 4.450000000000E+01 2.500000000000E+01
080 2.708333333333E+01 4.450000000000E+01 3.500000000000E+01
081 3.831666666667E+01 4.450000000000E+01 4.500000000000E+01
082 4.955000000000E+01 4.450000000000E+01 5.500000000000E+01
083 6.078333333333E+01 4.450000000000E+01 6.500000000000E+01
084 7.201666666667E+01 4.450000000000E+01 7.500000000000E+01
085 8.325000000000E+01 4.450000000000E+01 8.500000000000E+01
086 9.448333333333E+01 4.450000000000E+01 9.500000000000E+01
0001 1 tri 51 1 2
0002 1 tri 51 2 12
0003 1 tri 51 12 11
0004 1 tri 51 11 1
0005 1 tri 52 2 3
0006 1 tri 52 3 13
0007 1 tri 52 13 12
0008 1 tri 52 12 2
0009 1 tri 53 3 4
0010 1 tri 53 4 14
0011 1 tri 53 14 13
0012 1 tri 53 13 3
0013 1 tri 54 4 5
0014 1 tri 54 5 15
0015 1 tri 54 15 14
0016 1 tri 54 14 4
0017 1 tri 55 5 6
0018 1 tri 55 6 16
0019 1 tri 55 16 15
0020 1 tri 55 15 5
0021 1 tri 56 6 7
0022 1 tri 56 7 17
0023 1 tri 56 17 16
0024 1 tri 56 16 6
0025 1 tri 57 7 8
0026 1 tri 57 8 18
0027 1 tri 57 18 17
0028 1 tri 57 17 7
0029 1 tri 58 8 9
0030 1 tri 58 9 19
0031 1 tri 58 19 18
0032 1 tri 58 18 8
0033 1 tri 59 9 10
0034 1 tri 59 10 20
0035 1 tri 59 20 19
0036 1 tri 59 19 9
0037 1 tri 60 11 12
0038 1 tri 60 12 22
0039 1 tri 60 22 21
0040 1 tri 60 21 11
0041 1 tri 61 12 13
0042 1 tri 61 13 23
0043 1 tri 61 23 22
0044 1 tri 61 22 12
0045 1 tri 62 13 14
0046 1 tri 62 14 24
0047 1 tri 62 24 23
0048 1 tri 62 23 13
0049 1 tri 63 14 15
0050 1 tri 63 15 25
0051 1 tri 63 25 24
0052 1 tri 63 24 14
0053 1 tri 64 15 16
0054 1 tri 64 16 26
0055 1 tri 64 26 25
0056 1 tri 64 25 15
0057 1 tri 65 16 17
0058 1 tri 65 17 27
0059 1 tri 65 27 26
0060 1 tri 65 26 16
0061 1 tri 66 17 18
0062 1 tri 66 18 28
0063 1 tri 66 28 27
0064 1 tri 66 27 17
0065 1 tri 67 18 19
0066 1 tri 67 19 29
0067 1 tri 67 29 28
0068 1 tri 67 28 18
0069 1 tri 68 19 20
0070 1 tri 68 20 30
0071 1 tri 68 30 29
0072 1 tri 68 29 19
0073 1 tri 69 21 22
0074 1 tri 69 22 32
0075 1 tri 69 32 31
0076 1 tri 69 31 21
0077 1 tri 70 22 23
0078 1 tri 70 23 33
0079 1 tri 70 33 32
0080 1 tri 70 32 22
0081 1 tri 71 23 24
0082 1 tri 71 24 34
0083 1 tri 71 34 33
0084 1 tri 71 33 23
0085 1 tri 72 24 25
0086 1 tri 72 25 35
0087 1 tri 72 35 34
0088 1 tri 72 34 24
0089 1 tri 73 25 26
0090 1 tri 73 26 36
0091 1 tri 73 36 35
0092 1 tri 73 35 25
0093 1 tri 74 26 27
0094 1 tri 74 27 37
0095 1 tri 74 37 36
0096 1 tri 74 36 26
0097 1 tri 75 27 28
0098 1 tri 75 28 38
0099 1 tri 75 38 37
0100 1 tri 75 37 27
0101 1 tri 76 28 29
0102 1 tri 76 29 39
0103 1 tri 76 39 38
0104 1 tri 76 38 28
0105 1 tri 77 29 30
0106 1 tri 77 30 40
0107 1 tri 77 40 39
0108 1 tri 77 39 29
0109 1 tri 78 31 32
0110 1 tri 78 32 42
0111 1 tri 78 42 41
0112 1 tri 78 41 31
0113 1 tri 79 32 33
0114 1 tri 79 33 43
0115 1 tri 79 43 42
0116 1 tri 79 42 32
0117 1 tri 80 33 34
0118 1 tri 80 34 44
0119 1 tri 80 44 43
0120 1 tri 80 43 33
0121 1 tri 81 34 35
0122 1 tri 81 35 45
0123 1 tri 81 45 44
0124 1 tri 81 44 34
0125 1 tri 82 35 36
0126 1 tri 82 36 46
0127 1 tri 82 46 45
0128 1 tri 82 45 35
0129 1 tri 83 36 37
0130 1 tri 83 37 47
0131 1 tri 83 47 46
0132 1 tri 83 46 36
0133 1 tri 84 37 38
0134 1 tri 84 38 48
0135 1 tri 84 48 47
0136 1 tri 84 47 37
0137 1 tri 85 38 39
0138 1 tri 85 39 49
0139 1 tri 85 49 48
0140 1 tri 85 48 38
0141 1 tri 86 39 40
0142 1 tri 86 40 50
0143 1 tri 86 50 49
0144 1 tri 86 49 39
00004 1 1 1 1
imt1, integer
itp1, integer
icr1, integer
isn1, integer
1 0 10 0 0
2 0 10 0 0
3 0 10 0 0
4 0 10 0 0
5 0 10 0 0
6 0 10 0 0
7 0 10 0 0
8 0 10 0 0
9 0 10 0 0
10 0 10 0 0
11 0 10 0 0
12 0 0 0 0
13 0 0 0 0
14 0 0 0 0
15 0 0 0 0
16 0 0 0 0
17 0 0 0 0
18 0 0 0 0
19 0 0 0 0
20 0 10 0 0
21 0 10 0 0
22 0 0 0 0
23 0 0 0 0
24 0 0 0 0
25 0 0 0 0
26 0 0 0 0
27 0 0 0 0
28 0 0 0 0
29 0 0 0 0
30 0 10 0 0
31 0 10 0 0
32 0 0 0 0
33 0 0 0 0
34 0 0 0 0
35 0 0 0 0
36 0 0 0 0
37 0 0 0 0
38 0 0 0 0
39 0 0 0 0
40 0 10 0 0
41 0 10 0 0
42 0 10 0 0
43 0 10 0 0
44 0 10 0 0
45 0 10 0 0
46 0 10 0 0
47 0 10 0 0
48 0 10 0 0
49 0 10 0 0
50 0 10 0 0
51 0 0 0 0
52 0 0 0 0
53 0 0 0 0
54 0 0 0 0
55 0 0 0 0
56 0 0 0 0
57 0 0 0 0
58 0 0 0 0
59 0 0 0 0
60 0 0 0 0
61 0 0 0 0
62 0 0 0 0
63 0 0 0 0
64 0 0 0 0
65 0 0 0 0
66 0 0 0 0
67 0 0 0 0
68 0 0 0 0
69 0 0 0 0
70 0 0 0 0
71 0 0 0 0
72 0 0 0 0
73 0 0 0 0
74 0 0 0 0
75 0 0 0 0
76 0 0 0 0
77 0 0 0 0
78 0 0 0 0
79 0 0 0 0
80 0 0 0 0
81 0 0 0 0
82 0 0 0 0
83 0 0 0 0
84 0 0 0 0
85 0 0 0 0
86 0 0 0 0

View File

@@ -0,0 +1,322 @@
86 144 4 0 0
001 -1.097370898554E+01 -1.000000000000E+00 2.120379976043E+01
002 2.596243477912E-01 -1.000000000000E+00 3.120379976043E+01
003 1.149295768112E+01 -1.000000000000E+00 4.120379976043E+01
004 2.272629101446E+01 -1.000000000000E+00 5.120379976043E+01
005 3.395962434779E+01 -1.000000000000E+00 6.120379976043E+01
006 4.519295768112E+01 -1.000000000000E+00 7.120379976043E+01
007 5.642629101446E+01 -1.000000000000E+00 8.120379976043E+01
008 6.765962434779E+01 -1.000000000000E+00 9.120379976043E+01
009 7.889295768112E+01 -1.000000000000E+00 1.012037997604E+02
010 9.012629101446E+01 -1.000000000000E+00 1.112037997604E+02
011 -1.097370898554E+01 1.200000000000E+01 2.120379976043E+01
012 2.596243477912E-01 1.200000000000E+01 3.120379976043E+01
013 1.149295768112E+01 1.200000000000E+01 4.120379976043E+01
014 2.272629101446E+01 1.200000000000E+01 5.120379976043E+01
015 3.395962434779E+01 1.200000000000E+01 6.120379976043E+01
016 4.519295768112E+01 1.200000000000E+01 7.120379976043E+01
017 5.642629101446E+01 1.200000000000E+01 8.120379976043E+01
018 6.765962434779E+01 1.200000000000E+01 9.120379976043E+01
019 7.889295768112E+01 1.200000000000E+01 1.012037997604E+02
020 9.012629101446E+01 1.200000000000E+01 1.112037997604E+02
021 -1.097370898554E+01 2.500000000000E+01 2.120379976043E+01
022 2.596243477912E-01 2.500000000000E+01 3.120379976043E+01
023 1.149295768112E+01 2.500000000000E+01 4.120379976043E+01
024 2.272629101446E+01 2.500000000000E+01 5.120379976043E+01
025 3.395962434779E+01 2.500000000000E+01 6.120379976043E+01
026 4.519295768112E+01 2.500000000000E+01 7.120379976043E+01
027 5.642629101446E+01 2.500000000000E+01 8.120379976043E+01
028 6.765962434779E+01 2.500000000000E+01 9.120379976043E+01
029 7.889295768112E+01 2.500000000000E+01 1.012037997604E+02
030 9.012629101446E+01 2.500000000000E+01 1.112037997604E+02
031 -1.097370898554E+01 3.800000000000E+01 2.120379976043E+01
032 2.596243477912E-01 3.800000000000E+01 3.120379976043E+01
033 1.149295768112E+01 3.800000000000E+01 4.120379976043E+01
034 2.272629101446E+01 3.800000000000E+01 5.120379976043E+01
035 3.395962434779E+01 3.800000000000E+01 6.120379976043E+01
036 4.519295768112E+01 3.800000000000E+01 7.120379976043E+01
037 5.642629101446E+01 3.800000000000E+01 8.120379976043E+01
038 6.765962434779E+01 3.800000000000E+01 9.120379976043E+01
039 7.889295768112E+01 3.800000000000E+01 1.012037997604E+02
040 9.012629101446E+01 3.800000000000E+01 1.112037997604E+02
041 -1.097370898554E+01 5.100000000000E+01 2.120379976043E+01
042 2.596243477912E-01 5.100000000000E+01 3.120379976043E+01
043 1.149295768112E+01 5.100000000000E+01 4.120379976043E+01
044 2.272629101446E+01 5.100000000000E+01 5.120379976043E+01
045 3.395962434779E+01 5.100000000000E+01 6.120379976043E+01
046 4.519295768112E+01 5.100000000000E+01 7.120379976043E+01
047 5.642629101446E+01 5.100000000000E+01 8.120379976043E+01
048 6.765962434779E+01 5.100000000000E+01 9.120379976043E+01
049 7.889295768112E+01 5.100000000000E+01 1.012037997604E+02
050 9.012629101446E+01 5.100000000000E+01 1.112037997604E+02
051 -5.357042318876E+00 5.500000000000E+00 2.620379976043E+01
052 5.876291014458E+00 5.500000000000E+00 3.620379976043E+01
053 1.710962434779E+01 5.500000000000E+00 4.620379976043E+01
054 2.834295768112E+01 5.500000000000E+00 5.620379976043E+01
055 3.957629101446E+01 5.500000000000E+00 6.620379976043E+01
056 5.080962434779E+01 5.500000000000E+00 7.620379976043E+01
057 6.204295768112E+01 5.500000000000E+00 8.620379976043E+01
058 7.327629101446E+01 5.500000000000E+00 9.620379976043E+01
059 8.450962434779E+01 5.500000000000E+00 1.062037997604E+02
060 -5.357042318876E+00 1.850000000000E+01 2.620379976043E+01
061 5.876291014458E+00 1.850000000000E+01 3.620379976043E+01
062 1.710962434779E+01 1.850000000000E+01 4.620379976043E+01
063 2.834295768112E+01 1.850000000000E+01 5.620379976043E+01
064 3.957629101446E+01 1.850000000000E+01 6.620379976043E+01
065 5.080962434779E+01 1.850000000000E+01 7.620379976043E+01
066 6.204295768112E+01 1.850000000000E+01 8.620379976043E+01
067 7.327629101446E+01 1.850000000000E+01 9.620379976043E+01
068 8.450962434779E+01 1.850000000000E+01 1.062037997604E+02
069 -5.357042318876E+00 3.150000000000E+01 2.620379976043E+01
070 5.876291014458E+00 3.150000000000E+01 3.620379976043E+01
071 1.710962434779E+01 3.150000000000E+01 4.620379976043E+01
072 2.834295768112E+01 3.150000000000E+01 5.620379976043E+01
073 3.957629101446E+01 3.150000000000E+01 6.620379976043E+01
074 5.080962434779E+01 3.150000000000E+01 7.620379976043E+01
075 6.204295768112E+01 3.150000000000E+01 8.620379976043E+01
076 7.327629101446E+01 3.150000000000E+01 9.620379976043E+01
077 8.450962434779E+01 3.150000000000E+01 1.062037997604E+02
078 -5.357042318876E+00 4.450000000000E+01 2.620379976043E+01
079 5.876291014458E+00 4.450000000000E+01 3.620379976043E+01
080 1.710962434779E+01 4.450000000000E+01 4.620379976043E+01
081 2.834295768112E+01 4.450000000000E+01 5.620379976043E+01
082 3.957629101446E+01 4.450000000000E+01 6.620379976043E+01
083 5.080962434779E+01 4.450000000000E+01 7.620379976043E+01
084 6.204295768112E+01 4.450000000000E+01 8.620379976043E+01
085 7.327629101446E+01 4.450000000000E+01 9.620379976043E+01
086 8.450962434779E+01 4.450000000000E+01 1.062037997604E+02
0001 1 tri 51 1 2
0002 1 tri 51 2 12
0003 1 tri 51 12 11
0004 1 tri 51 11 1
0005 1 tri 52 2 3
0006 1 tri 52 3 13
0007 1 tri 52 13 12
0008 1 tri 52 12 2
0009 1 tri 53 3 4
0010 1 tri 53 4 14
0011 1 tri 53 14 13
0012 1 tri 53 13 3
0013 1 tri 54 4 5
0014 1 tri 54 5 15
0015 1 tri 54 15 14
0016 1 tri 54 14 4
0017 1 tri 55 5 6
0018 1 tri 55 6 16
0019 1 tri 55 16 15
0020 1 tri 55 15 5
0021 1 tri 56 6 7
0022 1 tri 56 7 17
0023 1 tri 56 17 16
0024 1 tri 56 16 6
0025 1 tri 57 7 8
0026 1 tri 57 8 18
0027 1 tri 57 18 17
0028 1 tri 57 17 7
0029 1 tri 58 8 9
0030 1 tri 58 9 19
0031 1 tri 58 19 18
0032 1 tri 58 18 8
0033 1 tri 59 9 10
0034 1 tri 59 10 20
0035 1 tri 59 20 19
0036 1 tri 59 19 9
0037 1 tri 60 11 12
0038 1 tri 60 12 22
0039 1 tri 60 22 21
0040 1 tri 60 21 11
0041 1 tri 61 12 13
0042 1 tri 61 13 23
0043 1 tri 61 23 22
0044 1 tri 61 22 12
0045 1 tri 62 13 14
0046 1 tri 62 14 24
0047 1 tri 62 24 23
0048 1 tri 62 23 13
0049 1 tri 63 14 15
0050 1 tri 63 15 25
0051 1 tri 63 25 24
0052 1 tri 63 24 14
0053 1 tri 64 15 16
0054 1 tri 64 16 26
0055 1 tri 64 26 25
0056 1 tri 64 25 15
0057 1 tri 65 16 17
0058 1 tri 65 17 27
0059 1 tri 65 27 26
0060 1 tri 65 26 16
0061 1 tri 66 17 18
0062 1 tri 66 18 28
0063 1 tri 66 28 27
0064 1 tri 66 27 17
0065 1 tri 67 18 19
0066 1 tri 67 19 29
0067 1 tri 67 29 28
0068 1 tri 67 28 18
0069 1 tri 68 19 20
0070 1 tri 68 20 30
0071 1 tri 68 30 29
0072 1 tri 68 29 19
0073 1 tri 69 21 22
0074 1 tri 69 22 32
0075 1 tri 69 32 31
0076 1 tri 69 31 21
0077 1 tri 70 22 23
0078 1 tri 70 23 33
0079 1 tri 70 33 32
0080 1 tri 70 32 22
0081 1 tri 71 23 24
0082 1 tri 71 24 34
0083 1 tri 71 34 33
0084 1 tri 71 33 23
0085 1 tri 72 24 25
0086 1 tri 72 25 35
0087 1 tri 72 35 34
0088 1 tri 72 34 24
0089 1 tri 73 25 26
0090 1 tri 73 26 36
0091 1 tri 73 36 35
0092 1 tri 73 35 25
0093 1 tri 74 26 27
0094 1 tri 74 27 37
0095 1 tri 74 37 36
0096 1 tri 74 36 26
0097 1 tri 75 27 28
0098 1 tri 75 28 38
0099 1 tri 75 38 37
0100 1 tri 75 37 27
0101 1 tri 76 28 29
0102 1 tri 76 29 39
0103 1 tri 76 39 38
0104 1 tri 76 38 28
0105 1 tri 77 29 30
0106 1 tri 77 30 40
0107 1 tri 77 40 39
0108 1 tri 77 39 29
0109 1 tri 78 31 32
0110 1 tri 78 32 42
0111 1 tri 78 42 41
0112 1 tri 78 41 31
0113 1 tri 79 32 33
0114 1 tri 79 33 43
0115 1 tri 79 43 42
0116 1 tri 79 42 32
0117 1 tri 80 33 34
0118 1 tri 80 34 44
0119 1 tri 80 44 43
0120 1 tri 80 43 33
0121 1 tri 81 34 35
0122 1 tri 81 35 45
0123 1 tri 81 45 44
0124 1 tri 81 44 34
0125 1 tri 82 35 36
0126 1 tri 82 36 46
0127 1 tri 82 46 45
0128 1 tri 82 45 35
0129 1 tri 83 36 37
0130 1 tri 83 37 47
0131 1 tri 83 47 46
0132 1 tri 83 46 36
0133 1 tri 84 37 38
0134 1 tri 84 38 48
0135 1 tri 84 48 47
0136 1 tri 84 47 37
0137 1 tri 85 38 39
0138 1 tri 85 39 49
0139 1 tri 85 49 48
0140 1 tri 85 48 38
0141 1 tri 86 39 40
0142 1 tri 86 40 50
0143 1 tri 86 50 49
0144 1 tri 86 49 39
00004 1 1 1 1
imt1, integer
itp1, integer
icr1, integer
isn1, integer
1 0 10 0 0
2 0 10 0 0
3 0 10 0 0
4 0 10 0 0
5 0 10 0 0
6 0 10 0 0
7 0 10 0 0
8 0 10 0 0
9 0 10 0 0
10 0 10 0 0
11 0 10 0 0
12 0 0 0 0
13 0 0 0 0
14 0 0 0 0
15 0 0 0 0
16 0 0 0 0
17 0 0 0 0
18 0 0 0 0
19 0 0 0 0
20 0 10 0 0
21 0 10 0 0
22 0 0 0 0
23 0 0 0 0
24 0 0 0 0
25 0 0 0 0
26 0 0 0 0
27 0 0 0 0
28 0 0 0 0
29 0 0 0 0
30 0 10 0 0
31 0 10 0 0
32 0 0 0 0
33 0 0 0 0
34 0 0 0 0
35 0 0 0 0
36 0 0 0 0
37 0 0 0 0
38 0 0 0 0
39 0 0 0 0
40 0 10 0 0
41 0 10 0 0
42 0 10 0 0
43 0 10 0 0
44 0 10 0 0
45 0 10 0 0
46 0 10 0 0
47 0 10 0 0
48 0 10 0 0
49 0 10 0 0
50 0 10 0 0
51 0 0 0 0
52 0 0 0 0
53 0 0 0 0
54 0 0 0 0
55 0 0 0 0
56 0 0 0 0
57 0 0 0 0
58 0 0 0 0
59 0 0 0 0
60 0 0 0 0
61 0 0 0 0
62 0 0 0 0
63 0 0 0 0
64 0 0 0 0
65 0 0 0 0
66 0 0 0 0
67 0 0 0 0
68 0 0 0 0
69 0 0 0 0
70 0 0 0 0
71 0 0 0 0
72 0 0 0 0
73 0 0 0 0
74 0 0 0 0
75 0 0 0 0
76 0 0 0 0
77 0 0 0 0
78 0 0 0 0
79 0 0 0 0
80 0 0 0 0
81 0 0 0 0
82 0 0 0 0
83 0 0 0 0
84 0 0 0 0
85 0 0 0 0
86 0 0 0 0