Skip to content
Snippets Groups Projects
Commit 57e987e0 authored by Eric Giovannini's avatar Eric Giovannini
Browse files

fix not in scope error

parent 48ee803b
Branches
No related tags found
No related merge requests found
......@@ -222,7 +222,7 @@ module LiftRelMon
MonRel.isAntitone RAB la≤lb la'≤la
antitone' IH {la} {℧} {lb} la≤lb la'≤la = tt
antitone' IH {θ la2~} {θ la1~} {θ lb~} la≤lb la'≤la =
λ t → ≾'->≾ (IH t {!!} {!!})
λ t → ≾'->≾ {!!}
monotone : {!!}
monotone = {!!}
......@@ -434,9 +434,9 @@ module Bisimilarity (d : Predomain) where
fixθ-lem1 : (n : Nat) ->
(▹ (¬ (θ {Nat} (next (fix θ)) ≡ (δ ^ n) ℧))) ->
¬ (θ {Nat} (next (fix θ)) ≡ (δ ^ n) ℧)
fixθ-lem1 zero _ H-eq = θ≠℧ H-eq
(▹ (¬ (θ {X = Nat} (next (fix θ)) ≡ (δ ^ n) ℧))) ->
¬ (θ {X = Nat} (next (fix θ)) ≡ (δ ^ n) ℧)
fixθ-lem1 zero _ H-eq = ℧≠θ (sym H-eq)
fixθ-lem1 (suc n) IH H-eq =
let tmp = inj-θ (next (fix θ)) (next ((δ ^ n) ℧)) H-eq in {!!}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment