let var a:=0 in a:=a++b-c+d end