4e656ea8e9
This PR renames the namespace `Std.Range` to `Std.Legacy.Range`. Instead of using `Std.Range` and `[a:b]` notation, the new range type `Std.Rco` and its corresponding `a...b` notation should be used. There are also other ranges with open/closed/infinite boundary shapes in `Std.Data.Range.Polymorphic` and the new range notation also works for `Int`, `Int8`, `UInt8`, `Fin` etc.
84 lines
2.1 KiB
Text
84 lines
2.1 KiB
Text
/-!
|
|
# Tests for delaborators for Std.Legacy.Range and Std.PRange
|
|
-/
|
|
|
|
/-!
|
|
## Tests for `Std.Legacy.Range`
|
|
-/
|
|
|
|
/-!
|
|
Default lower bound and step
|
|
-/
|
|
/-- info: [:10] : Std.Legacy.Range -/
|
|
#guard_msgs in #check Std.Legacy.Range.mk 0 10 1 (by grind)
|
|
|
|
/-!
|
|
Default step
|
|
-/
|
|
/-- info: [5:10] : Std.Legacy.Range -/
|
|
#guard_msgs in #check Std.Legacy.Range.mk 5 10 1 (by grind)
|
|
|
|
/-!
|
|
Default lower bound
|
|
-/
|
|
/-- info: [:10:2] : Std.Legacy.Range -/
|
|
#guard_msgs in #check Std.Legacy.Range.mk 0 10 2 (by grind)
|
|
|
|
/-!
|
|
No defaults
|
|
-/
|
|
/-- info: [5:10:2] : Std.Legacy.Range -/
|
|
#guard_msgs in #check Std.Legacy.Range.mk 5 10 2 (by grind)
|
|
|
|
/-!
|
|
Disable notation
|
|
-/
|
|
/-- info: { stop := 10, step_pos := _check._proof_1 } : Std.Legacy.Range -/
|
|
#guard_msgs in set_option pp.notation false in #check Std.Legacy.Range.mk 0 10 1 (by grind)
|
|
|
|
/-!
|
|
## Tests for `Std.PRange`
|
|
-/
|
|
|
|
/-!
|
|
Each of the possibilities, in order of appearance in `Lean.PrettyPrinter.Delaborator.delabPRange`.
|
|
-/
|
|
/-- info: 1...=10 : Std.Rcc Nat -/
|
|
#guard_msgs in #check 1...=10
|
|
/-- info: *...=10 : Std.Ric Nat -/
|
|
#guard_msgs in #check *...=10
|
|
/-- info: 1...* : Std.Rci Nat -/
|
|
#guard_msgs in #check 1...*
|
|
/-- info: *...* : Std.Rii Nat -/
|
|
#guard_msgs in #check (*...* : Std.Rii Nat)
|
|
/-- info: 1<...=10 : Std.Roc Nat -/
|
|
#guard_msgs in #check 1<...=10
|
|
/-- info: 1<...* : Std.Roi Nat -/
|
|
#guard_msgs in #check 1<...*
|
|
/-- info: 1...10 : Std.Rco Nat -/
|
|
#guard_msgs in #check 1...10
|
|
/-- info: *...10 : Std.Rio Nat -/
|
|
#guard_msgs in #check *...10
|
|
/-- info: 1<...10 : Std.Roo Nat -/
|
|
#guard_msgs in #check 1<...10
|
|
|
|
/-!
|
|
Synonyms for other ranges.
|
|
-/
|
|
/-- info: 1...10 : Std.Rco Nat -/
|
|
#guard_msgs in #check 1...<10
|
|
/-- info: *...10 : Std.Rio Nat -/
|
|
#guard_msgs in #check *...<10
|
|
/-- info: 1<...10 : Std.Roo Nat -/
|
|
#guard_msgs in #check 1<...<10
|
|
|
|
/-!
|
|
Check that responds to both `pp.notation` and `pp.explicit`.
|
|
-/
|
|
/-- info: { lower := 1, upper := 10 } : Std.Rco Nat -/
|
|
#guard_msgs in set_option pp.notation false in #check 1...10
|
|
/--
|
|
info: @Std.Rco.mk Nat (@OfNat.ofNat Nat (nat_lit 1) (instOfNatNat (nat_lit 1)))
|
|
(@OfNat.ofNat Nat (nat_lit 10) (instOfNatNat (nat_lit 10))) : Std.Rco Nat
|
|
-/
|
|
#guard_msgs in set_option pp.explicit true in #check 1...10
|