8.4.2 Настройки макроса adapt с пользовательскими подпрограммами.

Стандартный макрос ADAPT не всегда применим к вашим специфическим потребностям задачи. Например, вам необходимо провести разбиение и объемов и поверхностей, что невозможно со стандартным макросом. Для этой, и других таких ситуаций, вы можете модифицировать макрос ADAPT для удовлетворения потребности ваших задач. Используя текст макроса для выполнения адаптивного разбиения, мы преднамеренно дали Вам доступ к логике, и таким образом, дали методику изменения макроса по вашему желанию.

К счастью, Вы не всегда должны изменять кодирование в макросе ADAPT. Три определенных части макроса могут быть изменены посредством пользовательских подпрограмм, которые являются отдельными пользовательскими файлами. Вы можете создавать их, и они будут вызываться, макросом ADAPT. Три особенности, которые могут быть изменены пользовательскими подпрограммами:

• Последовательность команд разбиения

• Последовательность команд граничных условий

• Последовательность команд решения

Соответствующие пользовательские подпрограммы должны быть соответственно названы: ADAPTMSH.MAC, ADAPTBC.MAC, и ADAPTSOL.MAC.

8.4.2.1 Построение подпрограммы разбиения (adaptmsh.Mac)

По умолчанию, если вы выбрали в вашей модели один или несколько объемов, макрос ADAPT проведет разбиение только объемов (ни одна поверхность не будет разбита). Если вы не выбрали объем, то макрос ADAPT, проведет разбиение только поверхностей. Если вам необходимо провести разбиение и объемов и поверхностей, вы можете создать пользовательскую подпрограмму ADAPTMSH.MAC для выполнения этих действий. Вы должны будете очистить любые разбитые объекты, прежде чем проводить повторные разбиения. Такая подпрограмма могла бы выглядеть следующим образом:

C *** Subroutine ADAPTMSH.MAC - Ваше имя – Наименование задачи - Дата создания

TYPE, 1 | Установка атрибута «тип элемента» для разбиения поверхностей

ACLEAR, 3, 5, 2 | Очистка 3-ей и 5-ой поверхностей и объемов для разбиения

VCLEAR, ALL

AMESH, 3, 5 ,2 |Разбиение 3-ей и 5-ой поверхностей (другие поверхности не будут разбиваться)

TYPE, 2 |Изменение типа элемента для разбиения объемов

VMESH, ALL | разбиение всех объемов

Полезно прочитать описание команд TYPE, ACLEAR, VCLEAR, AMESH, VMESH

Мы настоятельно рекомендуем, чтобы Вы обязательно включили строку с комментарием (C ***) для идентификации вашего макроса. Эта строка комментария будет отражена в распечатке работы, и гарантирует, что макрос ADAPT, правильно использовал вашу пользовательскую подпрограмму.

8.4.2.2 Создание подпрограммы граничных условий (adaptbc.Mac)

Макрос ADAPT, очищает сетку и повторно разбивает на каждом шаге решения. В результате этого, узлы и элементы вашей модели будут неоднократно изменяться. Эта ситуация вообще препятствует использованию конечно-элементных нагрузок, закреплению каких-либо узлов и применению уравнений ограничения, которые должны быть определены для условий определенных узлов и элементов. Если вам необходимо включить любой из этих конечно-элементных объектов, вы можете создать пользовательскую подпрограмму ADAPTBC.MAC. В этой подпрограмме вы можете выбирать узлы по их местоположению, и тогда можно применить конечно-элементные нагрузки, закрепления узлов и уравнения ограничения для отобранных узлов. Пример подпрограммы ADAPTBC.MAC:

C *** Subroutine ADAPTBC.MAC-Ваше имя – Наименование задачи- - Дата создания

NSEL, S ,LOC ,X, 0 | Выбор узлов @ X=0.0

D ,ALL , UX, 0 | Закрепление выбранных узлов в направлении оси X

NSEL, S ,LOC ,Y, 0 | Выбор узлов @ Y=0.0

D ,ALL , UY, 0 | Закрепление выбранных узлов в направлении оси Y

NSEL ,ALL | Выбрать все узлы