Exemplo n.º 1
0
        public ScalarLinqRenderer(Action <int, int, int> dp, Func <bool> abortFunc)
            : base(dp, abortFunc)
        {
            Pair[] pairs = Enumerable.Range(0, 312).SelectMany(y => Enumerable.Range(0, 534).Select(x => new Pair {
                X = x, Y = y
            })).ToArray();
            int[] output = Enumerable.Range(0, pairs.Length).ToArray();
            this.context = new GpuContext("*");
            this._pairs  = context.CreateGpuArray(pairs);
            this._output = context.CreateGpuArray(output);

            parFunc = ParallelExtensions.Compile <float, float, float, int[]>(
                (_ymin, _xmin, _step) =>
                (from pair in pairs.AsParallelQueryExpr()
                 let _y = _ymin + _step * pair.Y
                          let _x = _xmin + _step * pair.X
                                   let c = new MyComplex(_x, _y)
                                           let iters = EnumerableEx.Generate(c, x => x.SquareLength < limit, x => x * x + c, x => x)
                                                       .Take(max_iters)
                                                       .Count()
                                                       select iters).ToArray()
                );

            seqFunc = Extensions.Compile <float, float, float, int[]>(
                (_ymin, _xmin, _step) =>
                (from pair in pairs.AsQueryExpr()
                 let _y = _ymin + _step * pair.Y
                          let _x = _xmin + _step * pair.X
                                   let c = new MyComplex(_x, _y)
                                           let iters = EnumerableEx.Generate(c, x => x.SquareLength < limit, x => x * x + c, x => x)
                                                       .Take(max_iters)
                                                       .Count()
                                                       select iters).ToArray()
                );
            gpuKernel =
                context.Compile <float, float, float, IGpuArray <int> >(
                    (_ymin, _xmin, _step) =>
                    from pair in _pairs.AsGpuQueryExpr()
                    let _y                                           = _ymin + _step * pair.Y
                                              let _x                 = _xmin + _step * pair.X
                                                               let c = new Complex {
                Real = _x, Img = _y
            }
                    let iters = EnumerableEx.Generate(c, x => squareLength.Invoke(x) < limit,
                                                      x => add.Invoke(mult.Invoke(x, x), c), x => x)
                                .Take(max_iters)
                                .Count()
                                select iters);
        }
Exemplo n.º 2
0
        public void RenderWithGpuLinq(float xmin, float xmax, float ymin, float ymax, float step)
        {
            var query =
                (from pair in _pairs.AsGpuQueryExpr()
                 let _y = ymin + step * pair.Y
                          let _x = xmin + step * pair.X
                                   let c = new Complex {
                Real = _x, Img = _y
            }
                 let iters = EnumerableEx.Generate(c, x => squareLength.Invoke(x) < limit,
                                                   x => add.Invoke(mult.Invoke(x, x), c), x => x)
                             .Take(max_iters)
                             .Count()
                             select iters);


            context.Fill(query, _output);
            _output.Refresh();
            var array = _output.GetArray();

            DrawPixels(array);
        }