Contents

(defmodule trinary
  (export (to-decimal 1)))

(defun BASE () 3)

(defun to-decimal (string) (to-decimal string 0))

(defun to-decimal
  ([() acc] acc)
  ([`(,digit . ,digits) acc] (when (>= digit #\0) (=< digit #\2))
   (to-decimal digits (+ (digit->int digit) (* acc (BASE)))))
  ([_string _acc] 0))

(defun digit->int
  ([digit] (when (>= digit #\0) (=< digit #\2))
   (- digit #\0)))

Version data entries

396 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.2.1.119	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.118	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.117	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.116	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.115	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.114	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.113	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.111	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.110	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.109	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.108	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.107	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.106	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.105	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.104	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.103	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.102	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.101	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.100	tracks/lfe/exercises/trinary/src/example.lfe
trackler-2.2.1.99	tracks/lfe/exercises/trinary/src/example.lfe