Orientations of real inner product spaces.

This file provides definitions and proves lemmas about orientations of real inner product spaces.

Main definitions

• OrthonormalBasis.adjustToOrientation takes an orthonormal basis and an orientation, and returns an orthonormal basis with that orientation: either the original orthonormal basis, or one constructed by negating a single (arbitrary) basis vector.
• Orientation.finOrthonormalBasis is an orthonormal basis, indexed by Fin n, with the given orientation.
• Orientation.volumeForm is a nonvanishing top-dimensional alternating form on an oriented real inner product space, uniquely defined by compatibility with the orientation and inner product structure.

Main theorems

• Orientation.volumeForm_apply_le states that the result of applying the volume form to a set of n vectors, where n is the dimension the inner product space, is bounded by the product of the lengths of the vectors.
• Orientation.abs_volumeForm_apply_of_pairwise_orthogonal states that the result of applying the volume form to a set of n orthogonal vectors, where n is the dimension the inner product space, is equal up to sign to the product of the lengths of the vectors.

theorem OrthonormalBasis.det_to_matrix_orthonormalBasis_of_same_orientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e f : OrthonormalBasis ι ℝ E) (h : e.toBasis.orientation = f.toBasis.orientation) : e.toBasis.det ⇑f = 1

The change-of-basis matrix between two orthonormal bases with the same orientation has determinant 1.

theorem OrthonormalBasis.det_to_matrix_orthonormalBasis_of_opposite_orientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e f : OrthonormalBasis ι ℝ E) (h : e.toBasis.orientation ≠ f.toBasis.orientation) : e.toBasis.det ⇑f = -1

The change-of-basis matrix between two orthonormal bases with the opposite orientations has determinant -1.

theorem OrthonormalBasis.same_orientation_iff_det_eq_det {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] {e f : OrthonormalBasis ι ℝ E} : e.toBasis.det = f.toBasis.det ↔ e.toBasis.orientation = f.toBasis.orientation

Two orthonormal bases with the same orientation determine the same "determinant" top-dimensional form on E, and conversely.

theorem OrthonormalBasis.det_eq_neg_det_of_opposite_orientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e f : OrthonormalBasis ι ℝ E) (h : e.toBasis.orientation ≠ f.toBasis.orientation) : e.toBasis.det = -f.toBasis.det

Two orthonormal bases with opposite orientations determine opposite "determinant" top-dimensional forms on E.

theorem OrthonormalBasis.orthonormal_adjustToOrientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e : OrthonormalBasis ι ℝ E) (x : Orientation ℝ E ι) [Nonempty ι] : Orthonormal ℝ ⇑(e.toBasis.adjustToOrientation x)

OrthonormalBasis.adjustToOrientation, applied to an orthonormal basis, preserves the property of orthonormality.

def OrthonormalBasis.adjustToOrientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e : OrthonormalBasis ι ℝ E) (x : Orientation ℝ E ι) [Nonempty ι] : OrthonormalBasis ι ℝ E

Given an orthonormal basis and an orientation, return an orthonormal basis giving that orientation: either the original basis, or one constructed by negating a single (arbitrary) basis vector.

Equations

• e.adjustToOrientation x = (e.toBasis.adjustToOrientation x).toOrthonormalBasis ⋯

theorem OrthonormalBasis.toBasis_adjustToOrientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e : OrthonormalBasis ι ℝ E) (x : Orientation ℝ E ι) [Nonempty ι] : (e.adjustToOrientation x).toBasis = e.toBasis.adjustToOrientation x

@[simp]

theorem OrthonormalBasis.orientation_adjustToOrientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e : OrthonormalBasis ι ℝ E) (x : Orientation ℝ E ι) [Nonempty ι] : (e.adjustToOrientation x).toBasis.orientation = x

adjustToOrientation gives an orthonormal basis with the required orientation.

theorem OrthonormalBasis.adjustToOrientation_apply_eq_or_eq_neg {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e : OrthonormalBasis ι ℝ E) (x : Orientation ℝ E ι) [Nonempty ι] (i : ι) : (e.adjustToOrientation x) i = e i ∨ (e.adjustToOrientation x) i = -e i

Every basis vector from adjustToOrientation is either that from the original basis or its negation.

theorem OrthonormalBasis.det_adjustToOrientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e : OrthonormalBasis ι ℝ E) (x : Orientation ℝ E ι) [Nonempty ι] : (e.adjustToOrientation x).toBasis.det = e.toBasis.det ∨ (e.adjustToOrientation x).toBasis.det = -e.toBasis.det

theorem OrthonormalBasis.abs_det_adjustToOrientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {ι : Type u_2} [Fintype ι] [DecidableEq ι] (e : OrthonormalBasis ι ℝ E) (x : Orientation ℝ E ι) [Nonempty ι] (v : ι → E) : |(e.adjustToOrientation x).toBasis.det v| = |e.toBasis.det v|

def Orientation.finOrthonormalBasis {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} (hn : 0 < n) (h : Module.finrank ℝ E = n) (x : Orientation ℝ E (Fin n)) : OrthonormalBasis (Fin n) ℝ E

An orthonormal basis, indexed by Fin n, with the given orientation.

Equations

• Orientation.finOrthonormalBasis hn h x = ((stdOrthonormalBasis ℝ E).reindex (finCongr h)).adjustToOrientation x

@[simp]

theorem Orientation.finOrthonormalBasis_orientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} (hn : 0 < n) (h : Module.finrank ℝ E = n) (x : Orientation ℝ E (Fin n)) : (Orientation.finOrthonormalBasis hn h x).toBasis.orientation = x

