The following is a valid µOCCAM program that performs I/O. This program reads two numbers from stdin, it then adds the first number to the second number and returns the output.
Program file:
/public/cs3/web/ipptests/additionio.io
-- A simple addtion that should now work INT a: INT b: INT c: SEQ stdin ? a -- get variables stdin ? b SEQ c := a + b -- add variables stdout ! c -- return variables
When provided with this input:
/public/cs3/web/ipptests/additionio.in
21 21
it should generate the following output:
/public/cs3/web/ipptests/additionio.out
==>42