let rec($)r?(s=r())?(t=r())?(u=r())i=print_char"
4923017856".[Hashtbl.hash(s%i^t%i^u%i)/45 mod 11];s%i="_  "&r$0;($)r~s~t~u(i+3)and(%)s i=String.sub(s^"_  ")i 3;;read_line$0