author | clasohm |
Thu, 16 Sep 1993 12:20:38 +0200 | |
changeset 0 | a5a9c433f639 |
child 290 | 37d580c16af5 |
permissions | -rw-r--r-- |
(* Title: CCL/ex/stream.thy ID: $Id$ Author: Martin Coen, Cambridge University Computer Laboratory Copyright 1993 University of Cambridge Programs defined over streams. *) Stream = List + consts iter1,iter2 :: "[i=>i,i]=>i" rules iter1_def "iter1(f,a) == letrec iter x be x.iter(f(x)) in iter(a)" iter2_def "iter2(f,a) == letrec iter x be x.map(f,iter(x)) in iter(a)" end