clear all clc y=[1 -1;-1 1]; 'k1'=springelementstifness(K); k2='springelementstifness(K)'; k3='springelementstifness(K)'; k4='springelementstifness(K)'; k5='springelementstifness(K)'; y='springassemble(K,k,i,j)'; K(i,i)=K(i,i)+k(1,1); K(i,i)=K(i,j)+k(1,2); K(j,i)=K(j,i)+k(2,1); K(j,j)=K(j,j)+k(2,2); y=K; K=zeros(5,5); K=SpringAssemble(K,k1,1,3) K=SpringAssemble(K,k2,3,4) K=SpringAssemble(K,k3,3,5) K=SpringAssemble(K,k4,3,5) K=SpringAssemble(K,k5,5,4)