(*
include Stdlib
*)

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))


external __FUNCTION__ : string = "%loc_FUNCTION"

(*
let __FUNCTION__ = "<unknown>"
*)

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. *)

module Bigarray = Bigarray


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 Domain = Stdcompat__domain

module Dynarray = Stdcompat__dynarray

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

