diff options
Diffstat (limited to 'truss_solve.m')
-rwxr-xr-x | truss_solve.m | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/truss_solve.m b/truss_solve.m new file mode 100755 index 0000000..50150bb --- /dev/null +++ b/truss_solve.m @@ -0,0 +1,26 @@ +% Truss Compute + +C = [ + 1 1 0 0 0 0 0 0 0 0 0 0 0 + 1 0 1 1 0 0 0 0 0 0 0 0 0 + 0 0 0 1 1 1 0 0 0 0 0 0 0 + 0 1 1 0 1 0 1 1 0 0 0 0 0 + 0 0 0 0 0 1 1 0 1 1 0 0 0 + 0 0 0 0 0 0 0 1 1 0 1 1 0 + 0 0 0 0 0 0 0 0 0 1 1 0 1 + 0 0 0 0 0 0 0 0 0 0 0 1 1 +]; + +Sy = zeros(8,3); Sy(1,2)=1; Sy(8,3)=1; +Sx = zeros(8,3); Sx(1,1)=1; + +X = [0 0 4 4 8 8 12 12]; +Y = [0 4 8 4 8 4 4 0]; + +L = zeros(16,1); L(8+4)=-25; + +A = computeA(C,X,Y,Sx,Sy); + +result = A\(-L) + + |