CVS difference for ai12s/ai12-0312-1.txt

Differences between 1.18 and version 1.19
Log of other versions for file ai12s/ai12-0312-1.txt

--- ai12s/ai12-0312-1.txt	2020/12/17 04:13:52	1.18
+++ ai12s/ai12-0312-1.txt	2021/03/09 04:26:06	1.19
@@ -165,7 +165,8 @@
    for I in Grid'Range(1) loop
       declare
          True_Count : constant Natural :=
-           [for J in Grid'Range(2) => (if Grid (I, J) then 1 else 0)]'Reduce("+",0);
+           [for J in Grid'Range(2) => 
+              (if Grid (I, J) then 1 else 0)]'Reduce("+",0);
       begin
          Partial_Sum (Chunk) := @ + True_Count;
          Partial_Min (Chunk) := Natural'Min(@, True_Count);
@@ -471,7 +472,8 @@
    @b<for> I @b<in> Grid'Range(1) @b<loop>
       @b<declare>
          True_Count : @b<constant> Natural :=
-           [@b<for> J @b<in> Grid'Range(2) =@> (@b<if> Grid (I, J) @b<then> 1 @b<else> 0)]'Reduce("+",0);
+           [@b<for> J @b<in> Grid'Range(2) =@> 
+              (@b<if> Grid (I, J) @b<then> 1 @b<else> 0)]'Reduce("+",0);
       @b<begin>
          Partial_Sum (Chunk) := @@ + True_Count;
          Partial_Min (Chunk) := Natural'Min(@@, True_Count);
@@ -479,9 +481,10 @@
       @b<end>;
    @b<end loop>;>
 
-@xcode<   Put_Line("Total=" & Partial_Sum'Reduce("+", 0) &
-            ", Min=" & Partial_Min'Reduce(Natural'Min, Natural'Last) &
-            ", Max=" & Partial_Max'Reduce(Natural'Max, 0));
+@xcode<   Put_Line
+     ("Total=" & Partial_Sum'Reduce("+", 0) &
+      ", Min=" & Partial_Min'Reduce(Natural'Min, Natural'Last) &
+      ", Max=" & Partial_Max'Reduce(Natural'Max, 0));
 @b<end>;>
 
 @i<For an example of an> @fa<iterator_filter>@i<, see 4.5.8.>

Questions? Ask the ACAA Technical Agent