trick/trick_source/trick_utils/math/src/vec_print.c

/*
   PURPOSE: (Vector print)
   REFERENCE: ((See also: source file name))
   PROGRAMMERS: (((Les Quiocho) (NASA/JSC) (Jan 1990) (v1.0) (Init Release)))
 */

#include <stdio.h>
#include "trick/trick_math.h"


void vec_print(double *vec,     /* In: Matrix to be printed */
               int n)
{                                      /* In: Array size */
    int i;

    for (i = 0; i < n; i++) {
        fprintf(stderr, " %16.12f ", vec[i]);
        fprintf(stderr, "\n");
    }

    return;
}
Cleaning up once include variables and copyright cleanup. Changed all header file once include variables to follow the same naming convention and not start with any underscores. Also deleted old incorrect copyright notices. Also removed $Id: tags from all files. Fixes #14. Fixes #22. 2015-03-23 21:03:14 +00:00			`/*`
			`PURPOSE: (Vector print)`
			`REFERENCE: ((See also: source file name))`
			`PROGRAMMERS: (((Les Quiocho) (NASA/JSC) (Jan 1990) (v1.0) (Init Release)))`
Initial commit of everything. 2015-02-26 15:02:31 +00:00			`*/`

			`#include <stdio.h>`
Standardize directory names Reorganized. Created a new top level include directory that will hold all of Trick's header files. Moved all of the Trick headers to this directory. Created a libexec directory that holds all of the executables that users don't need to execute directly. Changed all of the executables remaining in bin to start with "trick-". In the sim_services directories changed all source files to find the Trick headers in their new location. Since all of the include files are gone in sim_services, removed the src directories as well, moving all of the source files up a level. Moved the makefiles, docs, man, and other architecture independent files into a top level share directory. Renamed lib_${TRICK_HOST_CPU} to lib64 or lib depending on the platform we're currently on. refs #63 2015-06-01 15:28:29 +00:00			`#include "trick/trick_math.h"`
Initial commit of everything. 2015-02-26 15:02:31 +00:00

			`void vec_print(double vec, / In: Matrix to be printed */`
			`int n)`
			`{ /* In: Array size */`
			`int i;`

			`for (i = 0; i < n; i++) {`
			`fprintf(stderr, " %16.12f ", vec[i]);`
			`fprintf(stderr, "\n");`
			`}`

			`return;`
			`}`