The following is a valid µOCCAM program that performs I/O. This program tests replicated parallels.
Program file:
/public/cs3/web/ipptests/reppar.io
[10]INT a:
[10]INT b:
SEQ
PAR i = 0 FOR 10
SEQ
a[i] := i
PAR j = 0 FOR 10
b[j] := j
SEQ i = 0 FOR 10
stdout ! a[i]
SEQ i = 0 FOR 10
stdout ! b[i]
When provided with this input:
/public/cs3/web/ipptests/reppar.in
it should generate the following output:
/public/cs3/web/ipptests/reppar.out
==> 0 ==> 1 ==> 2 ==> 3 ==> 4 ==> 5 ==> 6 ==> 7 ==> 8 ==> 9 ==> 0 ==> 1 ==> 2 ==> 3 ==> 4 ==> 5 ==> 6 ==> 7 ==> 8 ==> 9