coth.m File Reference

Functions
	!assert (all(abs(coth(x)-v)< sqrt(eps)))
!error	coth ()
!error	coth (1, 2)
Variables
function	w
endfunction!test	!x = [pi/2*i, 3*pi/2*i]
	!v = [0, 0]

---

Function Documentation

!assert

(

all(abs(coth(x)-v)< sqrt(eps))

)

!error coth	(	1	,
		2
	)

!error coth

(

)

---

Variable Documentation

!v = [0, 0]

endfunction !test !x = [pi/2*i, 3*pi/2*i]

endif w

Initial value:

 coth (z)

  if (nargin != 1)
    print_usage ()