Hi,
I have recently done a clean install of openSUSE 10.3 on a computer,
including PDL. Everything was apparently installed smoothly and
without problems. However, I am experiencing a problem when running
the Transform and Cartography demos: no graphics windows are open and
errors are reported regarding "pgopen". This is strange because PGPLOT
was installed OK, and "demo pgplot" and "demo bad2" work just fine.
Does any one have a clue of what is going on?
Example of error: (Cartography, first part):
---- Code:
### Map data are stored natively in Plate Caree format.
### The image contains a FITS header that contains coordinate system info.
print "FITS HEADER INFORMATION:\n";
for $_(keys %{$map->hdr}){
next if(m/SIMPLE/ || m/HISTORY/ || m/COMMENT/);
printf (" %8s: %10s%s", $_, $map->hdr->{$_}, (++$i%3) ? " " : "\n");
}
print "\n";
$w = pgwin(Dev=>"/xw",size=>[8,6]);
$w->fits_imag($map, {Title=>"NASA/MODIS Earth Map (Plate Caree)",J=>0});
---- Output:
FITS HEADER INFORMATION:
NAXIS: 3
NAXIS1: 2048 CRPIX1: 1024.5 CRVAL1: 0
NAXIS2: 1024 CRPIX2: 512.5 CRVAL2: 0
NAXIS3: 3 CRPIX3: 1 CRVAL3: 0
CTYPE1: Longitude CUNIT1: degrees CDELT1: 0.17578125
CTYPE2: Latitude CUNIT2: degrees CDELT2: 0.17578125
CTYPE3: RGB CUNIT3: index CDELT3: 1
%PGPLOT, Unrecognized device type
%PGPLOT, Invalid device specification: /xw
---- (press enter)----
OOPS!!! Something went wrong, please make a bug report!: PDL: Opening
new window (pgopen) failed: -1
Caught at file /usr/bin/perldl, line 388, pkg main
at /usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/PDL/Core.pm line 2596
PDL::Core::barf('Opening new window (pgopen) failed: -1\x{a}')
called at
/usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/PDL/Graphics/PGPLOT/Window.pm
line 2425
PDL::Graphics::PGPLOT::Window::release_and_barf('Opening new
window (pgopen) failed: -1\x{a}') called at
/usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/PDL/Graphics/PGPLOT/Window.pm
line 2619
PDL::Graphics::PGPLOT::Window::_open_new_window('PDL::Graphics::PGPLOT::Window=HASH(0x8e96068)',
'HASH(0x8b5817c)') called at
/usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/PDL/Graphics/PGPLOT/Window.pm
line 2582
PDL::Graphics::PGPLOT::Window::new('PDL::Graphics::PGPLOT::Window',
'Dev', '/xw', 'size', 'ARRAY(0x8b57c60)') called at
/usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/PDL/Graphics/PGPLOT/Window.pm
line 2504
PDL::Graphics::PGPLOT::Window::pgwin('Dev', '/xw', 'size',
'ARRAY(0x8b57c60)') called at (eval 163) line 11
eval 'package PDL::Demos::Cartography_demo; use PDL;
### Map data are stored natively in Plate Caree format.
### The image contains a FITS header that contains coordinate system info.
print "FITS HEADER INFORMATION:\\n";
for $_(keys %{$map->hdr}){
next if(m/SIMPLE/ || m/HISTORY/ || m/COMMENT/);
printf (" %8s: %10s%s", $_, $map->hdr->{$_}, (++$i%3) ? " " : "\\n");
}
print "\\n";
$w = pgwin(Dev=>"/xw",size=>[8,6]);
$w->fits_imag($map, {Title=>"NASA/MODIS Earth Map (Plate Caree)",J=>0});
;' called at
/usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/PDL/Demos/Screen.pm
line 40
PDL::Demos::Routines::act('\x{a} ### Map data are stored
natively in Plate Caree format. \x{a} ...') called at
/usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/PDL/Demos/Cartography_demo.pm
line 70
PDL::Demos::Cartography_demo::run() called at /usr/bin/perldl line 388
main::demo('cartography') called at (eval 159) line 4
main::__ANON__() called at /usr/bin/perldl line 644
eval {...} called at /usr/bin/perldl line 644
main::eval_and_report('demo \'cartography\'') called at
/usr/bin/perldl line 583
main::process_input() called at /usr/bin/perldl line 603
eval {...} called at /usr/bin/perldl line 603
----
--
Hernán De Angelis
Linux user # 397217
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
