3 :0".;._2(1!:1)3 n=.}.y c=.s=.0 for_i.i.<:b=.{.y do.for_j.i.<:b-i do.t=.n{~j+1 if.t:s n=.(t,j{n)(j,j+1)}n end. wd'compare =',(3":c=.>:c),' swap =',(3":s),' data:',3":n end.end. )