initial upload

test/level01/rmpoint/input.lgi

@@ -0,0 +1,144 @@
+* Test rmmat and rmpoint 
+*
+define/nx/4
+define/ny/5
+define/nz/3
+ 
+cmo / create / mesh_object / / / tet
+createpts / xyz / nx, ny, nz / 0. 0. 0. / 1. 1. 0.2 / 1 1 1
+cmo / setatt / mesh_object / imt / 1 0 0 / 1
+connect 
+cmo/printatt//-all-/minmax
+dump/ avs /output_rmmat1.inp/mesh_object
+
+* create and remove double defined nodes
+cmo   copy   mo2   mesh_object
+cmo select mo2
+pset/p2/attribute yic/1,0,0/ gt .60
+eltset/e2/ inclusive pset,get,p2
+cmo/setatt/mo2/itetclr eltset,get,e2 2
+cmo/setatt/mo2/imt pset,get,p2 2
+*
+* Figure out where there are duplicate points and remove duplicates
+*
+filter / 1 0 0
+rmpoint / compress
+*
+* Recompute the jtet element adjancy information.
+*
+geniee
+*
+* Recompute the itp array
+*
+resetpts / itp
+*
+* Create parent/child points at material interfaces
+*
+settets
+*
+cmo printatt mo2 imt1
+cmo/printatt/mo2/itp1
+* remove child points
+resetpts parent
+cmo/printatt/mo2/itp1
+rmpoint compress
+cmo/printatt/mo2/itp1
+resetpts cell_color 2,1,-1
+cmo/status/mo2
+cmo printatt mo2 imt1
+cmo/delete/ mo2
+cmo/delete/ mesh_object
+
+**********************************************************************
+* old test input file
+define/nx/15
+define/ny/15
+define/nz/2
+
+cmo / create / mesh_object / / / tet
+createpts / xyz / nx, ny, nz / 0. 0. 0. / 1. 1. 0.2 / 1 1 1
+cmo / setatt / mesh_object / imt / 1 0 0 / 1
+connect
+cmo/printatt//-all-/minmax
+dump/ avs /output_rmmat1.inp/mesh_object
+*
+surface / cyl_surf / intrface / cylinder/0.5, 0.5, -1 /0.5, 0.5, 1.0/0.25
+region/mr1/ gt cyl_surf 
+region/mr2/ le cyl_surf 
+mregion/mr1/ gt cyl_surf 
+mregion/mr2/ lt cyl_surf 
+setpts
+settets/geometry
+cmo/printatt//-all-/minmax
+dump / avs / output_rmmat2.inp/mesh_object
+*
+cmo   copy   mo3   mesh_object
+cmo   copy   mo4   mesh_object
+cmo   copy   mo5   mesh_object
+*
+cmo select mo3
+rmmat 2 /node
+rmpoint/compress
+dump / avs / output_rmmat3.inp/mo3
+
+* begin compare
+* remove material 2 from mo3 - node
+cmo/printatt//-xyz-/minmax
+cmo/printatt//itetclr/minmax
+quality
+* end compare
+
+cmo select mo4
+rmmat 2 /element
+rmpoint/compress
+dump / avs / output_rmmat4.inp/mo4
+
+* begin compare
+* remove material 2 from mo4 - element
+cmo/printatt//-xyz-/minmax
+cmo/printatt//itetclr/minmax
+quality
+* end compare
+
+cmo select mo5
+rmmat 2 /all
+rmpoint/compress
+dump / avs / output_rmmat5.inp/mo5
+
+* begin compare
+* remove material 2 from mo5 - all
+cmo/printatt//-xyz-/minmax
+cmo/printatt//itetclr/minmax
+quality
+* status for all cmos
+cmo/status
+* end compare
+
+cmo/release/mesh_object
+cmo/release/mo3
+cmo/release/mo4
+cmo/release/mo5
+
+* TEST rmpoint 
+*
+define/nx/15
+define/ny/15
+define/nz/2
+ 
+cmo / create / mesh_object / / / tet
+createpts / xyz / nx, ny, nz / 0. 0. 0. / 1. 1. 0.2 / 1 1 1
+cmo / setatt / mesh_object / imt / 1 0 0 / 1
+connect 
+* test rmpoint on a pset
+cmo/create/abc
+createpts/xyz/3,3,3/0,0,0/1,1,1/1,1,1
+pset/p1/seq/1,3,1/
+rmpoint/pset,get,p1
+
+* begin compare here
+cmo/status
+cmo/printatt//-all-/minmax
+quality
+* end compare here
+finish
+