ttranspose.c - numtools - perform numerical operations on vectors and matrices in unix pipes
 (HTM) git clone git://src.adamsgaard.dk/numtools
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) 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 }