Teoría de conjuntos

Si a es una cota superior de s y a ≤ b, entonces b es una cota superior de s

PorJosé A. Alonso 23 octubre 202318 octubre 2023

Demostrar con Lean4 que si \(a\) es una cota superior de \(s\) y \(a ≤ b\), entonces \(b\) es una cota superior de \(s\).

Para ello, completar la siguiente teoría de Lean4:

import Mathlib.Tactic

variable {α : Type _} [PartialOrder α]
variable (s : Set α)
variable (a b : α)

-- (CotaSupConj s a) afirma que a es una cota superior del conjunto s.
def CotaSupConj (s : Set α) (a : α) :=
  ∀ {x}, x ∈ s → x ≤ a

example
  (h1 : CotaSupConj s a)
  (h2 : a ≤ b)
  : CotaSupConj s b :=
by sorry

import Mathlib.Tactic

variable {α : Type _} [PartialOrder α]

variable (s : Set α)

variable (a b : α)

-- (CotaSupConj s a) afirma que a es una cota superior del conjunto s.

def CotaSupConj (s : Set α) (a : α) :=

∀ {x}, x ∈ s → x ≤ a

example

(h1 : CotaSupConj s a)

(h2 : a ≤ b)

: CotaSupConj s b :=

by sorry

Si r ⊆ s y s ⊆ t, entonces r ⊆ t

PorJosé A. Alonso 20 octubre 202317 octubre 2023

Demostrar con Lean4 que si \(r ⊆ s\) y \(s ⊆ t\), entonces \(r ⊆ t\).

Para ello, completar la siguiente teoría de Lean4:

import Mathlib.Tactic

open Set

variable {α : Type _}
variable (r s t : Set α)

example
  (rs : r ⊆ s)
  (st : s ⊆ t)
  : r ⊆ t :=
by sorry

import Mathlib.Tactic

open Set

variable {α : Type _}

variable (r s t : Set α)

example

(rs : r ⊆ s)

(st : s ⊆ t)

: r ⊆ t :=

by sorry

Para cualquier conjunto s, s ⊆ s

PorJosé A. Alonso 19 octubre 202317 octubre 2023

Demostrar con Lean4 que para cualquier conjunto \(s\), \(s ⊆ s\).

Para ello, completar la siguiente teoría de Lean4:

import Mathlib.Tactic

variable {α : Type _}
variable (s : Set α)

example : s ⊆ s :=
by sorry

import Mathlib.Tactic

variable {α : Type _}

variable (s : Set α)

example : s ⊆ s :=

by sorry

Si f·f es biyectiva, entonces f es biyectiva

PorJosé A. Alonso 28 junio 202228 junio 2022

Demostrar que si f·f es biyectiva, entonces f es biyectiva.

Para ello, completar la siguiente teoría de Lean:

import tactic
open function

variable {X: Type}

example
  (f : X → X)
  (Hff : bijective (f ∘ f))
  : bijective f :=
sorry

import tactic

open function

variable {X: Type}

example

(f : X → X)

(Hff : bijective (f ∘ f))

: bijective f :=

sorry

Si g·f es inyectiva, entonces f es inyectiva.

PorJosé A. Alonso 22 junio 202222 junio 2022

Demostrar que si g·f es inyectiva, entonces f es inyectiva.

Para ello, completar la siguiente teoría de Lean:

import tactic
open function

variables {X Y Z : Type}
variable  {f : X → Y}
variable  {g : Y → Z}

example
  (Hgf : injective (g ∘ f))
  : injective f :=
sorry

import tactic

open function

variables {X Y Z : Type}

variable {f : X → Y}

variable {g : Y → Z}

example

(Hgf : injective (g ∘ f))

: injective f :=

sorry