Copyright © 2018
ATA ENGINEERING, INC.
ALL RIGHTS RESERVED
encapsulated function Cloth_NatTri_Init
import Modelica.Math.Vectors;
import Modelica.Mechanics.MultiBody.Frames;
import Modelica.Utilities.Streams.print;
import Modelica.Constants.pi;
import SI = Modelica.SIunits;
import DeployStructLib;
input Integer M, N;
input Real E "Elastic modulus";
input Real G "Shear modulus";
input Real nu "Poisson's ratio";
input Real thickness "thickness";
input Integer index "Which triangle is being created? (BL=1, UL=2, UR=3, BR=4)";
input SI.Position[3] P1;
input SI.Position[3] P2;
input SI.Position[3] P3;
input SI.Position[3] P4;
input SI.Position P1_loc[3] = {0, 0, 0} "Relative location of P1_start for initialization reference";
input Real[3] ref_angles = {0, 0, 0} "Angles to describe orientation of P1 in space";
input Integer[3] axes_sequence = {1, 2, 3} "Sequence of axes of 'ref_angles' to describe orientation of P1 in space";
input Boolean debug = false;
output Real Kq[M, N, 3, 7];
end Cloth_NatTri_Init;