uses crt;
var
t,t2:text;
s1:string;
a:array[1..1000,1..2] of integer;
b:array[1..1000] of integer;
i,j,n,k:integer;
begin
clrscr;
assign(t,'machanis.dat');
reset(t);
read (t,n);
k:=0;
j:=1;
i:=1;
while not(eof(t)) do begin
read (t,a[i,j]);
k:=k+1;
if j=2  then begin
j:=1; i:=i+1;
end
else
j:=j+1;
end;
close(t);
assign(t2,'machines.res');
rewrite(t2);
if (k mod 4=0) AND  (n mod 2<>0)then
s1:='yes'
else s1:='no';
if s1='yes' then begin
writeln (t2,'1 ccw');
for i:=1 to k div 2 do
for j:=1 to 2 do
if a[i,j]
writeln(t2,s1);
close(t2);
end.