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

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

diff --git a/binaries/src/ViennaRNA/RNAforester/g2-0.70/src/g2_physical_device.c b/binaries/src/ViennaRNA/RNAforester/g2-0.70/src/g2_physical_device.c
new file mode 100644 (file)
index 0000000..8e49774
--- /dev/null
+++ b/binaries/src/ViennaRNA/RNAforester/g2-0.70/src/g2_physical_device.c
@@ -0,0 +1,78 @@
+/*****************************************************************************
+**  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 <stdlib.h>
+#include <stdio.h>
+#include "g2_physical_device.h"
+#include "g2_funix.h"
+#include "g2_util.h"
+
+
+g2_physical_device *g2_create_physical_device(int pid,
+                                             void *pdp,
+                                             g2_coor ct,
+                                             const g2_funix_fun *ff,
+                                             double a11, double a22,
+                                             double b1,  double b2)
+{
+    g2_physical_device *rd;
+    int i, j;
+
+    rd=g2_malloc(sizeof(g2_physical_device));
+
+    rd->pid=pid;             /* physical device id (handled by driver) */
+    rd->pdp=pdp;             /* pointer to something */
+    rd->coor_type=ct;        /* coord. type */
+    rd->a11=a11;             /* device->physical device transformation */
+    rd->a22=a22;
+    rd->b1=b1;
+    rd->b2=b2;
+
+    rd->x_origin=0.0;        /* User coordinates specification */
+    rd->y_origin=0.0;
+    rd->x_mul=1.0;
+    rd->y_mul=1.0;
+
+    rd->ff=g2_malloc(G2_N_FUNIX*sizeof(g2_funix_fun));
+
+    for(i=0;i<G2_N_FUNIX;i++) {
+       rd->ff[i].fx=i;
+       rd->ff[i].fun=NULL;
+       for(j=0;ff[j].fx!=g2_FUNIX_NULL;j++)
+           if(ff[j].fx==i) {
+               rd->ff[i].fun = ff[j].fun;
+               break;
+           }
+    }
+    
+    return rd;
+}
+
+
+/*
+ *
+ * Destroy physical device
+ *
+ */
+void g2_destroy_physical_device(g2_physical_device *pd)
+{
+    g2_free(pd->ff);
+    g2_free(pd);
+}
+
+