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