Orientation.finOrthonormalBasis gives a basis with the required orientation.

@[irreducible]

def Orientation.volumeForm {E : Type u_2} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) : E [⋀^Fin n]→ₗ[ℝ] ℝ

The volume form on an oriented real inner product space, a nonvanishing top-dimensional alternating form uniquely defined by compatibility with the orientation and inner product structure.

Equations

• @Orientation.volumeForm = Orientation.wrapped✝.1

theorem Orientation.volumeForm_def {E : Type u_2} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) : o.volumeForm = Nat.casesAuxOn (motive := fun (a : ℕ) => n = a → E [⋀^Fin n]→ₗ[ℝ] ℝ) n (fun (h : n = 0) => Eq.ndrec (motive := fun {n : ℕ} => [_i : Fact (Module.finrank ℝ E = n)] → Orientation ℝ E (Fin n) → E [⋀^Fin n]→ₗ[ℝ] ℝ) (fun [Fact (Module.finrank ℝ E = 0)] (o : Orientation ℝ E (Fin 0)) => let opos := AlternatingMap.constOfIsEmpty ℝ E (Fin 0) 1; ⋯.by_cases (fun (x : o = positiveOrientation) => opos) fun (x : o = -positiveOrientation) => -opos) ⋯ o) (fun (n_1 : ℕ) (h : n = n_1 + 1) => Eq.ndrec (motive := fun {n : ℕ} => [_i : Fact (Module.finrank ℝ E = n)] → Orientation ℝ E (Fin n) → E [⋀^Fin n]→ₗ[ℝ] ℝ) (fun [Fact (Module.finrank ℝ E = n_1 + 1)] (o : Orientation ℝ E (Fin (n_1 + 1))) => (Orientation.finOrthonormalBasis ⋯ ⋯ o).toBasis.det) ⋯ o) ⋯

@[simp]

theorem Orientation.volumeForm_zero_pos {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] [_i : Fact (Module.finrank ℝ E = 0)] : positiveOrientation.volumeForm = AlternatingMap.constLinearEquivOfIsEmpty 1

theorem Orientation.volumeForm_zero_neg {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] [_i : Fact (Module.finrank ℝ E = 0)] : (-positiveOrientation).volumeForm = -AlternatingMap.constLinearEquivOfIsEmpty 1

theorem Orientation.volumeForm_robust {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) (b : OrthonormalBasis (Fin n) ℝ E) (hb : b.toBasis.orientation = o) : o.volumeForm = b.toBasis.det

The volume form on an oriented real inner product space can be evaluated as the determinant with respect to any orthonormal basis of the space compatible with the orientation.

theorem Orientation.volumeForm_robust_neg {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) (b : OrthonormalBasis (Fin n) ℝ E) (hb : b.toBasis.orientation ≠ o) : o.volumeForm = -b.toBasis.det

The volume form on an oriented real inner product space can be evaluated as the determinant with respect to any orthonormal basis of the space compatible with the orientation.

@[simp]

theorem Orientation.volumeForm_neg_orientation {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) : (-o).volumeForm = -o.volumeForm

theorem Orientation.volumeForm_robust' {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) (b : OrthonormalBasis (Fin n) ℝ E) (v : Fin n → E) : |o.volumeForm v| = |b.toBasis.det v|

theorem Orientation.abs_volumeForm_apply_le {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) (v : Fin n → E) : |o.volumeForm v| ≤ ∏ i : Fin n, ‖v i‖

Let v be an indexed family of n vectors in an oriented n-dimensional real inner product space E. The output of the volume form of E when evaluated on v is bounded in absolute value by the product of the norms of the vectors v i.

theorem Orientation.volumeForm_apply_le {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) (v : Fin n → E) : o.volumeForm v ≤ ∏ i : Fin n, ‖v i‖

theorem Orientation.abs_volumeForm_apply_of_pairwise_orthogonal {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) {v : Fin n → E} (hv : Pairwise fun (i j : Fin n) => inner (v i) (v j) = 0) : |o.volumeForm v| = ∏ i : Fin n, ‖v i‖

Let v be an indexed family of n orthogonal vectors in an oriented n-dimensional real inner product space E. The output of the volume form of E when evaluated on v is, up to sign, the product of the norms of the vectors v i.

theorem Orientation.abs_volumeForm_apply_of_orthonormal {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) (v : OrthonormalBasis (Fin n) ℝ E) : |o.volumeForm ⇑v| = 1

The output of the volume form of an oriented real inner product space E when evaluated on an orthonormal basis is ±1.

theorem Orientation.volumeForm_map {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) {F : Type u_2} [NormedAddCommGroup F] [InnerProductSpace ℝ F] [Fact (Module.finrank ℝ F = n)] (φ : E ≃ₗᵢ[ℝ] F) (x : Fin n → F) : ((Orientation.map (Fin n) φ.toLinearEquiv) o).volumeForm x = o.volumeForm (⇑φ.symm ∘ x)

theorem Orientation.volumeForm_comp_linearIsometryEquiv {E : Type u_1} [NormedAddCommGroup E] [InnerProductSpace ℝ E] {n : ℕ} [_i : Fact (Module.finrank ℝ E = n)] (o : Orientation ℝ E (Fin n)) (φ : E ≃ₗᵢ[ℝ] E) (hφ : 0 < LinearMap.det ↑φ.toLinearEquiv) (x : Fin n → E) : o.volumeForm (⇑φ ∘ x) = o.volumeForm x

The volume form is invariant under pullback by a positively-oriented isometric automorphism.