Screenshot instructions:
Windows
Mac
Red Hat Linux
Ubuntu
Click URL instructions:
Right-click on ad, choose "Copy Link", then paste here →
(This may not be possible with some types of ads)
You can subscribe to this list here.
2000 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(33) |
Jun
|
Jul
(30) |
Aug
(2) |
Sep
|
Oct
(30) |
Nov
(136) |
Dec
(59) |
---|---|---|---|---|---|---|---|---|---|---|---|---|
2001 |
Jan
(255) |
Feb
(169) |
Mar
(322) |
Apr
(185) |
May
(33) |
Jun
(89) |
Jul
(47) |
Aug
(59) |
Sep
(40) |
Oct
(31) |
Nov
(74) |
Dec
(84) |
2002 |
Jan
(163) |
Feb
(78) |
Mar
(23) |
Apr
(5) |
May
(22) |
Jun
(75) |
Jul
(143) |
Aug
(48) |
Sep
(111) |
Oct
(58) |
Nov
(124) |
Dec
(278) |
2003 |
Jan
(106) |
Feb
(276) |
Mar
(354) |
Apr
(97) |
May
(14) |
Jun
(3) |
Jul
(7) |
Aug
(21) |
Sep
(83) |
Oct
(110) |
Nov
(3) |
Dec
(119) |
2004 |
Jan
(318) |
Feb
(409) |
Mar
(68) |
Apr
(23) |
May
(105) |
Jun
(147) |
Jul
(69) |
Aug
(53) |
Sep
(23) |
Oct
(14) |
Nov
(15) |
Dec
(63) |
2005 |
Jan
(146) |
Feb
(69) |
Mar
(157) |
Apr
(127) |
May
(166) |
Jun
(8) |
Jul
(5) |
Aug
(3) |
Sep
(8) |
Oct
(17) |
Nov
(29) |
Dec
(34) |
2006 |
Jan
(3) |
Feb
(4) |
Mar
(1) |
Apr
(70) |
May
(241) |
Jun
(82) |
Jul
(344) |
Aug
(196) |
Sep
(87) |
Oct
(57) |
Nov
(121) |
Dec
(86) |
2007 |
Jan
(60) |
Feb
(67) |
Mar
(102) |
Apr
(28) |
May
(13) |
Jun
(29) |
Jul
(38) |
Aug
(56) |
Sep
(91) |
Oct
(89) |
Nov
(50) |
Dec
(68) |
2008 |
Jan
(87) |
Feb
(47) |
Mar
(100) |
Apr
(34) |
May
(65) |
Jun
(54) |
Jul
(98) |
Aug
(128) |
Sep
(109) |
Oct
(141) |
Nov
(40) |
Dec
(206) |
2009 |
Jan
(176) |
Feb
(226) |
Mar
(134) |
Apr
(84) |
May
(152) |
Jun
(85) |
Jul
(91) |
Aug
(153) |
Sep
(141) |
Oct
(59) |
Nov
(87) |
Dec
(75) |
2010 |
Jan
(58) |
Feb
(41) |
Mar
(51) |
Apr
(74) |
May
(81) |
Jun
(39) |
Jul
(30) |
Aug
(43) |
Sep
(76) |
Oct
(59) |
Nov
(62) |
Dec
(52) |
2011 |
Jan
(125) |
Feb
(41) |
Mar
(96) |
Apr
(53) |
May
(21) |
Jun
(23) |
Jul
(48) |
Aug
(71) |
Sep
(37) |
Oct
(81) |
Nov
(60) |
Dec
(32) |
2012 |
Jan
(51) |
Feb
(23) |
Mar
|
Apr
(8) |
May
(2) |
Jun
|
Jul
(8) |
Aug
(25) |
Sep
(4) |
Oct
(32) |
Nov
(17) |
Dec
(2) |
2013 |
Jan
(8) |
Feb
(2) |
Mar
(9) |
Apr
(9) |
May
(37) |
Jun
(48) |
Jul
(63) |
Aug
(42) |
Sep
(59) |
Oct
(83) |
Nov
(141) |
Dec
(133) |
2014 |
Jan
(57) |
Feb
(58) |
Mar
(58) |
Apr
(25) |
May
(14) |
Jun
(3) |
Jul
(6) |
Aug
(1) |
Sep
|
Oct
|
Nov
|
Dec
|
S | M | T | W | T | F | S |
---|---|---|---|---|---|---|
1
(1) |
2
(1) |
3
(10) |
4
(5) |
5
|
6
(3) |
7
(1) |
8
|
9
(2) |
10
(3) |
11
(1) |
12
(1) |
13
(2) |
14
|
15
|
16
(3) |
17
|
18
|
19
|
20
(2) |
21
|
22
|
23
|
24
(1) |
25
(5) |
26
|
27
(12) |
28
(1) |
29
|
30
|
|
|
|
|
|
From: <jbauck@us...> - 2008-06-11 03:01:31
|
Revision: 8474 http://plplot.svn.sourceforge.net/plplot/?rev=8474&view=rev Author: jbauck Date: 2008-06-10 20:01:39 -0700 (Tue, 10 Jun 2008) Log Message: ----------- Add Ada examples x25a.adb and xthick25a.adb. Modified Paths: -------------- trunk/examples/ada/CMakeLists.txt trunk/examples/ada/Makefile.examples.in trunk/plplot_test/test_ada.sh.in Added Paths: ----------- trunk/examples/ada/x25a.adb.cmake trunk/examples/ada/xthick25a.adb.cmake Modified: trunk/examples/ada/CMakeLists.txt =================================================================== --- trunk/examples/ada/CMakeLists.txt 2008-06-10 17:43:37 UTC (rev 8473) +++ trunk/examples/ada/CMakeLists.txt 2008-06-11 03:01:39 UTC (rev 8474) @@ -40,6 +40,7 @@ "22" "23" "24" +"25" "thick01" "thick02" "thick03" @@ -61,6 +62,7 @@ "thick22" "thick23" "thick24" +"thick25" ) if(BUILD_TEST) Modified: trunk/examples/ada/Makefile.examples.in =================================================================== --- trunk/examples/ada/Makefile.examples.in 2008-06-10 17:43:37 UTC (rev 8473) +++ trunk/examples/ada/Makefile.examples.in 2008-06-11 03:01:39 UTC (rev 8474) @@ -51,6 +51,7 @@ x22a$(EXEEXT) \ x23a$(EXEEXT) \ x24a$(EXEEXT) \ + x25a$(EXEEXT) \ xthick01a$(EXEEXT) \ xthick02a$(EXEEXT) \ xthick03a$(EXEEXT) \ @@ -71,7 +72,8 @@ xthick21a$(EXEEXT) \ xthick22a$(EXEEXT) \ xthick23a$(EXEEXT) \ - xthick24a$(EXEEXT) + xthick24a$(EXEEXT) \ + xthick25a$(EXEEXT) all: $(EXECUTABLES_list) Added: trunk/examples/ada/x25a.adb.cmake =================================================================== --- trunk/examples/ada/x25a.adb.cmake (rev 0) +++ trunk/examples/ada/x25a.adb.cmake 2008-06-11 03:01:39 UTC (rev 8474) @@ -0,0 +1,130 @@ +-- $Id$ + +-- Filling and clipping polygons. + +-- Copyright (C) 2008 Jerry Bauck + +-- This file is part of PLplot. + +-- PLplot is free software; you can redistribute it and/or modify +-- it under the terms of the GNU General Library Public License as published +-- by the Free Software Foundation; either version 2 of the License, or +-- (at your option) any later version. + +-- PLplot is distributed in the hope that it will be useful, +-- but WITHOUT ANY WARRANTY; without even the implied warranty of +-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +-- GNU Library General Public License for more details. + +-- You should have received a copy of the GNU Library General Public License +-- along with PLplot; if not, write to the Free Software +-- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA + +with + PLplot_Traditional, + PLplot_Auxiliary; +use + PLplot_Traditional, + PLplot_Auxiliary; + +-- COMMENT THIS LINE IF YOUR COMPILER DOES NOT INCLUDE THESE +-- DEFINITIONS, FOR EXAMPLE, IF IT IS NOT ADA 2005 WITH ANNEX G.3 COMPLIANCE. +--with Ada.Numerics.Long_Real_Arrays; use Ada.Numerics.Long_Real_Arrays; +@Ada_Is_2007_With_and_Use_Numerics@ + +-- Test program for filling polygons and proper clipping +procedure x25a is + npts : Integer := 0; + xextreme, yextreme : Real_Matrix(0 .. 8, 0 .. 1); + x0, y0 : Real_Vector(0 .. 9); +begin + -- Parse and process command line arguments + plparseopts(PL_PARSE_FULL); + + -- Initialize plplot + plssub(3,3); + plinit; + + xextreme(0, 0) := -120.0; xextreme(0, 1) := 120.0; yextreme(0, 0) := -120.0; yextreme(0, 1) := 120.0; + xextreme(1, 0) := -120.0; xextreme(1, 1) := 120.0; yextreme(1, 0) := 20.0; yextreme(1, 1) := 120.0; + xextreme(2, 0) := -120.0; xextreme(2, 1) := 120.0; yextreme(2, 0) := -20.0; yextreme(2, 1) := 120.0; + xextreme(3, 0) := -80.0; xextreme(3, 1) := 80.0; yextreme(3, 0) := -20.0; yextreme(3, 1) := 120.0; + xextreme(4, 0) := -220.0; xextreme(4, 1) := -120.0; yextreme(4, 0) := -120.0; yextreme(4, 1) := 120.0; + xextreme(5, 0) := -20.0; xextreme(5, 1) := 20.0; yextreme(5, 0) := -120.0; yextreme(5, 1) := 120.0; + xextreme(6, 0) := -20.0; xextreme(6, 1) := 20.0; yextreme(6, 0) := -20.0; yextreme(6, 1) := 20.0; + xextreme(7, 0) := -80.0; xextreme(7, 1) := 80.0; yextreme(7, 0) := -80.0; yextreme(7, 1) := 80.0; + xextreme(8, 0) := 20.0; xextreme(8, 1) := 120.0; yextreme(8, 0) := -120.0; yextreme(8, 1) := 120.0; + + for j in 0 .. 3 loop + if j = 0 then + -- Polygon 1: a diamond + x0(0) := 0.0; y0(0) := -100.0; + x0(1) := -100.0; y0(1) := 0.0; + x0(2) := 0.0; y0(2) := 100.0; + x0(3) := 100.0; y0(3) := 0.0; + npts := 4; + end if; + if j = 1 then + -- Polygon 1: a diamond - reverse direction + x0(3) := 0.0; y0(3) := -100.0; + x0(2) := -100.0; y0(2) := 0.0; + x0(1) := 0.0; y0(1) := 100.0; + x0(0) := 100.0; y0(0) := 0.0; + npts := 4; + end if; + if j = 2 then + -- Polygon 2: a square with punctures + x0(0) := -100.0; y0(0) := -100.0; + x0(1) := -100.0; y0(1) := -80.0; + x0(2) := 80.0; y0(2) := 0.0; + x0(3) := -100.0; y0(3) := 80.0; + x0(4) := -100.0; y0(4) := 100.0; + x0(5) := -80.0; y0(5) := 100.0; + x0(6) := 0.0; y0(6) := 80.0; + x0(7) := 80.0; y0(7) := 100.0; + x0(8) := 100.0; y0(8) := 100.0; + x0(9) := 100.0; y0(9) := -100.0; + npts := 10; + end if; + if j = 3 then + -- Polygon 2: a square with punctures - reversed direction + x0(9) := -100.0; y0(9) := -100.0; + x0(8) := -100.0; y0(8) := -80.0; + x0(7) := 80.0; y0(7) := 0.0; + x0(6) := -100.0; y0(6) := 80.0; + x0(5) := -100.0; y0(5) := 100.0; + x0(4) := -80.0; y0(4) := 100.0; + x0(3) := 0.0; y0(3) := 80.0; + x0(2) := 80.0; y0(2) := 100.0; + x0(1) := 100.0; y0(1) := 100.0; + x0(0) := 100.0; y0(0) := -100.0; + npts := 10; + end if; + + for i in xextreme'range(1) loop + pladv(0); + plvsta; + plwind(xextreme(i, 0), xextreme(i, 1), yextreme(i, 0), yextreme(i, 1)); + + declare + x0_Stop_Sucking, y0_Stop_Sucking : Real_Vector(0 .. npts - 1); + begin + x0_Stop_Sucking := x0(0 .. npts - 1); + y0_Stop_Sucking := y0(0 .. npts - 1); + + plcol0(2); + plbox("bc", 1.0, 0, "bcnv", 10.0, 0); + plcol0(1); + plpsty(0); + plfill(x0_Stop_Sucking, y0_Stop_Sucking); + plcol0(2); + pllsty(1); + plline(x0_Stop_Sucking, y0_Stop_Sucking); + end; + end loop; + + end loop; + + -- Don't forget to call plend to finish off! + plend; +end x25a; Property changes on: trunk/examples/ada/x25a.adb.cmake ___________________________________________________________________ Name: svn:keywords + Author Date Id Revision Name: svn:eol-style + native Added: trunk/examples/ada/xthick25a.adb.cmake =================================================================== --- trunk/examples/ada/xthick25a.adb.cmake (rev 0) +++ trunk/examples/ada/xthick25a.adb.cmake 2008-06-11 03:01:39 UTC (rev 8474) @@ -0,0 +1,130 @@ +-- $Id$ + +-- Filling and clipping polygons. + +-- Copyright (C) 2008 Jerry Bauck + +-- This file is part of PLplot. + +-- PLplot is free software; you can redistribute it and/or modify +-- it under the terms of the GNU General Library Public License as published +-- by the Free Software Foundation; either version 2 of the License, or +-- (at your option) any later version. + +-- PLplot is distributed in the hope that it will be useful, +-- but WITHOUT ANY WARRANTY; without even the implied warranty of +-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +-- GNU Library General Public License for more details. + +-- You should have received a copy of the GNU Library General Public License +-- along with PLplot; if not, write to the Free Software +-- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA + +with + PLplot, + PLplot_Auxiliary; +use + PLplot, + PLplot_Auxiliary; + +-- COMMENT THIS LINE IF YOUR COMPILER DOES NOT INCLUDE THESE +-- DEFINITIONS, FOR EXAMPLE, IF IT IS NOT ADA 2005 WITH ANNEX G.3 COMPLIANCE. +--with Ada.Numerics.Long_Real_Arrays; use Ada.Numerics.Long_Real_Arrays; +@Ada_Is_2007_With_and_Use_Numerics@ + +-- Test program for filling polygons and proper clipping +procedure xthick25a is + npts : Integer := 0; + xextreme, yextreme : Real_Matrix(0 .. 8, 0 .. 1); + x0, y0 : Real_Vector(0 .. 9); +begin + -- Parse and process command line arguments + Parse_Command_Line_Arguments(Parse_Full); + + -- Initialize plplot + Set_Number_Of_Subpages(3,3); + Initialize_PLplot; + + xextreme(0, 0) := -120.0; xextreme(0, 1) := 120.0; yextreme(0, 0) := -120.0; yextreme(0, 1) := 120.0; + xextreme(1, 0) := -120.0; xextreme(1, 1) := 120.0; yextreme(1, 0) := 20.0; yextreme(1, 1) := 120.0; + xextreme(2, 0) := -120.0; xextreme(2, 1) := 120.0; yextreme(2, 0) := -20.0; yextreme(2, 1) := 120.0; + xextreme(3, 0) := -80.0; xextreme(3, 1) := 80.0; yextreme(3, 0) := -20.0; yextreme(3, 1) := 120.0; + xextreme(4, 0) := -220.0; xextreme(4, 1) := -120.0; yextreme(4, 0) := -120.0; yextreme(4, 1) := 120.0; + xextreme(5, 0) := -20.0; xextreme(5, 1) := 20.0; yextreme(5, 0) := -120.0; yextreme(5, 1) := 120.0; + xextreme(6, 0) := -20.0; xextreme(6, 1) := 20.0; yextreme(6, 0) := -20.0; yextreme(6, 1) := 20.0; + xextreme(7, 0) := -80.0; xextreme(7, 1) := 80.0; yextreme(7, 0) := -80.0; yextreme(7, 1) := 80.0; + xextreme(8, 0) := 20.0; xextreme(8, 1) := 120.0; yextreme(8, 0) := -120.0; yextreme(8, 1) := 120.0; + + for j in 0 .. 3 loop + if j = 0 then + -- Polygon 1: a diamond + x0(0) := 0.0; y0(0) := -100.0; + x0(1) := -100.0; y0(1) := 0.0; + x0(2) := 0.0; y0(2) := 100.0; + x0(3) := 100.0; y0(3) := 0.0; + npts := 4; + end if; + if j = 1 then + -- Polygon 1: a diamond - reverse direction + x0(3) := 0.0; y0(3) := -100.0; + x0(2) := -100.0; y0(2) := 0.0; + x0(1) := 0.0; y0(1) := 100.0; + x0(0) := 100.0; y0(0) := 0.0; + npts := 4; + end if; + if j = 2 then + -- Polygon 2: a square with punctures + x0(0) := -100.0; y0(0) := -100.0; + x0(1) := -100.0; y0(1) := -80.0; + x0(2) := 80.0; y0(2) := 0.0; + x0(3) := -100.0; y0(3) := 80.0; + x0(4) := -100.0; y0(4) := 100.0; + x0(5) := -80.0; y0(5) := 100.0; + x0(6) := 0.0; y0(6) := 80.0; + x0(7) := 80.0; y0(7) := 100.0; + x0(8) := 100.0; y0(8) := 100.0; + x0(9) := 100.0; y0(9) := -100.0; + npts := 10; + end if; + if j = 3 then + -- Polygon 2: a square with punctures - reversed direction + x0(9) := -100.0; y0(9) := -100.0; + x0(8) := -100.0; y0(8) := -80.0; + x0(7) := 80.0; y0(7) := 0.0; + x0(6) := -100.0; y0(6) := 80.0; + x0(5) := -100.0; y0(5) := 100.0; + x0(4) := -80.0; y0(4) := 100.0; + x0(3) := 0.0; y0(3) := 80.0; + x0(2) := 80.0; y0(2) := 100.0; + x0(1) := 100.0; y0(1) := 100.0; + x0(0) := 100.0; y0(0) := -100.0; + npts := 10; + end if; + + for i in xextreme'range(1) loop + Advance_To_Subpage(Next_Subpage); + Set_Viewport_Standard; + Set_Viewport_World(xextreme(i, 0), xextreme(i, 1), yextreme(i, 0), yextreme(i, 1)); + + declare + x0_Stop_Sucking, y0_Stop_Sucking : Real_Vector(0 .. npts - 1); + begin + x0_Stop_Sucking := x0(0 .. npts - 1); + y0_Stop_Sucking := y0(0 .. npts - 1); + + Set_Pen_Color(Yellow); + Box_Around_Viewport("bc", 1.0, 0, "bcnv", 10.0, 0); + Set_Pen_Color(Red); + Select_Fill_Pattern(0); + Fill_Polygon(x0_Stop_Sucking, y0_Stop_Sucking); + Set_Pen_Color(Yellow); + Select_Line_Style(1); + Draw_Curve(x0_Stop_Sucking, y0_Stop_Sucking); + end; + end loop; + + end loop; + + -- Don't forget to call End_PLplot to finish off! + End_PLplot; +end xthick25a; Property changes on: trunk/examples/ada/xthick25a.adb.cmake ___________________________________________________________________ Name: svn:keywords + Author Date Id Revision Name: svn:eol-style + native Modified: trunk/plplot_test/test_ada.sh.in =================================================================== --- trunk/plplot_test/test_ada.sh.in 2008-06-10 17:43:37 UTC (rev 8473) +++ trunk/plplot_test/test_ada.sh.in 2008-06-11 03:01:39 UTC (rev 8474) @@ -27,7 +27,7 @@ # pushd $adadir; make; popd # Do the standard non-interactive examples. -for index in 01 02 03 04 05 06 07 08 09 10 11 12 13 15 16 18 19 21 22 23 24 thick01 thick02 thick03 thick04 thick05 thick06 thick07 thick08 thick09 thick10 thick11 thick12 thick13 thick15 thick16 thick18 thick19 thick21 thick22 thick23 thick24; do +for index in 01 02 03 04 05 06 07 08 09 10 11 12 13 15 16 18 19 21 22 23 24 25 thick01 thick02 thick03 thick04 thick05 thick06 thick07 thick08 thick09 thick10 thick11 thick12 thick13 thick15 thick16 thick18 thick19 thick21 thick22 thick23 thick24 thick25; do $adadir/x${index}a -dev $device -o ${OUTPUT_DIR}/x${index}a.$dsuffix $options 2> test.error status_code=$? cat test.error This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |