function ret = check_foil(fname)
[a,b,c,d] = parse_polar(fname);
if length(a) == 0
    ret = 0;
else
    ret = 1;
end