[Shamatarev]

Какими методами оптимальнее задать сферическую усеченную поверхность!? В моем случае это будит сферическая поверхность крыши резервуара... Нужно сделать так чтобы радиус который отсекает часть сферы находился в начале координат... Может кто знает как это реализовать ?

[СергейД]

это очень просто. набор команд APDL.
но вы явно новичок. почитайте хелп. и объясните, что хотите делать.
а то непонятно, как радиус может быть в точке.

[Shamatarev]

Возможно я не совсем корректно сформулировал свои мысли т.к действительно ансисом начал заниматься сравнительно недавно. Задача состоит в следующем нежно построить купол опирающийся на цилиндр определенного диаметра так чтобы WP находился в центре верхней грани цилиндра а купол был над ним ... Хочется сделать крышу как показано на картинке ...
[IMG]http://s001.***********/i194/1107/24/df26992b09e6.jpg[/IMG]
[IMG]http://i073.***********/1107/58/553faab0dedf.jpg[/IMG]

[СергейД]

это можно в любой программе.
например так.
строите дугу-кривой контур. можно по точкам сплайн.
поворачиваете на 18 градусов, потом еще на 18. убираете лишние поверхности.оставляете линии
разбиваете на пластины и балки
копируете полученное 10 раз. склеиваете.
считаете.

какого ответа ждете? какие кнопки и в каком порядке нажимать? нет времени это писать.
или макроса? apdl поймете?

[Shamatarev]

Если накидаете макрос буду крайне признателен .... Уж в макросе разобраться это 2 минуты ... а кнопки говорить какие тыкать это пустая трата времени ...

Если это как то поможет при создании макроса то моя модель строится в соответствии со следующими параметрами

Droof=20.92 $ Rroof=Droof/2 ! Радиус, диаметр крыши (м)
Dint=2 $ Rint=Dint/2 ! Радиус центр щита
Kkriv=1.2
Rkriv=Droof*Kkriv ! Радиус кривизны крыши
Hroof=kkriv*Droof-SQRT((kkriv*Droof)**2-rroof**2) ! Высота крыши (м)
AngRoof=atan(Hroof/Rroof) ! Угол наклона крыши в радианах
Hst=1.5 ! высота пояса
Nring=6 ! Количество колец без центрального щита
nc=Nring+1 ! nc- к-во колец, включ кольцо цент щита