hacl-star-raw 0.7.0 · OCaml Package

module CI = Cstubs_internals

val _1_Hacl_K256_Field_is_felem_zero_vartime : ('a, 'b) CI.fatptr -> bool

val _2_Hacl_K256_Field_is_felem_eq_vartime : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  bool

val _3_Hacl_K256_Field_is_felem_lt_prime_minus_order_vartime : 
  ('a, 'b) CI.fatptr ->
  bool

val _4_Hacl_K256_Field_load_felem : 
  ('a, 'b) CI.fatptr ->
  bytes CI.ocaml ->
  unit

val _5_Hacl_K256_Field_load_felem_lt_prime_vartime : 
  ('a, 'b) CI.fatptr ->
  bytes CI.ocaml ->
  bool

val _6_Hacl_K256_Field_load_felem_vartime : 
  ('a, 'b) CI.fatptr ->
  bytes CI.ocaml ->
  bool

val _7_Hacl_K256_Field_store_felem : 
  bytes CI.ocaml ->
  ('a, 'b) CI.fatptr ->
  unit

val _8_Hacl_K256_Field_fmul_small_num : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  Unsigned.uint64 ->
  unit

val _9_Hacl_K256_Field_fadd : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  unit

val _10_Hacl_K256_Field_fsub : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  Unsigned.uint64 ->
  unit

val _11_Hacl_K256_Field_fmul : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  unit

val _12_Hacl_K256_Field_fsqr : ('a, 'b) CI.fatptr -> ('c, 'd) CI.fatptr -> unit

val _13_Hacl_K256_Field_fnormalize_weak : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  unit

val _14_Hacl_K256_Field_fnormalize : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  unit

val _15_Hacl_K256_Field_fnegate_conditional_vartime : 
  ('a, 'b) CI.fatptr ->
  bool ->
  unit

val _16_Hacl_Impl_K256_Finv_fsquare_times_in_place : 
  ('a, 'b) CI.fatptr ->
  Unsigned.uint32 ->
  unit

val _17_Hacl_Impl_K256_Finv_fsquare_times : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  Unsigned.uint32 ->
  unit

val _18_Hacl_Impl_K256_Finv_fexp_223_23 : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  ('e, 'f) CI.fatptr ->
  unit

val _19_Hacl_Impl_K256_Finv_finv : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  unit

val _20_Hacl_Impl_K256_Finv_fsqrt : 
  ('a, 'b) CI.fatptr ->
  ('c, 'd) CI.fatptr ->
  unit

type !'a result = 'a

type !'a return = 'a

type !'a1 fn =

val map_result : ('a -> 'b) -> 'a -> 'b

val returning : 'a CI.typ -> 'a return fn

val (@->) : 'a CI.typ -> 'b fn -> ('a -> 'b) fn

val foreign : string -> ('a -> 'b) fn -> 'a -> 'b

val foreign_value : string -> 'a Ctypes.typ -> 'a Ctypes.ptr

package hacl-star-raw