bsl/examples/fac.rkt
#lang planet wrturtle/pyret/bsl

# factorials
fun fac(n):
  if n == 0:
    1
  else:
    n * fac(n-1)

fac(1)
fac(4)