Skip to content

Commit 6dede43

Browse files
proof-libs/fstar Added missing functions to Core::Cmt::PartialOrd
1 parent 3a86b45 commit 6dede43

1 file changed

Lines changed: 19 additions & 0 deletions

File tree

proof-libs/fstar/core/Core.Cmp.fsti

Lines changed: 19 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -32,6 +32,22 @@ class t_PartialOrd (v_Self: Type) (v_Rhs:Type) = {
3232
f_partial_cmp_pre: v_Self -> v_Rhs -> Type0;
3333
f_partial_cmp_post: v_Self -> v_Rhs -> Core.Option.t_Option t_Ordering -> Type0;
3434
f_partial_cmp:v_Self -> v_Rhs -> Core.Option.t_Option t_Ordering;
35+
36+
f_ge_pre: v_Self -> v_Rhs -> Type0;
37+
f_ge_post: v_Self -> v_Rhs -> Type0;
38+
f_ge: v_Self -> v_Rhs -> bool;
39+
40+
f_gt_pre: v_Self -> v_Rhs -> Type0;
41+
f_gt_post: v_Self -> v_Rhs -> Type0;
42+
f_gt: v_Self -> v_Rhs -> bool;
43+
44+
f_le_pre: v_Self -> v_Rhs -> Type0;
45+
f_le_post: v_Self -> v_Rhs -> Type0;
46+
f_le: v_Self -> v_Rhs -> bool;
47+
48+
f_lt_pre: v_Self -> v_Rhs -> Type0;
49+
f_lt_post: v_Self -> v_Rhs -> Type0;
50+
f_lt: v_Self -> v_Rhs -> bool;
3551
}
3652

3753
class t_Ord (v_Self: Type) = {
@@ -60,3 +76,6 @@ val ord_int t: t_Ord (int_t t)
6076

6177
[@FStar.Tactics.Typeclasses.tcinstance]
6278
val ord_reverse t {| t_Ord t |}: t_Ord (t_Reverse t)
79+
80+
[@FStar.Tactics.Typeclasses.tcinstance]
81+
val partialOrdFloat : t_PartialOrd float float

0 commit comments

Comments
 (0)