::tcl::mathfunc::cosh, and [expr] function, performs hyperbolic cosine
DKF: Tcl 8.5 includes support for hyperbolic cosines via the cosh() expr function and the tcl::mathfunc::cosh command.