Changeset 35fc819 for doc/theses/mike_brooks_MMath/programs/hello-array.cfa

Timestamp:

Dec 13, 2025, 4:56:22 PM (4 days ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

5d300ba

Parents:

67748f9

Message:

more array proofreading

File:

• doc/theses/mike_brooks_MMath/programs/hello-array.cfa (modified) (3 diffs)

doc/theses/mike_brooks_MMath/programs/hello-array.cfa

@@ -89 +89 @@
 
 forall( [M], [N] )
-void bad( array(float, M) &x,
-                array(float, N) &y ) {
+void f( array(float, M) &x, array(float, N) &y ) {
         f( x, x );              $\C[0.5in]{// ok}$
         f( y, y );              $\C{// ok}$
-
         f( x, y );              $\C{// error}\CRT$
+        if ( M == N ) f( x, @(array( float, M ) &)@y ); $\C{// ok}\CRT$
 }
-
 #endif
 
@@ -109 +107 @@
 
 forall( [M], [N] )
-void bad_fixed( array( float, M ) & x,
-                array( float, N ) & y ) {
+void f( array( float, M ) & x, array( float, N ) & y ) {
         f( x, x );              $\C[0.5in]{// ok}$
         f( y, y );              $\C{// ok}$
-        if ( M == N )
-                f( x, @(array( float, M ) &)@y ); $\C{// ok}\CRT$
+        if ( M == N ) f( x, @(array( float, M ) &)@y ); $\C{// ok}\CRT$
 }
 
@@ -132 +128 @@
 
 forall( [M], [N] )
-void bad_ok_only( array(float, M) &x,
-                array(float, N) &y ) {
+void bad_ok_only( array(float, M) &x, array(float, N) &y ) {
         f( x, x );
         f( y, y );