function R=genc_var(flag)
% Y=[xA xB xC Temp holdup]=[1 1 1 48 2]
% 1 < flag < 9 = Enkelte temperaturer
% flag > 8 = Temperatur differanser
% flag = 1, temp på trinn 1, 32 og 48
% flag = 2, temp på trinn 2 31 47
% flag = 3, temp på trinn 3 30 46
R=zeros(1,53);
R(1:3)=[1 1 1];
R(52:53)=[1 1];
if (flag==1)
    nIND=[1 1 1];
    i=[1 32 48]; 
    R(1,3+i)=nIND;
   
elseif (flag==2)
    nIND=[1 1 1];
    i=[2 31 47]; 
    R(1,3+i)=nIND;
   
elseif (flag==3)
    nIND=[1 1 1];
    i=[3 30 46]; 
    R(1,3+i)=nIND;
    
elseif (flag==4)
    nIND=[1 1 1];
    i=[1 33 48]; 
    R(1,3+i)=nIND;
   
elseif (flag==5)
    nIND=[1 1 1];
    i=[2 34 47]; 
    R(1,3+i)=nIND;
   
elseif (flag==6)
    nIND=[1 1 1];
    i=[3 35 46]; 
    R(1,3+i)=nIND;
    
elseif (flag==7)
    nIND=[1 1 1];
    i=[17 32 48]; 
    R(1,3+i)=nIND;
    
elseif (flag==8)
    nIND=[1 1 1];
    i=[18 31 47]; 
    R(1,3+i)=nIND;
    
elseif (flag==9)
    nIND=[1 1 1];
    i=[19 30 46]; 
    R(1,3+i)=nIND;
    
elseif (flag==10)
    nIND=[1 1 1];
    i=[17 33 48]; 
    R(1,3+i)=nIND;
    
elseif (flag==11)
    nIND=[1 1 1];
    i=[18 34 47]; 
    R(1,3+i)=nIND;
    
elseif (flag==12)
    nIND=[1 1 1];
    i=[19 35 46]; 
    R(1,3+i)=nIND;
    
end
R=R';
