1*f1a8eae3SLuke Irelandsubmodule(m:s1) s2 2*f1a8eae3SLuke Ireland integer s2_x 3*f1a8eae3SLuke Irelandend 4*f1a8eae3SLuke Ireland 5*f1a8eae3SLuke Ireland!Expect: m-s2.mod 6*f1a8eae3SLuke Ireland!submodule(m:s1) s2 7*f1a8eae3SLuke Ireland!integer(4)::s2_x 8*f1a8eae3SLuke Ireland!end 9