================================================================================ <br>

<b>(*) Fix ZLARFP and CLARFP optimizations when the vector is zero.</b> <br>
By Jason<br>
<p>
The x == zero branch ignored complex alphas.  The code still
functioned, but it scaled the entire zero vector.  Now that I think of
it, I should scan upwards for the scaling, too.  That will be a
separate enhancement patch; this is just the bug fix.
</p><p>
This patch also fixes an accidental precision shortening in ZLARFP,
which used CMPLX in the dead branch.
</p><p>
Reported by Igor Zhuravlov on the LAPACK web goo thingy, currently at
 http://icl.cs.utk.edu/lapack-forum/viewtopic.php?t=924
Also lead to finding a related (but different) error in the LAWN and
(accepted, still in editing) SISC paper.
</p>