cosh and acosh.

src/core/Complex.pm

@@ -146,14 +146,14 @@ my class Complex is Numeric {
         (self + sqrt(1 + self * self)).log;
     }
 
-    # method cosh(Complex:D:) {
-    #     (Complex.new(0, 1) * self).cos;
-    # }
-    # 
-    # method acosh(Complex:D:) {
-    #     ($x + sqrt(self * self - 1)).log;
-    # }
-    # 
+    method cosh(Complex:D:) {
+        (Complex.new(0, 1) * self).cos;
+    }
+
+    method acosh(Complex:D:) {
+        (self + sqrt(self * self - 1)).log;
+    }
+
     # method tanh(Complex:D:) {
     #     -((Complex.new(0, 1) * self).tan)i;
     # }

src/core/Cool.pm

@@ -19,6 +19,8 @@ my class Cool {
     method acotan() { self.Numeric.acotan }
     method sinh()  { self.Numeric.sinh }
     method asinh() { self.Numeric.asinh }
+    method cosh()  { self.Numeric.cosh }
+    method acosh() { self.Numeric.acosh }
 
     ## string methods
 

src/core/Num.pm

@@ -146,6 +146,10 @@ my class Num {
     multi method cosh(Num:D: ) {
         nqp::p6box_n(pir::cosh__NN(nqp::unbox_n(self)));
     }
+    proto method acosh(|$) {*}
+    multi method acosh(Num:D: ) {
+        (self + (self * self - 1).sqrt).log;
+    }
     proto method tanh(|$) {*}
     multi method tanh(Num:D: ) {
         nqp::p6box_n(pir::tanh__NN(nqp::unbox_n(self)));

src/core/Numeric.pm

@@ -108,6 +108,14 @@ proto sub asinh(|$) {*}
 multi sub asinh(Numeric \$x) { $x.asinh }
 multi sub asinh(Cool \$x)    { $x.Numeric.asinh }
 
+proto sub cosh(|$) {*}
+multi sub cosh(Numeric \$x) { $x.cosh }
+multi sub cosh(Cool \$x)    { $x.Numeric.cosh }
+
+proto sub acosh(|$) {*}
+multi sub acosh(Numeric \$x) { $x.acosh }
+multi sub acosh(Cool \$x)    { $x.Numeric.acosh }
+
 proto sub sqrt(|$) {*}
 multi sub sqrt(Numeric \$x) { $x.sqrt }
 multi sub sqrt(Cool \$x)    { $x.Numeric.sqrt }