Changeset 80e83b6c for doc/theses/mike_brooks_MMath/programs

Timestamp:

Dec 21, 2025, 1:35:46 PM (2 days ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

4904b05

Parents:

eb0d9b7

Message:

last proofread array chapter

Location:

doc/theses/mike_brooks_MMath/programs/ar-bchk

Files:

• control.c (modified) (2 diffs)
• control.cc (modified) (2 diffs)
• control.cfa (modified) (1 diff)
• treatment.c (modified) (4 diffs)
• treatment.cc (modified) (4 diffs)
• treatment.cfa (modified) (1 diff)

doc/theses/mike_brooks_MMath/programs/ar-bchk/control.c

@@ -22 +22 @@
         size_t n, float x[] ) {
         double sum = 0;
-        for( size_t i = 0;
+        for ( size_t i = 0;
             i < BND( n ); i++ )
-        sum += x[i];
+        sum += @x[i]@;
         return sum;
 }
@@ -43 +43 @@
 int main() {
         float x[EXPSZ];
-        for( size_t i = 0; i < EXPSZ; i++ ) x[i] = 0.1 * (i + 1);
-        for( size_t i = 0; i < EXPSZ; i++ ) printf("elm %zd %g\n", i, x[i]);
+        for ( size_t i = 0; i < EXPSZ; i++ ) x[i] = 0.1 * (i + 1);
+        for ( size_t i = 0; i < EXPSZ; i++ ) printf("elm %zd %g\n", i, x[i]);
         double sum_ret = sum( EXPSZ, x );
         printf( "sum   %2g\n", sum_ret );

doc/theses/mike_brooks_MMath/programs/ar-bchk/control.cc

@@ -22 +22 @@
         vector<float> & x ) {
         double sum = 0;
-        for( size_t i = 0;
+        for ( size_t i = 0;
             i < BND( x.size() ); i++ )
-        sum += x.at(i);
+        sum += @x.at(i)@;
         return sum;
 }
@@ -43 +43 @@
 int main() {
         vector<float> x( EXPSZ );
-        for( size_t i = 0; i < EXPSZ; i++ ) x.at(i) = 0.1 * (i + 1);
-        for( size_t i = 0; i < EXPSZ; i++ ) cout << "elm " << i << " " <<  x[i] << endl;
+        for ( size_t i = 0; i < EXPSZ; i++ ) x.at(i) = 0.1 * (i + 1);
+        for ( size_t i = 0; i < EXPSZ; i++ ) cout << "elm " << i << " " <<  x[i] << endl;
         double sum_ret = sum( x );
         cout << "sum   " << sum_ret << endl;

doc/theses/mike_brooks_MMath/programs/ar-bchk/control.cfa

@@ -22 +22 @@
                 array(float, N) & x ) {
         double sum = 0;
-        for( i;
+        for ( i;
                         BND( N ) )
-                sum += x[i];
+                sum += @x[i]@;
         return sum;
 }

doc/theses/mike_brooks_MMath/programs/ar-bchk/treatment.c

@@ -24 +24 @@
         float lhs[m][p],
         float rhs[p][n] ) {
-    for( size_t i = 0;
+    for ( size_t i = 0;
             i < m; i++ )
-        for( size_t j = 0;
+        for ( size_t j = 0;
                 j < n; j++ ) {
             res[i][j] = 0.0;
-            for( size_t k = 0;
+            for ( size_t k = 0;
                     k < p; k++ )
-                res[i][j] +=
-                    lhs[i][k] *
-                    rhs[k][j];
+                @res[i][j] +=@
+                    @lhs[i][k] *@
+                    @rhs[k][j];@
         }
 }
@@ -49 +49 @@
 
 static void zero( size_t r, size_t c, float mat[r][c] ) {
-    for( size_t i = 0; i < r; i++ )
-        for( size_t j = 0; j < c; j++ )
+    for ( size_t i = 0; i < r; i++ )
+        for ( size_t j = 0; j < c; j++ )
             mat[i][j] = 0.0;
 }
@@ -56 +56 @@
 
 static void fill( size_t r, size_t c, float mat[r][c] ) {
-    for( size_t i = 0; i < r; i++ )
-        for( size_t j = 0; j < c; j++ )
+    for ( size_t i = 0; i < r; i++ )
+        for ( size_t j = 0; j < c; j++ )
             mat[i][j] = 1.0 * (i + 1) + 0.1 * (j+1);
 }
@@ -63 +63 @@
 
 static void print( size_t r, size_t c, float mat[r][c] ) {
-    for( size_t i = 0; i < r; i++ ) {
-        for( size_t j = 0; j < c; j++ )
+    for ( size_t i = 0; i < r; i++ ) {
+        for ( size_t j = 0; j < c; j++ )
             printf("%2g ", mat[i][j]);
         printf("\n");

doc/theses/mike_brooks_MMath/programs/ar-bchk/treatment.cc

@@ -24 +24 @@
         vector<vector<float>> & lhs,
         vector<vector<float>> & rhs ) {
-    for( size_t i = 0;
+    for ( size_t i = 0;
             i < res.size(); i++ )
-        for( size_t j = 0;
+        for ( size_t j = 0;
                 j < res.at(i).size(); j++ ) {
             res.at(i).at(j) = 0.0;
-            for( size_t k = 0;
+            for ( size_t k = 0;
                     k < rhs.size(); k++ )
-                res.at(i).at(j) +=
-                    lhs.at(i).at(k) *
-                    rhs.at(k).at(j);
+                @res.at(i).at(j) +=@
+                    @lhs.at(i).at(k) *@
+                    @rhs.at(k).at(j);@
         }
 }
@@ -49 +49 @@
 
 static void zero( vector<vector<float>> & mat ) {
-    for( size_t i = 0; i < mat.size(); i++ )
-        for( size_t j = 0; j < mat.at(i).size(); j++ )
+    for ( size_t i = 0; i < mat.size(); i++ )
+        for ( size_t j = 0; j < mat.at(i).size(); j++ )
             mat.at(i).at(j) = 0.0;
 }
@@ -56 +56 @@
 
 static void fill( vector<vector<float>> & mat ) {
-    for( size_t i = 0; i < mat.size(); i++ )
-        for( size_t j = 0; j < mat.at(i).size(); j++ )
+    for ( size_t i = 0; i < mat.size(); i++ )
+        for ( size_t j = 0; j < mat.at(i).size(); j++ )
             mat.at(i).at(j) = 1.0 * (i + 1) + 0.1 * (j+1);
 }
@@ -63 +63 @@
 
 static void print( vector<vector<float>> & mat ) {
-    for( size_t i = 0; i < mat.size(); i++ ) {
-        for( size_t j = 0; j < mat.at(i).size(); j++ )
+    for ( size_t i = 0; i < mat.size(); i++ ) {
+        for ( size_t j = 0; j < mat.at(i).size(); j++ )
             cout << mat.at(i).at(j) << " ";
         cout << endl;

doc/theses/mike_brooks_MMath/programs/ar-bchk/treatment.cfa

@@ -24 +24 @@
         array(float, M, P) & lhs,
         array(float, P, N) & rhs ) {
-    for( i; M )
+    for ( i; M )
 
-        for( j; N ) {
+        for ( j; N ) {
 
             res[i, j] = 0.0;
-            for( k; P )
+            for ( k; P )
 
-                res[i, j] +=
-                    lhs[i, k] *
-                    rhs[k, j];
+                @res[i, j] +=@
+                    @lhs[i, k] *@
+                    @rhs[k, j];@
         }
 }