$Id: cart_to_polar.f90 2469 2007-10-08 10:34:43Z sfilippo $
Description: Converts cartesian into polar coordinates. (X,Y) -> (RHO,THETA) THETA is in degrees.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=psb_dpk_), | intent(in) | :: | x | |||
real(kind=psb_dpk_), | intent(in) | :: | y | |||
real(kind=psb_dpk_), | intent(out) | :: | rho | |||
real(kind=psb_dpk_), | intent(out) | :: | theta | |||
logical, | intent(in), | optional | :: | square |