% Rishi Vadher
% http://rishivadher.pt.vu
function [missoes2] = limitar_missoes_4(missoes)
fp_pretendida = input('Introduza o valor da prioridade pretendida:');
fprintf('\nLista actual de missões a incluir no relatório:');
fprintf('\nFP:      Dist: Int: Nome de ficheiro:              Efectuado em:\n');
%compara o valor introduzido com o valor fp das missoes já analisadas e
%remove os que têm valor fp menor que o introduzido
missoes2=missoes;
if ~isnan(fp_pretendida) && isreal(fp_pretendida)
    for i = (length(missoes):-1:1)
        if missoes2(i).factor_prioridade < fp_pretendida;
            missoes2(i)=[];
        end
    end
end
% Apresenta no ecrã as missoes que restam cujo fp é maior que fp_pretendida
for i=1:length(missoes2)
    fprintf('%-8.6f %-5.2f  %-4d  %-30s %-11s\n', missoes2(i).factor_prioridade, missoes2(i).distancia, missoes2(i).intensidade_min, missoes2(i).nome, missoes2(i).data)
end