Update Notation.lean
This commit is contained in:
parent
22a766bd3f
commit
3f2a831e02
1 changed files with 4 additions and 1 deletions
|
@ -3,7 +3,7 @@ Copyright (c) 2024 Joseph Tooby-Smith. All rights reserved.
|
|||
Released under Apache 2.0 license as described in the file LICENSE.
|
||||
Authors: Joseph Tooby-Smith
|
||||
-/
|
||||
import HepLean.SpaceTime.LorentzTensor.Basic
|
||||
import HepLean.SpaceTime.LorentzTensor.Real.Basic
|
||||
import Init.NotationExtra
|
||||
/-!
|
||||
|
||||
|
@ -68,4 +68,7 @@ def indexParser : ParserFn := (takeWhileFnFst (IsIndexSpecifier 𝓣) IsIndexId
|
|||
|
||||
def indexParserMany : ParserFn := Lean.Parser.many1Fn (indexParser 𝓣)
|
||||
|
||||
def singleTensorElab : Lean.Elab.Term.TermElab := fun stx expectedType => do
|
||||
return mkNatLit 0
|
||||
|
||||
end IndexNotation
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue