blob: 730f81f07b01f2e1908b2b36cd02ddd4a736f5f8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
/*********************
This matrix transpose is in a seperate file because it should always be double precision.
*********************/
typedef double_t xdouble; // I use double_t so that global search and replace on double won't
// change this to float accidentally.
void dxpose(xdouble *indata, long iRsiz, xdouble *outdata, long oRsiz, long Nrows, long Ncols);
/* not in-place double precision matrix transpose */
/* INPUTS */
/* *indata = input data array */
/* iRsiz = offset to between rows of input data array */
/* oRsiz = offset to between rows of output data array */
/* Nrows = number of rows in input data array */
/* Ncols = number of columns in input data array */
/* OUTPUTS */
/* *outdata = output data array */
|