日々の流転

λ. 成績表が送られてきた。これで、ここ数日の不安がようやく解消。

λ. OSASK/NEC98 ver.2.8

起動してみた。

λ. 読書

『ドラゴンセンターを破壊せよ』下

クライブ・カッスラー(Clive Cussler)[著] 中山善之[訳]

λ. binary tree in the CPL

left object tree(a) with pr-tree is
  leaf: a -> tree
  branch: prod(tree, tree) -> tree
end object
 
let count-leaves = pr-tree(s.zero.!, add)
let leaves = pr-tree(ev.pair(curry(cons), nil.!), append)
let reflect = pr-tree(leaf, branch.pair(pi2, pi1))