record array(a,b,c,d,e,f,g) procedure dummy(u,v,x,y,z) suspend u | v return x end procedure main() write("image(stop) ----> ",image(image(stop)) | "none") write("stop ----> ",image(stop) | "none") write("stop('testing stop') ----> ",image(stop('testing stop')) | "none") end