Импорт из WB в ANSYS

25 ноября 2016

не вижу смысла переходить в WB

25 ноября 2016

Компас и ANSYS совместимы через step и x_t; iges компасовский не удастся всучить, во всём виновата генетика Компаса. Или сохраните в iges из SolidWorks, при этом в настройках диалога сохранения выбирается пункт - для ANSYS. FreeCAD может ещё (наверное).

А так ваш параллелепипед строится в APDL одной командой.

Что такое размах деформаций, поясните кто-нибудь?

Необходимо определить компоненты тензора упругих и пластических деформаций (дельта эпсилон:11,22,33,12, 23, 31)

В табличной виде или как? После процесса решения задачи в ANSYS можно построить картиночки каждого из компонент тензоров деформаций, хоть пластического, хоть упругого.

Может посоветовать методичку? У меня в подписи лежат кой-какие материалы, например kotov_a_g_osnovy_modelirovaniya_v_srede_ansys, или Konyuhov A.V. - Osnovi analiza konstrukziy v ANSYS -2001.rar

25 ноября 2016

@@Lays,

Компас и ANSYS совместимы через step и x_t; iges компасовский не удастся всучить, во всём виновата генетика Компаса. Или сохраните в iges из SolidWorks, при этом в настройках диалога сохранения выбирается пункт - для ANSYS. FreeCAD может ещё (наверное).

А так ваш параллелепипед строится в APDL одной командой.

Что такое размах деформаций, поясните кто-нибудь?

В табличной виде или как? После процесса решения задачи в ANSYS можно построить картиночки каждого из компонент тензоров деформаций, хоть пластического, хоть упругого.

Может посоветовать методичку? У меня в подписи лежат кой-какие материалы, например kotov_a_g_osnovy_modelirovaniya_v_srede_ansys, или Konyuhov A.V. - Osnovi analiza konstrukziy v ANSYS -2001.rar

Мне не параллелепипед нужно построить)

Вообще необходимы тензоры в табличном виде для дальнейшего расчета.

Спасибо.

25 ноября 2016

Вообще необходимы тензоры в табличном виде для дальнейшего расчета.

Дёрните принцип работы отсюда http://cccp3d.ru/topic/81235-%D0%BA%D0%BE%D0%BD%D0%BA%D1%83%D1%80%D1%81-%D1%80%D0%B0%D1%81%D1%87%D0%B5%D1%82%D0%B0-%D0%B8-%D0%BE%D0%BF%D1%82%D0%B8%D0%BC%D0%B8%D0%B7%D0%B0%D1%86%D0%B8%D0%B8-%D0%B4%D0%BE-150-%D1%82%D1%8B%D1%81-%D1%80%D1%83%D0%B1-%D0%BF%D1%80%D0%B8%D0%B7/#entry762202

тут

