Try to improve norm(A) == 0 in *GGQRCS

[weslleyspereira]

Replace norm(A) == 0 by a W <= HUGENUM

* The first commit applies changes for sGGQRCS only.

[codecov-commenter]

Codecov Report

Merging #2 (08628f9) into add-xGGQRCS (8a0bef1) will increase coverage by 28.62%.
The diff coverage is 40.00%.

@@               Coverage Diff                @@
##           add-xGGQRCS       #2       +/-   ##
================================================
+ Coverage        53.40%   82.02%   +28.62%     
================================================
  Files             1904     1904               
  Lines           191702   191715       +13     
================================================
+ Hits            102374   157250    +54876     
+ Misses           89328    34465    -54863     

Impacted Files	Coverage Δ
SRC/sggqrcs.f	71.42% <40.00%> (+41.84%)	⬆️
SRC/slapll.f	0.00% <0.00%> (-100.00%)	⬇️
SRC/slags2.f	50.68% <0.00%> (-47.95%)	⬇️
SRC/stgsja.f	69.92% <0.00%> (-23.31%)	⬇️
SRC/sggsvd3.f	79.41% <0.00%> (-17.65%)	⬇️
SRC/sggsvp3.f	90.90% <0.00%> (-8.27%)	⬇️
SRC/sorcsd2by1.f	90.94% <0.00%> (+0.37%)	⬆️
SRC/slasq4.f	96.64% <0.00%> (+0.67%)	⬆️
SRC/dlasd4.f	76.71% <0.00%> (+1.03%)	⬆️
SRC/slasv2.f	98.76% <0.00%> (+1.23%)	⬆️
... and 533 more

---

Continue to review full report at Codecov.

Legend - Click here to learn more
Δ = absolute <relative> (impact), ø = not affected, ? = missing data
Powered by Codecov. Last update 8a0bef1...08628f9. Read the comment docs.