powFast.itrs

loading
details
attribute value
description
owner Johannes Waldmann
uploaded 2017-08-17 03:45:14.0
disk size 338 Bytes
downloadable true
type
attribute value
name no_type
processor id 1
description this is the default benchmark type for rejected benchmarks and benchmarks that are not associated with a type.
owning community none
loading contents 
(VAR b e r)
(RULES
  pow(b, e) -> condLoop(e > 0, b, e, 1)

  condLoop(FALSE, b, e, r) -> r
  condLoop(TRUE, b, e, r)  -> condMod(e %@z 2 = 1, b, e, r)

  condMod(FALSE, b, e, r) -> sqBase(b, e, r)
  condMod(TRUE, b, e, r)  -> sqBase(b, e, r*b)

  sqBase(b, e, r) -> halfExp(b*b, e, r)

  halfExp(b, e, r) -> condLoop(e > 0, b, e/2, r)
)
popout

content may be truncated. 'popout' for larger text window.

actions get anonymous link download benchmark