I wonder if this is in connection as well to the TriD problem
pdl> use
PDL::Complex;
pdl> use
PDL::Graphics::TriD;
pdl> $x =
pdl(1,i,i,1);
pdl> $y =
pdl(1,-i,i,1);
pdl> $z =
pdl(1,i,i,-1);
pdl>
points3d[$x,$y,$z]
pdl> points3d[$x*$y,$y*$z,$z*$x]
Works Great; until you try to do this -> look here tho ???
points3d[ $x-($y*i), $y+($z*(-i)), $z-($x*i)]
PDL: PDL::Complex::Cmul(a,b,c): Parameter 'b':
Mismatched implicit thread dimension 1: size 4 vs. 2
There are 3 PDLs in the expression; 3 thread dims.
PDL IN EXPR. ACTIVE DIMS | THREAD DIMS
# 0 (normal): 2 | 2 4
# 1 (normal): 2 | 2 2 4
# 2 (null)
.. at (eval 41) line 1, <DATA> line 90.
PDL::Complex::__ANON__(PDL::Complex=SCALAR(0x2d45bd8),
PDL=SCALAR(0x2d46950), "") called at
/usr/local/lib/x86_64-linux-gnu/perl/5.22.1/PDL/Graphics/TriD.pm line 738
PDL::Graphics::TriD::realcoords("", ARRAY(0x2d46548)) called at
/usr/local/lib/x86_64-linux-gnu/perl/5.22.1/PDL/Graphics/TriD/Objects.pm
line 43
PDL::Graphics::TriD::GObject::new("PDL::Graphics::TriD::Points",
ARRAY(0x2d46548)) called at
/usr/local/lib/x86_64-linux-gnu/perl/5.22.1/PDL/Graphics/TriD.pm line 880
PDL::points3d(ARRAY(0x2d46548)) called at (eval 164) line 4
main::__ANON__() called at /usr/local/bin/perldl line 719
eval {...} called at /usr/local/bin/perldl line 719
main::eval_and_report("points3d[ \$x-(\$y*i), \$y+(\$z*(-i)),
\$z-(\$x*i)]\x{a}") called at /usr/local/bin/perldl line 655
main::process_input() called at /usr/local/bin/perldl line 675
eval {...} called at /usr/local/bin/perldl line 675
On Sun, Feb 12, 2017 at 6:57 AM, <[email protected]>
wrote:
> Send pdl-general mailing list submissions to
> [email protected]
>
> To subscribe or unsubscribe via the World Wide Web, visit
> https://lists.sourceforge.net/lists/listinfo/pdl-general
> or, via email, send a message with subject or body 'help' to
> [email protected]
>
> You can reach the person managing the list at
> [email protected]
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of pdl-general digest..."
>
>
> Today's Topics:
>
> 1. complex sum (Luis Mochan)
> 2. Re: complex sum (Luis Mochan)
> 3. Re: CHM/OpenGL-Modern-0.01_09.tar.gz released to CPAN
> ([email protected])
> 4. CHM/OpenGL-Modern-0.01_10.tar.gz released to CPAN (Chris Marshall)
> 5. Re: [Pogl-general] CHM/OpenGL-Modern-0.01_09.tar.gz released
> to CPAN (Christian Walde)
> 6. Re: OpenGL::Modern official release plans (Christian Walde)
> 7. CHM/OpenGL-Modern-0.02.tar.gz released to CPAN (Chris Marshall)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Thu, 9 Feb 2017 10:03:34 -0600
> From: Luis Mochan <[email protected]>
> Subject: [Pdl-general] complex sum
> To: [email protected]
> Message-ID: <[email protected]>
> Content-Type: text/plain; charset=iso-8859-1
>
> I believe that sum doesn't work on complex pdl's. Example:
>
> pdl> $a=sequence(5)+10*i*sequence(5)
> pdl> p $a->sum
> dimension index 2 larger than greatest dimension at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/lib/site_
> perl/5.24.0/x86_64-linux/PDL/Core.pm line 1642.
> PDL::clump(PDL::Complex=SCALAR(0x5605e2c93ab0), 0, 2) called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/lib/site_
> perl/5.24.0/x86_64-linux/PDL/Complex.pm line 1347
> PDL::Complex::sum(PDL::Complex=SCALAR(0x5605e4724408)) called at
> (eval 947) line 4
> main::__ANON__() called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 719
> eval {...} called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 719
> main::eval_and_report("p \$a->sum\x{a}") called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl line 655
> main::process_input() called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 675
> eval {...} called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 675
> It seems sumover does work correctly.
>
> Best regards,
> Luis
>
> --
>
> o
> W. Luis Moch?n, | tel:(52)(777)329-1734 /<(*)
> Instituto de Ciencias F?sicas, UNAM | fax:(52)(777)317-5388 `>/ /\
> Apdo. Postal 48-3, 62251 | (*)/\/ \
> Cuernavaca, Morelos, M?xico | [email protected] /\_/\__/
> GPG: 791EB9EB, C949 3F81 6D9B 1191 9A16 C2DF 5F0A C52B 791E B9EB
>
>
>
>
>
> ------------------------------
>
> Message: 2
> Date: Fri, 10 Feb 2017 12:54:25 -0600
> From: Luis Mochan <[email protected]>
> Subject: Re: [Pdl-general] complex sum
> To: [email protected]
> Message-ID: <[email protected]>
> Content-Type: text/plain; charset="iso-8859-1"
>
> I found that for 2D complex arrays $complex->sum does work, but it
> doesn't work for 1D complex arrays (it gives an error) and it gives the
> wrong
> result for 3D and higher dimensional complex arrays. I guess the error
> lies in the file Basic/Complex/complex.pd, in the definition of sum
> sub sum {
> my($x) = @_;
> my $tmp = $x->mv(0,1)->clump(0,2)->mv(1,0)->sumover;
> return $tmp->squeeze;
> }
> In the third line
> my $tmp = $x->mv(0,1)->clump(0,2)->mv(1,0)->sumover;
> it is explicitly assumed that $x is a 2D complex array.
> I guess the problem may be solved changing that line to
> my $tmp = $x->real->mv(0,-1)->clump(-2)->sumover->complex;
> where the real-imaginary index is protected by sending it to the last
> position and clumping all previous indices. Is this solution reasonable?
> I attach the corresponding patch.
>
> Best regards,
> Luis
>
>
>
>
>
> a
> On Thu, Feb 09, 2017 at 10:03:34AM -0600, Luis Mochan wrote:
> > I believe that sum doesn't work on complex pdl's. Example:
> >
> > pdl> $a=sequence(5)+10*i*sequence(5)
> > pdl> p $a->sum
> > dimension index 2 larger than greatest dimension at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/lib/site_
> perl/5.24.0/x86_64-linux/PDL/Core.pm line 1642.
> > PDL::clump(PDL::Complex=SCALAR(0x5605e2c93ab0), 0, 2) called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/lib/site_
> perl/5.24.0/x86_64-linux/PDL/Complex.pm line 1347
> > PDL::Complex::sum(PDL::Complex=SCALAR(0x5605e4724408)) called at
> (eval 947) line 4
> > main::__ANON__() called at
> > /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 719
> > eval {...} called at
> > /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 719
> > main::eval_and_report("p \$a->sum\x{a}") called at
> /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl line 655
> > main::process_input() called at
> > /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 675
> > eval {...} called at
> > /home/mochan/perl5/perlbrew/perls/perl-5.24.0/bin/perldl
> line 675
> > It seems sumover does work correctly.
> >
> > Best regards,
> > Luis
> >
> > --
> >
> > o
> > W. Luis Moch?n, | tel:(52)(777)329-1734 /<(*)
> > Instituto de Ciencias F?sicas, UNAM | fax:(52)(777)317-5388 `>/ /\
> > Apdo. Postal 48-3, 62251 | (*)/\/
> \
> > Cuernavaca, Morelos, M?xico | [email protected] /\_/\__/
> > GPG: 791EB9EB, C949 3F81 6D9B 1191 9A16 C2DF 5F0A C52B 791E B9EB
> >
> >
> >
> > ------------------------------------------------------------
> ------------------
> > Check out the vibrant tech community on one of the world's most
> > engaging tech sites, SlashDot.org! http://sdm.link/slashdot
> > _______________________________________________
> > pdl-general mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/pdl-general
> >
>
> --
>
> o
> W. Luis Moch?n, | tel:(52)(777)329-1734 /<(*)
> Instituto de Ciencias F?sicas, UNAM | fax:(52)(777)317-5388 `>/ /\
> Apdo. Postal 48-3, 62251 | (*)/\/ \
> Cuernavaca, Morelos, M?xico | [email protected] /\_/\__/
> GPG: 791EB9EB, C949 3F81 6D9B 1191 9A16 C2DF 5F0A C52B 791E B9EB
>
>
> -------------- next part --------------
> A non-text attachment was scrubbed...
> Name: rem.patch
> Type: text/x-diff
> Size: 332 bytes
> Desc: not available
>
> ------------------------------
>
> Message: 3
> Date: Sat, 11 Feb 2017 10:05:42 +1100
> From: <[email protected]>
> Subject: Re: [Pdl-general] CHM/OpenGL-Modern-0.01_09.tar.gz released
> to CPAN
> To: "Chris Marshall" <[email protected]>, "perldl"
> <[email protected]>,
> <[email protected]>
> Message-ID: <13E1F064B155439990496759D2EE0D4B@OwnerPC311012>
> Content-Type: text/plain; format=flowed; charset="utf-8";
> reply-type=original
>
>
> From: Chris Marshall
> Sent: Thursday, February 09, 2017 4:11 AM
> To: perldl ; [email protected]
> Subject: Re: [Pdl-general] CHM/OpenGL-Modern-0.01_09.tar.gz released to
> CPAN
>
> > Looks like the testing fixes worked. OpenGL::Modern is now PASS-ing 100%
> > in the first groups of tester reports!
>
> Note that on Windows-5.8.8 (and probably earlier) the final Capture-Tiny
> test script (t/25-cap-fork.t) crashes perl.
> I think (untested) that the Capture-Tiny dependency would therefore make
> OpenGL-Modern uninstallable via cpan/cpanm/cpanp.
>
> Of course, those still using perl-5.8.8 (or earlier) on Windows deserve
> exactly what they get ;-)
>
> No problems with 5.8.9 and later.
>
> Cheers,
> Rob
>
>
>
>
>
> ------------------------------
>
> Message: 4
> Date: Sat, 11 Feb 2017 13:17:28 -0500
> From: Chris Marshall <[email protected]>
> Subject: [Pdl-general] CHM/OpenGL-Modern-0.01_10.tar.gz released to
> CPAN
> To: [email protected], perldl
> <[email protected]>
> Message-ID: <[email protected]>
> Content-Type: text/plain; charset=utf-8; format=flowed
>
> ...and should be appearing at a CPAN mirror near you soon.
>
> This is expected to be the last alpha/developers release
> of OpenGL::Modern before its first official release
> tomorrow.
>
> Feedback, doc updates, example codes, and other release
> polishing assistance is appreciated. The single biggest
> issue is that it doesn't compile on MacOSX. I'm hoping
> that an official release will increase visibility and
> maybe get someone to fix the problem.
>
> Enjoy!
> Chris
>
>
> 0.01_10 2017-02-11 12:44:57-05:00
> - Added done_glewInit() to determine if glewInit() has been called
> - Automatically call glewInit() if not called (doesn't handle
> context check)
> - new tests and cleanup re perltidy
>
>
>
>
>
> ------------------------------
>
> Message: 5
> Date: Sun, 12 Feb 2017 15:47:58 +0100
> From: "Christian Walde" <[email protected]>
> Subject: Re: [Pdl-general] [Pogl-general]
> CHM/OpenGL-Modern-0.01_09.tar.gz released to CPAN
> To: "Chris Marshall" <[email protected]>, perldl
> <[email protected]>,
> [email protected], [email protected]
> Message-ID: <op.yvjx18kpydyjqt@digitizedsqueak>
> Content-Type: text/plain; charset=iso-8859-15; format=flowed;
> delsp=yes
>
> On Sat, 11 Feb 2017 00:05:42 +0100, <[email protected]> wrote:
>
> >
> > From: Chris Marshall
> > Sent: Thursday, February 09, 2017 4:11 AM
> > To: perldl ; [email protected]
> > Subject: Re: [Pdl-general] CHM/OpenGL-Modern-0.01_09.tar.gz released to
> CPAN
> >
> >> Looks like the testing fixes worked. OpenGL::Modern is now PASS-ing
> 100%
> >> in the first groups of tester reports!
> >
> > Note that on Windows-5.8.8 (and probably earlier) the final Capture-Tiny
> > test script (t/25-cap-fork.t) crashes perl.
> > I think (untested) that the Capture-Tiny dependency would therefore make
> > OpenGL-Modern uninstallable via cpan/cpanm/cpanp.
> >
> > Of course, those still using perl-5.8.8 (or earlier) on Windows deserve
> > exactly what they get ;-)
> >
> > No problems with 5.8.9 and later.
>
> As a windows user, d'accord.
>
> 5.8.8 was the very first Strawberry Perl release, and for ActivePerl you
> can't even get it without paying them for the privilege.
>
> --
> With regards,
> Christian Walde
>
>
>
> ------------------------------
>
> Message: 6
> Date: Sun, 12 Feb 2017 15:50:10 +0100
> From: "Christian Walde" <[email protected]>
> Subject: Re: [Pdl-general] OpenGL::Modern official release plans
> To: [email protected], perldl
> <[email protected]>, "Chris Marshall"
> <[email protected]>
> Message-ID: <op.yvjx5wtnydyjqt@digitizedsqueak>
> Content-Type: text/plain; charset="iso-8859-15"
>
> On Thu, 09 Feb 2017 16:53:55 +0100, Chris Marshall <[email protected]>
> wrote:
>
> > The two major outstanding issues: build problems for MacOSX,
> > and lack of a working Travis-CI process can both be resolved
> > independently of this release.
>
> I just resolved the Travis part, feel free to close that unless you've
> further input: https://github.com/devel-chm/OpenGL-Modern/issues/21
>
> OSX is still problematic though, even on Travis. Up to you if you'd like
> to remove it from the Travis config until that's fixed.
>
> --
> With regards,
> Christian Walde
> -------------- next part --------------
> An HTML attachment was scrubbed...
>
> ------------------------------
>
> Message: 7
> Date: Sun, 12 Feb 2017 09:56:58 -0500
> From: Chris Marshall <[email protected]>
> Subject: [Pdl-general] CHM/OpenGL-Modern-0.02.tar.gz released to CPAN
> To: [email protected], perldl
> <[email protected]>
> Message-ID: <[email protected]>
> Content-Type: text/plain; charset=utf-8; format=flowed
>
> ...and should be appearing at a CPAN mirror near
> you soon.
>
> This is the first official release of the new
> OpenGL::Modern with bindings to *all* OpenGL API
> versions from 1.0 to 4.5.
>
> While it is still a work in progress, it provides
> bindings to 1263 OpenGL routines taking scalar
> input arguments (or none) and returning scalar
> values (or none). These are believed to be fully
> correct and usable. (Compare this with about 300
> as implemented in the OpenGL module!)
>
> The remaining routines all take or return some
> flavor of pointer argument (including arrays).
> These routines are indicated in the bindings by
> a '_c' suffix to the OpenGL base name. While
> the bindings are technically correct, you'll
> need to hand construct the needed inputs from
> the perl level to call these successfully.
>
> For some help with this, see the documentation
> for OpenGL::Modern::Helpers, e.g.,
>
> perldoc -m OpenGL::Modern::Helpers
>
> This shows some usage tricks to call the '_c' bindings.
> For additional help, feel free to post at the Perl
> OpenGL Mailing lists (see https://sourceforge.net/p/pogl/mailman/
> for Archives and to Subscribe).
>
> You can also try the #pogl chat at irc.perl.org or
> helping out directly via the github project:
>
> https://github.com/devel-chm/OpenGL-Modern
>
> Thanks to all who have contributed for this
> release with special thanks to Christian Walde
> for keeping hope alive for modern opengl support,
> to Max Maischein for kickstarting the implementation
> with autogenerated code from the GLEW library files.
>
> Enjoy!
> Chris Marshall for the Perl OpenGL Developers
>
>
> OpenGL::Modern 0.02 Release Notes:
> - First official CPAN release of OpenGL::Modern
> - Bindings support all known OpenGL API routines
> - _c routines provide "raw" C pointer interfaces
> - OpenGL::Modern::Helpers gives guidance for use
> - MacOSX not supported (looking for developers!)
>
>
>
>
>
> ------------------------------
>
> ------------------------------------------------------------
> ------------------
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, SlashDot.org! http://sdm.link/slashdot
>
> ------------------------------
>
> _______________________________________________
> pdl-general mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/pdl-general
>
>
> End of pdl-general Digest, Vol 24, Issue 6
> ******************************************
>
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, SlashDot.org! http://sdm.link/slashdot
_______________________________________________
pdl-general mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/pdl-general
