var
f,f1:text;
w,h:integer;
begin
Assign(f,'INPUT.TXT');
reset(f);
read(f,h,w);
close(f);
if (h <1000)and(w<1000) then
begin
assign(f1,'OUTPUT.txt');
rewrite(f1);
h:=h-100;
if h = w then
write(f1,'OPTIMUM')
else
if h< w then
write(f1,'FAT')
else 
if h > w then
write(f1,'THIN')
end;
close(f1)
end.