Merge pull request Reference-LAPACK#626 from Reference-LAPACK/typo_in__rotg_from_jim

langou · web-flow · commit 5d4180cf8288 · 2021-10-09T16:41:38.000-06:00
fix a typo, thanks to Jim Demmel for letting me know
diff --git a/BLAS/SRC/crotg.f90 b/BLAS/SRC/crotg.f90
@@ -11,7 +11,7 @@
 !  CROTG constructs a plane rotation
 !     [  c         s ] [ a ] = [ r ]
 !     [ -conjg(s)  c ] [ b ]   [ 0 ]
-!  where c is real, s ic complex, and c**2 + conjg(s)*s = 1.
+!  where c is real, s is complex, and c**2 + conjg(s)*s = 1.
 !
 !> \par Purpose:
 !  =============
diff --git a/BLAS/SRC/zrotg.f90 b/BLAS/SRC/zrotg.f90
@@ -11,7 +11,7 @@
 !  ZROTG constructs a plane rotation
 !     [  c         s ] [ a ] = [ r ]
 !     [ -conjg(s)  c ] [ b ]   [ 0 ]
-!  where c is real, s ic complex, and c**2 + conjg(s)*s = 1.
+!  where c is real, s is complex, and c**2 + conjg(s)*s = 1.
 !
 !> \par Purpose:
 !  =============

Original file line number	Diff line number	Diff line change
`@@ -11,7 +11,7 @@`
`11`	`11`	`! CROTG constructs a plane rotation`
`12`	`12`	`! [ c s ] [ a ] = [ r ]`
`13`	`13`	`! [ -conjg(s) c ] [ b ] [ 0 ]`
`14`		`-! where c is real, s ic complex, and c*2 + conjg(s)s = 1.`
	`14`	`+! where c is real, s is complex, and c*2 + conjg(s)s = 1.`
`15`	`15`	`!`
`16`	`16`	`!> \par Purpose:`
`17`	`17`	`! =============`