Linear Algebra and the C Language/a0h0

__NOTOC__ Install and compile this file in your working directory. /* ------------------------------------ */ /* Save as : c00a.c */ /* ------------------------------------ */ #include "v_a.h" /* ------------------------------------ */ /* ------------------------------------ */ double **X_rsymmetric_mR( double **A, int n) { int r; int c; double x; isquare_mR(A,"rsymmetric_mR();","(A)"); for ( r=R1; r<A[R_SIZE][C0]; r++) for ( c=C1; c<A[C_SIZE][C0]; c++) { x = r_I (n); A[r][c] = x; A[c][r] = x; } return(A); } /* ------------------------------------ */ /* ------------------------------------ */ void fun(int rc) { double **A = rsymmetric_mR(i_mR(rc,rc),9); clrscrn(); printf(" A : "); p_mR(A, S4,P0,C6); f_mR(A); } /* ------------------------------------ */ int main(void) { time_t t; srand(time(&t)); do fun(rp_I(RC3)+RC1); while(stop_w()); return 0; } /* ------------------------------------ */ /* ------------------------------------ */ Screen output example: A : +7 -4 +9 -9 -4 +5 -3 +1 +9 -3 -9 -3 -9 +1 -3 -1 Press return to continue Press X return to stop