Skip to content

Commit 72a5a6c

Browse files
committed
style: use consistent spacing
1 parent 02ec085 commit 72a5a6c

File tree

1 file changed

+4
-4
lines changed
  • lib/node_modules/@stdlib/blas/base/scnrm2/src

1 file changed

+4
-4
lines changed

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

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -60,10 +60,10 @@ real function scnrm2( N, cx, strideX )
6060
real( wp ), parameter :: maxN = huge( 0.0_wp )
6161
! ..
6262
! Blue's scaling constants:
63-
real(wp), parameter :: tsml = 1.08420217e-19_wp
64-
real(wp), parameter :: tbig = 4.50359963e15_wp
65-
real(wp), parameter :: ssml = 3.77789319e22_wp
66-
real(wp), parameter :: sbig = 1.32348898e-23_wp
63+
real( wp ), parameter :: tsml = 1.08420217e-19_wp
64+
real( wp ), parameter :: tbig = 4.50359963e15_wp
65+
real( wp ), parameter :: ssml = 3.77789319e22_wp
66+
real( wp ), parameter :: sbig = 1.32348898e-23_wp
6767
!..
6868
! Scalar arguments:
6969
integer :: N, strideX

0 commit comments

Comments
 (0)