Основы анализа конструкций в ANSYS. Конюхов А.В. - 62 стр.

B1=5
H=7
S=L-H
! Погонная нагрузка
Q=100000
!* Ключевые точки
K,1,0,0,,
K,2,L,0,,
K,3,L,-B2,,
K,4,S,-B2,,
K,5,0,-B1,,
K,6,S,,,
!* Соединяем точки линиями
LSTR,1,6
LSTR,6,2
LSTR,2,3
LSTR,3,4
LSTR,4,5
LSTR,5,1
LSTR,4,6
!* Задаем тип элемента
ET,1,PLANE82
!* Задание опций элемента
KEYOPT,1,3,0 ! Плосконапряженное состояние
KEYOPT,1,5,1 ! Напряжения вычисляются в квадратурных точках
KEYOPT,1,6,3 ! Поверхностные силы вычисляются в кв. точках
!* Задаем свойства материала
UIMP,1,EX, , ,2e11, ! Модуль Юнга
UIMP,1,NUXY, , ,0.3, ! Коэффициент Пуассона
UIMP,1,DENS, , ,7800, ! Плотность
!* Строим площади по линиям
AL, 2,3,4,7 ! Прямоугольник – площадь первая
AL, 1,7,5,6 ! Трапеция – площадь вторая
! Присвоение числа делений на элементы
LSEL,S,LOC,X,S ! Выделить линию X = L-H
LESIZE,ALL, , ,6,1, , , ,1 ! Присвоить число делений 6, равномерное
! Выделить горизонтальную линию
LSEL,S,LOC,Y,0 ! Y = 0
LSEL,R,LOC,X,0, S ! 0 <= X <= S
! Число делений 6, неравномерное, коэф. сжатия 0.7
LESIZE,ALL, , ,6,0.7, , , ,1
!* Выделить горизонтальную линию
LSEL,S,LOC,Y,0 ! Y = 0
LSEL,R,LOC,X,S, L ! S <= X <= L
!* Число делений 15, равномерное
LESIZE,ALL, , ,15,1, , , ,1
ALLSEL, ALL
!*
MSHAPE,0,2D ! Элементы четырехугольные, сетка двумерная
MSHKEY,1 ! Сетка правильная