Package list-fold: List fold operations
Information
| name | list-fold |
| version | 1.29 |
| description | List fold operations |
| author | Joe Leslie-Hurd <joe@gilith.com> |
| license | MIT |
| checksum | f04fe88c3ef8354213008ace7189e37390c8840a |
| requires | bool function list-append list-def list-length list-reverse natural |
| show | Data.Bool Data.List Function Number.Natural |
Files
- Package tarball list-fold-1.29.tgz
- Theory source file list-fold.thy (included in the package tarball)
Defined Constants
- Data
- List
- foldl
- foldr
- List
Theorems
⊦ ∀l. foldr (::) [] l = l
⊦ ∀f b. foldr f b [] = b
⊦ ∀f b. foldl f b [] = b
⊦ ∀l. foldl (flip (::)) [] l = reverse l
⊦ ∀l1 l2. foldr (::) l2 l1 = l1 @ l2
⊦ ∀l1 l2. foldl (flip (::)) l2 l1 = reverse l1 @ l2
⊦ ∀l k. foldl (λn x. suc n) k l = length l + k
⊦ ∀l k. foldr (λx n. suc n) k l = length l + k
⊦ ∀f b l. foldr f b (reverse l) = foldl (flip f) b l
⊦ ∀f b l. foldl f b l = foldr (flip f) b (reverse l)
⊦ ∀f b l. foldl f b (reverse l) = foldr (flip f) b l
⊦ ∀f b h t. foldr f b (h :: t) = f h (foldr f b t)
⊦ ∀f b h t. foldl f b (h :: t) = foldl f (f b h) t
⊦ ∀f b l1 l2. foldr f b (l1 @ l2) = foldr f (foldr f b l2) l1
⊦ ∀f b l1 l2. foldl f b (l1 @ l2) = foldl f (foldl f b l1) l2
⊦ ∀g f b l1 l2.
(∀s. g b s = s) ∧ (∀x s1 s2. g (f x s1) s2 = f x (g s1 s2)) ⇒
foldr f b (l1 @ l2) = g (foldr f b l1) (foldr f b l2)
⊦ ∀g f b l1 l2.
(∀s. g s b = s) ∧ (∀s1 s2 x. g s1 (f s2 x) = f (g s1 s2) x) ⇒
foldl f b (l1 @ l2) = g (foldl f b l1) (foldl f b l2)
External Type Operators
- →
- bool
- Data
- List
- list
- List
- Number
- Natural
- natural
- Natural
External Constants
- =
- select
- Data
- Bool
- ∀
- ∧
- ⇒
- ∃
- ⊤
- List
- ::
- @
- []
- length
- reverse
- Bool
- Function
- flip
- Number
- Natural
- +
- suc
- zero
- Natural
Assumptions
⊦ ⊤
⊦ length [] = 0
⊦ reverse [] = []
⊦ (∃) = λp. p ((select) p)
⊦ ∀t. (∀x. t) ⇔ t
⊦ (∀) = λp. p = λx. ⊤
⊦ ∀t. ⊤ ∧ t ⇔ t
⊦ ∀n. 0 + n = n
⊦ ∀l. reverse (reverse l) = l
⊦ ∀l. [] @ l = l
⊦ ∀l. l @ [] = l
⊦ ∀f. flip (flip f) = f
⊦ flip = λf x y. f y x
⊦ ∀l. length (reverse l) = length l
⊦ (⇒) = λp q. p ∧ q ⇔ p
⊦ ∀f y. (let x ← y in f x) = f y
⊦ ∀h t. length (h :: t) = suc (length t)
⊦ (∧) = λp q. (λf. f p q) = λf. f ⊤ ⊤
⊦ (∃) = λp. ∀q. (∀x. p x ⇒ q) ⇒ q
⊦ ∀m n. suc m + n = suc (m + n)
⊦ ∀f x y. flip f x y = f y x
⊦ ∀l1 l2. reverse (l1 @ l2) = reverse l2 @ reverse l1
⊦ ∀h t. reverse (h :: t) = reverse t @ h :: []
⊦ ∀l h t. (h :: t) @ l = h :: t @ l
⊦ ∀p. p [] ∧ (∀h t. p t ⇒ p (h :: t)) ⇒ ∀l. p l
⊦ ∀b f. ∃fn. fn [] = b ∧ ∀h t. fn (h :: t) = f h t (fn t)