lx=1.22e-2
ly=1.4e-2
d=2e-3
Eel=2.1e11
mu=0.3
h=0.48E-5
dh=0.005E-5
ult_stress=0.150E9	!PRED - зарезервированное имя команды
t=1
j=101+NINT(50*(2*lx/ly-1))
!ГЕОМЕТРИЯ
/PREP7
RECTNG,0,lx,0,0.5*ly
RECTNG,0,0.5*ly,0,0.5*ly
PCIRC,0.5*d,,0,90
APTN,ALL
ASEL,S,LOC,X,0,0.5*d
ADELE,ALL,,,1
ALLSEL
!МАТЕРИАЛ
ET,1,PLANE182 
MP,EX,1,Eel 
MP,PRXY,1,mu
!СЕТКА
LSEL,S,LOC,X,0,0.5*d
LSEL,R,LOC,Y,0,0.5*d
LESIZE,ALL,,,100
LSEL,S,LOC,Y,0
LSEL,R,LOC,X,0,0.5*ly
LESIZE,ALL,,,100,0.1
LSEL,S,LOC,X,0
LESIZE,ALL,,,100,0.1
LSEL,S,LOC,X,0.45*ly+0.1*lx,0.9*lx-0.05*ly
LESIZE,ALL,,,NINT(50*(2*lx/ly-1))
LSEL,S,LOC,Y,0.5*ly
LSEL,R,LOC,X,0,0.5*ly
LESIZE,ALL,,,50
LSEL,S,LOC,x,0.5*ly
LSEL,A,LOC,X,lx
LESIZE,ALL,,,50
ALLSEL
AMAP,,KP(1e-3,0,0),KP(0.5*ly,0,0),KP(0,0.5*ly,0),KP(0,0.5*d,0)
ASEL,S,LOC,X,0.5*ly,lx
MSHAPE,0,2D
MSHKEY,0
AMESH,ALL
/SOLU
LSEL,S,LOC,Y,0
NSLL,S,1
D,ALL,UY,0
LSEL,S,LOC,Y,0.5*ly
NSLL,S,1
CP,1,UY,ALL
*GET,master,node,0,num,min
D,master,UY,h		!Перемещение линии
D,NODE(lx,0,0),UX,0	!Перемещение точки
ALLSEL
ANTYPE,STATIC
NLGEOM,ON
NROPT,FULL
OUTRES,ALL,ALL
TIME,t
NSUBST,1,1e9,1
RESCONTRL,DEFINE,ALL,LAST,1
SOLVE
/POST1 
AVPRIN,0			!Точно нужно? 
ETABLE,SEQV,S,EQV
ESORT,ETAB,SEQV,1,0
*GET,SORTMAX,SORT,,MAX
*GET,SORTMA,SORT,,IMAX
*DIM,DEAD_ELEMS,ARRAY,j+1
*DO,i,1,j+1
	DEAD_ELEMS(i)=0
*ENDDO
*DO,m,1,j
	*GET,par_res,NODE,master,RF,FY
	fsum=ABS(par_res)				!абсолютное значение равнодействующей силы
	*IF,SORTMAX,GE,ult_stress,THEN			!Условие 1
		/SOLU
		PARSAV,ALL,params,par
		ANTYPE,STATIC,RESTART
		PARRES,,params,par
		i=0
		elnum=1
		ESEL,S,,,SORTMA
		*DOWHILE,elnum
			i=i+1
			elnum=DEAD_ELEMS(i)
			ESEL,A,,,DEAD_ELEMS(i)
		*ENDDO
		DEAD_ELEMS(i)=SORTMA
		EKILL,ALL				! Убить элемент
		ALLSEL
		t=t+1
		NLGEOM,ON
		NROPT,FULL
		OUTRES,ALL,ALL
		TIME,t
		NSUBST,1,1e9,1
		RESCONTRL,DEFINE,ALL,LAST,1
		SOLVE					! Решить
		/POST1
		SET,LAST
		ETABLE,SEQV,S,EQV
		ESORT,ETAB,SEQV,1,0
		*GET,SORTMAX,SORT,,MAX
		*GET,SORTMA,SORT,,IMAX
	*ELSEIF,SORTMAX,lt,ult_stress! Условие 2
		/SOLU
		PARSAV,ALL,params,par
		ANTYPE,STATIC,RESTART
		PARRES,,params,par
		ALLSEL
		h=h+dh
		D,master,UY,h
		t=t+1
		NLGEOM,ON
		NROPT,FULL
		OUTRES,ALL,ALL
		TIME,t
		NSUBST,1,1e9,1
		RESCONTRL,DEFINE,ALL,LAST,1
		i=0
		elnum=1
		ESEL,NONE
		*DOWHILE,elnum
			i=i+1
			elnum=DEAD_ELEMS(i)
			ESEL,A,,,DEAD_ELEMS(i)
		*ENDDO
		EKILL,ALL
		ALLSEL
		SOLVE
		/POST1
		ETABLE,REFL				! Обновить базу 
	*ENDIF
	!CONTINUE
