occam-pi - Occamでバブルソートを行う方法

Question

私はoccamでプログラミングしようとしていますが、ドキュメントがあまり良くないので、理解しにくいと思います。とにかく、誰かが私を助けてくれることを願っています。

簡単なプログラムを作る方法を学ぼうとしています。オカムのバブルソート。

#INCLUDE "course.module"
[32]INT x:
INT aux:   
BOOL flag:    
flag:= TRUE    
aux:=0

--put values on the array    
SEQ k=0 for 10    
  x[i] = -x[i]

-- bubble sort
WHILE (flag)      
  SEQ i = 0 for 9      
    IF    
      x[i] > x[i+1]    
        aux:= x[i]    
        x[i]:= x[i+1]    
        x[i+1] := aux    
  flag:= false    
:

端末に次の画像が表示されました: このコードの何が問題なのですか?