Skip to content

Commit f658422

Browse files
committed
chore: indentation and naming changes
--- type: pre_commit_static_analysis_report description: Results of running static analysis checks when committing changes. report: - task: lint_filenames status: passed - task: lint_editorconfig status: passed - task: lint_markdown status: na - task: lint_package_json status: na - task: lint_repl_help status: na - task: lint_javascript_src status: na - task: lint_javascript_cli status: na - task: lint_javascript_examples status: na - task: lint_javascript_tests status: na - task: lint_javascript_benchmarks status: na - task: lint_python status: na - task: lint_r status: na - task: lint_c_src status: missing_dependencies - task: lint_c_examples status: na - task: lint_c_benchmarks status: na - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: na - task: lint_typescript_tests status: na - task: lint_license_headers status: passed ---
1 parent f975b3f commit f658422

File tree

2 files changed

+14
-14
lines changed

2 files changed

+14
-14
lines changed

lib/node_modules/@stdlib/blas/base/zaxpy/src/zaxpy.f

Lines changed: 11 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -42,22 +42,22 @@
4242
! > * We will gladly answer any questions regarding the software. If a modification is done, however, it is the responsibility of the person who modified the routine to provide support.
4343
!
4444
! @param {integer} N - number of indexed elements
45-
! @param {complex<double>} za - scalar constant
46-
! @param {Array<complex<double>>} zx - first input array
47-
! @param {integer} strideX - `zx` stride length
48-
! @param {Array<complex<double>>} zy - second input array
49-
! @param {integer} strideY - `zy` stride length
45+
! @param {complex<double>} alpha - scalar constant
46+
! @param {Array<complex<double>>} x - first input array
47+
! @param {integer} strideX - `x` stride length
48+
! @param {Array<complex<double>>} y - second input array
49+
! @param {integer} strideY - `y` stride length
5050
!<
5151
! FIXME: replace with blas/base/dcabs1 once library manifest tooling is fixed
52-
subroutine zaxpy( N, za, zx, strideX, zy, strideY )
52+
subroutine zaxpy( N, alpha, x, strideX, y, strideY )
5353
implicit none
5454
! ..
5555
! Scalar arguments:
56-
complex(kind=kind(0.0d0)) :: za
56+
complex(kind=kind(0.0d0)) :: alpha
5757
integer :: strideX, strideY, N
5858
! ..
5959
! Array arguments:
60-
complex(kind=kind(0.0d0)) :: zx(*), zy(*)
60+
complex(kind=kind(0.0d0)) :: x(*), y(*)
6161
! ..
6262
! Local scalars:
6363
integer :: ix, iy, i
@@ -69,13 +69,13 @@ subroutine zaxpy( N, za, zx, strideX, zy, strideY )
6969
return
7070
end if
7171
! ..
72-
if ( ( abs(real(za)) + abs(aimag(za)) ) <= 0.0D0 ) then
72+
if ( ( abs(real(alpha)) + abs(aimag(alpha)) ) <= 0.0D0 ) then
7373
return
7474
end if
7575
! ..
7676
if ( strideX == 1 .AND. strideY == 1 ) then
7777
do i = 1, N
78-
zy( i ) = zy( i ) + za * zx( i )
78+
y( i ) = y( i ) + alpha * x( i )
7979
end do
8080
else
8181
ix = 1
@@ -87,7 +87,7 @@ subroutine zaxpy( N, za, zx, strideX, zy, strideY )
8787
iy = ((1-N)*strideY) + 1
8888
end if
8989
do i = 1, N
90-
zy( iy ) = zy( iy ) + za * zx( ix )
90+
y( iy ) = y( iy ) + alpha * x( ix )
9191
ix = ix + strideX
9292
iy = iy + strideY
9393
end do

lib/node_modules/@stdlib/blas/base/zaxpy/src/zaxpy_cblas.c

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -25,10 +25,10 @@
2525
* Scales a double-precision complex floating-point vector by a double-precision complex floating-point constant and adds the result to a double-precision complex floating-point vector.
2626
*
2727
* @param N number of indexed elements
28-
* @param alpha scalar constant
29-
* @param X first input array
28+
* @param alpha scalar constant
29+
* @param X first input array
3030
* @param strideX X stride length
31-
* @param Y second input array
31+
* @param Y second input array
3232
* @param strideY Y stride length
3333
*/
3434
void API_SUFFIX(c_zaxpy)( const CBLAS_INT N, const stdlib_complex128_t alpha, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {

0 commit comments

Comments
 (0)