infile test_buildsurf.mlgi define/NX/25 define/NY/25 define/NZ/25 define/MIN/0.0 define/MAX/10.0 cmo/create/ztemp///quad quadxy NX NY/MIN MIN MIN/MAX MIN MIN/MAX MAX MIN/MIN MAX MIN rzbrick/xyz/NX,NY,1/1,0,0/connect cmo/setatt/ztemp/imt/1 cmo/setatt/ztemp/itetclr/1 resetpts/itp hextotet/2/zlow/ztemp cmo/create/ytemp///quad quadxy NX NZ/MIN MIN MIN/MAX MIN MIN/MAX MIN MAX/MIN MIN MAX rzbrick/xyz/NX,1,NZ/1,0,0/connect hextotet/2/ylow/ytemp cmo/create/xtemp///quad quadxy NY NZ/MIN MIN MIN/MIN MIN MAX/MIN MAX MAX/MIN MAX MIN rzbrick/xyz/1,NY,NZ/1,0,0/connect hextotet/2/xlow/xtemp math/sin/zlow/zic/1,0,0/zlow/xic math/sin/ylow/yic/1,0,0/ylow/zic math/sin/xlow/xic/1,0,0/xlow/yic cmo/copy/zhigh/zlow cmo/copy/yhigh/ylow cmo/copy/xhigh/xlow cmo/setatt/zhigh/idebug//10 cmo/setatt/yhigh/idebug//10 cmo/setatt/xhigh/idebug//10 math/add/zlow/zic/1,0,0/zlow/zic/2 math/add/ylow/yic/1,0,0/ylow/yic/2 math/add/xlow/xic/1,0,0/xlow/xic/2 math/add/zhigh/zic/1,0,0/zhigh/zic/8 math/add/yhigh/yic/1,0,0/yhigh/yic/8 math/add/xhigh/xic/1,0,0/xhigh/xic/8 math/multiply/zlow/zic/1,0,0/zlow/zic/10000 math/multiply/zlow/yic/1,0,0/zlow/yic/10000 math/multiply/zlow/xic/1,0,0/zlow/xic/10000 math/multiply/ylow/zic/1,0,0/ylow/zic/10000 math/multiply/ylow/yic/1,0,0/ylow/yic/10000 math/multiply/ylow/xic/1,0,0/ylow/xic/10000 math/multiply/xlow/zic/1,0,0/xlow/zic/10000 math/multiply/xlow/yic/1,0,0/xlow/yic/10000 math/multiply/xlow/xic/1,0,0/xlow/xic/10000 math/multiply/zhigh/zic/1,0,0/zhigh/zic/10000 math/multiply/zhigh/yic/1,0,0/zhigh/yic/10000 math/multiply/zhigh/xic/1,0,0/zhigh/xic/10000 math/multiply/yhigh/zic/1,0,0/yhigh/zic/10000 math/multiply/yhigh/yic/1,0,0/yhigh/yic/10000 math/multiply/yhigh/xic/1,0,0/yhigh/xic/10000 math/multiply/xhigh/zic/1,0,0/xhigh/zic/10000 math/multiply/xhigh/yic/1,0,0/xhigh/yic/10000 math/multiply/xhigh/xic/1,0,0/xhigh/xic/10000 cmo/setatt/zhigh/itetclr/1 0 0/1 cmo/setatt/zlow/itetclr/1 0 0/2 cmo/setatt/yhigh/itetclr/1 0 0/3 cmo/setatt/ylow/itetclr/1 0 0/4 cmo/setatt/xhigh/itetclr/1 0 0/5 cmo/setatt/xlow/itetclr/1 0 0/6 cmo/create/cube///tet createpts/xyz/15.0 15.0 15.0/3.0 3.0 3.0/7.0 7.0 7.0/1 1 1 connect math/multiply/cube/zic/1,0,0/cube/zic/10000 math/multiply/cube/yic/1,0,0/cube/yic/10000 math/multiply/cube/xic/1,0,0/cube/xic/10000 cmo/setatt/cube/itetclr/1 0 0/7 addmesh/merge/z_all/zhigh/zlow addmesh/merge/y_all/yhigh/ylow addmesh/merge/x_all/xhigh/xlow addmesh/merge/xy_all/y_all/x_all addmesh/merge/zc_all/z_all/cube addmesh/merge/mo_all/zc_all/xy_all cmo/status/mo_all/brief finish infile test_pathos.mlgi compute/linear_extrapolate/cube/zhigh/zpos/zic compute/linear_extrapolate/cube/zlow/zneg/zic compute/linear_extrapolate/cube/yhigh/ypos/yic compute/linear_extrapolate/cube/ylow/yneg/yic cmo/status/cube/brief cmo/delete/cube finish infile test_square.mlgi define/NX/100 define/NY/100 define/NZ/50 define/MIN/-1.0 define/MAX/301.0 define/NX/30 define/NY/30 define/NZ/20 cmo/create/zsurf_quad///quad quadxy NX NY/MIN MIN MIN/MAX MIN MIN/MAX MAX MIN/MIN MAX MIN rzbrick/xyz/NX,NY,1/1,0,0/connect cmo/setatt/zsurf_quad/imt 1 cmo/setatt/zsurf_quad/itetclr 1 resetpts/itp math/sin/zsurf_quad/zic/1,0,0/zsurf_quad/xic math/multiply/zsurf_quad/zic/1,0,0/zsurf_quad/zic/5.0 perturb/1 0 0/0. 0. 1.0 math/add/zsurf_quad/zic/1 0 0/zsurf_quad/zic/60. cmo/create/mo_hex///hex createpts/brick/xyz/NX NY NZ/0. 0. 0./300. 300. 50./1 1 1 cmo/select/mo_hex resetpts/itp compute/linear_extrapolate/mo_hex/zsurf_quad/zpos/zic cmo/status/mo_hex/brief cmo/delete/mo_hex finish finish