*ENDDO
/POST1 
ESEL,S,LIVE 
PLESOL,S,EQV,0,1,0

или криво тут


!ГЕОМЕТРИЯ
/PREP7
K,1, 0.0,0.0
K,2, 0.0, 0.14E-1
K,3, 0.122E-1, 0.14E-1
K,4, 0.122E-1, 0.0

K,5, 0.0, 0.75E-2
K,6, 0.0, 0.55E-2
K,7, 0.1E-2, 0.65E-2
K,8, 0.0, 0.65E-2

L,1,6 !Линия 1
L,5,2 !Линия 2
L,2,3 !Линия 3
L,3,4 !Линия 4
L,4,1 !Линия 5

LARC,6,7,8,0.001, !Линия 6
LARC,7,5,8,0.001, !Линия 7

AL,1,2,3,4,5,6,7 ! Поверхность 1

KDELE, 8 ! Удалила точку 8


/PNUM,KP,1
/PNUM,LINE,1
/PNUM,AREA,1
/PNUM,VOLU,0
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0
/REPLOT

LPLOT

!МАТЕРИАЛ

ET,1,PLANE182
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2.1E11
MPDATA,PRXY,1,,0.3

! СЕТКА


ACLEAR, 1
APLOT
ESIZE,0.0015,0,
MSHAPE,1,2D
!*
CM,_Y,AREA
ASEL, , , , 1
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*

Finish



/SOLU
/GO
h=0.48E-5
DL,3, ,UY,h! Перемещение линии
DL,5, ,UY,
DK,1, , , ,0,ALL, , , , , , !Перемещение точки
Finish

/SOLU
ANTYPE,STATIC
NLGEOM,ON
NROPT,FULL

/STATUS,SOLU
SOLVE

Finish

/POST1

AVPRIN,0, ,
ETABLE,SEQV,S,EQV

PRED=0.150E9

ESEL,S,ETAB,SEQV,PRED,, ,0 !Критерий прочности

FINISH


*do,m,1,50


!Макрос для равнодействующей силы

LSEL,S, , , 5 !выделила линию 1
NSLL,S,5 !выделила все узлы на линии 1


*get,nc,node,0,count ! узнала количество узлов
*dim,data,array,nc,2 ! создала массив, nc-количество строк, 2-столбцы

*get,n_num,node,0,num,min ! взяла узел с наименьшим номером


! цикл

*do,i,1,nc ! цикл по всем выделенным узлам от 1 до nc

*GET,data(i, 1),node,n_num,rf,fy !взяла данные равнодействующей силы
! для узла и записала их во второй столбец массива

n_num=NDNEXT(n_num) ! перешла к следующему номеру от n_num

*enddo

*vscfun,par_res,sum,data(1,1) !суммирование равнодействующей силы
fsum=abs(par_res) ! абсолютное значение равнодействующей силы



/solu
ESEL,ALL

Finish

/POST1
ESORT,ETAB,SEQV,1,0, ,
*GET,SORTMAX,SORT,,MAX


*IF,SORTMAX,GE,PRED,THEN ! Условие 1


/POST1
*GET,SORTMA,SORT,,IMAX
esel,s,,,SORTMA,,,0


/solu
EKILL,ALL ! Убить элемент
ESEL,ALL ! Выделить все элементы

/STATUS,SOLU
SOLVE ! Решить
FINISH

/POST1
ETABLE, REFL ! Обновить базу
FINISH


*ELSEIF,SORTMAX,lt,PRED! Условие 2

/solu
ESEL,ALL ! Выделить все элементы


h=h+0.005E-5
DL,3, ,UY,h

/STATUS,SOLU
SOLVE ! Решить
FINISH

/POST1
ETABLE, REFL ! Обновить базу
FINISH

*ELSEIF,fsum,LT,5e-9,stop

*ENDIF
!CONTINUE

*enddo

/POST1

