130 lines
10 KiB
Plaintext
130 lines
10 KiB
Plaintext
define/SIZE_SRCX/21
|
|
define/SIZE_SRCY/101
|
|
define/SIZE_SNKX/20
|
|
define/SIZE_SNKY/100
|
|
cmo/create/cmosource///triplane
|
|
createpts/xyz/SIZE_SRCX,SIZE_SRCY,1/0.,0.,0./1.,1.,0./1,1,1
|
|
cmo/setatt/cmosource/imt/1 0 0/1
|
|
cmo/setatt/cmosource/itp/1 0 0/0
|
|
connect
|
|
resetpts/itp
|
|
cmo/create/cmosink///triplane
|
|
createpts/xyz/SIZE_SNKX,SIZE_SNKY,1/0.,0.,0./1.,1.,0./1,1,1
|
|
cmo/setatt/cmosink/imt/1 0 0/1
|
|
cmo/setatt/cmosink/itp/1 0 0/0
|
|
connect
|
|
resetpts/itp
|
|
cmo/addatt/cmosource/field3/vdouble/scalar/nnodes
|
|
cmo/copyatt/cmosource cmosource/field3 xic
|
|
cmo/addatt/cmosink/field2/vdouble/scalar/nnodes
|
|
cmo/addatt/cmosink/field3/vdouble/scalar/nnodes
|
|
cmo/setatt/cmosink/field3 0.0
|
|
cmo/setatt/cmosink/field2 0.0
|
|
cmo/setatt/cmosink/idebug 0
|
|
cmo/setatt/cmosource/idebug 0
|
|
cmo/select/cmosource
|
|
scale/1 0 0/relative/xyz/1.e10 1.e10 1.0
|
|
cmo/select/cmosink
|
|
scale/1 0 0/relative/xyz/1.e10 1.e10 1.0
|
|
infile diagnostic.mlgi
|
|
cmo/printatt/cmosource/-xyz-/minmax
|
|
cmo/printatt/cmosink/-xyz-/minmax
|
|
cmo/printatt/cmosink/xmin/minmax
|
|
cmo/printatt/cmosink/xmax/minmax
|
|
cmo/printatt/cmosink/ymin/minmax
|
|
cmo/printatt/cmosink/ymax/minmax
|
|
cmo/printatt/cmosink/zmin/minmax
|
|
cmo/printatt/cmosink/zmax/minmax
|
|
cmo/printatt/cmosink/epsilon/minmax
|
|
cmo/printatt/cmosink/epsilonl/minmax
|
|
cmo/printatt/cmosink/epsilona/minmax
|
|
cmo/printatt/cmosink/epsilonv/minmax
|
|
finish
|
|
interpolate/continuous/cmosink field3/1,0,0/cmosource field3
|
|
cmo printatt cmosource field3 minmax
|
|
cmo printatt cmosink field3 minmax
|
|
cmo printatt cmosink field3 1,2000,125
|
|
cmo/select/cmosource
|
|
scale/1 0 0/relative/xyz/1.e2 1.e2 1.0
|
|
cmo/select/cmosink
|
|
scale/1 0 0/relative/xyz/1.e2 1.e2 1.0
|
|
infile diagnostic.mlgi
|
|
cmo/printatt/cmosource/-xyz-/minmax
|
|
cmo/printatt/cmosink/-xyz-/minmax
|
|
cmo/printatt/cmosink/xmin/minmax
|
|
cmo/printatt/cmosink/xmax/minmax
|
|
cmo/printatt/cmosink/ymin/minmax
|
|
cmo/printatt/cmosink/ymax/minmax
|
|
cmo/printatt/cmosink/zmin/minmax
|
|
cmo/printatt/cmosink/zmax/minmax
|
|
cmo/printatt/cmosink/epsilon/minmax
|
|
cmo/printatt/cmosink/epsilonl/minmax
|
|
cmo/printatt/cmosink/epsilona/minmax
|
|
cmo/printatt/cmosink/epsilonv/minmax
|
|
finish
|
|
interpolate/continuous/cmosink field3/1,0,0/cmosource field3
|
|
cmo printatt cmosink field3 1,2000,100
|
|
cmo/select/cmosource
|
|
scale/1 0 0/relative/xyz/1.e2 1.e2 1.0
|
|
cmo/select/cmosink
|
|
scale/1 0 0/relative/xyz/1.e2 1.e2 1.0
|
|
infile diagnostic.mlgi
|
|
cmo/printatt/cmosource/-xyz-/minmax
|
|
cmo/printatt/cmosink/-xyz-/minmax
|
|
cmo/printatt/cmosink/xmin/minmax
|
|
cmo/printatt/cmosink/xmax/minmax
|
|
cmo/printatt/cmosink/ymin/minmax
|
|
cmo/printatt/cmosink/ymax/minmax
|
|
cmo/printatt/cmosink/zmin/minmax
|
|
cmo/printatt/cmosink/zmax/minmax
|
|
cmo/printatt/cmosink/epsilon/minmax
|
|
cmo/printatt/cmosink/epsilonl/minmax
|
|
cmo/printatt/cmosink/epsilona/minmax
|
|
cmo/printatt/cmosink/epsilonv/minmax
|
|
finish
|
|
interpolate/continuous/cmosink field3/1,0,0/cmosource field3
|
|
cmo printatt cmosink field3 1,2000,125
|
|
cmo/select/cmosource
|
|
scale/1 0 0/relative/xyz/1.e2 1.e2 1.0
|
|
cmo/select/cmosink
|
|
scale/1 0 0/relative/xyz/1.e2 1.e2 1.0
|
|
infile diagnostic.mlgi
|
|
cmo/printatt/cmosource/-xyz-/minmax
|
|
cmo/printatt/cmosink/-xyz-/minmax
|
|
cmo/printatt/cmosink/xmin/minmax
|
|
cmo/printatt/cmosink/xmax/minmax
|
|
cmo/printatt/cmosink/ymin/minmax
|
|
cmo/printatt/cmosink/ymax/minmax
|
|
cmo/printatt/cmosink/zmin/minmax
|
|
cmo/printatt/cmosink/zmax/minmax
|
|
cmo/printatt/cmosink/epsilon/minmax
|
|
cmo/printatt/cmosink/epsilonl/minmax
|
|
cmo/printatt/cmosink/epsilona/minmax
|
|
cmo/printatt/cmosink/epsilonv/minmax
|
|
finish
|
|
interpolate/continuous/cmosink field3/1,0,0/cmosource field3
|
|
cmo printatt cmosink field3 1,2000,125
|
|
cmo printatt cmosource -xyz- minmax
|
|
cmo printatt cmosource field3 minmax
|
|
cmo printatt cmosink -xyz- minmax
|
|
cmo printatt cmosink field3 minmax
|
|
cmo printatt cmosink field3 1,2000,125
|
|
cmo/set_id/cmosource node/id_node
|
|
cmo copyatt cmosource cmosource/imt id_node
|
|
cmo/set_id/cmosource element/id_elem
|
|
interpolate/map/cmosink field2/1,0,0/cmosource id_elem/keepatt/nearest imt
|
|
cmo printatt cmosource id_elem minmax
|
|
cmo printatt cmosink field2 minmax
|
|
cmo printatt cmosink field2 100,2000,100
|
|
cmo printatt cmosink pt_gtg 100,2000,100
|
|
cmo printatt cmosink el_gtg 100,2000,100
|
|
cmo/setatt/cmosink/idebug 0
|
|
cmo/setatt/cmosource/idebug 0
|
|
interpolate/map/cmosink field2/1,0,0/cmosource id_elem/keepatt/nearest imt
|
|
cmo printatt cmosource id_elem minmax
|
|
cmo printatt cmosink field2 minmax
|
|
cmo printatt cmosink field2 100,2000,100
|
|
cmo printatt cmosink pt_gtg 100,2000,100
|
|
cmo printatt cmosink el_gtg 100,2000,100
|
|
finish
|