Nonzero natural numbers

Content created by Fredrik Bakke, Egbert Rijke and Jonathan Prieto-Cubides.

Created on 2022-03-23.
Last modified on 2023-11-24.

module elementary-number-theory.nonzero-natural-numbers where
open import elementary-number-theory.divisibility-natural-numbers
open import elementary-number-theory.natural-numbers

open import foundation.dependent-pair-types
open import foundation.universe-levels


A natural number n is said to be nonzero if the proposition

  n ≠ 0

holds. This condition was already defined in the file elementary-number-theory.natural-numbers. The type of nonzero natural numbers consists of natural numbers equipped with a proof that they are nonzero.


The type of nonzero natural numbers

nonzero-ℕ : UU lzero
nonzero-ℕ = Σ  is-nonzero-ℕ

nat-nonzero-ℕ : nonzero-ℕ  
nat-nonzero-ℕ = pr1

is-nonzero-nat-nonzero-ℕ : (n : nonzero-ℕ)  is-nonzero-ℕ (nat-nonzero-ℕ n)
is-nonzero-nat-nonzero-ℕ = pr2

The nonzero natural number 1

one-nonzero-ℕ : nonzero-ℕ
pr1 one-nonzero-ℕ = 1
pr2 one-nonzero-ℕ = is-nonzero-one-ℕ

The successor function on the nonzero natural numbers

succ-nonzero-ℕ : nonzero-ℕ  nonzero-ℕ
pr1 (succ-nonzero-ℕ (pair x _)) = succ-ℕ x
pr2 (succ-nonzero-ℕ (pair x _)) = is-nonzero-succ-ℕ x

The successor function from the natural numbers to the nonzero natural numbers

succ-nonzero-ℕ' :   nonzero-ℕ
pr1 (succ-nonzero-ℕ' n) = succ-ℕ n
pr2 (succ-nonzero-ℕ' n) = is-nonzero-succ-ℕ n

The quotient of a nonzero natural number by a divisor

quotient-div-nonzero-ℕ :
  (d : ) (x : nonzero-ℕ) (H : div-ℕ d (pr1 x))  nonzero-ℕ
pr1 (quotient-div-nonzero-ℕ d (pair x K) H) = quotient-div-ℕ d x H
pr2 (quotient-div-nonzero-ℕ d (pair x K) H) = is-nonzero-quotient-div-ℕ H K

Recent changes