% PC28M
function [Minc0]=subMinc0sr(u)
Minc0=zeros(13,8);
Minc0(1,1)=-1;
Minc0(2,2)=-1;
Minc0(3,1)=1; Minc0(3,5)=-1;
Minc0(4,2)=1; Minc0(4,5)=-1;
Minc0(5,7)=-1;
Minc0(6,8)=-1;
Minc0(7,3)=1; Minc0(7,6)=-1;
Minc0(8,4)=1; Minc0(8,6)=-1;
Minc0(9,1)=1; Minc0(9,7)=-1;
Minc0(10,7)=1; Minc0(10,3)=-1;
Minc0(11,2)=1; Minc0(11,8)=-1;
Minc0(12,8)=1; Minc0(12,4)=-1;
Minc0(13,1)=1; Minc0(13,2)=-1;
% Barra 1 = SA
% Barra 2 = RA
% Barra 3 = SB
% Barra 4 = RB
% Barra 5 = m
% Barra 6 = p
% Barra 7 = FictTS
% Barra 8 = FictTR
% Elemento 1 = G-SA(zs0)
% Elemento 2 = G-RA(zr0)
% Elemento 3 = SA-m
% Elemento 4 = RA-m
% Elemento 5 = G-FictTS
% Elemento 6 = G-FictTR
% Elemento 7 = SB-p
% Elemento 8 = RB-p
% Elemento 9 = SA-FictTS
% Elemento 10 = FictTS-SB
% Elemento 11 = RA-FictTR
% Elemento 12 = FictTR-RB
% Elemento 13 = zsr0
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
