[comp.sys.transputer] Problem with Occam RAN function

simons@prl.philips.co.uk (Paul) (03/14/90)

I've been trying to use the RAN function with very little success. Sounds
simple enough - but it just doesn't seem to work.
This is my test program :

INT32 x :
REAL32 y :
INT k :
TIMER clock :
SEQ
  clock ? k
  x := INT32 k
   SEQ i = 0 FOR 10
     y,x := RAN(x) 

>From this routine I would expect 10 random real numbers - I get rubbish,
can someone enlighten me ?