home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / calculat / sm30a.zip / ASECH.(X) < prev    next >
Text File  |  1993-10-16  |  105b  |  3 lines

  1. asech(0) := inf
  2. asech(x_) := if( isnumber(x) and numeric==on, ln((1+sqrt(1-x^2))/(1-sqrt(1-x^2)))/2 )
  3.