Как отличить различные трещины / обогащенные области в Abaqus от подпрограммы UDMGINI? - PullRequest
Новая
       33

Как отличить различные трещины / обогащенные области в Abaqus от подпрограммы UDMGINI?

0 голосов
/ 19 февраля 2019

Я хочу использовать разные критерии отказа для двух или более отдельных обогащенных областей в одной модели.Области всегда в разных случаях сделаны из разных материалов.Я пытался получить имена экземпляров, чтобы различать их (см. Код ниже), но это работает очень нестабильно - я часто получаю флаг ошибки в переменной JRCD.Есть ли способ получить текущее имя материала / набора элементов / трещины в UDMGINI?Спасибо 

<...>
CHARACTER*80 CPNAME
INTEGER IERROR
<...>
CALL GETPARTINFO(NOEL, 1, CPNAME, LOCNUM, JRCD)
IERROR = IERROR + JRCD
<...>
IF (CPNAME.EQ.'INSTANCE_NAME_1') THEN
<calculation of failure criterion 1>
ELSEIF (CPNAME.EQ.'INSTANCE_NAME_2') THEN
<calculation of failure criterion 2>
END IF
IF (IERROR.NE.ZERO) THEN
 WRITE(6,*) 'REQUEST ERROR IN UDMGINI FOR ELEMENT NUMBER ',
+ NOEL,'INTEGRATION POINT NUMBER ', NPT, ' (INSTANCE NAME)'
END IF
<...>
...