GopherProxy

	ttranspose.c - numtools - perform numerical operations on vectors and matrices …
	git clone git://src.adamsgaard.dk/numtools
	Log
	Files
	Refs
	README
	LICENSE
	---
	ttranspose.c (473B)
	---
	1 #include <err.h>
	2 #include <stdio.h>
	3 #include <stdlib.h>
	4 #include <unistd.h>
	5
	6 #include "util.h"
	7
	8 int
	9 main(void)
	10 {
	11 size_t i, j, nf, nr;
	12 double **vals = NULL;
	13
	14 if (pledge("stdio", NULL) == -1)
	15 err(2, "pledge");
	16
	17 nr = fscanmatrix(stdin, &vals, &nf);
	18
	19 for (i = 0; i < nf; i++) {
	20 for (j = 0; j < nr; j++) {
	21 printf("%.17g", vals[j][i]);
	22 if (j < nr - 1)
	23 printf(DELIMSTR);
	24 }
	25 puts("");
	26 }
	27
	28 for (i = 0; i < nr; i++)
	29 free(vals[i]);
	30 free(vals);
	31
	32 return 0;
	33 }