function [Minc1]=subMinc1sr(u)
Minc1=zeros(9,6);
Minc1(1,1)=-1;
Minc1(2,2)=-1;
Minc1(3,1)=1; Minc1(3,5)=-1;
Minc1(4,2)=1; Minc1(4,5)=-1;
Minc1(5,1)=1; Minc1(5,3)=-1;
Minc1(6,2)=1; Minc1(6,4)=-1;
Minc1(7,3)=1; Minc1(7,6)=-1;
Minc1(8,4)=1; Minc1(8,6)=-1;
Minc1(9,1)=1; Minc1(9,2)=-1;
% Barra 1 = SA
% Barra 2 = RA
% Barra 3 = SB
% Barra 4 = RB
% Barra 5 = m
% Barra 6 = p
% Elemento 1 = N-SA(zs1)
% Elemento 2 = N-RA(zr1)
% Elemento 3 = SA-m
% Elemento 4 = RA-m
% Elemento 5 = zpsTS
% Elemento 6 = zpsTR
% Elemento 7 = SB-p
% Elemento 8 = RB-p
% Elemento 9 = zsr1
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
