@s=<>=~/./g; $n=<>; @d=<>=~/./g; $"=""; $f=1 if "@d" eq "$s[0]$s[1]$s[2]" && $n%2==0; $f=1 if "@d" eq "$s[1]$s[2]$s[0]" && $n%2==0 && $n>1; $f=1 if "@d" eq "$s[2]$s[0]$s[1]" && $n%2==0 && $n>1; $f=1 if "@d" eq "$s[0]$s[2]$s[1]" && $n%2==1; $f=1 if "@d" eq "$s[1]$s[0]$s[2]" && $n%2==1; $f=1 if "@d" eq "$s[2]$s[1]$s[0]" && $n%2==1 && $n>1; print $f?FAILURE:SUCCESS;