Page 6 - Demo
P. 6
Planar Truss Example for Comrel Add-on RCP Consult, 2023-2025 Page 6 double n=Sv/ddA*0.2; // height of rectangle double X[nbd]={-l, l, l, -l}; double Y[nbd]={-n, -n, n, n}; double rad=theta[e]*PI/180.; double c=cos(rad); double s=sin(rad); double x=(XY[IEN[e][0]-1][0]+XY[IEN[e][1]-1][0])/2; double y=(XY[IEN[e][0]-1][1]+XY[IEN[e][1]-1][1])/2;// Polygon coordinates double XYrot[nbd+1][ned+1]; for(int i=0; i
