cdiv(xr, xi, yr, yi)
Complex scalar division.
# File lib/matrix/eigenvalue_decomposition.rb, line 100 def cdiv(xr, xi, yr, yi) if (yr.abs > yi.abs) r = yi/yr d = yr + r*yi [(xr + r*xi)/d, (xi - r*xr)/d] else r = yr/yi d = yi + r*yr [(r*xr + xi)/d, (r*xi - xr)/d] end end