Prezentarea unui program cu elemente finite capabil a fi folosit în ...

Limbajul APDL permite până la 20 de nivele de apelare în “adâncime”, adică un
macrou lansat apelează alt macrou şi aşa mai departe. D exemplu într-o bibliotecă de macrouri
macroul MYSTART apelează macroul MYSPHERE pentru a crea o sferă:
MYSTART
/PREP7
/VIEW,,-1,-2,-3
MYSPHERE,1.2
FINISH
/EOF
MYSPHERE
SPHERE,ARG1
/EOF
Cea mai simplă comandă de salt necondiŃionat este *GO, de exemplu secvenŃa de
instrucŃiuni de mai jos arată utilizarea comenzii.
*GO,:BRANCH1
--- ! Acest bloc de comenzi nu se execută
---
:BRANCH1
---
---
Eticheta specificată prin comanda *GO trebuie să înceapă cu (:) şi să nu conŃină mai
mult de 8 caractere inclusiv cele două puncte.
Limbajul APDL permite executarea unui set alternativ de blocuri pe baza evaluării
unei condiŃii prin comanda *IF.
Comanda *IF are următoarea sintaxă:
*IF, VAL1, Oper, VAL2, Base
în care
VAL1 este primul parametru în comparaŃie;
Oper este operatorul de comparaŃie; Operatorii de comparaŃie sunt:
EQ (egal);
NE (diferit);
LT (mai mic decât);
GT (mai mare decât);
LE (mai mic sau egal);
GE (mai mare sau egal);
ABLT (mai mic în valori absolute);
ABGT (mai mare în valori absolute).
VAL2 este al doilea parametru în operaŃie;
Base este acŃiunea care urmează a fi executată dacă evaluarea este adevărată. Dacă
argumentul Base ia valoarea THEN atunci comanda *IF se transformă într-o comandă if-thenelse
(similară programului FORTRAN). ConstrucŃia completă este
• O comandă *IF urmată de
• Una sau mai multe comenzi *ELSEIF
• O comandă opŃională *ELSE
• O comandă obligatorie *ENDIF care marchează sfârşitul construcŃiei.
În combinaŃie comanda *IF poate lucra ca o funcŃie CASE în alte limbaje.
Dacă argumentul Base ia valoarea STOP, se iese din program. Uneori pentru ştergerea
parametrilor se foloseşte comanda /CLEAR, care poate şterge şi parametrii de control a
instrucŃiunii de decizie, deci se impune mare atenŃie în manipularea parametrilor.