ESEL,S,LIVE
PLESOL, S,EQV, 0,1,0

(взято с dwg)

25 ноября 2016

Дёрните принцип работы отсюда http://cccp3d.ru/topic/81235-%D0%BA%D0%BE%D0%BD%D0%BA%D1%83%D1%80%D1%81-%D1%80%D0%B0%D1%81%D1%87%D0%B5%D1%82%D0%B0-%D0%B8-%D0%BE%D0%BF%D1%82%D0%B8%D0%BC%D0%B8%D0%B7%D0%B0%D1%86%D0%B8%D0%B8-%D0%B4%D0%BE-150-%D1%82%D1%8B%D1%81-%D1%80%D1%83%D0%B1-%D0%BF%D1%80%D0%B8%D0%B7/#entry762202

тут

или криво тут


!ГЕОМЕТРИЯ
/PREP7
K,1, 0.0,0.0
K,2, 0.0, 0.14E-1
K,3, 0.122E-1, 0.14E-1
K,4, 0.122E-1, 0.0

K,5, 0.0, 0.75E-2
K,6, 0.0, 0.55E-2
K,7, 0.1E-2, 0.65E-2
K,8, 0.0, 0.65E-2

L,1,6 !Линия 1
L,5,2 !Линия 2
L,2,3 !Линия 3
L,3,4 !Линия 4
L,4,1 !Линия 5

LARC,6,7,8,0.001, !Линия 6
LARC,7,5,8,0.001, !Линия 7

AL,1,2,3,4,5,6,7 ! Поверхность 1

KDELE, 8 ! Удалила точку 8


/PNUM,KP,1
/PNUM,LINE,1
/PNUM,AREA,1
/PNUM,VOLU,0
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0
/REPLOT

LPLOT

!МАТЕРИАЛ

ET,1,PLANE182
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2.1E11
MPDATA,PRXY,1,,0.3

! СЕТКА


ACLEAR, 1
APLOT
ESIZE,0.0015,0,
MSHAPE,1,2D
!*
CM,_Y,AREA
ASEL, , , , 1
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*

Finish



/SOLU
/GO
h=0.48E-5
DL,3, ,UY,h! Перемещение линии
DL,5, ,UY,
DK,1, , , ,0,ALL, , , , , , !Перемещение точки
Finish

/SOLU
ANTYPE,STATIC
NLGEOM,ON
NROPT,FULL

/STATUS,SOLU
SOLVE

Finish

/POST1

AVPRIN,0, ,
ETABLE,SEQV,S,EQV

PRED=0.150E9

ESEL,S,ETAB,SEQV,PRED,, ,0 !Критерий прочности

FINISH


*do,m,1,50


!Макрос для равнодействующей силы

LSEL,S, , , 5 !выделила линию 1
NSLL,S,5 !выделила все узлы на линии 1


*get,nc,node,0,count ! узнала количество узлов
*dim,data,array,nc,2 ! создала массив, nc-количество строк, 2-столбцы

*get,n_num,node,0,num,min ! взяла узел с наименьшим номером


! цикл

*do,i,1,nc ! цикл по всем выделенным узлам от 1 до nc

*GET,data(i, 1),node,n_num,rf,fy !взяла данные равнодействующей силы
! для узла и записала их во второй столбец массива

n_num=NDNEXT(n_num) ! перешла к следующему номеру от n_num

*enddo

*vscfun,par_res,sum,data(1,1) !суммирование равнодействующей силы
fsum=abs(par_res) ! абсолютное значение равнодействующей силы



/solu
ESEL,ALL

Finish

/POST1
ESORT,ETAB,SEQV,1,0, ,
*GET,SORTMAX,SORT,,MAX


*IF,SORTMAX,GE,PRED,THEN ! Условие 1


/POST1
*GET,SORTMA,SORT,,IMAX
esel,s,,,SORTMA,,,0


/solu
EKILL,ALL ! Убить элемент
ESEL,ALL ! Выделить все элементы

