示例#1
0
        public static void dzasum()
        {
            var silent = true;

            (var method, var msg) = intro(silent);

            var n    = 4;
            var incx = 1;
            var x    = ComplexF64.Load(doubles(1.2, 2.5, 3.0, 1.7, 4.0, 0.53, -5.5, -0.29));

            msg += input(x.FormatVector(), silent);

            var expect = x.Map(z => Math.Abs(z.re) + Math.Abs(z.im)).Reduce((a, b) => a + b);

            expected(expect);


            var time   = start();
            var result = CBLAS.cblas_dzasum(n, ref x[0], incx);

            output("result", result, snapshot(time));
        }
示例#2
0
文件: axpy.cs 项目: 0xCM/z0
 public static extern void cblas_zaxpy(int n, ref ComplexF64 a, ref ComplexF64 x, int incx, ref ComplexF64 y, int incy);
示例#3
0
 public static extern ulong cblas_izamin(int n, ref ComplexF64 X, int incX);
示例#4
0
文件: nrm2.cs 项目: 0xCM/z0
 public static extern double cblas_dznrm2(int n, ref ComplexF64 X, int incX);