4f2e0c6d7f
The new command provides a uniform way to set declaration attributes. It replaces the commands: class, instance, coercion, multiple_instances, reducible, irreducible
8 lines
230 B
Text
8 lines
230 B
Text
import logic
|
|
namespace foo
|
|
definition subsingleton (A : Type) := ∀⦃a b : A⦄, a = b
|
|
attribute subsingleton [class]
|
|
|
|
protected definition prop.subsingleton [instance] (P : Prop) : subsingleton P :=
|
|
λa b, !proof_irrel
|
|
end foo
|