Revision as of 13:06, 13 March 2012 (view source) Mark Clements (talk \| contribs) m (Changed signValue function) ← Older edit		Revision as of 13:09, 13 March 2012 (view source) Mark Clements (talk \| contribs) m (Changed signValue function) Newer edit →
Line 236: R has (sign: R -> Integer) => coerce(sign(r)$R)$R zero? r => r --if ~~hack,~~sqrt(rr) ~~c.f.~~= ~~complex~~r ~~numbers~~then 1 else -1 ~~R has (sqrt: R -> R) =>~~ ~~if sqrt(rr) = r then 1 else -1~~ 1 householder(a) == m := nrows a

QR decomposition (view source)