summaryrefslogtreecommitdiffstats
path: root/media/pocketsphinx/src/vector.c
diff options
context:
space:
mode:
authorMatt A. Tobin <mattatobin@localhost.localdomain>2018-02-02 04:16:08 -0500
committerMatt A. Tobin <mattatobin@localhost.localdomain>2018-02-02 04:16:08 -0500
commit5f8de423f190bbb79a62f804151bc24824fa32d8 (patch)
tree10027f336435511475e392454359edea8e25895d /media/pocketsphinx/src/vector.c
parent49ee0794b5d912db1f95dce6eb52d781dc210db5 (diff)
downloadUXP-5f8de423f190bbb79a62f804151bc24824fa32d8.tar
UXP-5f8de423f190bbb79a62f804151bc24824fa32d8.tar.gz
UXP-5f8de423f190bbb79a62f804151bc24824fa32d8.tar.lz
UXP-5f8de423f190bbb79a62f804151bc24824fa32d8.tar.xz
UXP-5f8de423f190bbb79a62f804151bc24824fa32d8.zip
Add m-esr52 at 52.6.0
Diffstat (limited to 'media/pocketsphinx/src/vector.c')
-rw-r--r--media/pocketsphinx/src/vector.c150
1 files changed, 150 insertions, 0 deletions
diff --git a/media/pocketsphinx/src/vector.c b/media/pocketsphinx/src/vector.c
new file mode 100644
index 000000000..edb869966
--- /dev/null
+++ b/media/pocketsphinx/src/vector.c
@@ -0,0 +1,150 @@
+/* -*- c-basic-offset: 4; indent-tabs-mode: nil -*- */
+/* ====================================================================
+ * Copyright (c) 1999-2004 Carnegie Mellon University. All rights
+ * reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright
+ * notice, this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright
+ * notice, this list of conditions and the following disclaimer in
+ * the documentation and/or other materials provided with the
+ * distribution.
+ *
+ * This work was supported in part by funding from the Defense Advanced
+ * Research Projects Agency and the National Science Foundation of the
+ * United States of America, and the CMU Sphinx Speech Consortium.
+ *
+ * THIS SOFTWARE IS PROVIDED BY CARNEGIE MELLON UNIVERSITY ``AS IS'' AND
+ * ANY EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
+ * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY
+ * NOR ITS EMPLOYEES BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+ * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+ * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+ * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ *
+ * ====================================================================
+ *
+ */
+
+/*
+ * vector.c
+ *
+ * **********************************************
+ * CMU ARPA Speech Project
+ *
+ * Copyright (c) 1997 Carnegie Mellon University.
+ * ALL RIGHTS RESERVED.
+ * **********************************************
+ *
+ * HISTORY
+ *
+ * 22-Nov-2004 M K Ravishankar (rkm@cs.cmu.edu) at Carnegie Mellon University
+ * Imported from s3.2, for supporting s3 format continuous
+ * acoustic models.
+ *
+ * 10-Mar-1999 M K Ravishankar (rkm@cs.cmu.edu) at Carnegie Mellon University.
+ * Added vector_accum(), vector_vqlabel(), and vector_vqgen().
+ *
+ * 09-Mar-1999 M K Ravishankar (rkm@cs.cmu.edu) at Carnegie Mellon University.
+ * Added vector_is_zero(), vector_cmp(), and vector_dist_eucl().
+ * Changed the name vector_dist_eval to vector_dist_maha.
+ *
+ * 07-Oct-98 M K Ravishankar (rkm@cs.cmu.edu) at Carnegie Mellon University.
+ * Added distance computation related functions.
+ *
+ * 12-Nov-95 M K Ravishankar (rkm@cs.cmu.edu) at Carnegie Mellon University.
+ * Copied from Eric Thayer.
+ */
+
+/* System headers. */
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <assert.h>
+#include <math.h>
+
+/* SphinxBase headers. */
+#include <sphinxbase/err.h>
+#include <sphinxbase/ckd_alloc.h>
+#include <sphinxbase/bitvec.h>
+
+/* Local headers. */
+#include "vector.h"
+
+#if defined(_WIN32)
+#define srandom srand
+#define random rand
+#endif
+
+
+float64
+vector_sum_norm(float32 * vec, int32 len)
+{
+ float64 sum, f;
+ int32 i;
+
+ sum = 0.0;
+ for (i = 0; i < len; i++)
+ sum += vec[i];
+
+ if (sum != 0.0) {
+ f = 1.0 / sum;
+ for (i = 0; i < len; i++)
+ vec[i] *= f;
+ }
+
+ return sum;
+}
+
+
+void
+vector_floor(float32 * vec, int32 len, float64 flr)
+{
+ int32 i;
+
+ for (i = 0; i < len; i++)
+ if (vec[i] < flr)
+ vec[i] = (float32) flr;
+}
+
+
+void
+vector_nz_floor(float32 * vec, int32 len, float64 flr)
+{
+ int32 i;
+
+ for (i = 0; i < len; i++)
+ if ((vec[i] != 0.0) && (vec[i] < flr))
+ vec[i] = (float32) flr;
+}
+
+
+void
+vector_print(FILE * fp, vector_t v, int32 dim)
+{
+ int32 i;
+
+ for (i = 0; i < dim; i++)
+ fprintf(fp, " %11.4e", v[i]);
+ fprintf(fp, "\n");
+ fflush(fp);
+}
+
+
+int32
+vector_is_zero(float32 * vec, int32 len)
+{
+ int32 i;
+
+ for (i = 0; (i < len) && (vec[i] == 0.0); i++);
+ return (i == len); /* TRUE iff all mean values are 0.0 */
+}