~ubuntu-branches/ubuntu/trusty/pdl/trusty-proposed

« back to all changes in this revision

Viewing changes to 3dtest.pl

  • Committer: Bazaar Package Importer
  • Author(s): Andres Rodriguez
  • Date: 2009-12-05 12:37:41 UTC
  • mfrom: (2.1.4 squeeze)
  • Revision ID: james.westby@ubuntu.com-20091205123741-ilqkc9s4zlk71z13
Tags: 1:2.4.5+dfsg-2ubuntu1
* Merge from debian testing (LP: #492898), remaining changes:
  - debian/perldl.conf: Enabled NAN support.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#!/usr/bin/perl
 
2
#
 
3
# This program is a simple diagnostic example to
 
4
# check if TriD imagrgb is working
 
5
#
 
6
use PDL;
 
7
use PDL::NiceSlice;
 
8
use PDL::Graphics::TriD;
 
9
 
 
10
# $PDL::debug_trid=1;
 
11
# $PDL::Graphics::TriD::verbose = 100;
 
12
$im = sequence(640,480)/640.0/480.0;
 
13
$im3 = $im->dummy(0,3);
 
14
 
 
15
# print "\$im3 has dims of @{[$im3->dims()]}\n";
 
16
 
 
17
imagrgb $im3;
 
18