Skip to content

Commit

Permalink
fix
Browse files Browse the repository at this point in the history
  • Loading branch information
joneugster committed Feb 13, 2024
1 parent 0bf1cdc commit 82be4b4
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions ImportGraph/Cli.lean
Original file line number Diff line number Diff line change
Expand Up @@ -47,11 +47,11 @@ def importGraphCLI (args : Cli.Parsed) : IO UInt32 := do
if args.hasFlag "exclude-meta" then
-- Mathlib-specific exclusion of tactics
let filterMathlibMeta : Name → Bool := fun n => (
isPrefixOf `Mathlib.Lean.Tactic n ∨
isPrefixOf `Mathlib.Tactic n ∨
isPrefixOf `Mathlib.Lean n ∨
isPrefixOf `Mathlib.Lean.Mathport n ∨
isPrefixOf `Mathlib.Lean.Util n)
graph := graph.filterGraph filterMathlibMeta (replacement := `«Mathlib.Lean.Tactics»)
isPrefixOf `Mathlib.Mathport n ∨
isPrefixOf `Mathlib.Util n)
graph := graph.filterGraph filterMathlibMeta (replacement := `«Mathlib.Tactics»)
if args.hasFlag "reduce" then
graph := graph.transitiveReduction
return asDotGraph graph
Expand Down

0 comments on commit 82be4b4

Please sign in to comment.