WSTester updated to work plus hopefully all the other changes that need to go into...

[jabaws.git] / binaries / src / ViennaRNA / RNAforester / g2-0.70 / demo / simple_PS.c

diff --git a/binaries/src/ViennaRNA/RNAforester/g2-0.70/demo/simple_PS.c b/binaries/src/ViennaRNA/RNAforester/g2-0.70/demo/simple_PS.c
new file mode 100644 (file)
index 0000000..29af901
--- /dev/null
+++ b/binaries/src/ViennaRNA/RNAforester/g2-0.70/demo/simple_PS.c
@@ -0,0 +1,30 @@
+/*****************************************************************************
+**  Copyright (C) 1998-2001  Ljubomir Milanovic & Horst Wagner
+**  This file is part of the g2 library
+**
+**  This library is free software; you can redistribute it and/or
+**  modify it under the terms of the GNU Lesser General Public
+**  License as published by the Free Software Foundation; either
+**  version 2.1 of the License, or (at your option) any later version.
+**
+**  This library 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
+**  Lesser General Public License for more details.
+**
+**  You should have received a copy of the GNU Lesser General Public
+**  License along with this library; if not, write to the Free Software
+**  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+******************************************************************************/
+#include <g2.h>
+#include <g2_PS.h>
+
+int main()
+{
+    int d;
+    d=g2_open_PS("simple.ps", g2_A4, g2_PS_port);
+    g2_line(d, 10, 10, 90, 90);
+    g2_close(d);
+    return 0;
+}
+