print<>*grep(1-abs-$x+($x=$_),<>)?F:T