gets
U=[]
R=[]
D=[]
L=[]
$<.map{*z,r=_1.split
eval r+"<<[%d,%d]"%z}
a=1e9
4.times{|i|s=t=p
(U.map{_1+[0]}+D.map{_1+[p]}).sort.map{_3==0 ?(s,t=_1,_2):s==_1&&a>_2-t&&(a=_2-t)}
s=t=p
(R.map{[_1-_2,_1+_2,0]}+D.map{[_1-_2,_1+_2,p]}).sort.map{_3==0 ?(s,t=_1,_2):s==_1&&a>_2-t&&(a=_2-t)}
U,R,D,L=[L,U,R,D].map{|a|a.map{[_2,10**6-_1,_3]}}}
puts a<1e9?a*5:"SAFE"