/STATUS,SOLU
SOLVE ! Решить
FINISH

/POST1
ETABLE, REFL ! Обновить базу
FINISH


*ELSEIF,SORTMAX,lt,PRED! Условие 2

/solu
ESEL,ALL ! Выделить все элементы


h=h+0.005E-5
DL,3, ,UY,h

/STATUS,SOLU
SOLVE ! Решить
FINISH

/POST1
ETABLE, REFL ! Обновить базу
FINISH

*ELSEIF,fsum,LT,5e-9,stop

*ENDIF
!CONTINUE

*enddo

/POST1

ESEL,S,LIVE
PLESOL, S,EQV, 0,1,0

(взято с dwg)

Не понимаю зачем. Я научилась их находить

26 ноября 2016

@@Борман WIN

Да это понятно, что за ворчуном будущее. Быть может, если бы я каждый день фигачил в сисе - то переучился бы.. Мои нечастые задачи в сисе (а это в 99% случаев задачи прочности) либо слишком простые, либо слишком сложные. Рутины нет. В таких условиях переходить на ворчуна нет необходимости.

Еще раз повторю, преимущества Strength over MAPDL для меня следующие:

- шикарный хелп

- низкоуровневый доступ к модели

- 100% отсутствие глюков на 64-битных версиях :)

- вся модель умещается на одном листе блокнота и вся перед глазами.

- плюс то, о чем скажет Федор

- плюс то, о чем не скажете вы.

Недостатки ворчуна для меня это ...

- Модульность. Я хочу видеть задачу единой в трех лицах пре/проц/пост и переходить из одного в другое с легкостью.

- Низкая автоматизация при создании модели. Создание КЭ-модели это искусство. Я не хочу быть органичен интерфейсом. Установка APDL-костылей - это смешно.

- В посте мне нужен доступ к любой переменной в любом узле в любой момоент времени. Я хочу их все возвести в квадрат, умножить друг на друга и нарисовать через один. Поверьте, такое бывает.

- плюс то, о чем скажет Федор

- плюс то, о чем не скажете вы.

Вот, например, на днях решал трехмерную солидную штуку. Мне нужен был рассчет эквивалетного напряжения по срединной поверхности пластины через композицию SigmaX,SigmaY и SigmaXY (в системе коодинат пластины), а не по полному тензору.

26 ноября 2016

@Борман WIN

Вот, например, на днях решал трехмерную солидную штуку.....

FATALITY!

28 ноября 2016

Недостатки ворчуна для меня это ... - Модульность. Я хочу видеть задачу единой в трех лицах пре/проц/пост и переходить из одного в другое с легкостью.

Из трех приведенных только этот аргумент безапелляционный, хоть и завязан исключительно на "хочу" пользователя.

Ну, еще хранение проектов в блокноте, безусловно, плюс. По крайней мере, если речь идет о работе над проектом в одно лицо и кратковременно. Разбирать даже свои коды спустя год, если вовремя не проставил достаточное количество комментариев... не то чтобы невозможно, но неприятно.

Да это понятно

Собственно, всем всё понятно. Интересно, какие решения принимают новоиспеченные адепты церкви. Просто интересно, просто наблюдать.

28 ноября 2016

Не звонили б soklakov своим чудачеством. Практика показывает, что воспоминание о том, что проблема была решена, покрывает пол часа с поиском кода в 1500 тысячах задачах. Не нужно втирать населению, то в чём сами не разбираетесь

28 ноября 2016

Не нужно втирать населению

Право же, не Вам мне говорить, что мне нужно делать :biggrin:

Хотите защитить население от лишней информации, качайте свою пропаганду. Действуйте, а не нойте.

28 ноября 2016

Комплексы? Точно чудак.

28 ноября 2016

Практика показывает, что воспоминание о том, что проблема была решена, покрывает пол часа с поиском кода в 1500 тысячах задачах.

