DanilaFe/agda-spa
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Slightly format some code

Browse Source 
Signed-off-by: Danila Fedorin <danila.fedorin@gmail.com>
This commit is contained in:
Danila Fedorin 2024-04-12 23:22:31 -07:00
parent da2f7f51d7
commit 57606636a7
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Language.agda
View File

@ -269,7 +269,9 @@ module Graphs where
; nsg₂≡nsg₁++newNodes = cast-sym _ (++-identityʳ (+-comm s 0) ns) ; nsg₂≡nsg₁++newNodes = cast-sym _ (++-identityʳ (+-comm s 0) ns)
; e∈g₁⇒e∈g₂ = λ {e} e∈es → ; e∈g₁⇒e∈g₂ = λ {e} e∈es →
cast∈⇒∈subst (+-comm s 0) (+-comm 0 s) _ _ cast∈⇒∈subst (+-comm s 0) (+-comm 0 s) _ _
(subst (λ e' → e' ∈ˡ _) (↑ˡ-Edge-identityʳ e (+-comm s 0)) (∈ˡ-++⁺ʳ es' e∈es)) (subst (λ e' → e' ∈ˡ _)
(↑ˡ-Edge-identityʳ e (+-comm s 0))
(∈ˡ-++⁺ʳ es' e∈es))
} }
) )