/usr/share/doc/libplplot11/examples/d/x02d.d is in libplplot-dev 5.9.9-2ubuntu2.
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 135 136 137 138 139 | // $Id: x02d.d 11684 2011-03-31 04:15:32Z airwin $
//
// Multiple window and color map 0 demo.
//
import std.string;
import plplot;
//--------------------------------------------------------------------------
// main
//
// Demonstrates multiple windows and color map 0 palette, both default and
// user-modified.
//--------------------------------------------------------------------------
int main( char[][] args )
{
// Parse and process command line arguments
plparseopts( args, PL_PARSE_FULL );
// Initialize plplot
plinit();
// Run demos
plot myPlot = new plot;
myPlot.demo1();
myPlot.demo2();
plend();
return 0;
}
class plot {
//--------------------------------------------------------------------------
// demo1
// Demonstrates multiple windows and default color map 0 palette.
//--------------------------------------------------------------------------
public void demo1()
{
plbop();
// Divide screen into 16 regions
plssub( 4, 4 );
draw_windows( 16, 0 );
pleop();
}
//--------------------------------------------------------------------------
// demo2
// Demonstrates multiple windows, user-modified color map 0 palette, and
// HLS -> RGB translation.
//--------------------------------------------------------------------------
public void demo2()
{
// Set up cmap0
// Use 100 custom colors in addition to base 16
PLINT[116] r, g, b;
// Min & max lightness values
PLFLT lmin = 0.15, lmax = 0.85;
plbop();
// Divide screen into 100 regions
plssub( 10, 10 );
for ( int i = 0; i < 100; i++ )
{
// Bounds on HLS, from plhlsrgb() commentary --
// hue [0., 360.] degrees
// lightness [0., 1.] magnitude
// saturation [0., 1.] magnitude
//
// Vary hue uniformly from left to right
PLFLT h = ( 360. / 10. ) * ( i % 10 );
// Vary lightness uniformly from top to bottom, between min & max
PLFLT l = lmin + ( lmax - lmin ) * ( i / 10 ) / 9.0;
// Use max saturation
PLFLT s = 1.0;
PLFLT r1, g1, b1;
plhlsrgb( h, l, s, &r1, &g1, &b1 );
// Use 255.001 to avoid close truncation decisions in this example.
r[i + 16] = cast(PLINT) ( r1 * 255.001 );
g[i + 16] = cast(PLINT) ( g1 * 255.001 );
b[i + 16] = cast(PLINT) ( b1 * 255.001 );
}
// Load default cmap0 colors into our custom set
for ( int i = 0; i < 16; i++ )
plgcol0( i, &r[i], &g[i], &b[i] );
// Now set cmap0 all at once (faster, since fewer driver calls)
plscmap0( r, g, b );
draw_windows( 100, 16 );
pleop();
}
//--------------------------------------------------------------------------
// draw_windows
//
// Draws a set of numbered boxes with colors according to cmap0 entry.
//--------------------------------------------------------------------------
private void draw_windows( int nw, int cmap0_offset )
{
plschr( 0.0, 3.5 );
plfont( 4 );
for ( int i = 0; i < nw; i++ )
{
plcol0( i + cmap0_offset );
pladv( 0 );
PLFLT vmin = 0.1;
PLFLT vmax = 0.9;
for ( int j = 0; j < 3; j++ )
{
plwid( j + 1 );
plvpor( vmin, vmax, vmin, vmax );
plwind( 0.0, 1.0, 0.0, 1.0 );
plbox( "bc", 0.0, 0, "bc", 0.0, 0 );
vmin = vmin + 0.1;
vmax = vmax - 0.1;
}
plwid( 1 );
plptex( 0.5, 0.5, 1.0, 0.0, 0.5, std.string.toString( i ) );
}
}
}
|