Linear Algebra and the C Language/a035

__NOTOC__ Install and compile this file in your working directory. /* ------------------------------------ */ /* Save as : c00a.c */ /* ------------------------------------ */ #include "v_a.h" /* ------------------------------------ */ void fun(int r,int c) { double **A = r_mR(i_mR(r,c),9); double **B = r_mR(i_mR(r,c),9); double **AplsB = i_mR(r,c); clrscrn(); printf(" A : "); p_mR(A,S4,P0,C6); printf(" B : "); p_mR(B,S4,P0,C6); printf(" A + B : "); p_mR(add_mR(A,B,AplsB),S4,P0,C6); stop(); clrscrn(); printf(" Copy/Paste into the octave window.\n\n"); p_Octave_mR(A,"A", P0); p_Octave_mR(B,"B", P0); printf("A + B\n"); p_mR(AplsB,S4,P0,C6); f_mR(A); f_mR(B); f_mR(AplsB); } /* ------------------------------------ */ int main(void) { time_t t; srand(time(&t)); do fun(rp_I(R4),rp_I(C4)+C2); while(stop_w()); return 0; } /* ------------------------------------ */ /* ------------------------------------ */ Screen output example: A : +7 +1 +2 -7 -2 +4 +6 -7 +8 -3 +4 +2 B : -6 +3 +9 +3 -6 -3 +4 -5 +7 +5 +2 -8 A + B : +1 +4 +11 -4 -8 +1 +10 -12 +15 +2 +6 -6 Press return to continue. Copy/Paste into the octave window. A=[ +7,+1,+2; -7,-2,+4; +6,-7,+8; -3,+4,+2] B=[ -6,+3,+9; +3,-6,-3; +4,-5,+7; +5,+2,-8] A + B +1 +4 +11 -4 -8 +1 +10 -12 +15 +2 +6 -6 Press return to continue Press X return to stop