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("system(\"echo 1\") ----> ",image(system("echo 1")) | "none") write("system(\"ls -s std29.icn\") ----> ",image(system("ls -s std29.icn")) | "none") write("system(\"wc no.file\") ----> ",image(system("wc no.file")) | "none") write("system(repl(\" \",500)) ----> ",image(system(repl(" ",500))) | "none") end