/usr/lib/perl5/PDL/Graphics/OpenGLQ.pm is in pdl 1:2.007-2build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 | #
# GENERATED WITH PDL::PP! Don't modify!
#
package PDL::Graphics::OpenGLQ;
@EXPORT_OK = qw( PDL::PP line_3x_3c PDL::PP gl_points PDL::PP gl_lines PDL::PP gl_line_strip PDL::PP gl_texts PDL::PP gl_triangles_mat PDL::PP gl_triangles_n_mat PDL::PP gl_triangles_wn_mat PDL::PP gl_triangles PDL::PP gl_triangles_n PDL::PP gl_triangles_wn PDL::PP gl_arrows );
%EXPORT_TAGS = (Func=>[@EXPORT_OK]);
use PDL::Core;
use PDL::Exporter;
use DynaLoader;
@ISA = ( 'PDL::Exporter','DynaLoader' );
push @PDL::Core::PP, __PACKAGE__;
bootstrap PDL::Graphics::OpenGLQ ;
=head1 NAME
PDL::Graphics::OpenGLQ - quick routines to plot lots of stuff from piddles.
=head1 SYNOPSIS
only for internal use - see source
=head1 DESCRIPTION
only for internal use - see source
=head1 AUTHOR
Copyright (C) 1997,1998 Tuomas J. Lukka.
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
*line_3x_3c = \&PDL::line_3x_3c;
*gl_points = \&PDL::gl_points;
*gl_lines = \&PDL::gl_lines;
*gl_line_strip = \&PDL::gl_line_strip;
*gl_texts = \&PDL::gl_texts;
*gl_triangles_mat = \&PDL::gl_triangles_mat;
*gl_triangles_n_mat = \&PDL::gl_triangles_n_mat;
*gl_triangles_wn_mat = \&PDL::gl_triangles_wn_mat;
*gl_triangles = \&PDL::gl_triangles;
*gl_triangles_n = \&PDL::gl_triangles_n;
*gl_triangles_wn = \&PDL::gl_triangles_wn;
*gl_arrows = \&PDL::gl_arrows;
;
# Exit with OK status
1;
|