%% write_qf(filename,airfoil[,run number])
% Generates the queue input variable file.  "run number" is an optional
% variable that allows increased intensity if XFOIL has failed convergence
% already.  Increased intensity means repaneling to higher

function write_qf(varargin)

fname = varargin{1};
foil = varargin{2};
if nargin == 3
    run = varargin{3};
else
    run = 1;
end
switch run
    case 1
        timer = 150;
    case 2
        timer = 240;
    case 3
        timer = 300;
    case 4
        timer = 240;
    case 5
        timer = 600;
end
save(['queue/',foil,'.mat'],'fname','run','timer')