%function [k] = swfbeamstiff(L,E,I)
function [k] = swfbeamstiff(L,E,I)
%
k =[12*E*I/L^3 6*E*I/L^2 -12*E*I/L^3 6*E*I/L^2;
	6*E*I/L^2 4*E*I/L -6*E*I/L^2 2*E*I/L;
	-12*E*I/L^3 -6*E*I/L^2 12*E*I/L^3 -6*E*I/L^2;
   6*E*I/L^2 2*E*I/L -6*E*I/L^2 4*E*I/L];