Module Core_kernel.Percent
A scale factor, not bounded between 0% and 100%, represented as a float.
type t= private Core_kernel__.Import.floatExposing that this is a float allows for more optimization. E.g. compiler can optimize some local refs and not box them.
val hash_fold_t : Base.Hash.state -> t -> Base.Hash.stateval hash : t -> Base.Hash.hash_value
of_string and t_of_sexp disallow nan, inf, etc.
include Core_kernel__.Std_internal.Stringable with type t := t
Sexps are of the form 5bp or 0.05% or 0.0005x
include Core_kernel__.Std_internal.Sexpable with type t := t
val t_of_sexp : Sexplib0.Sexp.t -> tval sexp_of_t : t -> Sexplib0.Sexp.t
include Core_kernel__.Std_internal.Binable with type t := t
include Core_kernel__.Binable0.S_only_functions with type t := t
val bin_size_t : t Bin_prot.Size.sizerval bin_write_t : t Bin_prot.Write.writerval bin_read_t : t Bin_prot.Read.readerval __bin_read_t__ : (int -> t) Bin_prot.Read.readerThis function only needs implementation if
texposed to be a polymorphic variant. Despite what the type reads, this does *not* produce a function after reading; instead it takes the constructor tag (int) before reading and reads the rest of the varianttafterwards.
val bin_shape_t : Bin_prot.Shape.tval bin_writer_t : t Bin_prot.Type_class.writerval bin_reader_t : t Bin_prot.Type_class.readerval bin_t : t Bin_prot.Type_class.t
include Core_kernel__.Std_internal.Comparable_binable with type t := t
include Core_kernel__.Comparable_intf.S_common
include Base.Comparable.S
include Base__.Comparable_intf.Polymorphic_compare
val ascending : t -> t -> intascendingis identical tocompare.descending x y = ascending y x. These are intended to be mnemonic when used likeList.sort ~compare:ascendingandList.sort ~cmp:descending, since they cause the list to be sorted in ascending or descending order, respectively.
val descending : t -> t -> intval between : t -> low:t -> high:t -> boolbetween t ~low ~highmeanslow <= t <= high
val clamp_exn : t -> min:t -> max:t -> tclamp_exn t ~min ~maxreturnst', the closest value totsuch thatbetween t' ~low:min ~high:maxis true.Raises if
not (min <= max).
val clamp : t -> min:t -> max:t -> t Base.Or_error.t
include Base.Comparator.S with type t := t
val comparator : (t, comparator_witness) Base.Comparator.comparator
include Base__.Comparable_intf.Validate with type t := t
val validate_lbound : min:t Base.Maybe_bound.t -> t Base.Validate.checkval validate_ubound : max:t Base.Maybe_bound.t -> t Base.Validate.checkval validate_bound : min:t Base.Maybe_bound.t -> max:t Base.Maybe_bound.t -> t Base.Validate.check
module Replace_polymorphic_compare : Core_kernel__.Comparable_intf.Polymorphic_compare with type t := tinclude Core_kernel__.Comparable_intf.Map_and_set_binable with type t := t with type comparator_witness := comparator_witness
include Comparator.S with type t := t
val comparator : (t, comparator_witness) Comparator.comparator
module Map : Map.S_binable with type Key.t = t with type Key.comparator_witness = comparator_witnessmodule Set : Set.S_binable with type Elt.t = t with type Elt.comparator_witness = comparator_witnessinclude Comparable.With_zero with type t := t
val validate_positive : t Base.Validate.checkval validate_non_negative : t Base.Validate.checkval validate_negative : t Base.Validate.checkval validate_non_positive : t Base.Validate.checkval is_positive : t -> boolval is_non_negative : t -> boolval is_negative : t -> boolval is_non_positive : t -> boolval sign : t -> Base__.Sign0.tReturns
Neg,Zero, orPosin a way consistent with the above functions.
include Quickcheckable.S with type t := t
val quickcheck_generator : t Base_quickcheck.Generator.tval quickcheck_observer : t Base_quickcheck.Observer.tval quickcheck_shrinker : t Base_quickcheck.Shrinker.t
module Option : Immediate_option.S_without_immediate with type t = private Core_kernel__.Import.float and type value := tThe value
nancannot be represented as anOption.t
val (*) : t -> t -> tval (+) : t -> t -> tval (-) : t -> t -> tval zero : tval neg : t -> tval abs : t -> tval is_zero : t -> Core_kernel__.Import.boolval is_nan : t -> Core_kernel__.Import.boolval is_inf : t -> Core_kernel__.Import.boolval apply : t -> Core_kernel__.Import.float -> Core_kernel__.Import.floatapply t xmultiplies the percenttbyx, returning a float.
val scale : t -> Core_kernel__.Import.float -> tscale t xscales the percenttbyx, returning a newt.
val of_mult : Core_kernel__.Import.float -> tof_mult 5.is 5x = 500% = 50_000bp
val to_mult : t -> Core_kernel__.Import.floatval of_percentage : Core_kernel__.Import.float -> tof_percentage 5.is 5% = 0.05x = 500bp
val to_percentage : t -> Core_kernel__.Import.floatval of_bp : Core_kernel__.Import.float -> tof_bp 5.is 5bp = 0.05% = 0.0005x
val to_bp : t -> Core_kernel__.Import.floatval of_bp_int : Core_kernel__.Import.int -> tval to_bp_int : t -> Core_kernel__.Import.introunds down
val round_significant : t -> significant_digits:Core_kernel__.Import.int -> t0.0123456% ~significant_digits:4 is 1.235bp
val round_decimal_mult : t -> decimal_digits:Core_kernel__.Import.int -> t0.0123456% ~decimal_digits:4 is 0.0001 = 1bp
val round_decimal_percentage : t -> decimal_digits:Core_kernel__.Import.int -> t0.0123456% ~decimal_digits:4 is 0.0123% = 1.23bp
val round_decimal_bp : t -> decimal_digits:Core_kernel__.Import.int -> t0.0123456% ~decimal_digits:4 is 1.2346bp
val t_of_sexp_allow_nan_and_inf : Sexp.t -> tval of_string_allow_nan_and_inf : Core_kernel__.Import.string -> t
module Format : sig ... endA
Format.ttellsPercent.formathow to render a floating-point value as a string, like aprintfconversion specification.
val format : t -> Format.t -> Core_kernel__.Import.stringval validate : t -> Core_kernel__.Import.Validate.tval sign : t -> Sign.tval sign_exn : t -> Sign.tThe sign of a
Percent.t. Both-0.and0.map toZero. Raises on nan. All other values map toNegorPos.
module Stable : sig ... end