inout.lib
LIB "inout.lib"; ring S; matrix M=matrix(freemodule(2),3,3); int ALLprint; export ALLprint; ==> // ** `ALLprint` is already global allprint("M =",M); ==> M = ==> 1,0,0, ==> 0,1,0, ==> 0,0,0 kill ALLprint;