\N:-get0(X),(X<0;(X\=89;writeln(N)),C is N+1,\C).
m:- \0.