initial upload

This commit is contained in:
2025-12-17 11:00:57 +08:00
parent 2bc7b24a71
commit a09a73537f
4614 changed files with 3478433 additions and 2 deletions

View File

@@ -0,0 +1,39 @@
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.
# dump / avs / out_surface.inp / zsurf_quad
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
# dump / avs / out_cube_w_topo.inp / mo_hex
cmo/status/mo_hex/ brief
cmo/delete/mo_hex
finish