Wrapper for Clustal Omega.

[jabaws.git] / binaries / src / clustalo / src / squid / vectorops.h

diff --git a/binaries/src/clustalo/src/squid/vectorops.h b/binaries/src/clustalo/src/squid/vectorops.h
new file mode 100644 (file)
index 0000000..3068bd2
--- /dev/null
+++ b/binaries/src/clustalo/src/squid/vectorops.h
@@ -0,0 +1,36 @@
+/* vectorops.h
+ * Header file for vectorops.c
+ * 
+ * SRE, Tue Oct  1 15:23:37 2002 [St. Louis]
+ * CVS $Id: vectorops.h,v 1.1 2002/10/09 14:26:09 eddy Exp)
+ */
+
+extern void   DSet(double *vec, int n, double value);
+extern void   FSet(float *vec, int n, float value);
+extern void   DScale(double *vec, int n, double scale);
+extern void   FScale(float *vec, int n, float scale);
+extern double DSum(double *vec, int n);
+extern float  FSum(float *vec, int n);
+extern void   DAdd(double *vec1, double *vec2, int n);
+extern void   FAdd(float *vec1, float *vec2, int n);
+extern void   DCopy(double *vec1, double *vec2, int n);
+extern void   FCopy(float *vec1, float *vec2, int n);
+extern double DDot(double *vec1, double *vec2, int n);
+extern float  FDot(float *vec1, float *vec2, int n);
+extern double DMax(double *vec, int n);
+extern float  FMax(float *vec, int n);
+extern double DMin(double *vec, int n);
+extern float  FMin(float *vec, int n);
+extern double DArgMax(double *vec, int n);
+extern float  FArgMax(float *vec, int n);
+extern double DArgMin(double *vec, int n);
+extern float  FArgMin(float *vec, int n);
+extern void   DNorm(double *vec, int n);
+extern void   FNorm(float *vec, int n);
+extern void   DLog(double *vec, int n);
+extern void   FLog(float *vec, int n);
+extern void   DExp(double *vec, int n);
+extern void   FExp(float *vec, int n);
+extern float  DLogSum(double *vec, int n);
+extern float  FLogSum(float *vec, int n);
+