Package list-take-drop-thm: list-take-drop-thm

Information

namelist-take-drop-thm
version1.0
descriptionlist-take-drop-thm
authorJoe Hurd <joe@gilith.com>
licenseHOLLight
provenanceHOL Light theory extracted on 2011-03-16
showData.Bool

Files

Theorems

l. Data.List.drop (Data.List.length l) l = Data.List.[]

l. Data.List.take (Data.List.length l) l = l

n l.
    Number.Natural.≤ n (Data.List.length l)
    Data.List.length (Data.List.take n l) = n

n l.
    Number.Natural.≤ n (Data.List.length l)
    Data.List.length (Data.List.drop n l) =
    Number.Natural.- (Data.List.length l) n

n l.
    Number.Natural.≤ n (Data.List.length l)
    Data.List.@ (Data.List.take n l) (Data.List.drop n l) = l

n l i.
    Number.Natural.≤ n (Data.List.length l) Number.Natural.< i n
    Data.List.nth i (Data.List.take n l) = Data.List.nth i l

n l i.
    Number.Natural.≤ n (Data.List.length l)
    Number.Natural.< i (Number.Natural.- (Data.List.length l) n)
    Data.List.nth i (Data.List.drop n l) =
    Data.List.nth (Number.Natural.+ n i) l

Input Type Operators

Input Constants

Assumptions

T

F p. p

(¬) = λp. p F

t. (x. t) t

() = λP. P = λx. T

x. x = x T

n. ¬(Number.Natural.suc n = Number.Numeral.zero)

() = λp q. p q p

m. m = Number.Numeral.zero n. m = Number.Natural.suc n

() = λp q. (λf. f p q) = λf. f T T

() = λP. q. (x. P x q) q

m n. Number.Natural.suc m = Number.Natural.suc n m = n

m n.
    Number.Natural.< (Number.Natural.suc m) (Number.Natural.suc n)
    Number.Natural.< m n

m n.
    Number.Natural.≤ (Number.Natural.suc m) (Number.Natural.suc n)
    Number.Natural.≤ m n

m n.
    Number.Natural.- (Number.Natural.suc m) (Number.Natural.suc n) =
    Number.Natural.- m n

x. x = Data.List.[] a0 a1. x = Data.List.:: a0 a1

() = λp q. r. (p r) (q r) r

Data.List.length Data.List.[] = Number.Numeral.zero
  h t.
    Data.List.length (Data.List.:: h t) =
    Number.Natural.suc (Data.List.length t)

P.
    P Number.Numeral.zero (n. P n P (Number.Natural.suc n)) n. P n

P. P Data.List.[] (a0 a1. P a1 P (Data.List.:: a0 a1)) x. P x

(n. Number.Natural.+ Number.Numeral.zero n = n)
  m n.
    Number.Natural.+ (Number.Natural.suc m) n =
    Number.Natural.suc (Number.Natural.+ m n)

(m. Number.Natural.- m Number.Numeral.zero = m)
  m n.
    Number.Natural.- m (Number.Natural.suc n) =
    Number.Natural.pre (Number.Natural.- m n)

h1 h2 t1 t2. Data.List.:: h1 t1 = Data.List.:: h2 t2 h1 = h2 t1 = t2

(l. Data.List.drop Number.Numeral.zero l = l)
  n h t.
    Data.List.drop (Number.Natural.suc n) (Data.List.:: h t) =
    Data.List.drop n t

(m. Number.Natural.< m Number.Numeral.zero F)
  m n.
    Number.Natural.< m (Number.Natural.suc n)
    m = n Number.Natural.< m n

(l. Data.List.@ Data.List.[] l = l)
  h t l.
    Data.List.@ (Data.List.:: h t) l = Data.List.:: h (Data.List.@ t l)

(l. Data.List.take Number.Numeral.zero l = Data.List.[])
  n h t.
    Data.List.take (Number.Natural.suc n) (Data.List.:: h t) =
    Data.List.:: h (Data.List.take n t)

(m. Number.Natural.≤ m Number.Numeral.zero m = Number.Numeral.zero)
  m n.
    Number.Natural.≤ m (Number.Natural.suc n)
    m = Number.Natural.suc n Number.Natural.≤ m n

(h t. Data.List.nth Number.Numeral.zero (Data.List.:: h t) = h)
  h t n.
    Data.List.nth (Number.Natural.suc n) (Data.List.:: h t) =
    Data.List.nth n t

t. (T t t) (t T t) (F t F) (t F F) (t t t)

t. (T t t) (t T T) (F t T) (t t T) (t F ¬t)