restart: a:= ; evalf(arcsinh(a)) ; `(* Areasinus hyberbolicus *) ` : evalf(arccosh(a)) ; `(* Areacosinus hyberbolicus *) ` : evalf(arctanh(a)) ; `(* Areatangens hyberbolicus *) ` : evalf(arccoth(a)) ; `(* Areacotangens hyberbolicus *)` : plot({arcsinh(x),arccosh(x),arctanh(x),arccoth(x)}, x=-2..2);