Skip to content
Snippets Groups Projects
Commit 4417e093 authored by Ralf Jung's avatar Ralf Jung
Browse files

move comment closer to where it is exploited

parent e60b556f
No related branches found
No related tags found
No related merge requests found
...@@ -170,11 +170,11 @@ Hint Mode IdFree + ! : typeclass_instances. ...@@ -170,11 +170,11 @@ Hint Mode IdFree + ! : typeclass_instances.
Instance: Params (@IdFree) 1. Instance: Params (@IdFree) 1.
(** * CMRAs whose core is total *) (** * CMRAs whose core is total *)
(** The function [core] may return a dummy when used on CMRAs without total
core. *)
Class CmraTotal (A : cmraT) := cmra_total (x : A) : is_Some (pcore x). Class CmraTotal (A : cmraT) := cmra_total (x : A) : is_Some (pcore x).
Hint Mode CmraTotal ! : typeclass_instances. Hint Mode CmraTotal ! : typeclass_instances.
(** The function [core] returns a dummy when used on CMRAs without total
core. *)
Class Core (A : Type) := core : A A. Class Core (A : Type) := core : A A.
Hint Mode Core ! : typeclass_instances. Hint Mode Core ! : typeclass_instances.
Instance: Params (@core) 2. Instance: Params (@core) 2.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment