europa:

 Integer Ops per second =        2305918
 Float Ops per second =          2546689

tern:

 Integer Ops per second =        4287673
 Float Ops per second =          4065624

taurus:
 Integer Ops per second =         646577
 Float Ops per second =           682275

pro timetest

ntimes = 1000000L

sum = 0L

nOps = 3L

t0 = SYSTIME(1)
for i=0L,ntimes-1 do begin

  sum = sum + (i*4)*sum

endfor
totTime = SYSTIME(1)-t0

PRINT, ' Integer Ops per second = ', ntimes*nOps/totTime

sum = !PI

nOps = 3.0

t0 = SYSTIME(1)
for i=0L,ntimes-1 do begin

  sum = sum * 14.0/(sum/7.)

endfor
totTime = SYSTIME(1)-t0

PRINT, ' Float Ops per second = ', ntimes*nOps/totTime

stop
end