1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150
|
@BEGIN_FROM_5_0_0@
include Stdlib
@END_FROM_5_0_0@
@BEGIN_BEFORE_5_0_0@
module Pervasives = Stdcompat__pervasives
include Pervasives
let acosh x =
log (x +. sqrt (x *. x -. 1.0))
let asinh x =
log (x +. sqrt (x *. x +. 1.0))
let atanh x =
0.5 *. log ((1.0 +. x) /. (1.0 -. x))
@BEGIN_FROM_4_12_0@
external __FUNCTION__ : string = "%loc_FUNCTION"
@END_FROM_4_12_0@
@BEGIN_BEFORE_4_12_0@
let __FUNCTION__ = "<unknown>"
@END_BEFORE_4_12_0@
module Arg = Stdcompat__arg
module Array = Stdcompat__array
module ArrayLabels = Stdcompat__arrayLabels
module Atomic = Stdcompat__atomic
(* Bigarray is not exported before 4.02.0 to allow programs not
to be compiled with this module, this may change in the future.
From 4.02.0 and before 4.07.0, Bigarray is effectively
available only if the library is linked, but --no-alias-deps
allows the alias to be defined here without requiring such
a link. *)
@BEGIN_FROM_4_02_0@
module Bigarray = Bigarray
@END_FROM_4_02_0@
module Bool = Stdcompat__bool
module Buffer = Stdcompat__buffer
module Bytes = Stdcompat__bytes
module BytesLabels = Stdcompat__bytesLabels
module Callback = Callback
module Char = Stdcompat__char
module Complex = Complex
module Digest = Stdcompat__digest
module Either = Stdcompat__either
module Ephemeron = Stdcompat__ephemeron
module Filename = Stdcompat__filename
module Float = Stdcompat__float
module Format = Stdcompat__format
module Fun = Stdcompat__fun
module Gc = Gc
module Genlex = Genlex
module Hashtbl = Stdcompat__hashtbl
module In_channel = Stdcompat__in_channel
module Int = Stdcompat__int
module Int32 = Stdcompat__int32
module Int64 = Stdcompat__int64
module Lazy = Stdcompat__lazy
module Lexing = Stdcompat__lexing
module List = Stdcompat__list
module ListLabels = Stdcompat__listLabels
module Map = Stdcompat__map
module Marshal = Marshal
module MoreLabels = MoreLabels
module Nativeint = Stdcompat__nativeint
module Obj = Obj
module Oo = Oo
module Option = Stdcompat__option
module Out_channel = Stdcompat__out_channel
module Parsing = Parsing
module Printexc = Stdcompat__printexc
module Printf = Stdcompat__printf
module Queue = Stdcompat__queue
module Random = Stdcompat__random
module Result = Stdcompat__result
module Scanf = Scanf
module Seq = Stdcompat__seq
module Set = Stdcompat__set
module Stack = Stdcompat__stack
module StdLabels = struct
module Array = Stdcompat__arrayLabels
module Bytes = Stdcompat__bytesLabels
module List = Stdcompat__listLabels
module String = Stdcompat__stringLabels
end
module String = Stdcompat__string
module StringLabels = Stdcompat__stringLabels
module Sys = Stdcompat__sys
module Uchar = Stdcompat__uchar
module Unit = Stdcompat__unit
module Weak = Stdcompat__weak
@END_BEFORE_5_0_0@
|