44 lines
1.4 KiB
Plaintext
44 lines
1.4 KiB
Plaintext
|
# Test LaGriT
|
||
|
|
# Create a new mesh along with some point sets.
|
||
|
|
cmo / create / mo / / / hex
|
||
|
|
createpts / brick / xyz / 11, 11, 11 / 0, 0, 0 / 10, 10, 10 / 1, 1, 1
|
||
|
|
pset / pset1 / geom / rtp / 1 0 0 / 0, 0, 0 / 5, 360, 180 /
|
||
|
|
pset / pset2 / geom / xyz / 1 0 0 / 7, 7, 7 / 10, 10, 10 /
|
||
|
|
|
||
|
|
eltset / eset1 / inclusive / pset get pset1 /
|
||
|
|
eltset / / list
|
||
|
|
|
||
|
|
# Assign colors to the points and elements
|
||
|
|
eltset / eset2 / inclusive / pset get pset2 /
|
||
|
|
cmo / setatt / mo / imt / 1 0 0 / 1
|
||
|
|
cmo / setatt / mo / imt / pset get pset1 / 2
|
||
|
|
cmo / setatt / mo / imt / pset get pset2 / 3
|
||
|
|
cmo / setatt / mo / itetclr / 1 0 0 / 1
|
||
|
|
cmo / setatt / mo / itetclr / eltset get eset1 / 2
|
||
|
|
cmo / setatt / mo / itetclr / eltset get eset2 / 3
|
||
|
|
|
||
|
|
dump / avs / output_mesh.inp / mo
|
||
|
|
|
||
|
|
# Test the list command.
|
||
|
|
eltset / / list
|
||
|
|
eltset / 0 / list
|
||
|
|
eltset / -def- / list
|
||
|
|
|
||
|
|
# Verify that eltset only appends '.cellset' if it is not already present.
|
||
|
|
eltset / eset1 / write / output_eset01
|
||
|
|
eltset / eset2 / write / output_eset02.cellset
|
||
|
|
|
||
|
|
# Test various incantations of the [ascii|binary] option.
|
||
|
|
eltset / eset1 / write / output_eset03 / ascii
|
||
|
|
eltset / eset1 / write / output_eset04 / binary
|
||
|
|
eltset / eset1 / write / output_eset05 /
|
||
|
|
eltset / eset1 / write / output_eset06 / -def-
|
||
|
|
eltset / eset1 / write / output_eset07
|
||
|
|
|
||
|
|
# Verify that -def-, -all-, and <blank> work properly as eltset names.
|
||
|
|
eltset / -def- / write / output_eset08
|
||
|
|
eltset / -all- / write / output_eset09
|
||
|
|
eltset / / write / output_eset10
|
||
|
|
|
||
|
|
finish
|