diff options
Diffstat (limited to 'Data/Hypergraph/Base.agda')
| -rw-r--r-- | Data/Hypergraph/Base.agda | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/Data/Hypergraph/Base.agda b/Data/Hypergraph/Base.agda deleted file mode 100644 index 0910e02..0000000 --- a/Data/Hypergraph/Base.agda +++ /dev/null @@ -1,25 +0,0 @@ -{-# OPTIONS --without-K --safe #-} - -open import Level using (Level) -open import Data.Hypergraph.Label using (HypergraphLabel) - -module Data.Hypergraph.Base {ℓ : Level} (HL : HypergraphLabel) where - -import Data.Hypergraph.Edge HL as Edge - -open import Data.List using (List; map) -open import Data.Nat.Base using (ℕ) -open import Data.String using (String; unlines) - -open Edge using (Edge) - -record Hypergraph (v : ℕ) : Set ℓ where - constructor mkHypergraph - field - edges : List (Edge v) - -normalize : {v : ℕ} → Hypergraph v → Hypergraph v -normalize (mkHypergraph e) = mkHypergraph (Edge.sort e) - -show : {v : ℕ} → Hypergraph v → String -show (mkHypergraph e) = unlines (map Edge.show e) |
