вопрос по ICEM

[L.A.M 0]

ногами не пинать.

сетки строю с помощью MAPDL, нужно сетку передать из ансиса в дайну.

Сетка состоит из HEX элементов с промежуточными узлами, через ANSYS/LS-DYNA PrePost неполучится - так как поддерживаются только тетры с промежуточными узлами.

решил попробовать через ICEM.

1) Записываю CDB

2) Читаю в ICEM

3) Лезу в OUTPUT ..

генерится .k файлик с пустыми полями...

пробовал через настран output - строит без промежуточных узлов(наверно не поддерживает)..

ICEM использую редко - прошу помогите..

макрос для построения сетки в ансисе

FINISH

/CLEAR,START

!***СИСТЕМНЫЕ ПЕРЕМЕННЫЕ***!

/GRAPHICS,POWER

/SHOW

/TYPE,,4

/ESHAPE,1,1 ! отображение кривых граней

/mstart,util,1

SELTOL,1E-5

!***BEGIN***!

/PREP7

PI=3.141592635

ET,1,200,7

ET,2,186!,11!,,1

!ET,3,290 $ KEYOPT,3,8,1

!ET,4,281 $ KEYOPT,4,1,0

!*ASK,ES, RAZMER ELEMENTA? DEFAULT:,0.1 $ESIZE,ES ! ХАР. РАЗМЕР ЭЛЕМЕНТА

*ASK,KEL, KOLICHESTVO ELEMENTOV PO DYGE? DEFAULT,24

!***ГЕОМЕТРИЧЕСКИЕ ХАРАКТЕРИСТИКИ ТРУБЫ***!

LENGTH = 100

OUT_DIAMETR = 1

THICK =0.02

!***ХАРАКТЕРИСТИКИ КРИВИЗНЫ***!

*ASK,FS, VISOTA NEROVNOSTI? DEFAULT:,0.6 !ВЫСОТА НЕРОВНОСТИ

!***УРАВНЕНИЕ НЕРОВНОСТИ+МАССИВ ТОЧЕК***!

!*ASK,K_POINT,' KOLICHESTVO TOCHEK V SPLINE? DEFAULT:',20 ! КОЛИЧЕСТВО ТОЧЕК

K_POINT=20

*DIM,KRIV,ARRAY,K_POINT,2

KRIV(1,1)=0 $ KRIV(I+1,2)=0

*DO,I,1,K_POINT-1,1

X=(LENGTH/2)/(K_POINT-1)*I $ KRIV(I+1,1)=X

Y=FS/2*(1 - COS(PI*X/(LENGTH/2))) $ KRIV(I+1,2)=Y

*ENDDO

KRIV(K_POINT,2)=FS

*DO,I,1,K_POINT,1

K,I,KRIV(I,1),KRIV(I,2),0

*ENDDO

KSEL,S,,,1,K_POINT

BSPLINE,ALL,,,,,,0,0,0,0,0,0

LSEL,ALL

CM,BSPLINE,LINE

EXTOPT,ESIZE,LENGTH*1.5,4 !параметр выладавки !!

!***СОЛИД ОБОЛОЧКА ПАРАМ СТЕРЖЕНЬ***!

*ASK,GO_TO, SOLID[0] PIPE[1] SHELL[2] ? DEFAULT:,0

*IF,GO_TO,EQ,2,:SHELL

*IF,GO_TO,EQ,1,:PIPE

*IF,GO_TO,EQ,0,:SOLID

:SOLID

!***СОЛИД ГЕОМЕТРИЯ ТРУБЫ***!

PCIRC,(OUT_DIAMETR-THICK)/2,(OUT_DIAMETR)/2,-90,90

CSYS,5 $ AGEN,1,1,,,,90,,,,1 $ CSYS,0

ASEL,ALL $ KEYOPT,1,1,7 $ AATT,,,1,0 $ AMESH,ALL

TYPE,2 $ MAT,1

VDRAG,ALL,,,,,,BSPLINE

ASEL,S,,,1

ACLEAR,ALL

ALLSEL,ALL

CM,TRUBA_VOLU,VOLU

CM,TRUBA_NODE,NODE

CM,TRUBA_ELEM,ELEM

CDWRITE,ALL,TO_ICEM,CDB

[soklakov 1 475]

Сетка состоит из HEX элементов с промежуточными узлами, через ANSYS/LS-DYNA PrePost неполучится - так как поддерживаются только тетры с промежуточными узлами.

А можно по-подробней? Кто кого не поддерживает?