Skip to content

Commit

Permalink
Remove meaningless comments
Browse files Browse the repository at this point in the history
  • Loading branch information
lepsch committed Nov 25, 2024
1 parent 5566135 commit 1a8bcda
Show file tree
Hide file tree
Showing 1,767 changed files with 1,492 additions and 10,132 deletions.
4 changes: 0 additions & 4 deletions lib/src/blas/dasum.dart
Original file line number Diff line number Diff line change
Expand Up @@ -5,10 +5,6 @@
import 'package:dart_lapack/blas.dart';

double dasum(final int N, Array<double> DX, final int INCX) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--

if (N <= 0 || INCX <= 0) return 0.0;

var DTEMP = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/daxpy.dart
Original file line number Diff line number Diff line change
Expand Up @@ -12,9 +12,6 @@ void daxpy(
final Array<double> DY_,
final int INCY,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final DX = DX_.having();
final DY = DY_.having();

Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dcabs1.dart
Original file line number Diff line number Diff line change
Expand Up @@ -5,8 +5,5 @@
import 'package:dart_lapack/blas.dart';

double dcabs1(final Complex Z) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
return Z.real.abs() + Z.imaginary.abs();
}
3 changes: 0 additions & 3 deletions lib/src/blas/dcopy.dart
Original file line number Diff line number Diff line change
Expand Up @@ -11,9 +11,6 @@ void dcopy(
final Array<double> DY_,
final int INCY,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final DX = DX_.having();
final DY = DY_.having();

Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/ddot.dart
Original file line number Diff line number Diff line change
Expand Up @@ -11,9 +11,6 @@ double ddot(
final Array<double> DY_,
final int INCY,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final DX = DX_.having();
final DY = DY_.having();

Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dgbmv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -19,9 +19,6 @@ void dgbmv(
final Array<double> Y_,
final int INCY,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final X = X_.having();
final Y = Y_.having();
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dgemm.dart
Original file line number Diff line number Diff line change
Expand Up @@ -23,9 +23,6 @@ void dgemm(
final Matrix<double> C_,
final int LDC,
) {
// -- Reference BLAS level3 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final B = B_.having(ld: LDB);
final C = C_.having(ld: LDC);
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dgemv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -21,9 +21,6 @@ void dgemv(
final Array<double> Y_,
final int INCY,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final X = X_.having();
final Y = Y_.having();
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dger.dart
Original file line number Diff line number Diff line change
Expand Up @@ -18,9 +18,6 @@ void dger(
final Matrix<double> A_,
final int LDA,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final X = X_.having();
final Y = Y_.having();
final A = A_.having(ld: LDA);
Expand Down
11 changes: 1 addition & 10 deletions lib/src/blas/dnrm2.dart
Original file line number Diff line number Diff line change
Expand Up @@ -12,15 +12,12 @@ import 'package:dart_lapack/src/intrinsics/radix.dart';
import 'package:dart_lapack/src/matrix.dart';

double dnrm2(final int n, final Array<double> x_, final int incx) {
// -- Reference BLAS level1 routine (version 3.9.1) --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final x = x_.having();
const zero = 0.0;
const one = 1.0;
final maxN = huge(0.0);

// .. Blue's scaling constants ..
// Blue's scaling constants
final tsml = pow(radix(0.0), ((minexponent(0.0) - 1) * 0.5).ceil());
final tbig =
pow(radix(0.0), ((maxexponent(0.0) - digits(0.0) + 1) * 0.5).floor());
Expand All @@ -30,7 +27,6 @@ double dnrm2(final int n, final Array<double> x_, final int incx) {
pow(radix(0.0), -((maxexponent(0.0) + digits(0.0) - 1) * 0.5).ceil());

// Quick return if possible

if (n <= 0) return zero;

// Compute the sum of squares in 3 accumulators:
Expand All @@ -40,7 +36,6 @@ double dnrm2(final int n, final Array<double> x_, final int incx) {
// The thresholds and multipliers are
// tbig -- values bigger than this are scaled down by sbig
// tsml -- values smaller than this are scaled up by ssml

var notbig = true;
var asml = zero;
var amed = zero;
Expand All @@ -61,19 +56,16 @@ double dnrm2(final int n, final Array<double> x_, final int incx) {

// Combine abig and amed or amed and asml if more than one
// accumulator was used.

final double scl, sumsq;
if (abig > zero) {
// Combine abig and amed if abig > 0.

if ((amed > zero) || (amed > maxN) || amed.isNaN) {
abig += (amed * sbig) * sbig;
}
scl = one / sbig;
sumsq = abig;
} else if (asml > zero) {
// Combine amed and asml if asml > 0.

if ((amed > zero) || (amed > maxN) || amed.isNaN) {
amed = sqrt(amed);
asml = sqrt(asml) / ssml;
Expand All @@ -86,7 +78,6 @@ double dnrm2(final int n, final Array<double> x_, final int incx) {
}
} else {
// Otherwise all values are mid-range

scl = one;
sumsq = amed;
}
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/drot.dart
Original file line number Diff line number Diff line change
Expand Up @@ -13,9 +13,6 @@ void drot(
final double C,
final double S,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final DX = DX_.having();
final DY = DY_.having();

Expand Down
4 changes: 0 additions & 4 deletions lib/src/blas/drotg.dart
Original file line number Diff line number Diff line change
Expand Up @@ -16,10 +16,6 @@ void drotg(
final Box<double> c,
final Box<double> s,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--

const zero = 0.0, one = 1.0;

final safmin =
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/drotm.dart
Original file line number Diff line number Diff line change
Expand Up @@ -12,9 +12,6 @@ void drotm(
final int INCY,
final Array<double> DPARAM,
) {
// -- Reference BLAS level1 routine -- int
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final DX = DX_.having();
final DY = DY_.having();
final (ZERO, TWO) = (0.0, 2.0);
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/drotmg.dart
Original file line number Diff line number Diff line change
Expand Up @@ -14,9 +14,6 @@ void drotmg(
final double DY1,
final Array<double> DPARAM,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
double DFLAG, DH11 = 0, DH12 = 0, DH21 = 0, DH22 = 0;

final (ZERO, ONE, TWO) = (0.0, 1.0, 2.0);
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dsbmv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -21,9 +21,6 @@ void dsbmv(
final Array<double> Y_,
final int INCY,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final X = X_.having();
final Y = Y_.having();
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dscal.dart
Original file line number Diff line number Diff line change
Expand Up @@ -10,9 +10,6 @@ void dscal(
final Array<double> DX_,
final int INCX,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final DX = DX_.having();
const ONE = 1.0;

Expand Down
9 changes: 0 additions & 9 deletions lib/src/blas/dsdot.dart
Original file line number Diff line number Diff line change
Expand Up @@ -11,15 +11,6 @@ double dsdot(
final Array<double> SY_,
final int INCY,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
//
// Authors:
// ========
// Lawson, C. L., (JPL), Hanson, R. J., (SNLA),
// Kincaid, D. R., (U. of Texas), Krogh, F. T., (JPL)

final SX = SX_.having();
final SY = SY_.having();

Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dspmv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -17,9 +17,6 @@ void dspmv(
final Array<double> Y_,
final int INCY,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final AP = AP_.having();
final X = X_.having();
final Y = Y_.having();
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dspr.dart
Original file line number Diff line number Diff line change
Expand Up @@ -14,9 +14,6 @@ void dspr(
final int INCX,
final Array<double> AP,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final X = X_.having();
const ZERO = 0.0;

Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dspr2.dart
Original file line number Diff line number Diff line change
Expand Up @@ -16,9 +16,6 @@ void dspr2(
final int INCY,
final Array<double> AP_,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final X = X_.having();
final Y = Y_.having();
final AP = AP_.having();
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dswap.dart
Original file line number Diff line number Diff line change
Expand Up @@ -11,9 +11,6 @@ void dswap(
final Array<double> DY_,
final int INCY,
) {
// -- Reference BLAS level1 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final DX = DX_.having();
final DY = DY_.having();

Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dsymm.dart
Original file line number Diff line number Diff line change
Expand Up @@ -22,9 +22,6 @@ void dsymm(
final Matrix<double> C_,
final int LDC,
) {
// -- Reference BLAS level3 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final B = B_.having(ld: LDB);
final C = C_.having(ld: LDC);
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dsymv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -20,9 +20,6 @@ void dsymv(
final Array<double> Y_,
final int INCY,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final X = X_.having();
final Y = Y_.having();
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dsyr.dart
Original file line number Diff line number Diff line change
Expand Up @@ -17,9 +17,6 @@ void dsyr(
final Matrix<double> A_,
final int LDA,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final X = X_.having();
final A = A_.having(ld: LDA);
const ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dsyr2.dart
Original file line number Diff line number Diff line change
Expand Up @@ -19,9 +19,6 @@ void dsyr2(
final Matrix<double> A_,
final int LDA,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final X = X_.having();
final Y = Y_.having();
final A = A_.having(ld: LDA);
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dsyr2k.dart
Original file line number Diff line number Diff line change
Expand Up @@ -22,9 +22,6 @@ void dsyr2k(
final Matrix<double> C_,
final int LDC,
) {
// -- Reference BLAS level3 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final B = B_.having(ld: LDB);
final C = C_.having(ld: LDC);
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dsyrk.dart
Original file line number Diff line number Diff line change
Expand Up @@ -20,9 +20,6 @@ void dsyrk(
final Matrix<double> C_,
final int LDC,
) {
// -- Reference BLAS level3 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final C = C_.having(ld: LDC);
const ONE = 1.0, ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dtbmv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -19,9 +19,6 @@ void dtbmv(
final Array<double> X_,
final int INCX,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final X = X_.having();
const ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dtbsv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -19,9 +19,6 @@ void dtbsv(
final Array<double> X_,
final int INCX,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final X = X_.having();
const ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dtpmv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -15,9 +15,6 @@ void dtpmv(
final Array<double> X_,
final int INCX,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final AP = AP_.having();
final X = X_.having();
const ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dtpsv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -15,9 +15,6 @@ void dtpsv(
final Array<double> X_,
final int INCX,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final AP = AP_.having();
final X = X_.having();
const ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dtrmm.dart
Original file line number Diff line number Diff line change
Expand Up @@ -21,9 +21,6 @@ void dtrmm(
final Matrix<double> B_,
final int LDB,
) {
// -- Reference BLAS level3 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final B = B_.having(ld: LDB);
const ONE = 1.0, ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dtrmv.dart
Original file line number Diff line number Diff line change
Expand Up @@ -18,9 +18,6 @@ void dtrmv(
final Array<double> X_,
final int INCX,
) {
// -- Reference BLAS level2 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final X = X_.having();
const ZERO = 0.0;
Expand Down
3 changes: 0 additions & 3 deletions lib/src/blas/dtrsm.dart
Original file line number Diff line number Diff line change
Expand Up @@ -21,9 +21,6 @@ void dtrsm(
final Matrix<double> B_,
final int LDB,
) {
// -- Reference BLAS level3 routine --
// -- Reference BLAS is a software package provided by Univ. of Tennessee, --
// -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
final A = A_.having(ld: LDA);
final B = B_.having(ld: LDB);
const ONE = 1.0, ZERO = 0.0;
Expand Down
Loading

0 comments on commit 1a8bcda

Please sign in to comment.