pp_addpm({At=>Top},<<'EOD');

=head1 NAME

PDL::IO::Browser -- 2D data browser for PDL

=head1 DESCRIPTION

cursor terminal browser for piddles.

=head1 SYNOPSIS

 use PDL::IO::Browser;

=cut


EOD

use PDL::Types;

pp_def(
	'browse',
	Pars => 'a(n,m);',
	Code => "
	browse(\$TBSULQFD($PDL_B,$PDL_S,$PDL_US,$PDL_L,$PDL_LL,$PDL_F,$PDL_D),
                \$SIZE(n),\$SIZE(m),\$P(a));
	",
Doc=><<'EOD');
=head2 browse

=for ref

browse a 2D array using terminal cursor keys

=for usage

 browse $data

This uses the CURSES library to allow one to scroll
around a PDL array using the cursor keys.



=cut


EOD
pp_addpm({At=>Bot},<<'EOD');

=head1 AUTHOR

Copyright (C) Robin Williams 1997 (rjrw@ast.leeds.ac.uk).
All rights reserved. There is no warranty. You are allowed
to redistribute this software / documentation under certain
conditions. For details, see the file COPYING in the PDL
distribution. If this file is separated from the PDL distribution,
the copyright notice should be included in the file.


=cut


EOD

pp_done();