vyzo

aggregate message rate 120/s

message/mesh peer with 6 mesh peers -> 20/s; with 12 -> 10/s

30 -> sum(n = 0...30, 10 * expt(.97, n)) -> 19.966431048561404

maximum in 2min, +1; in 30s +.25
TimeInMeshWeight 1/120
TimeInMeshQuantum -> 1s
TimeInMeshCap -> 120

vyzo

(import :std/iter)
(export main)

(def (main)
  (declare (fixnum) (not safe))
  (def i 1)
  (let/cc break
    (for* ((z (in-naturals 1))
           (x (in-range 1 z 1))
           (y (in-range x z 1)))

vyzo

(import :std/iter)
(export main)

(def (main)
  (declare (fixnum) (not safe))
  (def i 1)
  (let/cc break
    (let lpz ((z 1))
      (let lpx ((x 1))
        (if (< x z)

vyzo

(import :std/iter)
(export main)

(def (main)
  (declare (fixnum) (not safe))
  (def i 1)
  (let/cc break
    (for* ((z (in-naturals 1))
           (x (in-range 1 z))
           (y (in-range x z)))

vyzo

(import :std/net/bio
        :std/os/fdio
        :std/os/fcntl
        :std/sort
        :std/foreign)
(export main)
(declare (not safe))

(def (open-stdout-buffer (bufsz 4096))
  (open-fd-output-buffer 1 bufsz))

vyzo

(import :std/net/bio
        :std/os/fdio
        :std/os/fcntl
        :std/os/error
        :std/sort
        :std/foreign
        :gerbil/gambit/os)
(export main)
(declare (not safe))

vyzo

(import :std/net/bio
        :std/os/fdio
        :std/os/fcntl
        :std/sort)
(export main)
(declare (not safe))

(def (open-stdout-buffer (bufsz 4096))
  (open-fd-output-buffer 1 bufsz))

vyzo

(import :std/net/bio
        :std/os/fdio
        :std/os/fcntl
        :std/sort)
(export main)
(declare (not safe))

(def (open-stdout-buffer (bufsz 4096))
  (open-fd-output-buffer 1 bufsz))

vyzo

(import :std/net/bio
        :std/os/fdio
        :std/os/fcntl
        :std/sort)
(export main)
(declare (not safe))

(def (open-stdout-buffer (bufsz 4096))
  (open-fd-output-buffer 1 bufsz))

vyzo

(import :std/net/bio
        :std/os/fdio
        :std/os/fcntl
        :std/sort)
(export main)
(declare (not safe))

(def (open-stdout-buffer (bufsz 4096))
  (open-fd-output-buffer 1 bufsz))