*--* ex_median_points
*--* Header Begin
*--* LAGriT Example Input file
* Carl Gable
* gable -at- lanl -dot- gov
*
*
*--*----------------------------------------------------
*--*
*--* Compute the median points of quad, tri, hex, tet
*--* elements.
*--*
*--*----------------------------------------------------
*--* Header End
*--* ex_median
*--*
define/NX/3
define/NY/3
define/NZ/3
define/MINX/0.0
define/MAXX/1.0
define/MINY/0.0
define/MAXY/1.0
define/MINZ/0.0
define/MAXZ/1.0

cmo/create/cmo_1q///quad
quadxy NX NY/MINX MINY 0./MAXX MINY 0./MAXX MAXY 0./MINX MAXY 0.
rzbrick/xyz/NX,NY,1/1,0,0/connect
hextotet / 2 / cmo_1t / cmo_1q

cmo/create/cmo_1h///hex
createpts/brick/xyz/NX,NY,NZ/MINX,MINY,MINZ/MAXX,MAXY,MAXZ/1,1,1
hextotet / 6 / cmo_1tet / cmo_1h

cmo / select / cmo_1q
createpts / median

cmo / select / cmo_1t
createpts / median

cmo / select / cmo_1h
createpts / median

cmo / select / cmo_1tet
createpts / median

dump / gmv / median_quad.gmv / cmo_1q
dump / gmv / median_tri.gmv / cmo_1t
dump / gmv / median_hex.gmv / cmo_1h
dump / gmv / median_tet.gmv / cmo_1tet

finish