// a test file, Rz language

ax[10]

findmax(a)
  max = a[0]
  i = 1
  while( i < 10 )
    if( max < a[i] )
       max = a[i]
    i = i + 1
  return i

main()
  print(findmax(&ax))

  