Не стоит думать, что в CAE работают исключительно Вы и такие как Вы. Есть много разных людей. И да распустятся все цветы :smile:

Вчерашним конструкторам и студентам тоже хочется что-то считать. И да, им не хватает часто фундаментальных знаний, они наверстают при желании и упорстве.

Но большинству из них не нравится копаться в кодах полутора тысяч задач. Довольно странно заставлять их работать по-Вашему, а не так, как им удобно.

28 ноября 2016

......................

Во многой мудрости много печали

Познание бесконечности требует бесконечного времени

Именно взращённые Вашей конторой студенты безруки. И требуют на любой вопрос кнопки.

........................

Немецкий офис конторы, под названием которой Вы работаете очень любят писать APDL коды.

Немецкий офис конторы называет классический интрефейс Hi-End, а Wb - low-end и говорят, что Wb это только коммерция.

......................

И есть соответствующие документы.

Не вижу смысла говорить на эту тему - в конечном случае софт предназначен для зарабатывания денег. А время показало, что с данной фирмы ушли знающие специалисты, которые стояли в основе.

28 ноября 2016

Не вижу смысла говорить на эту тему

Так что же говорите?

А время показало, что с данной фирмы ушли знающие специалисты, которые стояли в основе.

Это Ваша беда и обида. В подробности Ваших конфликтов мне вдаваться не очень интересно. Я не знаю, что именно Вы не поделили и с кем. Могу Вам лишь посочувствовать. Лисицу с виноградом напоминаете у Крылова.

28 ноября 2016

" Разбирать даже свои коды спустя год, если вовремя не проставил достаточное количество комментариев... не то чтобы невозможно, но неприятно" - надо не полениться и познакомиться со структурным программированием и вообще культурой написания культурных кодов на любом языке. Литературы предостаточно, тогда и десятилетней давности коды не будут вызывать проблем. :)

"Довольно странно заставлять их работать по-Вашему, а не так, как им удобно" - ничего странного. Играть приходится учиться на любом инструменте, хоть гитаре, хоть барабане. Компы не исключение :)

Изменено 28 ноября 2016 пользователем Fedor

30 ноября 2016

Познание бесконечности требует бесконечного времени

....

с данной фирмы ушли знающие специалисты, которые стояли в основе.

Кривая насыщения? Спецы дописали основной пласт, продукт достиг определённого совершенства. Мелочи дописываются, вроде демпфирования в пьезоэлектриках и элементы-мультифизики (220+).

Войти

Импорт из WB в ANSYS

Рекомендованные сообщения

soklakov 1 475

Ссылка на сообщение

Поделиться на других сайтах

AlexKaz 1 821

Ссылка на сообщение

Поделиться на других сайтах

Lays 0

Ссылка на сообщение

Поделиться на других сайтах

AlexKaz 1 821

Ссылка на сообщение

Поделиться на других сайтах

Lays 0

Ссылка на сообщение

Поделиться на других сайтах

Борман 2 375

Ссылка на сообщение

Поделиться на других сайтах

piden 2 874

Ссылка на сообщение

Поделиться на других сайтах

soklakov 1 475

Ссылка на сообщение

Поделиться на других сайтах

dronm 26

Ссылка на сообщение

Поделиться на других сайтах

soklakov 1 475

Ссылка на сообщение

Поделиться на других сайтах

dronm 26

Ссылка на сообщение

Поделиться на других сайтах

soklakov 1 475

Ссылка на сообщение

Поделиться на других сайтах

dronm 26

Ссылка на сообщение

Поделиться на других сайтах

soklakov 1 475

Ссылка на сообщение

Поделиться на других сайтах

Fedor 1 597

Ссылка на сообщение

Поделиться на других сайтах

AlexKaz 1 821

Ссылка на сообщение

Поделиться на других сайтах

Присоединяйтесь к обсуждению

Сейчас на странице 0 пользователей

Сообщения