diff --git a/index.html b/index.html
index 6aed4041..2e701411 100644
--- a/index.html
+++ b/index.html
@@ -110,7 +110,7 @@ <h2 id="philosophy-and-motivations">Philosophy and Motivations</h2>
 <ul>
 <li>Write as much of Caffeine as possible in Fortran:<ul>
 <li>Writing the runtime library in the language of the users increases the likelihood of community contributions.</li>
-<li>Writing the runtime library in Fortran obviates the need to directly manipulate compiler descriptors throughout much of Caffeine and allows Caffeine's underlying C layer to receive the Fortran-standard <code>CFI_cdesc_t</code> desriptor, which imwill make it easier to support multiple compilers.</li>
+<li>Writing the runtime library in Fortran obviates the need to directly manipulate compiler descriptors throughout much of Caffeine and allows Caffeine's underlying C layer to receive the Fortran-standard <code>CFI_cdesc_t</code> descriptor, which will make it easier to support multiple compilers.</li>
 <li>Writing most of Caffeine in Fortran offers the potential exploiting Fortran's rich array syntax, concurrent loop iterations (<code>do concurrent</code>), <code>pure</code> procedures and related features. Currently, these play a role only in one place: C callbacks to user-provided, <code>pure</code> functions that can be invoked inside a <code>do concurrent</code> block during the execution of <code>co_reduce</code>.</li>
 </ul>
 </li>
@@ -219,7 +219,7 @@ <h3>Derived Types</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/as_character.html b/interface/as_character.html
index a54392bb..f8cd4cae 100644
--- a/interface/as_character.html
+++ b/interface/as_character.html
@@ -278,7 +278,7 @@ <h3>Return Value <span class="anchor" id="variable-character_self~2"></span><sma
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/as_character_i.html b/interface/as_character_i.html
index f2f852a7..56dd5adc 100644
--- a/interface/as_character_i.html
+++ b/interface/as_character_i.html
@@ -159,7 +159,7 @@ <h3>Return Value <span class="anchor" id="variable-character_self"></span><small
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/assert.html b/interface/assert.html
index 3fc7126b..789fbc14 100644
--- a/interface/assert.html
+++ b/interface/assert.html
@@ -465,7 +465,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_bool_operation.html b/interface/c_bool_operation.html
index 72cfe82d..ef121f49 100644
--- a/interface/c_bool_operation.html
+++ b/interface/c_bool_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs"></span><small>log
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_char_operation.html b/interface/c_char_operation.html
index a78df13e..f2df651a 100644
--- a/interface/c_char_operation.html
+++ b/interface/c_char_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs~2"></span><small>c
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_double_complex_operation.html b/interface/c_double_complex_operation.html
index 478c2d8d..002bada1 100644
--- a/interface/c_double_complex_operation.html
+++ b/interface/c_double_complex_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs~3"></span><small>c
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_double_operation.html b/interface/c_double_operation.html
index 7df794a3..759b3d81 100644
--- a/interface/c_double_operation.html
+++ b/interface/c_double_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs~4"></span><small>r
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_float_complex_operation.html b/interface/c_float_complex_operation.html
index f83e7ddb..b6a17628 100644
--- a/interface/c_float_complex_operation.html
+++ b/interface/c_float_complex_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs~5"></span><small>c
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_float_operation.html b/interface/c_float_operation.html
index 6bfaaa63..85164612 100644
--- a/interface/c_float_operation.html
+++ b/interface/c_float_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs~6"></span><small>r
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_int32_t_operation.html b/interface/c_int32_t_operation.html
index 58cca3a6..0cb5af02 100644
--- a/interface/c_int32_t_operation.html
+++ b/interface/c_int32_t_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs~7"></span><small>i
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/c_int64_t_operation.html b/interface/c_int64_t_operation.html
index 9dd46141..23d75671 100644
--- a/interface/c_int64_t_operation.html
+++ b/interface/c_int64_t_operation.html
@@ -165,7 +165,7 @@ <h3>Return Value <span class="anchor" id="variable-lhs_op_rhs~8"></span><small>i
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_caffeinate.html b/interface/caf_c_caffeinate.html
index 149e3545..8267d730 100644
--- a/interface/caf_c_caffeinate.html
+++ b/interface/caf_c_caffeinate.html
@@ -283,7 +283,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_co_broadcast.html b/interface/caf_c_co_broadcast.html
index a3dfeb72..d9a2fe89 100644
--- a/interface/caf_c_co_broadcast.html
+++ b/interface/caf_c_co_broadcast.html
@@ -250,19 +250,19 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a"></span>type(*)</td>
+  <td><span class="anchor" id="variable-a~6"></span>type(*)</td>
 <td></td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-source_image"></span>integer(kind=c_int),</td>
+  <td><span class="anchor" id="variable-source_image~2"></span>integer(kind=c_int),</td>
 <td></td>
   <td></td>  <td>value</td><td>::</td>
   <td><strong>source_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~2"></span>type(c_ptr),</td>
+  <td><span class="anchor" id="variable-stat~8"></span>type(c_ptr),</td>
 <td></td>
   <td></td>  <td>value</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
@@ -295,7 +295,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_co_max.html b/interface/caf_c_co_max.html
index 83a280b2..acd88481 100644
--- a/interface/caf_c_co_max.html
+++ b/interface/caf_c_co_max.html
@@ -250,13 +250,13 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~2"></span>type(*)</td>
+  <td><span class="anchor" id="variable-a~7"></span>type(*)</td>
 <td></td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image"></span>integer(kind=c_int),</td>
+  <td><span class="anchor" id="variable-result_image~5"></span>integer(kind=c_int),</td>
 <td></td>
   <td></td>  <td>value</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
@@ -301,7 +301,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_co_min.html b/interface/caf_c_co_min.html
index 820c3daa..d9ba9793 100644
--- a/interface/caf_c_co_min.html
+++ b/interface/caf_c_co_min.html
@@ -250,13 +250,13 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~3"></span>type(*)</td>
+  <td><span class="anchor" id="variable-a~8"></span>type(*)</td>
 <td></td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~2"></span>integer(kind=c_int),</td>
+  <td><span class="anchor" id="variable-result_image~6"></span>integer(kind=c_int),</td>
 <td></td>
   <td></td>  <td>value</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
@@ -301,7 +301,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_co_reduce.html b/interface/caf_c_co_reduce.html
index a0e6a9d3..967398dd 100644
--- a/interface/caf_c_co_reduce.html
+++ b/interface/caf_c_co_reduce.html
@@ -310,13 +310,13 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~4"></span>type(*)</td>
+  <td><span class="anchor" id="variable-a~9"></span>type(*)</td>
 <td></td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~3"></span>integer(kind=c_int),</td>
+  <td><span class="anchor" id="variable-result_image~7"></span>integer(kind=c_int),</td>
 <td></td>
   <td></td>  <td>value</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
@@ -373,7 +373,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_co_sum.html b/interface/caf_c_co_sum.html
index 62dda33c..52783e26 100644
--- a/interface/caf_c_co_sum.html
+++ b/interface/caf_c_co_sum.html
@@ -250,13 +250,13 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~5"></span>type(*)</td>
+  <td><span class="anchor" id="variable-a~10"></span>type(*)</td>
 <td></td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~4"></span>integer(kind=c_int),</td>
+  <td><span class="anchor" id="variable-result_image~8"></span>integer(kind=c_int),</td>
 <td></td>
   <td></td>  <td>value</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
@@ -301,7 +301,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_decaffeinate.html b/interface/caf_c_decaffeinate.html
index 66752e43..fef96a98 100644
--- a/interface/caf_c_decaffeinate.html
+++ b/interface/caf_c_decaffeinate.html
@@ -162,35 +162,35 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M282.42,-209.86C289.56,-207.41 296.58,-204.49 303,-201 333.21,-184.6 361.28,-156.05 378.15,-136.85"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="381.03,-138.87 384.88,-129 375.71,-134.31 381.03,-138.87"/>
 </g>
-<!-- proc~caf_stop_character -->
+<!-- proc~caf_decaffeinate -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_node3" class="node">
-<title>proc~caf_stop_character</title>
-<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node3"><a xlink:href=".././proc/caf_stop_character.html" xlink:title="caf_stop_character">
-<polygon fill="#777777" stroke="#777777" points="277.5,-192 163.5,-192 163.5,-168 277.5,-168 277.5,-192"/>
-<text text-anchor="middle" x="220.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_character</text>
+<title>proc~caf_decaffeinate</title>
+<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node3"><a xlink:href=".././proc/caf_decaffeinate.html" xlink:title="caf_decaffeinate">
+<polygon fill="#d9534f" stroke="#d9534f" points="271.5,-192 169.5,-192 169.5,-168 271.5,-168 271.5,-192"/>
+<text text-anchor="middle" x="220.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_edge2" class="edge">
-<title>proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#ff0000" d="M274.09,-167.92C283.8,-165.28 293.77,-162.28 303,-159 323.15,-151.84 344.94,-141.93 362.2,-133.54"/>
+<title>proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#ff0000" d="M271.92,-168.51C282.3,-165.72 293.09,-162.52 303,-159 323.15,-151.84 344.94,-141.93 362.2,-133.54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="363.86,-136.62 371.28,-129.06 360.76,-130.34 363.86,-136.62"/>
 </g>
-<!-- proc~caf_decaffeinate -->
+<!-- proc~caf_stop_integer~2 -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_node4" class="node">
-<title>proc~caf_decaffeinate</title>
-<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node4"><a xlink:href=".././proc/caf_decaffeinate.html" xlink:title="caf_decaffeinate">
-<polygon fill="#d9534f" stroke="#d9534f" points="271.5,-150 169.5,-150 169.5,-126 271.5,-126 271.5,-150"/>
-<text text-anchor="middle" x="220.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
+<title>proc~caf_stop_integer~2</title>
+<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node4"><a xlink:href=".././proc/caf_stop_integer~2.html" xlink:title="caf_stop_integer">
+<polygon fill="#777777" stroke="#777777" points="270.5,-150 170.5,-150 170.5,-126 270.5,-126 270.5,-150"/>
+<text text-anchor="middle" x="220.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_integer</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- proc~caf_stop_integer~2&#45;&gt;interface~caf_c_decaffeinate -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_edge3" class="edge">
-<title>proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#ff0000" d="M271.54,-131.93C289.39,-129.76 309.77,-127.29 328.74,-124.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="329.3,-128.44 338.81,-123.76 328.46,-121.49 329.3,-128.44"/>
+<title>proc~caf_stop_integer~2&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#ff0000" d="M270.61,-132.04C288.73,-129.84 309.56,-127.31 328.91,-124.96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="329.36,-128.43 338.87,-123.75 328.52,-121.48 329.36,-128.43"/>
 </g>
 <!-- proc~caf_stop_integer -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_node5" class="node">
@@ -207,50 +207,50 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#ff0000" d="M270.61,-101.96C288.73,-104.16 309.56,-106.69 328.91,-109.04"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="328.52,-112.52 338.87,-110.25 329.36,-105.57 328.52,-112.52"/>
 </g>
-<!-- proc~caf_stop_character~2 -->
+<!-- proc~caf_stop_character -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_node6" class="node">
-<title>proc~caf_stop_character~2</title>
-<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node6"><a xlink:href=".././proc/caf_stop_character~2.html" xlink:title="caf_stop_character">
+<title>proc~caf_stop_character</title>
+<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node6"><a xlink:href=".././proc/caf_stop_character.html" xlink:title="caf_stop_character">
 <polygon fill="#777777" stroke="#777777" points="277.5,-66 163.5,-66 163.5,-42 277.5,-42 277.5,-66"/>
 <text text-anchor="middle" x="220.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_edge5" class="edge">
-<title>proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate</title>
+<title>proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate</title>
 <path fill="none" stroke="#ff0000" d="M274.09,-66.08C283.8,-68.72 293.77,-71.72 303,-75 323.15,-82.16 344.94,-92.07 362.2,-100.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="360.76,-103.66 371.28,-104.94 363.86,-97.38 360.76,-103.66"/>
 </g>
-<!-- proc~caf_stop_integer~2 -->
+<!-- proc~caf_stop_character~2 -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_node7" class="node">
-<title>proc~caf_stop_integer~2</title>
-<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node7"><a xlink:href=".././proc/caf_stop_integer~2.html" xlink:title="caf_stop_integer">
-<polygon fill="#777777" stroke="#777777" points="270.5,-24 170.5,-24 170.5,0 270.5,0 270.5,-24"/>
-<text text-anchor="middle" x="220.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_integer</text>
+<title>proc~caf_stop_character~2</title>
+<g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node7"><a xlink:href=".././proc/caf_stop_character~2.html" xlink:title="caf_stop_character">
+<polygon fill="#777777" stroke="#777777" points="277.5,-24 163.5,-24 163.5,0 277.5,0 277.5,-24"/>
+<text text-anchor="middle" x="220.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_integer~2&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_edge6" class="edge">
-<title>proc~caf_stop_integer~2&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#ff0000" d="M270.81,-20.57C281.8,-23.59 293.11,-27.63 303,-33 333.21,-49.4 361.28,-77.95 378.15,-97.15"/>
+<title>proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#ff0000" d="M277.69,-22.59C286.44,-25.33 295.17,-28.75 303,-33 333.21,-49.4 361.28,-77.95 378.15,-97.15"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="375.71,-99.69 384.88,-105 381.03,-95.13 375.71,-99.69"/>
 </g>
 <!-- interface~caf_decaffeinate -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_node8" class="node">
 <title>interface~caf_decaffeinate</title>
 <g id="a_interface~~caf_c_decaffeinate~~CalledByGraph_node8"><a xlink:href=".././interface/caf_decaffeinate.html" xlink:title="caf_decaffeinate">
-<polygon fill="#a7506f" stroke="#a7506f" points="102,-150 0,-150 0,-126 102,-126 102,-150"/>
-<text text-anchor="middle" x="51" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="102,-192 0,-192 0,-168 102,-168 102,-192"/>
+<text text-anchor="middle" x="51" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_decaffeinate&#45;&gt;proc~caf_decaffeinate -->
 <g id="interface~~caf_c_decaffeinate~~CalledByGraph_edge7" class="edge">
 <title>interface~caf_decaffeinate&#45;&gt;proc~caf_decaffeinate</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M102.26,-138C120.14,-138 140.47,-138 159.12,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="159.28,-141.5 169.28,-138 159.28,-134.5 159.28,-141.5"/>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M102.26,-180C120.14,-180 140.47,-180 159.12,-180"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="159.28,-183.5 169.28,-180 159.28,-176.5 159.28,-183.5"/>
 </g>
 </g>
 </svg>
@@ -352,7 +352,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_elem_len.html b/interface/caf_c_elem_len.html
index fe904a74..373607be 100644
--- a/interface/caf_c_elem_len.html
+++ b/interface/caf_c_elem_len.html
@@ -310,7 +310,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~6"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~11"></span>type(*),</td>
 <td>intent(in)</td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
@@ -339,7 +339,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_is_f_string.html b/interface/caf_c_is_f_string.html
index 3d3a62f8..843fada1 100644
--- a/interface/caf_c_is_f_string.html
+++ b/interface/caf_c_is_f_string.html
@@ -177,17 +177,32 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#0000ff" d="M188.18,-21.89C196.41,-24.08 205.28,-26.44 214.01,-28.77"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="213.2,-32.17 223.76,-31.36 215,-25.41 213.2,-32.17"/>
 </g>
-<!-- proc~caf_co_min -->
+<!-- proc~caf_co_reduce -->
 <g id="interface~~caf_c_is_f_string~~CalledByGraph_node3" class="node">
+<title>proc~caf_co_reduce</title>
+<g id="a_interface~~caf_c_is_f_string~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#d9534f" stroke="#d9534f" points="438,-55 349,-55 349,-31 438,-31 438,-55"/>
+<text text-anchor="middle" x="393.5" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+</a>
+</g>
+</g>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge2" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M438.02,-43C446.32,-43 455.12,-43 463.79,-43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="463.87,-46.5 473.87,-43 463.87,-39.5 463.87,-46.5"/>
+</g>
+<!-- proc~caf_co_min -->
+<g id="interface~~caf_c_is_f_string~~CalledByGraph_node4" class="node">
 <title>proc~caf_co_min</title>
-<g id="a_interface~~caf_c_is_f_string~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
+<g id="a_interface~~caf_c_is_f_string~~CalledByGraph_node4"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
 <polygon fill="#d9534f" stroke="#d9534f" points="186.5,-85 113.5,-85 113.5,-61 186.5,-61 186.5,-85"/>
 <text text-anchor="middle" x="150" y="-70.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string -->
-<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge2" class="edge">
+<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge3" class="edge">
 <title>proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string</title>
 <path fill="none" stroke="#ff0000" d="M186.55,-74.31C240.99,-75.77 348.14,-76.5 438,-64 448.94,-62.48 460.53,-60.1 471.48,-57.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="472.47,-60.84 481.33,-55.03 470.78,-54.05 472.47,-60.84"/>
@@ -198,21 +213,6 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#0000ff" d="M186.59,-63.84C195.24,-61.61 204.67,-59.18 213.95,-56.79"/>
 <polygon fill="#0000ff" stroke="#0000ff" points="215.1,-60.11 223.91,-54.22 213.36,-53.33 215.1,-60.11"/>
 </g>
-<!-- proc~caf_co_reduce -->
-<g id="interface~~caf_c_is_f_string~~CalledByGraph_node4" class="node">
-<title>proc~caf_co_reduce</title>
-<g id="a_interface~~caf_c_is_f_string~~CalledByGraph_node4"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="438,-55 349,-55 349,-31 438,-31 438,-55"/>
-<text text-anchor="middle" x="393.5" y="-40.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
-</a>
-</g>
-</g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
-<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge3" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M438.02,-43C446.32,-43 455.12,-43 463.79,-43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="463.87,-46.5 473.87,-43 463.87,-39.5 463.87,-46.5"/>
-</g>
 <!-- interface~caf_co_max -->
 <g id="interface~~caf_c_is_f_string~~CalledByGraph_node5" class="node">
 <title>interface~caf_co_max</title>
@@ -238,16 +238,16 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- interface~caf_co_min&#45;&gt;proc~caf_co_min -->
-<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge5" class="edge">
+<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge6" class="edge">
 <title>interface~caf_co_min&#45;&gt;proc~caf_co_min</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M74.71,-73C83.84,-73 93.77,-73 103.31,-73"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="103.47,-76.5 113.47,-73 103.47,-69.5 103.47,-76.5"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M74.71,-73C83.84,-73 93.77,-73 103.31,-73"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="103.47,-76.5 113.47,-73 103.47,-69.5 103.47,-76.5"/>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
-<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge6" class="edge">
+<g id="interface~~caf_c_is_f_string~~CalledByGraph_edge5" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M313.21,-43C321.46,-43 330.17,-43 338.69,-43"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="338.93,-46.5 348.93,-43 338.93,-39.5 338.93,-46.5"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M313.21,-43C321.46,-43 330.17,-43 338.69,-43"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="338.93,-46.5 348.93,-43 338.93,-39.5 338.93,-46.5"/>
 </g>
 </g>
 </svg>
@@ -322,7 +322,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~7"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~12"></span>type(*),</td>
 <td>intent(in)</td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
@@ -351,7 +351,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_num_images.html b/interface/caf_c_num_images.html
index 7d83cd9f..fb08cff3 100644
--- a/interface/caf_c_num_images.html
+++ b/interface/caf_c_num_images.html
@@ -253,7 +253,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_numeric_type.html b/interface/caf_c_numeric_type.html
index d4757d8a..47021a7b 100644
--- a/interface/caf_c_numeric_type.html
+++ b/interface/caf_c_numeric_type.html
@@ -280,7 +280,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~8"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~13"></span>type(*),</td>
 <td>intent(in)</td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
@@ -309,7 +309,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_same_cfi_type.html b/interface/caf_c_same_cfi_type.html
index 22af9d20..14aee08f 100644
--- a/interface/caf_c_same_cfi_type.html
+++ b/interface/caf_c_same_cfi_type.html
@@ -310,7 +310,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~9"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~14"></span>type(*),</td>
 <td>intent(in)</td>
   <td></td>  <td></td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
@@ -345,7 +345,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_sync_all.html b/interface/caf_c_sync_all.html
index c4efac2a..430ca145 100644
--- a/interface/caf_c_sync_all.html
+++ b/interface/caf_c_sync_all.html
@@ -296,7 +296,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_c_this_image.html b/interface/caf_c_this_image.html
index 9376a4ea..623730ac 100644
--- a/interface/caf_c_this_image.html
+++ b/interface/caf_c_this_image.html
@@ -253,7 +253,7 @@ <h3>Description</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_caffeinate.html b/interface/caf_caffeinate.html
index 4eb18e43..80929e60 100644
--- a/interface/caf_caffeinate.html
+++ b/interface/caf_caffeinate.html
@@ -312,7 +312,7 @@ <h3>Return Value <span class="anchor" id="variable-exit_code"></span><small>inte
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_change_team.html b/interface/caf_change_team.html
index cca037e7..78e41334 100644
--- a/interface/caf_change_team.html
+++ b/interface/caf_change_team.html
@@ -261,7 +261,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_co_broadcast.html b/interface/caf_co_broadcast.html
index 436d74ff..18a3f7a0 100644
--- a/interface/caf_co_broadcast.html
+++ b/interface/caf_co_broadcast.html
@@ -266,25 +266,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~10"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-source_image~2"></span>integer,</td>
+  <td><span class="anchor" id="variable-source_image"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td></td><td>::</td>
   <td><strong>source_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~4"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~3"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -309,7 +309,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_co_max.html b/interface/caf_co_max.html
index 86f13959..61afa6fc 100644
--- a/interface/caf_co_max.html
+++ b/interface/caf_co_max.html
@@ -136,277 +136,277 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~caf_co_max~~CallsGraph Pages: 1 -->
-<svg id="interfacecaf_co_maxCallsGraph" width="641pt" height="336pt"
- viewBox="0.00 0.00 641.00 336.41" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~caf_co_max~~CallsGraph" class="graph" transform="scale(1.32 1.32) rotate(0) translate(4 440)">
+<svg id="interfacecaf_co_maxCallsGraph" width="641pt" height="358pt"
+ viewBox="0.00 0.00 641.00 357.63" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~caf_co_max~~CallsGraph" class="graph" transform="scale(1.32 1.32) rotate(0) translate(4 468)">
 <title>interface~~caf_co_max~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-440 842,-440 842,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-468 842,-468 842,4 -4,4"/>
 <!-- interface~caf_co_max -->
 <g id="interface~~caf_co_max~~CallsGraph_node1" class="node">
 <title>interface~caf_co_max</title>
-<polygon fill="none" stroke="black" points="76,-259 0,-259 0,-235 76,-235 76,-259"/>
-<text text-anchor="middle" x="38" y="-244.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_max</text>
+<polygon fill="none" stroke="black" points="76,-329 0,-329 0,-305 76,-305 76,-329"/>
+<text text-anchor="middle" x="38" y="-314.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_max</text>
 </g>
 <!-- proc~caf_co_max -->
 <g id="interface~~caf_co_max~~CallsGraph_node2" class="node">
 <title>proc~caf_co_max</title>
 <g id="a_interface~~caf_co_max~~CallsGraph_node2"><a xlink:href=".././proc/caf_co_max.html" xlink:title="caf_co_max">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-259 112,-259 112,-235 188,-235 188,-259"/>
-<text text-anchor="middle" x="150" y="-244.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-329 112,-329 112,-305 188,-305 188,-329"/>
+<text text-anchor="middle" x="150" y="-314.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_max&#45;&gt;proc~caf_co_max -->
 <g id="interface~~caf_co_max~~CallsGraph_edge1" class="edge">
 <title>interface~caf_co_max&#45;&gt;proc~caf_co_max</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M76.24,-247C84.39,-247 93.13,-247 101.62,-247"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="101.8,-250.5 111.8,-247 101.8,-243.5 101.8,-250.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M76.24,-317C84.39,-317 93.13,-317 101.62,-317"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="101.8,-320.5 111.8,-317 101.8,-313.5 101.8,-320.5"/>
 </g>
-<!-- interface~caf_c_numeric_type -->
+<!-- interface~caf_c_co_max -->
 <g id="interface~~caf_co_max~~CallsGraph_node3" class="node">
-<title>interface~caf_c_numeric_type</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node3"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="342,-436 224,-436 224,-412 342,-412 342,-436"/>
-<text text-anchor="middle" x="283" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
+<title>interface~caf_c_co_max</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node3"><a xlink:href=".././interface/caf_c_co_max.html" xlink:title="caf_c_co_max">
+<polygon fill="#a7506f" stroke="#a7506f" points="326.5,-464 239.5,-464 239.5,-440 326.5,-440 326.5,-464"/>
+<text text-anchor="middle" x="283" y="-449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_max</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_co_max -->
 <g id="interface~~caf_co_max~~CallsGraph_edge2" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type</title>
-<path fill="none" stroke="#ff0000" d="M153.85,-259.27C160.96,-287.39 182.02,-357.22 224,-398 227.48,-401.38 231.47,-404.36 235.7,-406.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.17,-410.14 244.62,-411.89 237.54,-404.01 234.17,-410.14"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_co_max</title>
+<path fill="none" stroke="#ff0000" d="M156.3,-329.09C166.48,-351.08 190.76,-397.94 224,-426 228.16,-429.51 232.88,-432.64 237.78,-435.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="236.22,-438.53 246.71,-439.96 239.4,-432.3 236.22,-438.53"/>
 </g>
-<!-- proc~get_c_ptr -->
+<!-- interface~caf_c_is_f_string -->
 <g id="interface~~caf_co_max~~CallsGraph_node4" class="node">
-<title>proc~get_c_ptr</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node4"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="594,-356 533,-356 533,-332 594,-332 594,-356"/>
-<text text-anchor="middle" x="563.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
+<title>interface~caf_c_is_f_string</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node4"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
+<polygon fill="#a7506f" stroke="#a7506f" points="612.5,-436 514.5,-436 514.5,-412 612.5,-412 612.5,-436"/>
+<text text-anchor="middle" x="563.5" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string -->
 <g id="interface~~caf_co_max~~CallsGraph_edge3" class="edge">
-<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M174.81,-259.06C188.84,-265.74 207.09,-273.74 224,-279 329.55,-311.82 459.02,-331.12 522.93,-339.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="522.62,-342.81 532.98,-340.59 523.5,-335.86 522.62,-342.81"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M166.62,-329.02C180.81,-339.35 202.74,-353.83 224,-362 318.16,-398.17 435.35,-413.6 504.24,-419.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="504.19,-423.42 514.46,-420.81 504.8,-416.45 504.19,-423.42"/>
 </g>
 <!-- proc~optional_value -->
 <g id="interface~~caf_co_max~~CallsGraph_node5" class="node">
 <title>proc~optional_value</title>
 <g id="a_interface~~caf_co_max~~CallsGraph_node5"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="609,-314 518,-314 518,-290 609,-290 609,-314"/>
-<text text-anchor="middle" x="563.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="609,-394 518,-394 518,-370 609,-370 609,-394"/>
+<text text-anchor="middle" x="563.5" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;proc~optional_value -->
-<g id="interface~~caf_co_max~~CallsGraph_edge4" class="edge">
+<g id="interface~~caf_co_max~~CallsGraph_edge5" class="edge">
 <title>proc~caf_co_max&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M188.24,-251.98C261.15,-261.72 422.99,-283.35 507.98,-294.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="507.57,-298.19 517.95,-296.05 508.5,-291.25 507.57,-298.19"/>
+<path fill="none" stroke="#ff0000" d="M186.71,-329.06C198.48,-332.68 211.7,-336.38 224,-339 322.73,-359.99 439.98,-372.09 507.37,-377.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="507.49,-381.36 517.75,-378.7 508.07,-374.38 507.49,-381.36"/>
 </g>
-<!-- interface~caf_error_stop -->
+<!-- proc~get_c_ptr -->
 <g id="interface~~caf_co_max~~CallsGraph_node6" class="node">
-<title>interface~caf_error_stop</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node6"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="838,-274 750,-274 750,-250 838,-250 838,-274"/>
-<text text-anchor="middle" x="794" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
+<title>proc~get_c_ptr</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node6"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="594,-352 533,-352 533,-328 594,-328 594,-352"/>
+<text text-anchor="middle" x="563.5" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_error_stop -->
+<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr -->
 <g id="interface~~caf_co_max~~CallsGraph_edge6" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M162.91,-259.4C176.6,-273.06 200.23,-294.96 224,-309 304.85,-356.75 327.61,-384 421.5,-384 421.5,-384 421.5,-384 564.5,-384 650.63,-384 735.77,-315.72 773.2,-281.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="775.96,-283.54 780.86,-274.14 771.17,-278.43 775.96,-283.54"/>
+<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M188.13,-319.65C199.63,-320.45 212.33,-321.29 224,-322 331.73,-328.55 458.82,-334.95 522.25,-338.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="522.45,-341.57 532.61,-338.56 522.79,-334.58 522.45,-341.57"/>
 </g>
-<!-- interface~caf_co_reduce -->
+<!-- interface~caf_c_numeric_type -->
 <g id="interface~~caf_co_max~~CallsGraph_node7" class="node">
-<title>interface~caf_co_reduce</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node7"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="327.5,-239 238.5,-239 238.5,-215 327.5,-215 327.5,-239"/>
-<text text-anchor="middle" x="283" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<title>interface~caf_c_numeric_type</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node7"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="342,-24 224,-24 224,0 342,0 342,-24"/>
+<text text-anchor="middle" x="283" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
-<g id="interface~~caf_co_max~~CallsGraph_edge5" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M188.19,-241.32C200.61,-239.43 214.7,-237.27 228.13,-235.22"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="228.87,-238.65 238.23,-233.68 227.81,-231.73 228.87,-238.65"/>
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type -->
+<g id="interface~~caf_co_max~~CallsGraph_edge4" class="edge">
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type</title>
+<path fill="none" stroke="#ff0000" d="M150.67,-304.74C150.19,-262.41 154.11,-120.53 224,-38 226.77,-34.73 230.03,-31.86 233.57,-29.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="235.52,-32.24 242.25,-24.05 231.88,-26.26 235.52,-32.24"/>
 </g>
 <!-- proc~get_c_ptr_character -->
 <g id="interface~~caf_co_max~~CallsGraph_node8" class="node">
 <title>proc~get_c_ptr_character</title>
 <g id="a_interface~~caf_co_max~~CallsGraph_node8"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="622.5,-66 504.5,-66 504.5,-42 622.5,-42 622.5,-66"/>
-<text text-anchor="middle" x="563.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="622.5,-310 504.5,-310 504.5,-286 622.5,-286 622.5,-310"/>
+<text text-anchor="middle" x="563.5" y="-295.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr_character -->
 <g id="interface~~caf_co_max~~CallsGraph_edge7" class="edge">
 <title>proc~caf_co_max&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M168.82,-234.86C183.15,-225.65 204.09,-213.34 224,-206 327.28,-167.9 381.28,-227.07 467,-158 498.31,-132.77 473.59,-102.42 503,-75 504.29,-73.79 505.66,-72.65 507.09,-71.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="509.2,-74.39 515.81,-66.12 505.48,-68.46 509.2,-74.39"/>
+<path fill="none" stroke="#ff0000" d="M188.24,-315.28C257.42,-312.09 406.66,-305.2 494.34,-301.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="494.63,-304.64 504.46,-300.68 494.31,-297.64 494.63,-304.64"/>
 </g>
-<!-- interface~caf_c_co_max -->
+<!-- interface~caf_co_reduce -->
 <g id="interface~~caf_co_max~~CallsGraph_node9" class="node">
-<title>interface~caf_c_co_max</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node9"><a xlink:href=".././interface/caf_c_co_max.html" xlink:title="caf_c_co_max">
-<polygon fill="#a7506f" stroke="#a7506f" points="326.5,-116 239.5,-116 239.5,-92 326.5,-92 326.5,-116"/>
-<text text-anchor="middle" x="283" y="-101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_max</text>
+<title>interface~caf_co_reduce</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node9"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="327.5,-270 238.5,-270 238.5,-246 327.5,-246 327.5,-270"/>
+<text text-anchor="middle" x="283" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_co_max -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
 <g id="interface~~caf_co_max~~CallsGraph_edge8" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_co_max</title>
-<path fill="none" stroke="#ff0000" d="M155.76,-234.75C165.37,-211.45 189.18,-160.37 224,-130 227.95,-126.55 232.44,-123.49 237.12,-120.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="239.02,-123.74 246.28,-116.02 235.79,-117.53 239.02,-123.74"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
+<path fill="none" stroke="#ff0000" d="M177.69,-304.91C191.51,-298.66 208.65,-290.91 224,-284 230.99,-280.85 238.45,-277.5 245.62,-274.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="247.44,-277.31 255.14,-270.02 244.58,-270.92 247.44,-277.31"/>
 </g>
-<!-- interface~caf_c_is_f_string -->
+<!-- interface~caf_error_stop -->
 <g id="interface~~caf_co_max~~CallsGraph_node10" class="node">
-<title>interface~caf_c_is_f_string</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node10"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
-<polygon fill="#a7506f" stroke="#a7506f" points="612.5,-24 514.5,-24 514.5,0 612.5,0 612.5,-24"/>
-<text text-anchor="middle" x="563.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
+<title>interface~caf_error_stop</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node10"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="838,-230 750,-230 750,-206 838,-206 838,-230"/>
+<text text-anchor="middle" x="794" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_max~~CallsGraph_edge9" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M164.4,-234.87C178.61,-222.33 201.99,-202.58 224,-188 273.56,-155.17 289.96,-153.75 342,-125 414.14,-85.14 428.06,-67.3 503,-33 507.03,-31.16 511.27,-29.37 515.56,-27.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.85,-30.92 524.96,-24.09 514.36,-24.38 516.85,-30.92"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M156.02,-304.92C178.45,-253.08 274.89,-52 421.5,-52 421.5,-52 421.5,-52 564.5,-52 662.44,-52 746.65,-153.05 778.93,-197.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="776.2,-199.67 784.85,-205.79 781.91,-195.62 776.2,-199.67"/>
 </g>
 <!-- proc~caf_co_reduce -->
 <g id="interface~~caf_co_max~~CallsGraph_node11" class="node">
 <title>proc~caf_co_reduce</title>
 <g id="a_interface~~caf_co_max~~CallsGraph_node11"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="467,-234 378,-234 378,-210 467,-210 467,-234"/>
-<text text-anchor="middle" x="422.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="467,-270 378,-270 378,-246 467,-246 467,-270"/>
+<text text-anchor="middle" x="422.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
 <g id="interface~~caf_co_max~~CallsGraph_edge10" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M327.51,-225.42C340.3,-224.95 354.44,-224.44 367.79,-223.95"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="367.94,-227.45 377.81,-223.59 367.68,-220.45 367.94,-227.45"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M327.51,-258C340.3,-258 354.44,-258 367.79,-258"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="367.81,-261.5 377.81,-258 367.81,-254.5 367.81,-261.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
-<g id="interface~~caf_co_max~~CallsGraph_edge11" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M429.94,-234.09C441.72,-255.09 468.71,-298.44 503,-323 509.06,-327.34 516.11,-330.86 523.18,-333.68"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="522.17,-337.04 532.76,-337.12 524.53,-330.45 522.17,-337.04"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="interface~~caf_co_max~~CallsGraph_edge13" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M426.84,-270.03C435.09,-297.56 459.02,-365.64 503,-403 504.57,-404.33 506.22,-405.58 507.94,-406.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="506.62,-410.02 517.03,-411.98 510.11,-403.96 506.62,-410.02"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
-<g id="interface~~caf_co_max~~CallsGraph_edge12" class="edge">
+<g id="interface~~caf_co_max~~CallsGraph_edge15" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M439.38,-234.08C455.05,-245.68 479.92,-263.26 503,-276 509.17,-279.4 515.87,-282.69 522.48,-285.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="521.46,-289.1 532.02,-289.96 524.3,-282.7 521.46,-289.1"/>
+<path fill="none" stroke="#ff0000" d="M429.88,-270.33C441.56,-291.76 468.41,-335.97 503,-361 505.1,-362.52 507.31,-363.93 509.61,-365.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="508.27,-368.5 518.78,-369.89 511.43,-362.25 508.27,-368.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
-<g id="interface~~caf_co_max~~CallsGraph_edge15" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M463.21,-234.1C475.82,-237.5 489.9,-240.86 503,-243 584.97,-256.38 681.43,-260.41 739.86,-261.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="739.9,-265.08 749.96,-261.76 740.02,-258.08 739.9,-265.08"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<g id="interface~~caf_co_max~~CallsGraph_edge17" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M436.66,-270.21C451.72,-283.67 477.61,-305.23 503,-319 509.42,-322.48 516.54,-325.58 523.54,-328.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="522.37,-331.54 532.96,-331.62 524.73,-324.95 522.37,-331.54"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
-<g id="interface~~caf_co_max~~CallsGraph_edge17" class="edge">
+<g id="interface~~caf_co_max~~CallsGraph_edge18" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M450.79,-209.91C456.81,-206.18 462.68,-201.56 467,-196 501.43,-151.7 464.33,-115.66 503,-75 504.06,-73.88 505.19,-72.83 506.36,-71.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="508.56,-74.57 514.79,-66 504.58,-68.81 508.56,-74.57"/>
+<path fill="none" stroke="#ff0000" d="M465.2,-270C479.51,-274.12 495.69,-278.77 510.69,-283.09"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="509.77,-286.47 520.34,-285.87 511.7,-279.74 509.77,-286.47"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_max~~CallsGraph_edge19" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M433.41,-209.96C443.16,-197.6 457.87,-177.46 467,-158 491.56,-105.66 463.34,-75.07 503,-33 504.03,-31.9 505.13,-30.87 506.27,-29.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="508.29,-32.74 514.47,-24.14 504.27,-27.01 508.29,-32.74"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M467.11,-257.78C524.2,-256.9 627.22,-253.23 714,-239 723.67,-237.41 733.86,-235.16 743.6,-232.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="744.76,-236.02 753.54,-230.1 742.98,-229.25 744.76,-236.02"/>
 </g>
-<!-- interface~caf_c_same_cfi_type -->
+<!-- interface~assert -->
 <g id="interface~~caf_co_max~~CallsGraph_node12" class="node">
-<title>interface~caf_c_same_cfi_type</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node12"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="624,-192 503,-192 503,-168 624,-168 624,-192"/>
-<text text-anchor="middle" x="563.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
+<title>interface~assert</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node12"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="590.5,-230 536.5,-230 536.5,-206 590.5,-206 590.5,-230"/>
+<text text-anchor="middle" x="563.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
-<g id="interface~~caf_co_max~~CallsGraph_edge13" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
-<path fill="none" stroke="#ff0000" d="M463.33,-209.96C478.74,-205.31 496.55,-199.93 512.79,-195.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="514.1,-198.28 522.66,-192.04 512.08,-191.58 514.1,-198.28"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<g id="interface~~caf_co_max~~CallsGraph_edge11" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M465.2,-246C484.73,-240.38 507.75,-233.75 526.5,-228.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="527.51,-231.71 536.15,-225.58 525.57,-224.98 527.51,-231.71"/>
 </g>
-<!-- interface~assert -->
+<!-- interface~caf_c_elem_len -->
 <g id="interface~~caf_co_max~~CallsGraph_node13" class="node">
-<title>interface~assert</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node13"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="590.5,-234 536.5,-234 536.5,-210 590.5,-210 590.5,-234"/>
-<text text-anchor="middle" x="563.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>interface~caf_c_elem_len</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node13"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
+<polygon fill="#a7506f" stroke="#a7506f" points="610.5,-188 516.5,-188 516.5,-164 610.5,-164 610.5,-188"/>
+<text text-anchor="middle" x="563.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
-<g id="interface~~caf_co_max~~CallsGraph_edge16" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#ff0000" d="M467.1,-222C486.13,-222 508.19,-222 526.3,-222"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="526.46,-225.5 536.46,-222 526.46,-218.5 526.46,-225.5"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<g id="interface~~caf_co_max~~CallsGraph_edge14" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
+<path fill="none" stroke="#ff0000" d="M436.66,-245.79C451.72,-232.33 477.61,-210.77 503,-197 506.27,-195.22 509.73,-193.55 513.26,-191.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="514.79,-195.13 522.7,-188.08 512.12,-188.66 514.79,-195.13"/>
 </g>
 <!-- interface~caf_c_co_reduce -->
 <g id="interface~~caf_co_max~~CallsGraph_node14" class="node">
 <title>interface~caf_c_co_reduce</title>
 <g id="a_interface~~caf_co_max~~CallsGraph_node14"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="613.5,-150 513.5,-150 513.5,-126 613.5,-126 613.5,-150"/>
-<text text-anchor="middle" x="563.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="613.5,-146 513.5,-146 513.5,-122 613.5,-122 613.5,-146"/>
+<text text-anchor="middle" x="563.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
-<g id="interface~~caf_co_max~~CallsGraph_edge18" class="edge">
+<g id="interface~~caf_co_max~~CallsGraph_edge12" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M446.37,-209.84C453.25,-205.79 460.65,-201.02 467,-196 485,-181.77 483.67,-171.37 503,-159 505.59,-157.34 508.33,-155.79 511.16,-154.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="512.76,-157.47 520.38,-150.11 509.84,-151.11 512.76,-157.47"/>
+<path fill="none" stroke="#ff0000" d="M429.88,-245.67C441.56,-224.24 468.41,-180.03 503,-155 505.1,-153.48 507.31,-152.07 509.61,-150.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="511.43,-153.75 518.78,-146.11 508.27,-147.5 511.43,-153.75"/>
 </g>
-<!-- interface~caf_c_elem_len -->
+<!-- interface~caf_c_same_cfi_type -->
 <g id="interface~~caf_co_max~~CallsGraph_node15" class="node">
-<title>interface~caf_c_elem_len</title>
-<g id="a_interface~~caf_co_max~~CallsGraph_node15"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
-<polygon fill="#a7506f" stroke="#a7506f" points="610.5,-108 516.5,-108 516.5,-84 610.5,-84 610.5,-108"/>
-<text text-anchor="middle" x="563.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
+<title>interface~caf_c_same_cfi_type</title>
+<g id="a_interface~~caf_co_max~~CallsGraph_node15"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="624,-104 503,-104 503,-80 624,-80 624,-104"/>
+<text text-anchor="middle" x="563.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
-<g id="interface~~caf_co_max~~CallsGraph_edge14" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
-<path fill="none" stroke="#ff0000" d="M449.8,-209.75C456,-205.98 462.19,-201.38 467,-196 492.73,-167.24 474.54,-143.05 503,-117 504.48,-115.64 506.06,-114.37 507.71,-113.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="509.73,-116.05 516.47,-107.88 506.1,-110.06 509.73,-116.05"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
+<g id="interface~~caf_co_max~~CallsGraph_edge16" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
+<path fill="none" stroke="#ff0000" d="M426.84,-245.97C435.09,-218.44 459.02,-150.36 503,-113 504.57,-111.67 506.22,-110.42 507.94,-109.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="510.11,-112.04 517.03,-104.02 506.62,-105.98 510.11,-112.04"/>
 </g>
 <!-- proc~assert -->
 <g id="interface~~caf_co_max~~CallsGraph_node16" class="node">
 <title>proc~assert</title>
 <g id="a_interface~~caf_co_max~~CallsGraph_node16"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="714,-234 660,-234 660,-210 714,-210 714,-234"/>
-<text text-anchor="middle" x="687" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="714,-230 660,-230 660,-206 714,-206 714,-230"/>
+<text text-anchor="middle" x="687" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
 <!-- interface~assert&#45;&gt;proc~assert -->
 <g id="interface~~caf_co_max~~CallsGraph_edge20" class="edge">
 <title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M590.56,-222C607.86,-222 630.8,-222 649.85,-222"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="649.98,-225.5 659.98,-222 649.98,-218.5 649.98,-225.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M590.56,-218C607.86,-218 630.8,-218 649.85,-218"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="649.98,-221.5 659.98,-218 649.98,-214.5 649.98,-221.5"/>
 </g>
 <!-- proc~assert&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_max~~CallsGraph_edge21" class="edge">
 <title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M714.23,-231.99C725.55,-236.31 739.08,-241.46 751.7,-246.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="750.53,-249.57 761.12,-249.85 753.02,-243.02 750.53,-249.57"/>
+<path fill="none" stroke="#ff0000" d="M714.23,-218C722.08,-218 730.99,-218 739.93,-218"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="739.97,-221.5 749.97,-218 739.97,-214.5 739.97,-221.5"/>
 </g>
 </g>
 </svg>
@@ -482,25 +482,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~11"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~2"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~5"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~5"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~2"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~4"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~2"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -525,7 +525,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_co_min.html b/interface/caf_co_min.html
index d2e8153e..7b329f80 100644
--- a/interface/caf_co_min.html
+++ b/interface/caf_co_min.html
@@ -136,277 +136,277 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~caf_co_min~~CallsGraph Pages: 1 -->
-<svg id="interfacecaf_co_minCallsGraph" width="641pt" height="339pt"
- viewBox="0.00 0.00 641.00 338.81" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~caf_co_min~~CallsGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 440)">
+<svg id="interfacecaf_co_minCallsGraph" width="641pt" height="371pt"
+ viewBox="0.00 0.00 641.00 370.86" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~caf_co_min~~CallsGraph" class="graph" transform="scale(1.31 1.31) rotate(0) translate(4 482)">
 <title>interface~~caf_co_min~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-440 836,-440 836,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-482 836,-482 836,4 -4,4"/>
 <!-- interface~caf_co_min -->
 <g id="interface~~caf_co_min~~CallsGraph_node1" class="node">
 <title>interface~caf_co_min</title>
-<polygon fill="none" stroke="black" points="73,-259 0,-259 0,-235 73,-235 73,-259"/>
-<text text-anchor="middle" x="36.5" y="-244.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_min</text>
+<polygon fill="none" stroke="black" points="73,-332 0,-332 0,-308 73,-308 73,-332"/>
+<text text-anchor="middle" x="36.5" y="-317.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_min</text>
 </g>
 <!-- proc~caf_co_min -->
 <g id="interface~~caf_co_min~~CallsGraph_node2" class="node">
 <title>proc~caf_co_min</title>
 <g id="a_interface~~caf_co_min~~CallsGraph_node2"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
-<polygon fill="#d9534f" stroke="#d9534f" points="182,-259 109,-259 109,-235 182,-235 182,-259"/>
-<text text-anchor="middle" x="145.5" y="-244.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="182,-332 109,-332 109,-308 182,-308 182,-332"/>
+<text text-anchor="middle" x="145.5" y="-317.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_min&#45;&gt;proc~caf_co_min -->
 <g id="interface~~caf_co_min~~CallsGraph_edge1" class="edge">
 <title>interface~caf_co_min&#45;&gt;proc~caf_co_min</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M73.13,-247C81.25,-247 90,-247 98.49,-247"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="98.66,-250.5 108.66,-247 98.66,-243.5 98.66,-250.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M73.13,-320C81.25,-320 90,-320 98.49,-320"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="98.66,-323.5 108.66,-320 98.66,-316.5 98.66,-323.5"/>
 </g>
-<!-- interface~caf_c_numeric_type -->
+<!-- interface~caf_c_is_f_string -->
 <g id="interface~~caf_co_min~~CallsGraph_node3" class="node">
-<title>interface~caf_c_numeric_type</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node3"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="336,-436 218,-436 218,-412 336,-412 336,-436"/>
-<text text-anchor="middle" x="277" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
+<title>interface~caf_c_is_f_string</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node3"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
+<polygon fill="#a7506f" stroke="#a7506f" points="606.5,-478 508.5,-478 508.5,-454 606.5,-454 606.5,-478"/>
+<text text-anchor="middle" x="557.5" y="-463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string -->
 <g id="interface~~caf_co_min~~CallsGraph_edge2" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type</title>
-<path fill="none" stroke="#ff0000" d="M149.22,-259.27C156.03,-287.38 176.35,-357.21 218,-398 221.46,-401.39 225.45,-404.39 229.67,-407.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="228.13,-410.17 238.58,-411.93 231.51,-404.04 228.13,-410.17"/>
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M154.87,-332.23C166.85,-348.74 190.51,-377.83 218,-393 307.68,-442.47 427.92,-458.43 498.32,-463.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="498.12,-467.06 508.34,-464.25 498.6,-460.08 498.12,-467.06"/>
 </g>
-<!-- proc~get_c_ptr -->
+<!-- proc~optional_value -->
 <g id="interface~~caf_co_min~~CallsGraph_node4" class="node">
-<title>proc~get_c_ptr</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node4"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="588,-356 527,-356 527,-332 588,-332 588,-356"/>
-<text text-anchor="middle" x="557.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
+<title>proc~optional_value</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node4"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="603,-436 512,-436 512,-412 603,-412 603,-436"/>
+<text text-anchor="middle" x="557.5" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr -->
-<g id="interface~~caf_co_min~~CallsGraph_edge3" class="edge">
-<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M169.8,-259.08C183.52,-265.77 201.4,-273.77 218,-279 323.43,-312.22 452.95,-331.34 516.9,-339.41"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.6,-342.9 526.96,-340.66 517.46,-335.96 516.6,-342.9"/>
+<!-- proc~caf_co_min&#45;&gt;proc~optional_value -->
+<g id="interface~~caf_co_min~~CallsGraph_edge4" class="edge">
+<title>proc~caf_co_min&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M162.66,-332.08C176.61,-341.9 197.66,-355.35 218,-363 313.95,-399.1 433.45,-414.22 501.76,-420.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="501.6,-423.76 511.86,-421.12 502.2,-416.78 501.6,-423.76"/>
 </g>
-<!-- proc~optional_value -->
+<!-- interface~caf_c_co_min -->
 <g id="interface~~caf_co_min~~CallsGraph_node5" class="node">
-<title>proc~optional_value</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node5"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="603,-314 512,-314 512,-290 603,-290 603,-314"/>
-<text text-anchor="middle" x="557.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<title>interface~caf_c_co_min</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node5"><a xlink:href=".././interface/caf_c_co_min.html" xlink:title="caf_c_co_min">
+<polygon fill="#a7506f" stroke="#a7506f" points="319,-66 235,-66 235,-42 319,-42 319,-66"/>
+<text text-anchor="middle" x="277" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_min</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;proc~optional_value -->
-<g id="interface~~caf_co_min~~CallsGraph_edge4" class="edge">
-<title>proc~caf_co_min&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M182.17,-251.78C253.96,-261.42 416.33,-283.2 501.7,-294.65"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="501.34,-298.13 511.72,-295.99 502.27,-291.19 501.34,-298.13"/>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_co_min -->
+<g id="interface~~caf_co_min~~CallsGraph_edge5" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_co_min</title>
+<path fill="none" stroke="#ff0000" d="M146.71,-307.86C148,-269.55 156.98,-149.65 218,-80 220.86,-76.73 224.22,-73.85 227.84,-71.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="229.91,-74.17 236.7,-66.03 226.32,-68.16 229.91,-74.17"/>
 </g>
-<!-- interface~caf_error_stop -->
+<!-- proc~get_c_ptr -->
 <g id="interface~~caf_co_min~~CallsGraph_node6" class="node">
-<title>interface~caf_error_stop</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node6"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="832,-274 744,-274 744,-250 832,-250 832,-274"/>
-<text text-anchor="middle" x="788" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
+<title>proc~get_c_ptr</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node6"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="588,-394 527,-394 527,-370 588,-370 588,-394"/>
+<text text-anchor="middle" x="557.5" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_error_stop -->
+<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr -->
 <g id="interface~~caf_co_min~~CallsGraph_edge6" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M158.12,-259.41C171.47,-273.09 194.59,-295.01 218,-309 298.6,-357.16 321.61,-384 415.5,-384 415.5,-384 415.5,-384 558.5,-384 644.63,-384 729.77,-315.72 767.2,-281.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="769.96,-283.54 774.86,-274.14 765.17,-278.43 769.96,-283.54"/>
+<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M182.25,-331.13C193.6,-334.36 206.25,-337.64 218,-340 324.97,-361.47 453.3,-373.79 516.84,-379.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.58,-382.5 526.83,-379.82 517.14,-375.52 516.58,-382.5"/>
 </g>
-<!-- interface~caf_co_reduce -->
+<!-- interface~caf_c_numeric_type -->
 <g id="interface~~caf_co_min~~CallsGraph_node7" class="node">
-<title>interface~caf_co_reduce</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node7"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="321.5,-239 232.5,-239 232.5,-215 321.5,-215 321.5,-239"/>
-<text text-anchor="middle" x="277" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<title>interface~caf_c_numeric_type</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node7"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="336,-24 218,-24 218,0 336,0 336,-24"/>
+<text text-anchor="middle" x="277" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
-<g id="interface~~caf_co_min~~CallsGraph_edge5" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M182.23,-241.48C194.52,-239.58 208.57,-237.41 221.98,-235.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="222.73,-238.77 232.08,-233.78 221.66,-231.85 222.73,-238.77"/>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type -->
+<g id="interface~~caf_co_min~~CallsGraph_edge3" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type</title>
+<path fill="none" stroke="#ff0000" d="M148.01,-307.74C154.32,-258.41 180,-75.14 218,-33 218.89,-32.02 219.82,-31.08 220.8,-30.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="223.04,-32.88 229.04,-24.15 218.91,-27.24 223.04,-32.88"/>
 </g>
 <!-- proc~get_c_ptr_character -->
 <g id="interface~~caf_co_min~~CallsGraph_node8" class="node">
 <title>proc~get_c_ptr_character</title>
 <g id="a_interface~~caf_co_min~~CallsGraph_node8"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="616.5,-66 498.5,-66 498.5,-42 616.5,-42 616.5,-66"/>
-<text text-anchor="middle" x="557.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="616.5,-352 498.5,-352 498.5,-328 616.5,-328 616.5,-352"/>
+<text text-anchor="middle" x="557.5" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr_character -->
 <g id="interface~~caf_co_min~~CallsGraph_edge7" class="edge">
 <title>proc~caf_co_min&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M163.92,-234.85C177.93,-225.62 198.43,-213.32 218,-206 321.11,-167.44 375.28,-227.07 461,-158 492.31,-132.77 467.59,-102.42 497,-75 498.29,-73.79 499.66,-72.65 501.09,-71.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="503.2,-74.39 509.81,-66.12 499.48,-68.46 503.2,-74.39"/>
+<path fill="none" stroke="#ff0000" d="M182.17,-321.74C250.29,-325.06 399.95,-332.36 488.01,-336.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="488.01,-340.16 498.17,-337.15 488.35,-333.17 488.01,-340.16"/>
 </g>
-<!-- interface~caf_c_co_min -->
+<!-- interface~caf_co_reduce -->
 <g id="interface~~caf_co_min~~CallsGraph_node9" class="node">
-<title>interface~caf_c_co_min</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node9"><a xlink:href=".././interface/caf_c_co_min.html" xlink:title="caf_c_co_min">
-<polygon fill="#a7506f" stroke="#a7506f" points="319,-116 235,-116 235,-92 319,-92 319,-116"/>
-<text text-anchor="middle" x="277" y="-101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_min</text>
+<title>interface~caf_co_reduce</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node9"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="321.5,-312 232.5,-312 232.5,-288 321.5,-288 321.5,-312"/>
+<text text-anchor="middle" x="277" y="-297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_co_min -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
 <g id="interface~~caf_co_min~~CallsGraph_edge8" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_co_min</title>
-<path fill="none" stroke="#ff0000" d="M151.09,-234.75C160.39,-211.44 183.51,-160.36 218,-130 221.89,-126.58 226.3,-123.54 230.91,-120.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="232.7,-123.86 239.94,-116.12 229.46,-117.66 232.7,-123.86"/>
+<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
+<path fill="none" stroke="#ff0000" d="M182.23,-314.48C194.52,-312.58 208.57,-310.41 221.98,-308.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="222.73,-311.77 232.08,-306.78 221.66,-304.85 222.73,-311.77"/>
 </g>
-<!-- interface~caf_c_is_f_string -->
+<!-- interface~caf_error_stop -->
 <g id="interface~~caf_co_min~~CallsGraph_node10" class="node">
-<title>interface~caf_c_is_f_string</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node10"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
-<polygon fill="#a7506f" stroke="#a7506f" points="606.5,-24 508.5,-24 508.5,0 606.5,0 606.5,-24"/>
-<text text-anchor="middle" x="557.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
+<title>interface~caf_error_stop</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node10"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="832,-272 744,-272 744,-248 832,-248 832,-272"/>
+<text text-anchor="middle" x="788" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_min~~CallsGraph_edge9" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M159.58,-234.85C173.46,-222.28 196.34,-202.51 218,-188 267.4,-154.92 283.96,-153.75 336,-125 408.14,-85.14 422.06,-67.3 497,-33 501.03,-31.16 505.27,-29.37 509.56,-27.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="510.85,-30.92 518.96,-24.09 508.36,-24.38 510.85,-30.92"/>
+<title>proc~caf_co_min&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M153,-307.85C179.1,-260.91 281.31,-94 415.5,-94 415.5,-94 415.5,-94 558.5,-94 656.44,-94 740.65,-195.05 772.93,-239.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="770.2,-241.67 778.85,-247.79 775.91,-237.62 770.2,-241.67"/>
 </g>
 <!-- proc~caf_co_reduce -->
 <g id="interface~~caf_co_min~~CallsGraph_node11" class="node">
 <title>proc~caf_co_reduce</title>
 <g id="a_interface~~caf_co_min~~CallsGraph_node11"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="461,-234 372,-234 372,-210 461,-210 461,-234"/>
-<text text-anchor="middle" x="416.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="461,-312 372,-312 372,-288 461,-288 461,-312"/>
+<text text-anchor="middle" x="416.5" y="-297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
 <g id="interface~~caf_co_min~~CallsGraph_edge10" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M321.51,-225.42C334.3,-224.95 348.44,-224.44 361.79,-223.95"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="361.94,-227.45 371.81,-223.59 361.68,-220.45 361.94,-227.45"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M321.51,-300C334.3,-300 348.44,-300 361.79,-300"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="361.81,-303.5 371.81,-300 361.81,-296.5 361.81,-303.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
-<g id="interface~~caf_co_min~~CallsGraph_edge11" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M423.94,-234.09C435.72,-255.09 462.71,-298.44 497,-323 503.06,-327.34 510.11,-330.86 517.18,-333.68"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="516.17,-337.04 526.76,-337.12 518.53,-330.45 516.17,-337.04"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="interface~~caf_co_min~~CallsGraph_edge13" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M420.84,-312.03C429.09,-339.56 453.02,-407.64 497,-445 498.57,-446.33 500.22,-447.58 501.94,-448.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="500.62,-452.02 511.03,-453.98 504.11,-445.96 500.62,-452.02"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
-<g id="interface~~caf_co_min~~CallsGraph_edge12" class="edge">
+<g id="interface~~caf_co_min~~CallsGraph_edge15" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M433.38,-234.08C449.05,-245.68 473.92,-263.26 497,-276 503.17,-279.4 509.87,-282.69 516.48,-285.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="515.46,-289.1 526.02,-289.96 518.3,-282.7 515.46,-289.1"/>
+<path fill="none" stroke="#ff0000" d="M423.88,-312.33C435.56,-333.76 462.41,-377.97 497,-403 499.1,-404.52 501.31,-405.93 503.61,-407.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="502.27,-410.5 512.78,-411.89 505.43,-404.25 502.27,-410.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
-<g id="interface~~caf_co_min~~CallsGraph_edge15" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M457.21,-234.1C469.82,-237.5 483.9,-240.86 497,-243 578.97,-256.38 675.43,-260.41 733.86,-261.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="733.9,-265.08 743.96,-261.76 734.02,-258.08 733.9,-265.08"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<g id="interface~~caf_co_min~~CallsGraph_edge17" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M430.66,-312.21C445.72,-325.67 471.61,-347.23 497,-361 503.42,-364.48 510.54,-367.58 517.54,-370.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="516.37,-373.54 526.96,-373.62 518.73,-366.95 516.37,-373.54"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
-<g id="interface~~caf_co_min~~CallsGraph_edge17" class="edge">
+<g id="interface~~caf_co_min~~CallsGraph_edge18" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M444.79,-209.91C450.81,-206.18 456.68,-201.56 461,-196 495.43,-151.7 458.33,-115.66 497,-75 498.06,-73.88 499.19,-72.83 500.36,-71.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="502.56,-74.57 508.79,-66 498.58,-68.81 502.56,-74.57"/>
+<path fill="none" stroke="#ff0000" d="M459.2,-312C473.51,-316.12 489.69,-320.77 504.69,-325.09"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="503.77,-328.47 514.34,-327.87 505.7,-321.74 503.77,-328.47"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_min~~CallsGraph_edge19" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M427.41,-209.96C437.16,-197.6 451.87,-177.46 461,-158 485.56,-105.66 457.34,-75.07 497,-33 498.03,-31.9 499.13,-30.87 500.27,-29.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="502.29,-32.74 508.47,-24.14 498.27,-27.01 502.29,-32.74"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M461.11,-299.78C518.2,-298.9 621.22,-295.23 708,-281 717.67,-279.41 727.86,-277.16 737.6,-274.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="738.76,-278.02 747.54,-272.1 736.98,-271.25 738.76,-278.02"/>
 </g>
-<!-- interface~caf_c_same_cfi_type -->
+<!-- interface~assert -->
 <g id="interface~~caf_co_min~~CallsGraph_node12" class="node">
-<title>interface~caf_c_same_cfi_type</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node12"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="618,-192 497,-192 497,-168 618,-168 618,-192"/>
-<text text-anchor="middle" x="557.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
+<title>interface~assert</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node12"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="584.5,-272 530.5,-272 530.5,-248 584.5,-248 584.5,-272"/>
+<text text-anchor="middle" x="557.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
-<g id="interface~~caf_co_min~~CallsGraph_edge13" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
-<path fill="none" stroke="#ff0000" d="M457.33,-209.96C472.74,-205.31 490.55,-199.93 506.79,-195.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="508.1,-198.28 516.66,-192.04 506.08,-191.58 508.1,-198.28"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<g id="interface~~caf_co_min~~CallsGraph_edge11" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M459.2,-288C478.73,-282.38 501.75,-275.75 520.5,-270.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="521.51,-273.71 530.15,-267.58 519.57,-266.98 521.51,-273.71"/>
 </g>
-<!-- interface~assert -->
+<!-- interface~caf_c_elem_len -->
 <g id="interface~~caf_co_min~~CallsGraph_node13" class="node">
-<title>interface~assert</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node13"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="584.5,-234 530.5,-234 530.5,-210 584.5,-210 584.5,-234"/>
-<text text-anchor="middle" x="557.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>interface~caf_c_elem_len</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node13"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
+<polygon fill="#a7506f" stroke="#a7506f" points="604.5,-230 510.5,-230 510.5,-206 604.5,-206 604.5,-230"/>
+<text text-anchor="middle" x="557.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
-<g id="interface~~caf_co_min~~CallsGraph_edge16" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#ff0000" d="M461.1,-222C480.13,-222 502.19,-222 520.3,-222"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="520.46,-225.5 530.46,-222 520.46,-218.5 520.46,-225.5"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<g id="interface~~caf_co_min~~CallsGraph_edge14" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
+<path fill="none" stroke="#ff0000" d="M430.66,-287.79C445.72,-274.33 471.61,-252.77 497,-239 500.27,-237.22 503.73,-235.55 507.26,-233.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="508.79,-237.13 516.7,-230.08 506.12,-230.66 508.79,-237.13"/>
 </g>
 <!-- interface~caf_c_co_reduce -->
 <g id="interface~~caf_co_min~~CallsGraph_node14" class="node">
 <title>interface~caf_c_co_reduce</title>
 <g id="a_interface~~caf_co_min~~CallsGraph_node14"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="607.5,-150 507.5,-150 507.5,-126 607.5,-126 607.5,-150"/>
-<text text-anchor="middle" x="557.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="607.5,-188 507.5,-188 507.5,-164 607.5,-164 607.5,-188"/>
+<text text-anchor="middle" x="557.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
-<g id="interface~~caf_co_min~~CallsGraph_edge18" class="edge">
+<g id="interface~~caf_co_min~~CallsGraph_edge12" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M440.37,-209.84C447.25,-205.79 454.65,-201.02 461,-196 479,-181.77 477.67,-171.37 497,-159 499.59,-157.34 502.33,-155.79 505.16,-154.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="506.76,-157.47 514.38,-150.11 503.84,-151.11 506.76,-157.47"/>
+<path fill="none" stroke="#ff0000" d="M423.88,-287.67C435.56,-266.24 462.41,-222.03 497,-197 499.1,-195.48 501.31,-194.07 503.61,-192.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="505.43,-195.75 512.78,-188.11 502.27,-189.5 505.43,-195.75"/>
 </g>
-<!-- interface~caf_c_elem_len -->
+<!-- interface~caf_c_same_cfi_type -->
 <g id="interface~~caf_co_min~~CallsGraph_node15" class="node">
-<title>interface~caf_c_elem_len</title>
-<g id="a_interface~~caf_co_min~~CallsGraph_node15"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
-<polygon fill="#a7506f" stroke="#a7506f" points="604.5,-108 510.5,-108 510.5,-84 604.5,-84 604.5,-108"/>
-<text text-anchor="middle" x="557.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
+<title>interface~caf_c_same_cfi_type</title>
+<g id="a_interface~~caf_co_min~~CallsGraph_node15"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="618,-146 497,-146 497,-122 618,-122 618,-146"/>
+<text text-anchor="middle" x="557.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
-<g id="interface~~caf_co_min~~CallsGraph_edge14" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
-<path fill="none" stroke="#ff0000" d="M443.8,-209.75C450,-205.98 456.19,-201.38 461,-196 486.73,-167.24 468.54,-143.05 497,-117 498.48,-115.64 500.06,-114.37 501.71,-113.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="503.73,-116.05 510.47,-107.88 500.1,-110.06 503.73,-116.05"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
+<g id="interface~~caf_co_min~~CallsGraph_edge16" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
+<path fill="none" stroke="#ff0000" d="M420.84,-287.97C429.09,-260.44 453.02,-192.36 497,-155 498.57,-153.67 500.22,-152.42 501.94,-151.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="504.11,-154.04 511.03,-146.02 500.62,-147.98 504.11,-154.04"/>
 </g>
 <!-- proc~assert -->
 <g id="interface~~caf_co_min~~CallsGraph_node16" class="node">
 <title>proc~assert</title>
 <g id="a_interface~~caf_co_min~~CallsGraph_node16"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="708,-234 654,-234 654,-210 708,-210 708,-234"/>
-<text text-anchor="middle" x="681" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="708,-272 654,-272 654,-248 708,-248 708,-272"/>
+<text text-anchor="middle" x="681" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
 <!-- interface~assert&#45;&gt;proc~assert -->
 <g id="interface~~caf_co_min~~CallsGraph_edge20" class="edge">
 <title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M584.56,-222C601.86,-222 624.8,-222 643.85,-222"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="643.98,-225.5 653.98,-222 643.98,-218.5 643.98,-225.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M584.56,-260C601.86,-260 624.8,-260 643.85,-260"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="643.98,-263.5 653.98,-260 643.98,-256.5 643.98,-263.5"/>
 </g>
 <!-- proc~assert&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_min~~CallsGraph_edge21" class="edge">
 <title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M708.23,-231.99C719.55,-236.31 733.08,-241.46 745.7,-246.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="744.53,-249.57 755.12,-249.85 747.02,-243.02 744.53,-249.57"/>
+<path fill="none" stroke="#ff0000" d="M708.23,-260C716.08,-260 724.99,-260 733.93,-260"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="733.97,-263.5 743.97,-260 733.97,-256.5 733.97,-263.5"/>
 </g>
 </g>
 </svg>
@@ -482,25 +482,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~12"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~3"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~6"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image~2"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~6"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~3"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~5"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~3"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -525,7 +525,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_co_reduce.html b/interface/caf_co_reduce.html
index c384fabb..ff513fc9 100644
--- a/interface/caf_co_reduce.html
+++ b/interface/caf_co_reduce.html
@@ -137,186 +137,186 @@ <h3 class="panel-title">Calls</h3>
  -->
 <!-- Title: interface~~caf_co_reduce~~CallsGraph Pages: 1 -->
 <svg id="interfacecaf_co_reduceCallsGraph" width="593pt" height="364pt"
- viewBox="0.00 0.00 593.00 364.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~caf_co_reduce~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 360)">
+ viewBox="0.00 0.00 593.00 364.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~caf_co_reduce~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 360.13)">
 <title>interface~~caf_co_reduce~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-360 589,-360 589,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-360.13 589,-360.13 589,4 -4,4"/>
 <!-- interface~caf_co_reduce -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node1" class="node">
 <title>interface~caf_co_reduce</title>
-<polygon fill="none" stroke="black" points="89,-192 0,-192 0,-168 89,-168 89,-192"/>
-<text text-anchor="middle" x="44.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_reduce</text>
+<polygon fill="none" stroke="black" points="89,-188.13 0,-188.13 0,-164.13 89,-164.13 89,-188.13"/>
+<text text-anchor="middle" x="44.5" y="-173.73" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_reduce</text>
 </g>
 <!-- proc~caf_co_reduce -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node2" class="node">
 <title>proc~caf_co_reduce</title>
 <g id="a_interface~~caf_co_reduce~~CallsGraph_node2"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="214,-192 125,-192 125,-168 214,-168 214,-192"/>
-<text text-anchor="middle" x="169.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="214,-188.13 125,-188.13 125,-164.13 214,-164.13 214,-188.13"/>
+<text text-anchor="middle" x="169.5" y="-173.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge1" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M89.21,-180C97.46,-180 106.17,-180 114.69,-180"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.93,-183.5 124.93,-180 114.93,-176.5 114.93,-183.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M89.21,-176.13C97.46,-176.13 106.17,-176.13 114.69,-176.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.93,-179.63 124.93,-176.13 114.93,-172.63 114.93,-179.63"/>
 </g>
-<!-- proc~get_c_ptr -->
+<!-- interface~assert -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node3" class="node">
-<title>proc~get_c_ptr</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node3"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="341,-356 280,-356 280,-332 341,-332 341,-356"/>
-<text text-anchor="middle" x="310.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
+<title>interface~assert</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node3"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="337.5,-356.13 283.5,-356.13 283.5,-332.13 337.5,-332.13 337.5,-356.13"/>
+<text text-anchor="middle" x="310.5" y="-341.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge2" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M174.02,-192.27C182.49,-219.68 206.6,-286.34 250,-323 255.81,-327.91 262.85,-331.7 270.02,-334.62"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="269.18,-338.03 279.77,-338.08 271.52,-331.44 269.18,-338.03"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M173.79,-188.32C181.94,-216.23 205.67,-285.24 250,-323.13 256.76,-328.91 265.22,-333.14 273.62,-336.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="272.76,-339.61 283.35,-339.32 274.89,-332.94 272.76,-339.61"/>
 </g>
-<!-- proc~optional_value -->
+<!-- interface~caf_c_is_f_string -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node4" class="node">
-<title>proc~optional_value</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node4"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="356,-314 265,-314 265,-290 356,-290 356,-314"/>
-<text text-anchor="middle" x="310.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<title>interface~caf_c_is_f_string</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node4"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
+<polygon fill="#a7506f" stroke="#a7506f" points="359.5,-314.13 261.5,-314.13 261.5,-290.13 359.5,-290.13 359.5,-314.13"/>
+<text text-anchor="middle" x="310.5" y="-299.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
-<g id="interface~~caf_co_reduce~~CallsGraph_edge3" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M177.87,-192.18C190.45,-212.08 217.85,-251.78 250,-276 254.67,-279.52 259.9,-282.68 265.25,-285.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="263.8,-288.67 274.33,-289.86 266.84,-282.36 263.8,-288.67"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="interface~~caf_co_reduce~~CallsGraph_edge4" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M176.63,-188.36C188.12,-210.08 214.92,-255.5 250,-281.13 252.09,-282.66 254.3,-284.08 256.59,-285.41"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="255.25,-288.65 265.75,-290.06 258.42,-282.41 255.25,-288.65"/>
 </g>
-<!-- interface~caf_error_stop -->
+<!-- interface~caf_c_co_reduce -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node5" class="node">
-<title>interface~caf_error_stop</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node5"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="585,-212 497,-212 497,-188 585,-188 585,-212"/>
-<text text-anchor="middle" x="541" y="-197.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
+<title>interface~caf_c_co_reduce</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node5"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="360.5,-272.13 260.5,-272.13 260.5,-248.13 360.5,-248.13 360.5,-272.13"/>
+<text text-anchor="middle" x="310.5" y="-257.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
-<g id="interface~~caf_co_reduce~~CallsGraph_edge6" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M180.84,-192.15C194.73,-207.44 221.06,-232.92 250,-243 337.97,-273.63 448.37,-238.49 504.17,-215.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="505.71,-219.11 513.62,-212.06 503.04,-212.64 505.71,-219.11"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
+<g id="interface~~caf_co_reduce~~CallsGraph_edge3" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
+<path fill="none" stroke="#ff0000" d="M183.04,-188.27C197.96,-202.16 224.1,-224.82 250,-239.13 253.21,-240.9 256.6,-242.57 260.06,-244.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="258.76,-247.38 269.34,-248.01 261.46,-240.92 258.76,-247.38"/>
 </g>
-<!-- interface~caf_c_same_cfi_type -->
+<!-- interface~caf_c_elem_len -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node6" class="node">
-<title>interface~caf_c_same_cfi_type</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node6"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="371,-234 250,-234 250,-210 371,-210 371,-234"/>
-<text text-anchor="middle" x="310.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
+<title>interface~caf_c_elem_len</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node6"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
+<polygon fill="#a7506f" stroke="#a7506f" points="357.5,-230.13 263.5,-230.13 263.5,-206.13 357.5,-206.13 357.5,-230.13"/>
+<text text-anchor="middle" x="310.5" y="-215.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
-<g id="interface~~caf_co_reduce~~CallsGraph_edge4" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
-<path fill="none" stroke="#ff0000" d="M210.33,-192.04C225.74,-196.69 243.55,-202.07 259.79,-206.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="259.08,-210.42 269.66,-209.96 261.1,-203.72 259.08,-210.42"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<g id="interface~~caf_co_reduce~~CallsGraph_edge5" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
+<path fill="none" stroke="#ff0000" d="M210.33,-188.17C225.74,-192.82 243.55,-198.2 259.79,-203.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="259.08,-206.55 269.66,-206.09 261.1,-199.85 259.08,-206.55"/>
 </g>
-<!-- interface~caf_c_elem_len -->
+<!-- proc~optional_value -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node7" class="node">
-<title>interface~caf_c_elem_len</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node7"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
-<polygon fill="#a7506f" stroke="#a7506f" points="357.5,-192 263.5,-192 263.5,-168 357.5,-168 357.5,-192"/>
-<text text-anchor="middle" x="310.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
+<title>proc~optional_value</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node7"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="356,-188.13 265,-188.13 265,-164.13 356,-164.13 356,-188.13"/>
+<text text-anchor="middle" x="310.5" y="-173.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
-<g id="interface~~caf_co_reduce~~CallsGraph_edge5" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
-<path fill="none" stroke="#ff0000" d="M214.1,-180C226.41,-180 239.99,-180 252.95,-180"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="253.17,-183.5 263.17,-180 253.17,-176.5 253.17,-183.5"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
+<g id="interface~~caf_co_reduce~~CallsGraph_edge6" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M214.1,-176.13C226.92,-176.13 241.1,-176.13 254.53,-176.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="254.62,-179.63 264.62,-176.13 254.62,-172.63 254.62,-179.63"/>
 </g>
-<!-- interface~assert -->
+<!-- interface~caf_c_same_cfi_type -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node8" class="node">
-<title>interface~assert</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node8"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="337.5,-150 283.5,-150 283.5,-126 337.5,-126 337.5,-150"/>
-<text text-anchor="middle" x="310.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>interface~caf_c_same_cfi_type</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node8"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="371,-146.13 250,-146.13 250,-122.13 371,-122.13 371,-146.13"/>
+<text text-anchor="middle" x="310.5" y="-131.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge7" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#ff0000" d="M210.33,-167.96C230.28,-161.94 254.24,-154.7 273.61,-148.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="274.72,-152.17 283.28,-145.92 272.7,-145.46 274.72,-152.17"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
+<path fill="none" stroke="#ff0000" d="M210.33,-164.1C225.74,-159.44 243.55,-154.06 259.79,-149.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="261.1,-152.41 269.66,-146.17 259.08,-145.71 261.1,-152.41"/>
 </g>
-<!-- proc~get_c_ptr_character -->
+<!-- proc~get_c_ptr -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node9" class="node">
-<title>proc~get_c_ptr_character</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node9"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="369.5,-108 251.5,-108 251.5,-84 369.5,-84 369.5,-108"/>
-<text text-anchor="middle" x="310.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<title>proc~get_c_ptr</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node9"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="341,-104.13 280,-104.13 280,-80.13 341,-80.13 341,-104.13"/>
+<text text-anchor="middle" x="310.5" y="-89.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge8" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M183.04,-167.86C197.96,-153.97 224.1,-131.31 250,-117 253.21,-115.23 256.6,-113.56 260.06,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="261.46,-115.21 269.34,-108.12 258.76,-108.75 261.46,-115.21"/>
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M183.04,-163.99C197.96,-150.1 224.1,-127.44 250,-113.13 256.39,-109.6 263.49,-106.48 270.5,-103.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="271.69,-107.1 279.92,-100.42 269.32,-100.51 271.69,-107.1"/>
 </g>
-<!-- interface~caf_c_co_reduce -->
+<!-- proc~get_c_ptr_character -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node10" class="node">
-<title>interface~caf_c_co_reduce</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node10"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="360.5,-66 260.5,-66 260.5,-42 360.5,-42 360.5,-66"/>
-<text text-anchor="middle" x="310.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
+<title>proc~get_c_ptr_character</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node10"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="369.5,-62.13 251.5,-62.13 251.5,-38.13 369.5,-38.13 369.5,-62.13"/>
+<text text-anchor="middle" x="310.5" y="-47.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge9" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M176.63,-167.77C188.12,-146.05 214.92,-100.63 250,-75 252.09,-73.47 254.3,-72.05 256.59,-70.72"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="258.42,-73.72 265.75,-66.07 255.25,-67.48 258.42,-73.72"/>
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0000" d="M176.63,-163.9C188.12,-142.18 214.92,-96.76 250,-71.13 252.09,-69.6 254.3,-68.18 256.59,-66.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="258.42,-69.85 265.75,-62.2 255.25,-63.61 258.42,-69.85"/>
 </g>
-<!-- interface~caf_c_is_f_string -->
+<!-- interface~caf_error_stop -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node11" class="node">
-<title>interface~caf_c_is_f_string</title>
-<g id="a_interface~~caf_co_reduce~~CallsGraph_node11"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
-<polygon fill="#a7506f" stroke="#a7506f" points="359.5,-24 261.5,-24 261.5,0 359.5,0 359.5,-24"/>
-<text text-anchor="middle" x="310.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
+<title>interface~caf_error_stop</title>
+<g id="a_interface~~caf_co_reduce~~CallsGraph_node11"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="585,-42.13 497,-42.13 497,-18.13 585,-18.13 585,-42.13"/>
+<text text-anchor="middle" x="541" y="-27.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge10" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M173.79,-167.81C181.94,-139.9 205.67,-70.89 250,-33 251.53,-31.69 253.15,-30.46 254.83,-29.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="256.82,-32.2 263.71,-24.15 253.31,-26.15 256.82,-32.2"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M172.81,-163.72C179.06,-134.05 199.41,-59.29 250,-29.13 324.36,15.19 429.64,-0.47 490.77,-15.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="490,-18.95 500.56,-18.04 491.74,-12.17 490,-18.95"/>
 </g>
 <!-- proc~assert -->
 <g id="interface~~caf_co_reduce~~CallsGraph_node12" class="node">
 <title>proc~assert</title>
 <g id="a_interface~~caf_co_reduce~~CallsGraph_node12"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="461,-192 407,-192 407,-168 461,-168 461,-192"/>
-<text text-anchor="middle" x="434" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="461,-209.13 407,-209.13 407,-185.13 461,-185.13 461,-209.13"/>
+<text text-anchor="middle" x="434" y="-194.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
 <!-- interface~assert&#45;&gt;proc~assert -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge11" class="edge">
 <title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M337.56,-147.01C355.02,-153.04 378.23,-161.07 397.38,-167.69"/>
-<polygon fill="#00a9ff" stroke="#00a9ff" points="396.38,-171.05 406.98,-171 398.67,-164.43 396.38,-171.05"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M337.79,-339.49C349.07,-336.41 361.75,-331.35 371,-323.13 402.54,-295.11 419.77,-247.41 427.62,-219.43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="431.09,-219.98 430.27,-209.42 424.33,-218.19 431.09,-219.98"/>
 </g>
 <!-- proc~assert&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_co_reduce~~CallsGraph_edge12" class="edge">
 <title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M461.23,-185C469.08,-186.49 477.99,-188.19 486.93,-189.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="486.49,-193.37 496.97,-191.8 487.8,-186.49 486.49,-193.37"/>
+<path fill="none" stroke="#ff0000" d="M442.55,-185.12C460.25,-156.97 504.59,-86.46 526.83,-51.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="529.87,-52.81 532.23,-42.48 523.95,-49.09 529.87,-52.81"/>
 </g>
 </g>
 </svg>
@@ -537,7 +537,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~13"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~4"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
@@ -549,19 +549,19 @@ <h3>Arguments</h3>
   <td><strong>operation</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~7"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image~3"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~7"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~4"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~6"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~4"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -586,7 +586,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_co_sum.html b/interface/caf_co_sum.html
index 65e3a0c3..15808f3e 100644
--- a/interface/caf_co_sum.html
+++ b/interface/caf_co_sum.html
@@ -177,48 +177,48 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M168.09,-87C182.45,-95.97 203.01,-108.15 222,-117 227.92,-119.76 234.32,-122.4 240.63,-124.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="239.79,-128.24 250.38,-128.42 242.21,-121.67 239.79,-128.24"/>
 </g>
-<!-- interface~caf_c_co_sum -->
+<!-- proc~optional_value -->
 <g id="interface~~caf_co_sum~~CallsGraph_node4" class="node">
-<title>interface~caf_c_co_sum</title>
-<g id="a_interface~~caf_co_sum~~CallsGraph_node4"><a xlink:href=".././interface/caf_c_co_sum.html" xlink:title="caf_c_co_sum">
-<polygon fill="#a7506f" stroke="#a7506f" points="324,-108 238,-108 238,-84 324,-84 324,-108"/>
-<text text-anchor="middle" x="281" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_sum</text>
+<title>proc~optional_value</title>
+<g id="a_interface~~caf_co_sum~~CallsGraph_node4"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="326.5,-108 235.5,-108 235.5,-84 326.5,-84 326.5,-108"/>
+<text text-anchor="middle" x="281" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum -->
+<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
 <g id="interface~~caf_co_sum~~CallsGraph_edge3" class="edge">
-<title>proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum</title>
-<path fill="none" stroke="#ff0000" d="M186.2,-80.91C199.06,-82.98 213.76,-85.34 227.65,-87.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="227.16,-91.04 237.59,-89.18 228.27,-84.13 227.16,-91.04"/>
+<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M186.2,-80.91C198.33,-82.86 212.11,-85.08 225.3,-87.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="224.8,-90.66 235.23,-88.8 225.91,-83.75 224.8,-90.66"/>
 </g>
-<!-- proc~optional_value -->
+<!-- proc~get_c_ptr_character -->
 <g id="interface~~caf_co_sum~~CallsGraph_node5" class="node">
-<title>proc~optional_value</title>
-<g id="a_interface~~caf_co_sum~~CallsGraph_node5"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="326.5,-66 235.5,-66 235.5,-42 326.5,-42 326.5,-66"/>
-<text text-anchor="middle" x="281" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<title>proc~get_c_ptr_character</title>
+<g id="a_interface~~caf_co_sum~~CallsGraph_node5"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="340,-66 222,-66 222,-42 340,-42 340,-66"/>
+<text text-anchor="middle" x="281" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
+<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
 <g id="interface~~caf_co_sum~~CallsGraph_edge4" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M186.2,-69.09C198.33,-67.14 212.11,-64.92 225.3,-62.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="225.91,-66.25 235.23,-61.2 224.8,-59.34 225.91,-66.25"/>
+<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0000" d="M186.2,-69.09C194.2,-67.81 202.91,-66.41 211.69,-64.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="212.29,-68.44 221.6,-63.4 211.18,-61.53 212.29,-68.44"/>
 </g>
-<!-- proc~get_c_ptr_character -->
+<!-- interface~caf_c_co_sum -->
 <g id="interface~~caf_co_sum~~CallsGraph_node6" class="node">
-<title>proc~get_c_ptr_character</title>
-<g id="a_interface~~caf_co_sum~~CallsGraph_node6"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="340,-24 222,-24 222,0 340,0 340,-24"/>
-<text text-anchor="middle" x="281" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<title>interface~caf_c_co_sum</title>
+<g id="a_interface~~caf_co_sum~~CallsGraph_node6"><a xlink:href=".././interface/caf_c_co_sum.html" xlink:title="caf_c_co_sum">
+<polygon fill="#a7506f" stroke="#a7506f" points="324,-24 238,-24 238,0 324,0 324,-24"/>
+<text text-anchor="middle" x="281" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_sum</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
+<!-- proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum -->
 <g id="interface~~caf_co_sum~~CallsGraph_edge5" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
+<title>proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum</title>
 <path fill="none" stroke="#ff0000" d="M168.09,-63C182.45,-54.03 203.01,-41.85 222,-33 225.88,-31.19 229.95,-29.44 234.08,-27.76"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="235.66,-30.91 243.71,-24.02 233.12,-24.38 235.66,-30.91"/>
 </g>
@@ -296,25 +296,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~14"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~5"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~8"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image~4"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~8"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~5"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~7"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~5"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -339,7 +339,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_decaffeinate.html b/interface/caf_decaffeinate.html
index 2b555677..5605c749 100644
--- a/interface/caf_decaffeinate.html
+++ b/interface/caf_decaffeinate.html
@@ -276,7 +276,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_end_team.html b/interface/caf_end_team.html
index de60097c..32932803 100644
--- a/interface/caf_end_team.html
+++ b/interface/caf_end_team.html
@@ -250,7 +250,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_error_stop.html b/interface/caf_error_stop.html
index b7905604..81d7d1cc 100644
--- a/interface/caf_error_stop.html
+++ b/interface/caf_error_stop.html
@@ -142,199 +142,199 @@ <h3 class="panel-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: interface~~caf_error_stop~~CalledByGraph Pages: 1 -->
-<svg id="interfacecaf_error_stopCalledByGraph" width="641pt" height="175pt"
- viewBox="0.00 0.00 641.00 174.96" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="interface~~caf_error_stop~~CalledByGraph" class="graph" transform="scale(1.26 1.26) rotate(0) translate(4 216)">
+<svg id="interfacecaf_error_stopCalledByGraph" width="641pt" height="183pt"
+ viewBox="0.00 0.00 641.00 182.92" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="interface~~caf_error_stop~~CalledByGraph" class="graph" transform="scale(1.26 1.26) rotate(0) translate(4 226)">
 <title>interface~~caf_error_stop~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-216 802,-216 802,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-226 802,-226 802,4 -4,4"/>
 <!-- interface~caf_error_stop -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node1" class="node">
 <title>interface~caf_error_stop</title>
-<polygon fill="none" stroke="black" points="798,-126 710,-126 710,-102 798,-102 798,-126"/>
-<text text-anchor="middle" x="754" y="-111.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_error_stop</text>
+<polygon fill="none" stroke="black" points="798,-124 710,-124 710,-100 798,-100 798,-124"/>
+<text text-anchor="middle" x="754" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_error_stop</text>
 </g>
-<!-- proc~assert -->
+<!-- proc~as_character -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node2" class="node">
-<title>proc~assert</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node2"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="660,-146 606,-146 606,-122 660,-122 660,-146"/>
-<text text-anchor="middle" x="633" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>proc~as_character</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node2"><a xlink:href=".././proc/as_character.html" xlink:title="as_character">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="674,-222 592,-222 592,-198 674,-198 674,-222"/>
+<text text-anchor="middle" x="633" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
 </a>
 </g>
 </g>
-<!-- proc~assert&#45;&gt;interface~caf_error_stop -->
+<!-- proc~as_character&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_error_stop~~CalledByGraph_edge1" class="edge">
-<title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M660.12,-129.61C671.79,-127.65 685.99,-125.26 699.75,-122.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="700.36,-126.4 709.64,-121.29 699.2,-119.49 700.36,-126.4"/>
+<title>proc~as_character&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M653.97,-197.92C660.51,-193.73 667.71,-188.86 674,-184 695.38,-167.48 718,-146.46 733.53,-131.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="736.26,-133.62 740.96,-124.13 731.37,-128.62 736.26,-133.62"/>
 </g>
-<!-- proc~construct -->
+<!-- proc~caf_co_reduce -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node3" class="node">
-<title>proc~construct</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node3"><a xlink:href=".././proc/construct.html" xlink:title="construct">
-<polygon fill="#777777" stroke="#777777" points="664,-66 602,-66 602,-42 664,-42 664,-66"/>
-<text text-anchor="middle" x="633" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">construct</text>
+<title>proc~caf_co_reduce</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#d9534f" stroke="#d9534f" points="438,-123 349,-123 349,-99 438,-99 438,-123"/>
+<text text-anchor="middle" x="393.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~construct&#45;&gt;interface~caf_error_stop -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_error_stop~~CalledByGraph_edge3" class="edge">
-<title>proc~construct&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M658.08,-66.14C675.82,-75.09 700.17,-87.36 719.77,-97.24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="718.45,-100.5 728.95,-101.88 721.6,-94.25 718.45,-100.5"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M438.23,-112.3C449.86,-112.59 462.4,-112.85 474,-113 562.88,-114.12 585.11,-113.56 674,-113 682.38,-112.95 691.26,-112.86 699.92,-112.76"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="699.99,-116.26 709.95,-112.64 699.91,-109.26 699.99,-116.26"/>
+</g>
+<!-- interface~assert -->
+<g id="interface~~caf_error_stop~~CalledByGraph_node8" class="node">
+<title>interface~assert</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node8"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="542,-104 488,-104 488,-80 542,-80 542,-104"/>
+<text text-anchor="middle" x="515" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+</a>
+</g>
+</g>
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<g id="interface~~caf_error_stop~~CalledByGraph_edge12" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M438.32,-104.03C451.33,-101.96 465.43,-99.72 477.89,-97.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="478.59,-101.17 487.91,-96.15 477.49,-94.26 478.59,-101.17"/>
 </g>
 <!-- proc~caf_co_max -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node4" class="node">
 <title>proc~caf_co_max</title>
 <g id="a_interface~~caf_error_stop~~CalledByGraph_node4"><a xlink:href=".././proc/caf_co_max.html" xlink:title="caf_co_max">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-185 112,-185 112,-161 188,-161 188,-185"/>
-<text text-anchor="middle" x="150" y="-170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-143 112,-143 112,-119 188,-119 188,-143"/>
+<text text-anchor="middle" x="150" y="-128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;interface~caf_error_stop -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge2" class="edge">
+<g id="interface~~caf_error_stop~~CalledByGraph_edge4" class="edge">
 <title>proc~caf_co_max&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M188.35,-182.84C235.54,-194.39 319.45,-212 392.5,-212 392.5,-212 392.5,-212 516,-212 588.22,-212 608.74,-204.95 674,-174 696.06,-163.54 717.91,-146.27 733.02,-132.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="735.62,-135.31 740.68,-126 730.92,-130.12 735.62,-135.31"/>
+<path fill="none" stroke="#ff0000" d="M188.35,-140.84C235.54,-152.39 319.45,-170 392.5,-170 392.5,-170 392.5,-170 516,-170 587.58,-170 667.93,-144.73 714.28,-127.55"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="715.52,-130.82 723.64,-124.02 713.04,-124.27 715.52,-130.82"/>
 </g>
 <!-- interface~caf_co_reduce -->
-<g id="interface~~caf_error_stop~~CalledByGraph_node10" class="node">
+<g id="interface~~caf_error_stop~~CalledByGraph_node11" class="node">
 <title>interface~caf_co_reduce</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node10"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="313,-165 224,-165 224,-141 313,-141 313,-165"/>
-<text text-anchor="middle" x="268.5" y="-150.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node11"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="313,-123 224,-123 224,-99 313,-99 313,-123"/>
+<text text-anchor="middle" x="268.5" y="-108.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge12" class="edge">
+<g id="interface~~caf_error_stop~~CalledByGraph_edge13" class="edge">
 <title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#00ff66" d="M188.18,-166.62C196.32,-165.22 205.09,-163.71 213.73,-162.23"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="214.5,-165.65 223.76,-160.51 213.31,-158.75 214.5,-165.65"/>
+<path fill="none" stroke="#0066ff" d="M188.18,-124.62C196.32,-123.22 205.09,-121.71 213.73,-120.23"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="214.5,-123.65 223.76,-118.51 213.31,-116.75 214.5,-123.65"/>
 </g>
-<!-- proc~caf_co_min -->
+<!-- proc~assert -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node5" class="node">
-<title>proc~caf_co_min</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node5"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
-<polygon fill="#d9534f" stroke="#d9534f" points="186.5,-124 113.5,-124 113.5,-100 186.5,-100 186.5,-124"/>
-<text text-anchor="middle" x="150" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
+<title>proc~assert</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node5"><a xlink:href=".././proc/assert.html" xlink:title="assert">
+<polygon fill="#d9534f" stroke="#d9534f" points="660,-104 606,-104 606,-80 660,-80 660,-104"/>
+<text text-anchor="middle" x="633" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_error_stop -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge4" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M186.54,-107.69C233.58,-102.36 319.13,-94 392.5,-94 392.5,-94 392.5,-94 516,-94 579.28,-94 651.73,-101.17 699.7,-106.92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="699.49,-110.42 709.85,-108.16 700.34,-103.47 699.49,-110.42"/>
-</g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge13" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#00ff66" d="M185.32,-124.08C197.3,-128.3 210.92,-133.09 223.57,-137.54"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="222.42,-140.85 233.02,-140.87 224.75,-134.24 222.42,-140.85"/>
+<!-- proc~assert&#45;&gt;interface~caf_error_stop -->
+<g id="interface~~caf_error_stop~~CalledByGraph_edge2" class="edge">
+<title>proc~assert&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M660.12,-96.39C671.79,-98.35 685.99,-100.74 699.75,-103.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="699.2,-106.51 709.64,-104.71 700.36,-99.6 699.2,-106.51"/>
 </g>
-<!-- proc~caf_co_reduce -->
+<!-- proc~caf_co_min -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node6" class="node">
-<title>proc~caf_co_reduce</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node6"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="438,-165 349,-165 349,-141 438,-141 438,-165"/>
-<text text-anchor="middle" x="393.5" y="-150.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<title>proc~caf_co_min</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node6"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
+<polygon fill="#d9534f" stroke="#d9534f" points="186.5,-82 113.5,-82 113.5,-58 186.5,-58 186.5,-82"/>
+<text text-anchor="middle" x="150" y="-67.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_error_stop~~CalledByGraph_edge5" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M438.35,-159.83C494.05,-167.04 592.68,-174.85 674,-155 692.9,-150.39 712.31,-140.4 727.16,-131.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="729.16,-134.32 735.78,-126.04 725.44,-128.38 729.16,-134.32"/>
-</g>
-<!-- interface~assert -->
-<g id="interface~~caf_error_stop~~CalledByGraph_node11" class="node">
-<title>interface~assert</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node11"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="542,-146 488,-146 488,-122 542,-122 542,-146"/>
-<text text-anchor="middle" x="515" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
-</a>
-</g>
+<title>proc~caf_co_min&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M186.54,-65.69C233.58,-60.36 319.13,-52 392.5,-52 392.5,-52 392.5,-52 516,-52 586.73,-52 606.41,-50.15 674,-71 692.1,-76.58 710.97,-86.22 725.74,-94.74"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="723.97,-97.76 734.35,-99.86 727.54,-91.75 723.97,-97.76"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
 <g id="interface~~caf_error_stop~~CalledByGraph_edge14" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#0066ff" d="M438.32,-146.03C451.33,-143.96 465.43,-141.72 477.89,-139.74"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="478.59,-143.17 487.91,-138.15 477.49,-136.26 478.59,-143.17"/>
+<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
+<path fill="none" stroke="#0066ff" d="M185.32,-82.08C197.3,-86.3 210.92,-91.09 223.57,-95.54"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="222.42,-98.85 233.02,-98.87 224.75,-92.24 222.42,-98.85"/>
 </g>
-<!-- proc~as_character -->
+<!-- proc~construct -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node7" class="node">
-<title>proc~as_character</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node7"><a xlink:href=".././proc/as_character.html" xlink:title="as_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="674,-24 592,-24 592,0 674,0 674,-24"/>
-<text text-anchor="middle" x="633" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
+<title>proc~construct</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node7"><a xlink:href=".././proc/construct.html" xlink:title="construct">
+<polygon fill="#777777" stroke="#777777" points="664,-24 602,-24 602,0 664,0 664,-24"/>
+<text text-anchor="middle" x="633" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">construct</text>
 </a>
 </g>
 </g>
-<!-- proc~as_character&#45;&gt;interface~caf_error_stop -->
+<!-- proc~construct&#45;&gt;interface~caf_error_stop -->
 <g id="interface~~caf_error_stop~~CalledByGraph_edge6" class="edge">
-<title>proc~as_character&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M660.11,-24.18C664.9,-26.84 669.72,-29.81 674,-33 698.09,-50.96 721.6,-76.38 736.62,-93.93"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="734.16,-96.44 743.27,-101.84 739.52,-91.94 734.16,-96.44"/>
+<title>proc~construct&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M654.01,-24.03C660.55,-28.21 667.74,-33.1 674,-38 695.67,-54.97 718.4,-76.75 733.89,-92.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="731.77,-95.11 741.28,-99.77 736.75,-90.19 731.77,-95.11"/>
 </g>
-<!-- interface~caf_co_max -->
-<g id="interface~~caf_error_stop~~CalledByGraph_node8" class="node">
-<title>interface~caf_co_max</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node8"><a xlink:href=".././interface/caf_co_max.html" xlink:title="caf_co_max">
-<polygon fill="#a7506f" stroke="#a7506f" points="76,-185 0,-185 0,-161 76,-161 76,-185"/>
-<text text-anchor="middle" x="38" y="-170.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+<!-- interface~assert&#45;&gt;proc~assert -->
+<g id="interface~~caf_error_stop~~CalledByGraph_edge10" class="edge">
+<title>interface~assert&#45;&gt;proc~assert</title>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M542.03,-92C557.74,-92 578,-92 595.32,-92"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="595.65,-95.5 605.65,-92 595.65,-88.5 595.65,-95.5"/>
+</g>
+<!-- interface~as_character -->
+<g id="interface~~caf_error_stop~~CalledByGraph_node9" class="node">
+<title>interface~as_character</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node9"><a xlink:href=".././interface/as_character.html" xlink:title="as_character">
+<polygon fill="#a7506f" stroke="#a7506f" points="556,-222 474,-222 474,-198 556,-198 556,-222"/>
+<text text-anchor="middle" x="515" y="-207.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_max&#45;&gt;proc~caf_co_max -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge8" class="edge">
-<title>interface~caf_co_max&#45;&gt;proc~caf_co_max</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M76.24,-173C84.39,-173 93.13,-173 101.62,-173"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="101.8,-176.5 111.8,-173 101.8,-169.5 101.8,-176.5"/>
+<!-- interface~as_character&#45;&gt;proc~as_character -->
+<g id="interface~~caf_error_stop~~CalledByGraph_edge7" class="edge">
+<title>interface~as_character&#45;&gt;proc~as_character</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M556.25,-210C564.43,-210 573.14,-210 581.63,-210"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="581.83,-213.5 591.83,-210 581.83,-206.5 581.83,-213.5"/>
 </g>
 <!-- interface~caf_co_min -->
-<g id="interface~~caf_error_stop~~CalledByGraph_node9" class="node">
+<g id="interface~~caf_error_stop~~CalledByGraph_node10" class="node">
 <title>interface~caf_co_min</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node9"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
-<polygon fill="#a7506f" stroke="#a7506f" points="74.5,-124 1.5,-124 1.5,-100 74.5,-100 74.5,-124"/>
-<text text-anchor="middle" x="38" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node10"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
+<polygon fill="#a7506f" stroke="#a7506f" points="74.5,-82 1.5,-82 1.5,-58 74.5,-58 74.5,-82"/>
+<text text-anchor="middle" x="38" y="-67.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_min&#45;&gt;proc~caf_co_min -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge9" class="edge">
+<g id="interface~~caf_error_stop~~CalledByGraph_edge11" class="edge">
 <title>interface~caf_co_min&#45;&gt;proc~caf_co_min</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M74.71,-112C83.84,-112 93.77,-112 103.31,-112"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="103.47,-115.5 113.47,-112 103.47,-108.5 103.47,-115.5"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M74.71,-70C83.84,-70 93.77,-70 103.31,-70"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="103.47,-73.5 113.47,-70 103.47,-66.5 103.47,-73.5"/>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge10" class="edge">
+<g id="interface~~caf_error_stop~~CalledByGraph_edge8" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M313.21,-153C321.46,-153 330.17,-153 338.69,-153"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="338.93,-156.5 348.93,-153 338.93,-149.5 338.93,-156.5"/>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M313.21,-111C321.46,-111 330.17,-111 338.69,-111"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="338.93,-114.5 348.93,-111 338.93,-107.5 338.93,-114.5"/>
 </g>
-<!-- interface~assert&#45;&gt;proc~assert -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge7" class="edge">
-<title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M542.03,-134C557.74,-134 578,-134 595.32,-134"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="595.65,-137.5 605.65,-134 595.65,-130.5 595.65,-137.5"/>
-</g>
-<!-- interface~as_character -->
+<!-- interface~caf_co_max -->
 <g id="interface~~caf_error_stop~~CalledByGraph_node12" class="node">
-<title>interface~as_character</title>
-<g id="a_interface~~caf_error_stop~~CalledByGraph_node12"><a xlink:href=".././interface/as_character.html" xlink:title="as_character">
-<polygon fill="#a7506f" stroke="#a7506f" points="556,-24 474,-24 474,0 556,0 556,-24"/>
-<text text-anchor="middle" x="515" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
+<title>interface~caf_co_max</title>
+<g id="a_interface~~caf_error_stop~~CalledByGraph_node12"><a xlink:href=".././interface/caf_co_max.html" xlink:title="caf_co_max">
+<polygon fill="#a7506f" stroke="#a7506f" points="76,-143 0,-143 0,-119 76,-119 76,-143"/>
+<text text-anchor="middle" x="38" y="-128.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
 </a>
 </g>
 </g>
-<!-- interface~as_character&#45;&gt;proc~as_character -->
-<g id="interface~~caf_error_stop~~CalledByGraph_edge11" class="edge">
-<title>interface~as_character&#45;&gt;proc~as_character</title>
-<path fill="none" stroke="#ff00ff" stroke-dasharray="5,2" d="M556.25,-12C564.43,-12 573.14,-12 581.63,-12"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="581.83,-15.5 591.83,-12 581.83,-8.5 581.83,-15.5"/>
+<!-- interface~caf_co_max&#45;&gt;proc~caf_co_max -->
+<g id="interface~~caf_error_stop~~CalledByGraph_edge9" class="edge">
+<title>interface~caf_co_max&#45;&gt;proc~caf_co_max</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M76.24,-131C84.39,-131 93.13,-131 101.62,-131"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="101.8,-134.5 111.8,-131 101.8,-127.5 101.8,-134.5"/>
 </g>
 </g>
 </svg>
@@ -477,7 +477,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_form_team.html b/interface/caf_form_team.html
index d06817b9..b19765e9 100644
--- a/interface/caf_form_team.html
+++ b/interface/caf_form_team.html
@@ -254,13 +254,13 @@ <h3>Arguments</h3>
   <td><strong>new_index</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~3"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~6"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td></td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~2"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~6"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td></td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -285,7 +285,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_num_images.html b/interface/caf_num_images.html
index 6ef5a11d..c713da93 100644
--- a/interface/caf_num_images.html
+++ b/interface/caf_num_images.html
@@ -209,7 +209,7 @@ <h4>Return Value <small>integer</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_stop.html b/interface/caf_stop.html
index 3812ae11..6ff45c85 100644
--- a/interface/caf_stop.html
+++ b/interface/caf_stop.html
@@ -91,11 +91,11 @@ <h1>caf_stop
     data-placement="bottom" data-html="true"
     title="<p> 0.5% of total for procedures.</p>Including implementation: 8 statements,  0.5% of total for procedures.">8 statements</a>
      </li> 
-    <li><i class="fa fa-code"></i><a href="../src/program_termination_m.f90"> Source File</a></li>
+    <li><i class="fa fa-code"></i><a href="../src/normal_termination_m.f90"> Source File</a></li>
   </ul>
   <ol class="breadcrumb in-well text-right">
-     <li><a href='../sourcefile/program_termination_m.f90.html'>program_termination_m.f90</a></li>
-     <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
+     <li><a href='../sourcefile/normal_termination_m.f90.html'>normal_termination_m.f90</a></li>
+     <li><a href='../module/normal_termination_m.html'>normal_termination_m</a></li>
      <li class="active">caf_stop</li>
   </ol>
 </div>
@@ -174,7 +174,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
       <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-caf_stop_integer"></span><h3>private module subroutine caf_stop_integer(stop_code)</h3></div>
   <div class="panel-body">
-       <p>synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status</p>
+       <p>synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status</p>
     
 <h4>Arguments</h4>      <table class="table table-striped varlist">
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
@@ -209,7 +209,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_stop~2.html b/interface/caf_stop~2.html
index fa65b6c5..550d59c4 100644
--- a/interface/caf_stop~2.html
+++ b/interface/caf_stop~2.html
@@ -91,11 +91,11 @@ <h1>caf_stop
     data-placement="bottom" data-html="true"
     title="<p> 0.5% of total for procedures.</p>Including implementation: 8 statements,  0.5% of total for procedures.">8 statements</a>
      </li> 
-    <li><i class="fa fa-code"></i><a href="../src/normal_termination_m.f90"> Source File</a></li>
+    <li><i class="fa fa-code"></i><a href="../src/program_termination_m.f90"> Source File</a></li>
   </ul>
   <ol class="breadcrumb in-well text-right">
-     <li><a href='../sourcefile/normal_termination_m.f90.html'>normal_termination_m.f90</a></li>
-     <li><a href='../module/normal_termination_m.html'>normal_termination_m</a></li>
+     <li><a href='../sourcefile/program_termination_m.f90.html'>program_termination_m.f90</a></li>
+     <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
      <li class="active">caf_stop</li>
   </ol>
 </div>
@@ -174,7 +174,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
       <div class="panel panel-default">
   <div class="panel-heading codesum"><span class="anchor" id="proc-caf_stop_integer~2"></span><h3>private module subroutine caf_stop_integer(stop_code)</h3></div>
   <div class="panel-body">
-       <p>synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status</p>
+       <p>synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status</p>
     
 <h4>Arguments</h4>      <table class="table table-striped varlist">
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
@@ -209,7 +209,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_sync_all.html b/interface/caf_sync_all.html
index 74d1f3e0..0afb67d2 100644
--- a/interface/caf_sync_all.html
+++ b/interface/caf_sync_all.html
@@ -380,7 +380,7 @@ <h3>Arguments</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/caf_this_image.html b/interface/caf_this_image.html
index d25eabb6..470dade0 100644
--- a/interface/caf_this_image.html
+++ b/interface/caf_this_image.html
@@ -250,7 +250,7 @@ <h4>Return Value <small>integer</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/interface/intrinsic_array_t.html b/interface/intrinsic_array_t.html
index 1faef118..a956f053 100644
--- a/interface/intrinsic_array_t.html
+++ b/interface/intrinsic_array_t.html
@@ -186,7 +186,7 @@ <h4>Return Value <small>type(<a href='../type/intrinsic_array_t.html'>intrinsic_
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/lists/absint.html b/lists/absint.html
index 5a6309db..6f9f0353 100644
--- a/lists/absint.html
+++ b/lists/absint.html
@@ -110,7 +110,7 @@ <h1>Abstract Interfaces</h1>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/lists/files.html b/lists/files.html
index 40528bad..68431989 100644
--- a/lists/files.html
+++ b/lists/files.html
@@ -118,116 +118,83 @@ <h1>Source Files</h1>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: file~~graph~~FileGraph Pages: 1 -->
-<svg id="filegraphFileGraph" width="559pt" height="553pt"
- viewBox="0.00 0.00 559.00 553.21" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="file~~graph~~FileGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 549.21)">
+<svg id="filegraphFileGraph" width="559pt" height="576pt"
+ viewBox="0.00 0.00 559.00 576.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="file~~graph~~FileGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 572)">
 <title>file~~graph~~FileGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-549.21 555,-549.21 555,4 -4,4"/>
-<!-- sourcefile~collective_subroutines_m.f90 -->
-<g id="file~~graph~~FileGraph_node1" class="node">
-<title>sourcefile~collective_subroutines_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node1"><a xlink:href=".././sourcefile/collective_subroutines_m.f90.html" xlink:title="collective_subroutines_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378.5,-461.21 212.5,-461.21 212.5,-437.21 378.5,-437.21 378.5,-461.21"/>
-<text text-anchor="middle" x="295.5" y="-446.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m.f90</text>
-</a>
-</g>
-</g>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-572 555,-572 555,4 -4,4"/>
 <!-- sourcefile~co_min_s.f90 -->
-<g id="file~~graph~~FileGraph_node5" class="node">
+<g id="file~~graph~~FileGraph_node1" class="node">
 <title>sourcefile~co_min_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node5"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-461.21 45,-461.21 45,-437.21 127,-437.21 127,-461.21"/>
-<text text-anchor="middle" x="86" y="-446.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
+<g id="a_file~~graph~~FileGraph_node1"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="127,-442 45,-442 45,-418 127,-418 127,-442"/>
+<text text-anchor="middle" x="86" y="-427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
-<g id="file~~graph~~FileGraph_edge5" class="edge">
-<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
-<path fill="none" stroke="#ffeb00" d="M212.49,-449.21C187.05,-449.21 159.78,-449.21 137.18,-449.21"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="137.15,-445.71 127.15,-449.21 137.15,-452.71 137.15,-445.71"/>
-</g>
 <!-- sourcefile~co_max_s.f90 -->
-<g id="file~~graph~~FileGraph_node9" class="node">
+<g id="file~~graph~~FileGraph_node2" class="node">
 <title>sourcefile~co_max_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node9"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="128.5,-419.21 43.5,-419.21 43.5,-395.21 128.5,-395.21 128.5,-419.21"/>
-<text text-anchor="middle" x="86" y="-404.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
+<g id="a_file~~graph~~FileGraph_node2"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="128.5,-484 43.5,-484 43.5,-460 128.5,-460 128.5,-484"/>
+<text text-anchor="middle" x="86" y="-469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
-<g id="file~~graph~~FileGraph_edge13" class="edge">
-<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
-<path fill="none" stroke="#27ff00" d="M235.04,-437.17C204.61,-431.01 167.94,-423.59 138.7,-417.67"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="139.19,-414.2 128.69,-415.64 137.8,-421.06 139.19,-414.2"/>
-</g>
-<!-- sourcefile~co_sum_s.f90 -->
-<g id="file~~graph~~FileGraph_node13" class="node">
-<title>sourcefile~co_sum_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node13"><a xlink:href=".././sourcefile/co_sum_s.f90.html" xlink:title="co_sum_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="128,-545.21 44,-545.21 44,-521.21 128,-521.21 128,-545.21"/>
-<text text-anchor="middle" x="86" y="-530.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s.f90</text>
+<!-- sourcefile~team_type_s.f90 -->
+<g id="file~~graph~~FileGraph_node3" class="node">
+<title>sourcefile~team_type_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node3"><a xlink:href=".././sourcefile/team_type_s.f90.html" xlink:title="team_type_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="345.5,-24 245.5,-24 245.5,0 345.5,0 345.5,-24"/>
+<text text-anchor="middle" x="295.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_sum_s.f90 -->
-<g id="file~~graph~~FileGraph_edge21" class="edge">
-<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_sum_s.f90</title>
-<path fill="none" stroke="#00ffc4" d="M226.71,-461.24C220.16,-463.7 213.8,-466.65 208,-470.21 187.04,-483.06 192.93,-499.31 172,-512.21 161.89,-518.43 150.04,-522.82 138.44,-525.9"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="137.29,-522.58 128.37,-528.29 138.91,-529.39 137.29,-522.58"/>
-</g>
-<!-- sourcefile~co_reduce_s.f90 -->
-<g id="file~~graph~~FileGraph_node16" class="node">
-<title>sourcefile~co_reduce_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node16"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135,-377.21 37,-377.21 37,-353.21 135,-353.21 135,-377.21"/>
-<text text-anchor="middle" x="86" y="-362.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+<!-- sourcefile~caffeinate_decaffeinate_m.f90 -->
+<g id="file~~graph~~FileGraph_node4" class="node">
+<title>sourcefile~caffeinate_decaffeinate_m.f90</title>
+<g id="a_file~~graph~~FileGraph_node4"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_m.f90.html" xlink:title="caffeinate_decaffeinate_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="383,-104 208,-104 208,-80 383,-80 383,-104"/>
+<text text-anchor="middle" x="295.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
-<g id="file~~graph~~FileGraph_edge28" class="edge">
-<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
-<path fill="none" stroke="#0089ff" d="M226.71,-437.17C220.16,-434.71 213.8,-431.76 208,-428.21 187.04,-415.35 192.93,-399.1 172,-386.21 163.84,-381.18 154.53,-377.35 145.15,-374.44"/>
-<polygon fill="#0089ff" stroke="#0089ff" points="145.96,-371.03 135.39,-371.73 144.08,-377.78 145.96,-371.03"/>
-</g>
 <!-- sourcefile~caffeine_m.f90 -->
-<g id="file~~graph~~FileGraph_node21" class="node">
+<g id="file~~graph~~FileGraph_node5" class="node">
 <title>sourcefile~caffeine_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node21"><a xlink:href=".././sourcefile/caffeine_m.f90.html" xlink:title="caffeine_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="132,-41.21 40,-41.21 40,-17.21 132,-17.21 132,-41.21"/>
-<text text-anchor="middle" x="86" y="-26.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m.f90</text>
+<g id="a_file~~graph~~FileGraph_node5"><a xlink:href=".././sourcefile/caffeine_m.f90.html" xlink:title="caffeine_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="132,-64 40,-64 40,-40 132,-40 132,-64"/>
+<text text-anchor="middle" x="86" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
-<g id="file~~graph~~FileGraph_edge41" class="edge">
-<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
-<path fill="none" stroke="#9c00ff" d="M218.38,-437.2C214.55,-434.68 211.04,-431.71 208,-428.21 152.76,-364.42 227.11,-114.1 172,-50.21 164.32,-41.3 153.52,-35.86 142.19,-32.61"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="142.7,-29.13 132.16,-30.27 141.11,-35.95 142.7,-29.13"/>
+<!-- sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
+<g id="file~~graph~~FileGraph_edge16" class="edge">
+<title>sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
+<path fill="none" stroke="#ffeb00" d="M232.24,-80C203.54,-74.46 169.76,-67.95 142,-62.6"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="142.55,-59.14 132.07,-60.69 141.23,-66.02 142.55,-59.14"/>
 </g>
-<!-- sourcefile~co_broadcast_s.f90 -->
-<g id="file~~graph~~FileGraph_node26" class="node">
-<title>sourcefile~co_broadcast_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node26"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="143,-503.21 29,-503.21 29,-479.21 143,-479.21 143,-503.21"/>
-<text text-anchor="middle" x="86" y="-488.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
+<!-- sourcefile~caffeinate_decaffeinate_s.f90 -->
+<g id="file~~graph~~FileGraph_node15" class="node">
+<title>sourcefile~caffeinate_decaffeinate_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node15"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="172,-106 0,-106 0,-82 172,-82 172,-106"/>
+<text text-anchor="middle" x="86" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90 -->
-<g id="file~~graph~~FileGraph_edge48" class="edge">
-<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90</title>
-<path fill="none" stroke="#ff003a" d="M235.04,-461.24C209.45,-466.42 179.43,-472.5 153.14,-477.82"/>
-<polygon fill="#ff003a" stroke="#ff003a" points="152.37,-474.4 143.26,-479.82 153.76,-481.27 152.37,-474.4"/>
+<!-- sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
+<g id="file~~graph~~FileGraph_edge29" class="edge">
+<title>sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
+<path fill="none" stroke="#00c4ff" d="M207.7,-92.84C199.33,-92.92 190.81,-93 182.37,-93.08"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="182.08,-89.58 172.12,-93.18 182.15,-96.58 182.08,-89.58"/>
 </g>
-<!-- sourcefile~normal_termination_m.f90 -->
-<g id="file~~graph~~FileGraph_node2" class="node">
-<title>sourcefile~normal_termination_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node2"><a xlink:href=".././sourcefile/normal_termination_m.f90.html" xlink:title="normal_termination_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-293.21 218.5,-293.21 218.5,-269.21 372.5,-269.21 372.5,-293.21"/>
-<text text-anchor="middle" x="295.5" y="-278.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_m.f90</text>
+<!-- sourcefile~intrinsic_array_s.f90 -->
+<g id="file~~graph~~FileGraph_node6" class="node">
+<title>sourcefile~intrinsic_array_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node6"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="146.5,-274 25.5,-274 25.5,-250 146.5,-250 146.5,-274"/>
+<text text-anchor="middle" x="86" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
 </a>
 </g>
 </g>
@@ -235,427 +202,460 @@ <h1>Source Files</h1>
 <g id="file~~graph~~FileGraph_node7" class="node">
 <title>sourcefile~normal_termination_s.f90</title>
 <g id="a_file~~graph~~FileGraph_node7"><a xlink:href=".././sourcefile/normal_termination_s.f90.html" xlink:title="normal_termination_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="160.5,-335.21 11.5,-335.21 11.5,-311.21 160.5,-311.21 160.5,-335.21"/>
-<text text-anchor="middle" x="86" y="-320.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="160.5,-358 11.5,-358 11.5,-334 160.5,-334 160.5,-358"/>
+<text text-anchor="middle" x="86" y="-343.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~normal_termination_m.f90&#45;&gt;sourcefile~normal_termination_s.f90 -->
-<g id="file~~graph~~FileGraph_edge9" class="edge">
-<title>sourcefile~normal_termination_m.f90&#45;&gt;sourcefile~normal_termination_s.f90</title>
-<path fill="none" stroke="#9cff00" d="M235.04,-293.24C210.51,-298.21 181.92,-303.99 156.44,-309.15"/>
-<polygon fill="#9cff00" stroke="#9cff00" points="155.58,-305.75 146.47,-311.17 156.97,-312.62 155.58,-305.75"/>
-</g>
-<!-- sourcefile~program_termination_s.f90 -->
-<g id="file~~graph~~FileGraph_node3" class="node">
-<title>sourcefile~program_termination_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node3"><a xlink:href=".././sourcefile/program_termination_s.f90.html" xlink:title="program_termination_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164.5,-293.21 7.5,-293.21 7.5,-269.21 164.5,-269.21 164.5,-293.21"/>
-<text text-anchor="middle" x="86" y="-278.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s.f90</text>
+<!-- sourcefile~collective_subroutines_m.f90 -->
+<g id="file~~graph~~FileGraph_node8" class="node">
+<title>sourcefile~collective_subroutines_m.f90</title>
+<g id="a_file~~graph~~FileGraph_node8"><a xlink:href=".././sourcefile/collective_subroutines_m.f90.html" xlink:title="collective_subroutines_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="378.5,-484 212.5,-484 212.5,-460 378.5,-460 378.5,-484"/>
+<text text-anchor="middle" x="295.5" y="-469.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~assert_m.f90 -->
-<g id="file~~graph~~FileGraph_node4" class="node">
-<title>sourcefile~assert_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node4"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="337,-419.21 254,-419.21 254,-395.21 337,-395.21 337,-419.21"/>
-<text text-anchor="middle" x="295.5" y="-404.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
-</a>
+<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
+<g id="file~~graph~~FileGraph_edge4" class="edge">
+<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
+<path fill="none" stroke="#ff0000" d="M235.04,-459.96C204.08,-453.7 166.64,-446.12 137.16,-440.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="137.59,-436.67 127.09,-438.11 136.2,-443.53 137.59,-436.67"/>
 </g>
+<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
+<g id="file~~graph~~FileGraph_edge9" class="edge">
+<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
+<path fill="none" stroke="#ff3a00" d="M212.49,-472C187.65,-472 161.07,-472 138.8,-472"/>
+<polygon fill="#ff3a00" stroke="#ff3a00" points="138.56,-468.5 128.56,-472 138.56,-475.5 138.56,-468.5"/>
 </g>
-<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
-<g id="file~~graph~~FileGraph_edge6" class="edge">
-<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
-<path fill="none" stroke="#ffeb00" d="M254,-415.4C220.61,-422.16 173.1,-431.78 137.29,-439.03"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="136.15,-435.69 127.05,-441.1 137.54,-442.55 136.15,-435.69"/>
+<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
+<g id="file~~graph~~FileGraph_edge17" class="edge">
+<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
+<path fill="none" stroke="#ffeb00" d="M218.38,-459.99C214.55,-457.48 211.04,-454.5 208,-451 152.76,-387.22 227.11,-136.89 172,-73 164.32,-64.1 153.52,-58.66 142.19,-55.4"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="142.7,-51.92 132.16,-53.07 141.11,-58.74 142.7,-51.92"/>
 </g>
-<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
-<g id="file~~graph~~FileGraph_edge14" class="edge">
-<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
-<path fill="none" stroke="#27ff00" d="M254,-407.21C221.15,-407.21 174.63,-407.21 139.02,-407.21"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="138.82,-403.71 128.82,-407.21 138.82,-410.71 138.82,-403.71"/>
+<!-- sourcefile~co_sum_s.f90 -->
+<g id="file~~graph~~FileGraph_node13" class="node">
+<title>sourcefile~co_sum_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node13"><a xlink:href=".././sourcefile/co_sum_s.f90.html" xlink:title="co_sum_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="128,-526 44,-526 44,-502 128,-502 128,-526"/>
+<text text-anchor="middle" x="86" y="-511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s.f90</text>
+</a>
 </g>
-<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
-<g id="file~~graph~~FileGraph_edge29" class="edge">
-<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
-<path fill="none" stroke="#0089ff" d="M254,-399.01C222.98,-392.73 179.75,-383.98 145.05,-376.96"/>
-<polygon fill="#0089ff" stroke="#0089ff" points="145.54,-373.48 135.05,-374.93 144.15,-380.35 145.54,-373.48"/>
 </g>
-<!-- sourcefile~assert_s.f90 -->
-<g id="file~~graph~~FileGraph_node20" class="node">
-<title>sourcefile~assert_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node20"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124,-209.21 48,-209.21 48,-185.21 124,-185.21 124,-209.21"/>
-<text text-anchor="middle" x="86" y="-194.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
+<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_sum_s.f90 -->
+<g id="file~~graph~~FileGraph_edge25" class="edge">
+<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_sum_s.f90</title>
+<path fill="none" stroke="#00ffc4" d="M235.04,-484.04C204.4,-490.24 167.42,-497.72 138.08,-503.66"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="137.15,-500.28 128.05,-505.69 138.54,-507.14 137.15,-500.28"/>
+</g>
+<!-- sourcefile~co_broadcast_s.f90 -->
+<g id="file~~graph~~FileGraph_node16" class="node">
+<title>sourcefile~co_broadcast_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node16"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="143,-568 29,-568 29,-544 143,-544 143,-568"/>
+<text text-anchor="middle" x="86" y="-553.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~assert_s.f90 -->
+<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90 -->
 <g id="file~~graph~~FileGraph_edge33" class="edge">
-<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~assert_s.f90</title>
-<path fill="none" stroke="#6200ff" d="M253.76,-406.39C237.49,-403.98 219.86,-398.39 208,-386.21 154.74,-331.48 225.15,-273.04 172,-218.21 162.04,-207.93 147.91,-202.37 134.02,-199.45"/>
-<polygon fill="#6200ff" stroke="#6200ff" points="134.46,-195.98 124.02,-197.76 133.29,-202.88 134.46,-195.98"/>
+<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90</title>
+<path fill="none" stroke="#0089ff" d="M226.71,-484.04C220.16,-486.49 213.8,-489.44 208,-493 187.04,-505.85 192.93,-522.1 172,-535 166.17,-538.59 159.77,-541.57 153.17,-544.03"/>
+<polygon fill="#0089ff" stroke="#0089ff" points="151.78,-540.81 143.4,-547.3 154,-547.45 151.78,-540.81"/>
 </g>
-<!-- sourcefile~team_type_s.f90 -->
-<g id="file~~graph~~FileGraph_node6" class="node">
-<title>sourcefile~team_type_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node6"><a xlink:href=".././sourcefile/team_type_s.f90.html" xlink:title="team_type_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="345.5,-41.21 245.5,-41.21 245.5,-17.21 345.5,-17.21 345.5,-41.21"/>
-<text text-anchor="middle" x="295.5" y="-26.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_s.f90</text>
+<!-- sourcefile~co_reduce_s.f90 -->
+<g id="file~~graph~~FileGraph_node21" class="node">
+<title>sourcefile~co_reduce_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node21"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="135,-400 37,-400 37,-376 135,-376 135,-400"/>
+<text text-anchor="middle" x="86" y="-385.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
+<g id="file~~graph~~FileGraph_edge40" class="edge">
+<title>sourcefile~collective_subroutines_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
+<path fill="none" stroke="#9c00ff" d="M226.71,-459.96C220.16,-457.51 213.8,-454.56 208,-451 187.04,-438.15 192.93,-421.9 172,-409 163.84,-403.97 154.53,-400.14 145.15,-397.23"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="145.96,-393.83 135.39,-394.52 144.08,-400.57 145.96,-393.83"/>
+</g>
+<!-- sourcefile~image_enumeration_s.f90 -->
+<g id="file~~graph~~FileGraph_node9" class="node">
+<title>sourcefile~image_enumeration_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node9"><a xlink:href=".././sourcefile/image_enumeration_s.f90.html" xlink:title="image_enumeration_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="161.5,-190 10.5,-190 10.5,-166 161.5,-166 161.5,-190"/>
+<text text-anchor="middle" x="86" y="-175.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~characterizable_m.f90 -->
-<g id="file~~graph~~FileGraph_node8" class="node">
+<g id="file~~graph~~FileGraph_node10" class="node">
 <title>sourcefile~characterizable_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node8"><a xlink:href=".././sourcefile/characterizable_m.f90.html" xlink:title="characterizable_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="551,-273.21 419,-273.21 419,-249.21 551,-249.21 551,-273.21"/>
-<text text-anchor="middle" x="485" y="-258.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">characterizable_m.f90</text>
+<g id="a_file~~graph~~FileGraph_node10"><a xlink:href=".././sourcefile/characterizable_m.f90.html" xlink:title="characterizable_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="551,-295 419,-295 419,-271 551,-271 551,-295"/>
+<text text-anchor="middle" x="485" y="-280.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">characterizable_m.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~intrinsic_array_m.f90 -->
-<g id="file~~graph~~FileGraph_node10" class="node">
+<g id="file~~graph~~FileGraph_node14" class="node">
 <title>sourcefile~intrinsic_array_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node10"><a xlink:href=".././sourcefile/intrinsic_array_m.f90.html" xlink:title="intrinsic_array_m.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-335.21 232,-335.21 232,-311.21 359,-311.21 359,-335.21"/>
-<text text-anchor="middle" x="295.5" y="-320.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_m.F90</text>
+<g id="a_file~~graph~~FileGraph_node14"><a xlink:href=".././sourcefile/intrinsic_array_m.f90.html" xlink:title="intrinsic_array_m.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="359,-358 232,-358 232,-334 359,-334 359,-358"/>
+<text text-anchor="middle" x="295.5" y="-343.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_m.F90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~characterizable_m.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
-<g id="file~~graph~~FileGraph_edge16" class="edge">
+<g id="file~~graph~~FileGraph_edge28" class="edge">
 <title>sourcefile~characterizable_m.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
-<path fill="none" stroke="#00ff13" d="M457.39,-273.27C437.25,-282.08 408.76,-293.9 383,-302.21 375.94,-304.48 368.49,-306.64 361.05,-308.65"/>
-<polygon fill="#00ff13" stroke="#00ff13" points="360.08,-305.28 351.29,-311.2 361.85,-312.06 360.08,-305.28"/>
+<path fill="none" stroke="#00ffff" d="M458.26,-295.01C438.1,-304.1 409.17,-316.44 383,-325 376.13,-327.25 368.89,-329.37 361.64,-331.35"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="360.55,-328.01 351.77,-333.94 362.34,-334.78 360.55,-328.01"/>
 </g>
-<!-- sourcefile~characterizable_m.f90&#45;&gt;sourcefile~assert_s.f90 -->
-<g id="file~~graph~~FileGraph_edge35" class="edge">
-<title>sourcefile~characterizable_m.f90&#45;&gt;sourcefile~assert_s.f90</title>
-<path fill="none" stroke="#6200ff" d="M461.48,-249.04C441.49,-238.88 411.16,-225 383,-218.21 297.01,-197.47 193.22,-195.1 134.19,-195.79"/>
-<polygon fill="#6200ff" stroke="#6200ff" points="134,-192.29 124.05,-195.95 134.1,-199.29 134,-192.29"/>
-</g>
-<!-- sourcefile~intrinsic_array_s.f90 -->
-<g id="file~~graph~~FileGraph_node11" class="node">
-<title>sourcefile~intrinsic_array_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node11"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="146.5,-251.21 25.5,-251.21 25.5,-227.21 146.5,-227.21 146.5,-251.21"/>
-<text text-anchor="middle" x="86" y="-236.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
+<!-- sourcefile~assert_s.f90 -->
+<g id="file~~graph~~FileGraph_node26" class="node">
+<title>sourcefile~assert_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node26"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124,-232 48,-232 48,-208 124,-208 124,-232"/>
+<text text-anchor="middle" x="86" y="-217.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~intrinsic_array_s.f90 -->
-<g id="file~~graph~~FileGraph_edge17" class="edge">
-<title>sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~intrinsic_array_s.f90</title>
-<path fill="none" stroke="#00ff4e" d="M231.66,-312.92C223.37,-310.15 215.25,-306.65 208,-302.21 187.04,-289.35 192.93,-273.1 172,-260.21 167.03,-257.14 161.63,-254.52 156.05,-252.29"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="157.12,-248.95 146.53,-248.87 154.76,-255.54 157.12,-248.95"/>
-</g>
-<!-- sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
-<g id="file~~graph~~FileGraph_edge26" class="edge">
-<title>sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
-<path fill="none" stroke="#0089ff" d="M235.04,-335.24C206.88,-340.94 173.36,-347.73 145.35,-353.4"/>
-<polygon fill="#0089ff" stroke="#0089ff" points="144.4,-350.02 135.3,-355.43 145.79,-356.88 144.4,-350.02"/>
-</g>
-<!-- sourcefile~image_enumeration_s.f90 -->
-<g id="file~~graph~~FileGraph_node12" class="node">
-<title>sourcefile~image_enumeration_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node12"><a xlink:href=".././sourcefile/image_enumeration_s.f90.html" xlink:title="image_enumeration_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="161.5,-167.21 10.5,-167.21 10.5,-143.21 161.5,-143.21 161.5,-167.21"/>
-<text text-anchor="middle" x="86" y="-152.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s.f90</text>
-</a>
-</g>
+<!-- sourcefile~characterizable_m.f90&#45;&gt;sourcefile~assert_s.f90 -->
+<g id="file~~graph~~FileGraph_edge49" class="edge">
+<title>sourcefile~characterizable_m.f90&#45;&gt;sourcefile~assert_s.f90</title>
+<path fill="none" stroke="#ff003a" d="M461.05,-270.93C441.03,-261.03 410.9,-247.61 383,-241 296.93,-220.62 193.17,-218.13 134.16,-218.7"/>
+<polygon fill="#ff003a" stroke="#ff003a" points="133.98,-215.2 124.03,-218.84 134.07,-222.2 133.98,-215.2"/>
 </g>
 <!-- sourcefile~program_termination_m.f90 -->
-<g id="file~~graph~~FileGraph_node14" class="node">
+<g id="file~~graph~~FileGraph_node11" class="node">
 <title>sourcefile~program_termination_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node14"><a xlink:href=".././sourcefile/program_termination_m.f90.html" xlink:title="program_termination_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376.5,-251.21 214.5,-251.21 214.5,-227.21 376.5,-227.21 376.5,-251.21"/>
-<text text-anchor="middle" x="295.5" y="-236.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m.f90</text>
+<g id="a_file~~graph~~FileGraph_node11"><a xlink:href=".././sourcefile/program_termination_m.f90.html" xlink:title="program_termination_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="376.5,-274 214.5,-274 214.5,-250 376.5,-250 376.5,-274"/>
+<text text-anchor="middle" x="295.5" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~program_termination_s.f90 -->
-<g id="file~~graph~~FileGraph_edge1" class="edge">
-<title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~program_termination_s.f90</title>
-<path fill="none" stroke="#ff7500" d="M235.04,-251.24C210.51,-256.21 181.92,-261.99 156.44,-267.15"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="155.58,-263.75 146.47,-269.17 156.97,-270.62 155.58,-263.75"/>
-</g>
 <!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
-<g id="file~~graph~~FileGraph_edge4" class="edge">
+<g id="file~~graph~~FileGraph_edge2" class="edge">
 <title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
-<path fill="none" stroke="#ffeb00" d="M219.24,-251.4C215.14,-253.86 211.34,-256.77 208,-260.21 154.74,-314.93 225.15,-373.38 172,-428.21 162.73,-437.77 149.84,-443.25 136.9,-446.32"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="136.2,-442.89 127.05,-448.22 137.53,-449.76 136.2,-442.89"/>
+<path fill="none" stroke="#ff0000" d="M220.31,-274C215.84,-276.5 211.68,-279.47 208,-283 166,-323.35 213.92,-368.57 172,-409 162.59,-418.08 149.91,-423.42 137.22,-426.52"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="136.21,-423.16 127.1,-428.56 137.59,-430.02 136.21,-423.16"/>
 </g>
 <!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
-<g id="file~~graph~~FileGraph_edge12" class="edge">
+<g id="file~~graph~~FileGraph_edge7" class="edge">
 <title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
-<path fill="none" stroke="#27ff00" d="M220.31,-251.21C215.84,-253.7 211.68,-256.67 208,-260.21 166,-300.55 213.92,-345.77 172,-386.21 163.03,-394.86 151.07,-400.13 138.98,-403.29"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="137.88,-399.94 128.84,-405.47 139.35,-406.78 137.88,-399.94"/>
+<path fill="none" stroke="#ff3a00" d="M219.24,-274.19C215.14,-276.66 211.34,-279.57 208,-283 154.74,-337.72 225.15,-396.17 172,-451 163.15,-460.13 151.01,-465.53 138.67,-468.67"/>
+<polygon fill="#ff3a00" stroke="#ff3a00" points="137.87,-465.27 128.8,-470.74 139.3,-472.12 137.87,-465.27"/>
+</g>
+<!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
+<g id="file~~graph~~FileGraph_edge13" class="edge">
+<title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
+<path fill="none" stroke="#ffeb00" d="M270.12,-249.79C250.58,-238.79 223.88,-220.86 208,-198 175.02,-150.52 213.65,-113.09 172,-73 163.78,-65.09 153.08,-60.01 142.06,-56.79"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="142.89,-53.39 132.34,-54.41 141.22,-60.19 142.89,-53.39"/>
 </g>
 <!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~intrinsic_array_s.f90 -->
-<g id="file~~graph~~FileGraph_edge18" class="edge">
+<g id="file~~graph~~FileGraph_edge20" class="edge">
 <title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~intrinsic_array_s.f90</title>
-<path fill="none" stroke="#00ff4e" d="M214.28,-239.21C195.32,-239.21 175.26,-239.21 156.8,-239.21"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="156.74,-235.71 146.74,-239.21 156.74,-242.71 156.74,-235.71"/>
+<path fill="none" stroke="#d7ff00" d="M214.28,-262C195.32,-262 175.26,-262 156.8,-262"/>
+<polygon fill="#d7ff00" stroke="#d7ff00" points="156.74,-258.5 146.74,-262 156.74,-265.5 156.74,-258.5"/>
+</g>
+<!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
+<g id="file~~graph~~FileGraph_edge32" class="edge">
+<title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
+<path fill="none" stroke="#00c4ff" d="M272.02,-249.9C252.85,-238.62 225.67,-220.23 208,-198 182.98,-166.52 202.71,-140.96 172,-115 170.43,-113.68 168.79,-112.43 167.1,-111.26"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="168.57,-108.07 158.17,-106.04 165.04,-114.11 168.57,-108.07"/>
 </g>
 <!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
-<g id="file~~graph~~FileGraph_edge27" class="edge">
+<g id="file~~graph~~FileGraph_edge39" class="edge">
 <title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
-<path fill="none" stroke="#0089ff" d="M221.64,-251.33C216.75,-253.78 212.13,-256.71 208,-260.21 176.99,-286.44 202.96,-317.91 172,-344.21 164.27,-350.77 154.79,-355.34 145,-358.51"/>
-<polygon fill="#0089ff" stroke="#0089ff" points="143.86,-355.2 135.16,-361.24 145.73,-361.94 143.86,-355.2"/>
+<path fill="none" stroke="#9c00ff" d="M221.64,-274.12C216.75,-276.58 212.13,-279.51 208,-283 176.99,-309.23 202.96,-340.71 172,-367 164.27,-373.57 154.79,-378.14 145,-381.31"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="143.86,-377.99 135.16,-384.03 145.73,-384.74 143.86,-377.99"/>
+</g>
+<!-- sourcefile~program_termination_s.f90 -->
+<g id="file~~graph~~FileGraph_node25" class="node">
+<title>sourcefile~program_termination_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node25"><a xlink:href=".././sourcefile/program_termination_s.f90.html" xlink:title="program_termination_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164.5,-316 7.5,-316 7.5,-292 164.5,-292 164.5,-316"/>
+<text text-anchor="middle" x="86" y="-301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~program_termination_s.f90 -->
+<g id="file~~graph~~FileGraph_edge45" class="edge">
+<title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~program_termination_s.f90</title>
+<path fill="none" stroke="#ff0075" d="M235.04,-274.04C210.51,-279 181.92,-284.79 156.44,-289.95"/>
+<polygon fill="#ff0075" stroke="#ff0075" points="155.58,-286.55 146.47,-291.96 156.97,-293.41 155.58,-286.55"/>
 </g>
 <!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~assert_s.f90 -->
-<g id="file~~graph~~FileGraph_edge36" class="edge">
+<g id="file~~graph~~FileGraph_edge50" class="edge">
 <title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~assert_s.f90</title>
-<path fill="none" stroke="#6200ff" d="M235.04,-227.17C203.12,-220.71 164.3,-212.85 134.43,-206.81"/>
-<polygon fill="#6200ff" stroke="#6200ff" points="134.76,-203.3 124.26,-204.75 133.37,-210.16 134.76,-203.3"/>
+<path fill="none" stroke="#ff003a" d="M235.04,-249.96C203.12,-243.5 164.3,-235.65 134.43,-229.6"/>
+<polygon fill="#ff003a" stroke="#ff003a" points="134.76,-226.1 124.26,-227.54 133.37,-232.96 134.76,-226.1"/>
 </g>
-<!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
-<g id="file~~graph~~FileGraph_edge37" class="edge">
-<title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
-<path fill="none" stroke="#9c00ff" d="M269.71,-227.06C250.2,-216.28 223.75,-198.75 208,-176.21 174.64,-128.46 213.92,-90.64 172,-50.21 163.79,-42.29 153.09,-37.21 142.07,-33.98"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="142.9,-30.58 132.36,-31.6 141.23,-37.38 142.9,-30.58"/>
+<!-- sourcefile~normal_termination_m.f90 -->
+<g id="file~~graph~~FileGraph_node12" class="node">
+<title>sourcefile~normal_termination_m.f90</title>
+<g id="a_file~~graph~~FileGraph_node12"><a xlink:href=".././sourcefile/normal_termination_m.f90.html" xlink:title="normal_termination_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="372.5,-316 218.5,-316 218.5,-292 372.5,-292 372.5,-316"/>
+<text text-anchor="middle" x="295.5" y="-301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_m.f90</text>
+</a>
 </g>
-<!-- sourcefile~caffeinate_decaffeinate_s.f90 -->
-<g id="file~~graph~~FileGraph_node24" class="node">
-<title>sourcefile~caffeinate_decaffeinate_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node24"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="172,-83.21 0,-83.21 0,-59.21 172,-59.21 172,-83.21"/>
-<text text-anchor="middle" x="86" y="-68.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s.F90</text>
+</g>
+<!-- sourcefile~normal_termination_m.f90&#45;&gt;sourcefile~normal_termination_s.f90 -->
+<g id="file~~graph~~FileGraph_edge21" class="edge">
+<title>sourcefile~normal_termination_m.f90&#45;&gt;sourcefile~normal_termination_s.f90</title>
+<path fill="none" stroke="#9cff00" d="M235.04,-316.04C210.51,-321 181.92,-326.79 156.44,-331.95"/>
+<polygon fill="#9cff00" stroke="#9cff00" points="155.58,-328.55 146.47,-333.96 156.97,-335.41 155.58,-328.55"/>
+</g>
+<!-- sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~intrinsic_array_s.f90 -->
+<g id="file~~graph~~FileGraph_edge19" class="edge">
+<title>sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~intrinsic_array_s.f90</title>
+<path fill="none" stroke="#d7ff00" d="M231.66,-335.71C223.37,-332.95 215.25,-329.44 208,-325 187.04,-312.15 192.93,-295.9 172,-283 167.03,-279.94 161.63,-277.32 156.05,-275.08"/>
+<polygon fill="#d7ff00" stroke="#d7ff00" points="157.12,-271.75 146.53,-271.67 154.76,-278.34 157.12,-271.75"/>
+</g>
+<!-- sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
+<g id="file~~graph~~FileGraph_edge41" class="edge">
+<title>sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
+<path fill="none" stroke="#9c00ff" d="M235.04,-358.04C206.88,-363.73 173.36,-370.52 145.35,-376.19"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="144.4,-372.81 135.3,-378.22 145.79,-379.67 144.4,-372.81"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90 -->
+<g id="file~~graph~~FileGraph_node17" class="node">
+<title>sourcefile~caffeine_h_m.f90</title>
+<g id="a_file~~graph~~FileGraph_node17"><a xlink:href=".././sourcefile/caffeine_h_m.f90.html" xlink:title="caffeine_h_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="347.5,-400 243.5,-400 243.5,-376 347.5,-376 347.5,-400"/>
+<text text-anchor="middle" x="295.5" y="-385.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
+<g id="file~~graph~~FileGraph_edge5" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
+<path fill="none" stroke="#ff0000" d="M243.47,-398.33C211.1,-404.88 169.39,-413.32 137.18,-419.84"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="136.19,-416.47 127.08,-421.89 137.58,-423.33 136.19,-416.47"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
+<g id="file~~graph~~FileGraph_edge10" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
+<path fill="none" stroke="#ff3a00" d="M243.46,-394.85C231.25,-397.95 218.67,-402.46 208,-409 187.04,-421.85 192.93,-438.1 172,-451 161.99,-457.17 150.27,-461.52 138.79,-464.6"/>
+<polygon fill="#ff3a00" stroke="#ff3a00" points="137.72,-461.26 128.81,-466.99 139.35,-468.07 137.72,-461.26"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~normal_termination_s.f90 -->
+<g id="file~~graph~~FileGraph_edge22" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~normal_termination_s.f90</title>
+<path fill="none" stroke="#9cff00" d="M243.47,-377.67C217.18,-372.35 184.72,-365.78 156.2,-360.01"/>
+<polygon fill="#9cff00" stroke="#9cff00" points="156.79,-356.55 146.29,-358 155.4,-363.42 156.79,-356.55"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90 -->
+<g id="file~~graph~~FileGraph_edge24" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90</title>
+<path fill="none" stroke="#27ff00" d="M243.44,-385.22C230.37,-382.15 217.38,-376.63 208,-367 154.74,-312.28 225.15,-253.83 172,-199 171.05,-198.02 170.06,-197.08 169.03,-196.18"/>
+<polygon fill="#27ff00" stroke="#27ff00" points="170.73,-193.09 160.57,-190.08 166.63,-198.77 170.73,-193.09"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_sum_s.f90 -->
+<g id="file~~graph~~FileGraph_edge27" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_sum_s.f90</title>
+<path fill="none" stroke="#00ffc4" d="M243.25,-392.35C230.63,-395.47 217.91,-400.62 208,-409 176.99,-435.23 202.96,-466.71 172,-493 162.5,-501.07 150.35,-506.13 138.24,-509.27"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="137.15,-505.92 128.13,-511.48 138.65,-512.76 137.15,-505.92"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
+<g id="file~~graph~~FileGraph_edge30" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
+<path fill="none" stroke="#00c4ff" d="M243.45,-385.75C230.22,-382.7 217.14,-377.07 208,-367 131.94,-283.24 247.89,-198.91 172,-115 171.11,-114.02 170.18,-113.08 169.22,-112.18"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="171.3,-109.36 161.24,-106.05 167.04,-114.92 171.3,-109.36"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90 -->
+<g id="file~~graph~~FileGraph_edge35" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90</title>
+<path fill="none" stroke="#0089ff" d="M243.41,-391.3C230.49,-394.4 217.58,-399.79 208,-409 166,-449.35 213.92,-494.57 172,-535 166.58,-540.22 160.09,-544.21 153.12,-547.25"/>
+<polygon fill="#0089ff" stroke="#0089ff" points="151.58,-544.09 143.4,-550.82 154,-550.66 151.58,-544.09"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
+<g id="file~~graph~~FileGraph_edge42" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
+<path fill="none" stroke="#9c00ff" d="M243.47,-388C213.83,-388 176.35,-388 145.51,-388"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="145.33,-384.5 135.33,-388 145.33,-391.5 145.33,-384.5"/>
+</g>
+<!-- sourcefile~synchronization_s.f90 -->
+<g id="file~~graph~~FileGraph_node23" class="node">
+<title>sourcefile~synchronization_s.f90</title>
+<g id="a_file~~graph~~FileGraph_node23"><a xlink:href=".././sourcefile/synchronization_s.f90.html" xlink:title="synchronization_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="149.5,-148 22.5,-148 22.5,-124 149.5,-124 149.5,-148"/>
+<text text-anchor="middle" x="86" y="-133.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_s.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~synchronization_s.f90 -->
+<g id="file~~graph~~FileGraph_edge44" class="edge">
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~synchronization_s.f90</title>
+<path fill="none" stroke="#ff00eb" d="M243.18,-385.47C230.11,-382.4 217.18,-376.83 208,-367 143.37,-297.79 236.49,-226.34 172,-157 168.18,-152.9 163.7,-149.54 158.83,-146.8"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="160.22,-143.59 149.69,-142.5 157.25,-149.92 160.22,-143.59"/>
+</g>
+<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~program_termination_s.f90 -->
 <g id="file~~graph~~FileGraph_edge46" class="edge">
-<title>sourcefile~program_termination_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
-<path fill="none" stroke="#ff00b0" d="M271.61,-227.18C252.44,-216.12 225.49,-198.14 208,-176.21 182.68,-144.45 202.96,-118.5 172,-92.21 170.44,-90.88 168.8,-89.63 167.11,-88.46"/>
-<polygon fill="#ff00b0" stroke="#ff00b0" points="168.58,-85.27 158.19,-83.23 165.04,-91.31 168.58,-85.27"/>
+<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~program_termination_s.f90</title>
+<path fill="none" stroke="#ff0075" d="M243.46,-381.15C231.25,-378.05 218.67,-373.54 208,-367 187.04,-354.15 192.93,-337.9 172,-325 169.15,-323.25 166.17,-321.64 163.09,-320.16"/>
+<polygon fill="#ff0075" stroke="#ff0075" points="164.19,-316.83 153.61,-316.13 161.45,-323.27 164.19,-316.83"/>
 </g>
-<!-- sourcefile~image_enumeration_m.f90 -->
-<g id="file~~graph~~FileGraph_node15" class="node">
-<title>sourcefile~image_enumeration_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node15"><a xlink:href=".././sourcefile/image_enumeration_m.f90.html" xlink:title="image_enumeration_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374,-167.21 217,-167.21 217,-143.21 374,-143.21 374,-167.21"/>
-<text text-anchor="middle" x="295.5" y="-152.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m.f90</text>
+<!-- sourcefile~assert_m.f90 -->
+<g id="file~~graph~~FileGraph_node18" class="node">
+<title>sourcefile~assert_m.f90</title>
+<g id="a_file~~graph~~FileGraph_node18"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="337,-442 254,-442 254,-418 337,-418 337,-442"/>
+<text text-anchor="middle" x="295.5" y="-427.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90 -->
-<g id="file~~graph~~FileGraph_edge19" class="edge">
-<title>sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90</title>
-<path fill="none" stroke="#00ff89" d="M216.94,-155.21C202.26,-155.21 186.82,-155.21 171.93,-155.21"/>
-<polygon fill="#00ff89" stroke="#00ff89" points="171.71,-151.71 161.71,-155.21 171.71,-158.71 171.71,-151.71"/>
+<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
+<g id="file~~graph~~FileGraph_edge3" class="edge">
+<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
+<path fill="none" stroke="#ff0000" d="M254,-430C220.61,-430 173.1,-430 137.29,-430"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="137.05,-426.5 127.05,-430 137.05,-433.5 137.05,-426.5"/>
 </g>
-<!-- sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~assert_s.f90 -->
-<g id="file~~graph~~FileGraph_edge34" class="edge">
-<title>sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~assert_s.f90</title>
-<path fill="none" stroke="#6200ff" d="M235.04,-167.24C203.12,-173.7 164.3,-181.56 134.43,-187.61"/>
-<polygon fill="#6200ff" stroke="#6200ff" points="133.37,-184.25 124.26,-189.66 134.76,-191.11 133.37,-184.25"/>
+<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
+<g id="file~~graph~~FileGraph_edge8" class="edge">
+<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
+<path fill="none" stroke="#ff3a00" d="M254,-438.2C221.15,-444.85 174.63,-454.26 139.02,-461.47"/>
+<polygon fill="#ff3a00" stroke="#ff3a00" points="137.93,-458.12 128.82,-463.54 139.32,-464.98 137.93,-458.12"/>
 </g>
-<!-- sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
+<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
 <g id="file~~graph~~FileGraph_edge38" class="edge">
-<title>sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
-<path fill="none" stroke="#9c00ff" d="M221.64,-143.09C216.75,-140.63 212.13,-137.7 208,-134.21 176.99,-107.98 202.96,-76.5 172,-50.21 163.48,-42.97 152.85,-38.16 142.02,-34.98"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="142.62,-31.52 132.07,-32.49 140.92,-38.31 142.62,-31.52"/>
-</g>
-<!-- sourcefile~synchronization_m.f90 -->
-<g id="file~~graph~~FileGraph_node17" class="node">
-<title>sourcefile~synchronization_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node17"><a xlink:href=".././sourcefile/synchronization_m.f90.html" xlink:title="synchronization_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-125.21 229.5,-125.21 229.5,-101.21 361.5,-101.21 361.5,-125.21"/>
-<text text-anchor="middle" x="295.5" y="-110.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m.f90</text>
-</a>
+<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
+<path fill="none" stroke="#9c00ff" d="M254,-421.8C222.98,-415.52 179.75,-406.77 145.05,-399.75"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="145.54,-396.28 135.05,-397.72 144.15,-403.14 145.54,-396.28"/>
 </g>
+<!-- sourcefile~assert_m.f90&#45;&gt;sourcefile~assert_s.f90 -->
+<g id="file~~graph~~FileGraph_edge47" class="edge">
+<title>sourcefile~assert_m.f90&#45;&gt;sourcefile~assert_s.f90</title>
+<path fill="none" stroke="#ff003a" d="M253.76,-429.19C237.49,-426.77 219.86,-421.18 208,-409 154.74,-354.28 225.15,-295.83 172,-241 162.04,-230.72 147.91,-225.17 134.02,-222.25"/>
+<polygon fill="#ff003a" stroke="#ff003a" points="134.46,-218.77 124.02,-220.56 133.29,-225.67 134.46,-218.77"/>
 </g>
-<!-- sourcefile~synchronization_s.f90 -->
+<!-- sourcefile~image_enumeration_m.f90 -->
 <g id="file~~graph~~FileGraph_node19" class="node">
-<title>sourcefile~synchronization_s.f90</title>
-<g id="a_file~~graph~~FileGraph_node19"><a xlink:href=".././sourcefile/synchronization_s.f90.html" xlink:title="synchronization_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="149.5,-125.21 22.5,-125.21 22.5,-101.21 149.5,-101.21 149.5,-125.21"/>
-<text text-anchor="middle" x="86" y="-110.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_s.f90</text>
+<title>sourcefile~image_enumeration_m.f90</title>
+<g id="a_file~~graph~~FileGraph_node19"><a xlink:href=".././sourcefile/image_enumeration_m.f90.html" xlink:title="image_enumeration_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="374,-189 217,-189 217,-165 374,-165 374,-189"/>
+<text text-anchor="middle" x="295.5" y="-174.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~synchronization_m.f90&#45;&gt;sourcefile~synchronization_s.f90 -->
-<g id="file~~graph~~FileGraph_edge31" class="edge">
-<title>sourcefile~synchronization_m.f90&#45;&gt;sourcefile~synchronization_s.f90</title>
-<path fill="none" stroke="#2700ff" d="M229.42,-113.21C207.36,-113.21 182.58,-113.21 159.95,-113.21"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="159.73,-109.71 149.73,-113.21 159.73,-116.71 159.73,-109.71"/>
+<!-- sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
+<g id="file~~graph~~FileGraph_edge14" class="edge">
+<title>sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
+<path fill="none" stroke="#ffeb00" d="M223.35,-164.8C217.82,-162.13 212.61,-158.91 208,-155 177.64,-129.27 202.45,-98.63 172,-73 163.45,-65.81 152.81,-61.01 141.97,-57.83"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="142.57,-54.37 132.02,-55.34 140.87,-61.17 142.57,-54.37"/>
 </g>
-<!-- sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
-<g id="file~~graph~~FileGraph_edge42" class="edge">
-<title>sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
-<path fill="none" stroke="#9c00ff" d="M229.41,-102.14C221.9,-99.51 214.59,-96.25 208,-92.21 187.04,-79.35 192.93,-63.1 172,-50.21 162.98,-44.65 152.56,-40.56 142.19,-37.55"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="142.86,-34.11 132.3,-34.99 141.1,-40.89 142.86,-34.11"/>
+<!-- sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90 -->
+<g id="file~~graph~~FileGraph_edge23" class="edge">
+<title>sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90</title>
+<path fill="none" stroke="#27ff00" d="M216.94,-177.37C202.26,-177.44 186.82,-177.52 171.93,-177.59"/>
+<polygon fill="#27ff00" stroke="#27ff00" points="171.7,-174.09 161.71,-177.64 171.73,-181.09 171.7,-174.09"/>
 </g>
-<!-- sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
-<g id="file~~graph~~FileGraph_edge45" class="edge">
-<title>sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
-<path fill="none" stroke="#ff00b0" d="M235.04,-101.17C210.51,-96.21 181.92,-90.42 156.44,-85.26"/>
-<polygon fill="#ff00b0" stroke="#ff00b0" points="156.97,-81.8 146.47,-83.24 155.58,-88.66 156.97,-81.8"/>
+<!-- sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~assert_s.f90 -->
+<g id="file~~graph~~FileGraph_edge48" class="edge">
+<title>sourcefile~image_enumeration_m.f90&#45;&gt;sourcefile~assert_s.f90</title>
+<path fill="none" stroke="#ff003a" d="M236.42,-189.04C204.11,-195.73 164.41,-203.96 134.05,-210.25"/>
+<polygon fill="#ff003a" stroke="#ff003a" points="133.22,-206.85 124.14,-212.3 134.64,-213.7 133.22,-206.85"/>
 </g>
 <!-- sourcefile~utilities_m.f90 -->
-<g id="file~~graph~~FileGraph_node18" class="node">
+<g id="file~~graph~~FileGraph_node20" class="node">
 <title>sourcefile~utilities_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node18"><a xlink:href=".././sourcefile/utilities_m.f90.html" xlink:title="utilities_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="339,-503.21 252,-503.21 252,-479.21 339,-479.21 339,-503.21"/>
-<text text-anchor="middle" x="295.5" y="-488.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m.f90</text>
+<g id="a_file~~graph~~FileGraph_node20"><a xlink:href=".././sourcefile/utilities_m.f90.html" xlink:title="utilities_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="339,-526 252,-526 252,-502 339,-502 339,-526"/>
+<text text-anchor="middle" x="295.5" y="-511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
-<g id="file~~graph~~FileGraph_edge3" class="edge">
+<g id="file~~graph~~FileGraph_edge1" class="edge">
 <title>sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
-<path fill="none" stroke="#ffeb00" d="M251.76,-482.55C218.5,-475.82 172.27,-466.47 137.24,-459.38"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="137.72,-455.9 127.22,-457.35 136.33,-462.76 137.72,-455.9"/>
+<path fill="none" stroke="#ff0000" d="M251.96,-509.11C237.25,-506.05 221.17,-501.08 208,-493 187.04,-480.15 192.93,-463.9 172,-451 161.49,-444.52 149.08,-440.04 137.05,-436.94"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="137.61,-433.48 127.08,-434.65 136.04,-440.3 137.61,-433.48"/>
 </g>
 <!-- sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
-<g id="file~~graph~~FileGraph_edge11" class="edge">
+<g id="file~~graph~~FileGraph_edge6" class="edge">
 <title>sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
-<path fill="none" stroke="#27ff00" d="M251.96,-486.32C237.25,-483.26 221.17,-478.29 208,-470.21 187.04,-457.35 192.93,-441.1 172,-428.21 161.99,-422.04 150.27,-417.68 138.79,-414.6"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="139.35,-411.14 128.81,-412.21 137.72,-417.95 139.35,-411.14"/>
+<path fill="none" stroke="#ff3a00" d="M251.76,-505.35C218.93,-498.7 173.47,-489.5 138.61,-482.45"/>
+<polygon fill="#ff3a00" stroke="#ff3a00" points="139.12,-478.98 128.62,-480.43 137.73,-485.84 139.12,-478.98"/>
 </g>
 <!-- sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_sum_s.f90 -->
-<g id="file~~graph~~FileGraph_edge22" class="edge">
+<g id="file~~graph~~FileGraph_edge26" class="edge">
 <title>sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_sum_s.f90</title>
-<path fill="none" stroke="#00ffc4" d="M251.76,-499.86C218.82,-506.52 173.17,-515.76 138.27,-522.83"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="137.38,-519.44 128.27,-524.85 138.77,-526.3 137.38,-519.44"/>
-</g>
-<!-- sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
-<g id="file~~graph~~FileGraph_edge25" class="edge">
-<title>sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
-<path fill="none" stroke="#0089ff" d="M251.76,-488.68C236.53,-485.89 220.15,-480.49 208,-470.21 176.99,-443.98 202.96,-412.5 172,-386.21 164.27,-379.64 154.79,-375.07 145,-371.9"/>
-<polygon fill="#0089ff" stroke="#0089ff" points="145.73,-368.47 135.16,-369.18 143.86,-375.22 145.73,-368.47"/>
+<path fill="none" stroke="#00ffc4" d="M251.76,-514C218.97,-514 173.56,-514 138.72,-514"/>
+<polygon fill="#00ffc4" stroke="#00ffc4" points="138.27,-510.5 128.27,-514 138.27,-517.5 138.27,-510.5"/>
 </g>
 <!-- sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90 -->
-<g id="file~~graph~~FileGraph_edge49" class="edge">
+<g id="file~~graph~~FileGraph_edge34" class="edge">
 <title>sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90</title>
-<path fill="none" stroke="#ff003a" d="M251.76,-491.21C223.39,-491.21 185.58,-491.21 153.34,-491.21"/>
-<polygon fill="#ff003a" stroke="#ff003a" points="153.09,-487.71 143.09,-491.21 153.09,-494.71 153.09,-487.71"/>
+<path fill="none" stroke="#0089ff" d="M251.76,-522.65C223.27,-528.42 185.25,-536.11 152.92,-542.66"/>
+<polygon fill="#0089ff" stroke="#0089ff" points="152.19,-539.23 143.09,-544.65 153.58,-546.09 152.19,-539.23"/>
+</g>
+<!-- sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
+<g id="file~~graph~~FileGraph_edge37" class="edge">
+<title>sourcefile~utilities_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
+<path fill="none" stroke="#9c00ff" d="M251.76,-511.48C236.53,-508.69 220.15,-503.28 208,-493 176.99,-466.77 202.96,-435.29 172,-409 164.27,-402.43 154.79,-397.86 145,-394.69"/>
+<polygon fill="#9c00ff" stroke="#9c00ff" points="145.73,-391.26 135.16,-391.97 143.86,-398.01 145.73,-391.26"/>
 </g>
 <!-- sourcefile~team_type_m.f90 -->
 <g id="file~~graph~~FileGraph_node22" class="node">
 <title>sourcefile~team_type_m.f90</title>
 <g id="a_file~~graph~~FileGraph_node22"><a xlink:href=".././sourcefile/team_type_m.f90.html" xlink:title="team_type_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537.5,-62.21 432.5,-62.21 432.5,-38.21 537.5,-38.21 537.5,-62.21"/>
-<text text-anchor="middle" x="485" y="-47.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="537.5,-84 432.5,-84 432.5,-60 537.5,-60 537.5,-84"/>
+<text text-anchor="middle" x="485" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~team_type_m.f90&#45;&gt;sourcefile~team_type_s.f90 -->
-<g id="file~~graph~~FileGraph_edge8" class="edge">
+<g id="file~~graph~~FileGraph_edge11" class="edge">
 <title>sourcefile~team_type_m.f90&#45;&gt;sourcefile~team_type_s.f90</title>
-<path fill="none" stroke="#d7ff00" d="M432.27,-44.41C408.65,-41.77 380.55,-38.62 356.06,-35.88"/>
-<polygon fill="#d7ff00" stroke="#d7ff00" points="356.13,-32.36 345.8,-34.73 355.35,-39.32 356.13,-32.36"/>
-</g>
-<!-- sourcefile~team_type_m.f90&#45;&gt;sourcefile~image_enumeration_m.f90 -->
-<g id="file~~graph~~FileGraph_edge24" class="edge">
-<title>sourcefile~team_type_m.f90&#45;&gt;sourcefile~image_enumeration_m.f90</title>
-<path fill="none" stroke="#00c4ff" d="M473.14,-62.23C455.88,-80.59 420.29,-115.45 383,-134.21 378.93,-136.25 374.65,-138.11 370.26,-139.79"/>
-<polygon fill="#00c4ff" stroke="#00c4ff" points="368.81,-136.59 360.52,-143.19 371.12,-143.19 368.81,-136.59"/>
-</g>
-<!-- sourcefile~team_type_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
-<g id="file~~graph~~FileGraph_edge39" class="edge">
-<title>sourcefile~team_type_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
-<path fill="none" stroke="#9c00ff" d="M461.94,-38.04C442,-27.79 411.49,-13.89 383,-8.21 300.14,8.34 201.96,-4.94 142.09,-16.61"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="141.22,-13.22 132.1,-18.62 142.59,-20.08 141.22,-13.22"/>
-</g>
-<!-- sourcefile~caffeinate_decaffeinate_m.f90 -->
-<g id="file~~graph~~FileGraph_node25" class="node">
-<title>sourcefile~caffeinate_decaffeinate_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node25"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_m.f90.html" xlink:title="caffeinate_decaffeinate_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="383,-83.21 208,-83.21 208,-59.21 383,-59.21 383,-83.21"/>
-<text text-anchor="middle" x="295.5" y="-68.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m.f90</text>
-</a>
-</g>
+<path fill="none" stroke="#ff7500" d="M449.04,-59.92C429.63,-53.29 405.04,-45.02 383,-38 371.44,-34.32 358.97,-30.49 347.2,-26.94"/>
+<polygon fill="#ff7500" stroke="#ff7500" points="348.09,-23.55 337.51,-24.03 346.08,-30.25 348.09,-23.55"/>
 </g>
 <!-- sourcefile~team_type_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_m.f90 -->
-<g id="file~~graph~~FileGraph_edge47" class="edge">
+<g id="file~~graph~~FileGraph_edge12" class="edge">
 <title>sourcefile~team_type_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_m.f90</title>
-<path fill="none" stroke="#ff0075" d="M432.27,-56C420.18,-57.35 406.91,-58.84 393.55,-60.34"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="392.88,-56.89 383.33,-61.48 393.66,-63.85 392.88,-56.89"/>
-</g>
-<!-- sourcefile~caffeine_h_m.f90 -->
-<g id="file~~graph~~FileGraph_node23" class="node">
-<title>sourcefile~caffeine_h_m.f90</title>
-<g id="a_file~~graph~~FileGraph_node23"><a xlink:href=".././sourcefile/caffeine_h_m.f90.html" xlink:title="caffeine_h_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="347.5,-377.21 243.5,-377.21 243.5,-353.21 347.5,-353.21 347.5,-377.21"/>
-<text text-anchor="middle" x="295.5" y="-362.81" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~program_termination_s.f90 -->
-<g id="file~~graph~~FileGraph_edge2" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~program_termination_s.f90</title>
-<path fill="none" stroke="#ff7500" d="M243.46,-358.36C231.25,-355.26 218.67,-350.75 208,-344.21 187.04,-331.35 192.93,-315.1 172,-302.21 169.15,-300.45 166.17,-298.84 163.09,-297.37"/>
-<polygon fill="#ff7500" stroke="#ff7500" points="164.19,-294.03 153.61,-293.34 161.45,-300.48 164.19,-294.03"/>
+<path fill="none" stroke="#ffb000" d="M432.27,-77.52C420.18,-78.81 406.91,-80.22 393.55,-81.65"/>
+<polygon fill="#ffb000" stroke="#ffb000" points="392.91,-78.2 383.33,-82.74 393.65,-85.16 392.91,-78.2"/>
 </g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_min_s.f90 -->
-<g id="file~~graph~~FileGraph_edge7" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_min_s.f90</title>
-<path fill="none" stroke="#ffeb00" d="M243.46,-372.05C231.25,-375.16 218.67,-379.66 208,-386.21 187.04,-399.06 192.93,-415.31 172,-428.21 161.49,-434.68 149.08,-439.17 137.05,-442.27"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="136.04,-438.91 127.08,-444.56 137.61,-445.73 136.04,-438.91"/>
-</g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~normal_termination_s.f90 -->
-<g id="file~~graph~~FileGraph_edge10" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~normal_termination_s.f90</title>
-<path fill="none" stroke="#9cff00" d="M243.47,-354.88C217.18,-349.55 184.72,-342.99 156.2,-337.21"/>
-<polygon fill="#9cff00" stroke="#9cff00" points="156.79,-333.76 146.29,-335.21 155.4,-340.62 156.79,-333.76"/>
-</g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_max_s.f90 -->
+<!-- sourcefile~team_type_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
 <g id="file~~graph~~FileGraph_edge15" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_max_s.f90</title>
-<path fill="none" stroke="#27ff00" d="M243.47,-375.53C211.64,-381.98 170.79,-390.25 138.81,-396.72"/>
-<polygon fill="#27ff00" stroke="#27ff00" points="137.86,-393.34 128.76,-398.75 139.25,-400.2 137.86,-393.34"/>
-</g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90 -->
-<g id="file~~graph~~FileGraph_edge20" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~image_enumeration_s.f90</title>
-<path fill="none" stroke="#00ff89" d="M243.44,-362.43C230.37,-359.35 217.38,-353.84 208,-344.21 154.74,-289.48 225.15,-231.04 172,-176.21 171.05,-175.22 170.06,-174.28 169.03,-173.39"/>
-<polygon fill="#00ff89" stroke="#00ff89" points="170.73,-170.29 160.57,-167.28 166.63,-175.97 170.73,-170.29"/>
-</g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_sum_s.f90 -->
-<g id="file~~graph~~FileGraph_edge23" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_sum_s.f90</title>
-<path fill="none" stroke="#00ffc4" d="M243.41,-368.51C230.49,-371.61 217.58,-377 208,-386.21 166,-426.55 213.92,-471.77 172,-512.21 162.85,-521.03 150.6,-526.33 138.26,-529.47"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="137.47,-526.06 128.4,-531.55 138.91,-532.91 137.47,-526.06"/>
+<title>sourcefile~team_type_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
+<path fill="none" stroke="#ffeb00" d="M432.1,-69.39C357.22,-65.61 219.47,-58.67 142.59,-54.8"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="142.32,-51.28 132.16,-54.28 141.97,-58.27 142.32,-51.28"/>
 </g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_reduce_s.f90 -->
-<g id="file~~graph~~FileGraph_edge30" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_reduce_s.f90</title>
-<path fill="none" stroke="#0089ff" d="M243.47,-365.21C213.83,-365.21 176.35,-365.21 145.51,-365.21"/>
-<polygon fill="#0089ff" stroke="#0089ff" points="145.33,-361.71 135.33,-365.21 145.33,-368.71 145.33,-361.71"/>
+<!-- sourcefile~team_type_m.f90&#45;&gt;sourcefile~image_enumeration_m.f90 -->
+<g id="file~~graph~~FileGraph_edge36" class="edge">
+<title>sourcefile~team_type_m.f90&#45;&gt;sourcefile~image_enumeration_m.f90</title>
+<path fill="none" stroke="#2700ff" d="M472.8,-84.12C455.36,-102.27 419.86,-136.35 383,-155 378.16,-157.45 373.03,-159.64 367.77,-161.6"/>
+<polygon fill="#2700ff" stroke="#2700ff" points="366.54,-158.32 358.22,-164.87 368.81,-164.94 366.54,-158.32"/>
 </g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~synchronization_s.f90 -->
-<g id="file~~graph~~FileGraph_edge32" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~synchronization_s.f90</title>
-<path fill="none" stroke="#2700ff" d="M243.18,-362.68C230.11,-359.61 217.18,-354.03 208,-344.21 143.37,-275 236.49,-203.55 172,-134.21 168.18,-130.1 163.7,-126.74 158.83,-124"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="160.22,-120.79 149.69,-119.71 157.25,-127.13 160.22,-120.79"/>
+<!-- sourcefile~synchronization_m.f90 -->
+<g id="file~~graph~~FileGraph_node24" class="node">
+<title>sourcefile~synchronization_m.f90</title>
+<g id="a_file~~graph~~FileGraph_node24"><a xlink:href=".././sourcefile/synchronization_m.f90.html" xlink:title="synchronization_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="361.5,-146 229.5,-146 229.5,-122 361.5,-122 361.5,-146"/>
+<text text-anchor="middle" x="295.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m.f90</text>
+</a>
 </g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
-<g id="file~~graph~~FileGraph_edge44" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
-<path fill="none" stroke="#ff00b0" d="M243.45,-362.95C230.22,-359.9 217.14,-354.27 208,-344.21 131.94,-260.45 247.89,-176.12 172,-92.21 171.11,-91.22 170.18,-90.28 169.22,-89.38"/>
-<polygon fill="#ff00b0" stroke="#ff00b0" points="171.3,-86.57 161.24,-83.26 167.04,-92.12 171.3,-86.57"/>
 </g>
-<!-- sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90 -->
-<g id="file~~graph~~FileGraph_edge50" class="edge">
-<title>sourcefile~caffeine_h_m.f90&#45;&gt;sourcefile~co_broadcast_s.f90</title>
-<path fill="none" stroke="#ff003a" d="M243.25,-369.55C230.63,-372.68 217.91,-377.82 208,-386.21 176.99,-412.44 202.96,-443.91 172,-470.21 166.34,-475.01 159.76,-478.74 152.79,-481.64"/>
-<polygon fill="#ff003a" stroke="#ff003a" points="151.36,-478.44 143.12,-485.1 153.72,-485.03 151.36,-478.44"/>
+<!-- sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
+<g id="file~~graph~~FileGraph_edge18" class="edge">
+<title>sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
+<path fill="none" stroke="#ffeb00" d="M229.5,-122.78C221.98,-120.17 214.63,-116.96 208,-113 187.46,-100.74 192.51,-85.3 172,-73 162.91,-67.55 152.47,-63.51 142.08,-60.52"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="142.75,-57.08 132.19,-57.96 140.99,-63.85 142.75,-57.08"/>
 </g>
-<!-- sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeine_m.f90 -->
-<g id="file~~graph~~FileGraph_edge40" class="edge">
-<title>sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeine_m.f90</title>
-<path fill="none" stroke="#9c00ff" d="M235.04,-59.17C205.79,-53.25 170.77,-46.16 142.13,-40.36"/>
-<polygon fill="#9c00ff" stroke="#9c00ff" points="142.78,-36.93 132.29,-38.37 141.39,-43.79 142.78,-36.93"/>
+<!-- sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
+<g id="file~~graph~~FileGraph_edge31" class="edge">
+<title>sourcefile~synchronization_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
+<path fill="none" stroke="#00c4ff" d="M232.24,-122C209.37,-117.59 183.27,-112.56 159.57,-107.99"/>
+<polygon fill="#00c4ff" stroke="#00c4ff" points="160.05,-104.52 149.57,-106.06 158.73,-111.39 160.05,-104.52"/>
 </g>
-<!-- sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90 -->
+<!-- sourcefile~synchronization_m.f90&#45;&gt;sourcefile~synchronization_s.f90 -->
 <g id="file~~graph~~FileGraph_edge43" class="edge">
-<title>sourcefile~caffeinate_decaffeinate_m.f90&#45;&gt;sourcefile~caffeinate_decaffeinate_s.f90</title>
-<path fill="none" stroke="#ff00b0" d="M207.7,-71.21C199.33,-71.21 190.81,-71.21 182.37,-71.21"/>
-<polygon fill="#ff00b0" stroke="#ff00b0" points="182.12,-67.71 172.12,-71.21 182.12,-74.71 182.12,-67.71"/>
+<title>sourcefile~synchronization_m.f90&#45;&gt;sourcefile~synchronization_s.f90</title>
+<path fill="none" stroke="#ff00eb" d="M229.42,-134.63C207.36,-134.84 182.58,-135.08 159.95,-135.3"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="159.69,-131.8 149.73,-135.4 159.76,-138.8 159.69,-131.8"/>
 </g>
 </g>
 </svg>
@@ -707,7 +707,7 @@ <h1>Source Files</h1>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/lists/modules.html b/lists/modules.html
index 6034966c..8c82a51c 100644
--- a/lists/modules.html
+++ b/lists/modules.html
@@ -132,644 +132,644 @@ <h1>Modules</h1>
 <g id="module~~graph~~ModuleGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 826.84)">
 <title>module~~graph~~ModuleGraph</title>
 <polygon fill="white" stroke="transparent" points="-4,4 -4,-826.84 541,-826.84 541,4 -4,4"/>
-<!-- module~synchronization_m -->
+<!-- module~co_min_s -->
 <g id="module~~graph~~ModuleGraph_node1" class="node">
-<title>module~synchronization_m</title>
-<g id="a_module~~graph~~ModuleGraph_node1"><a xlink:href=".././module/synchronization_m.html" xlink:title="synchronization_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="329.5,-508 217.5,-508 217.5,-484 329.5,-484 329.5,-508"/>
-<text text-anchor="middle" x="273.5" y="-493.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m</text>
+<title>module~co_min_s</title>
+<g id="a_module~~graph~~ModuleGraph_node1"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="492.5,-710 431.5,-710 431.5,-686 492.5,-686 492.5,-710"/>
+<text text-anchor="middle" x="462" y="-695.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
 </a>
 </g>
 </g>
 <!-- module~utilities_m -->
-<g id="module~~graph~~ModuleGraph_node2" class="node">
+<g id="module~~graph~~ModuleGraph_node6" class="node">
 <title>module~utilities_m</title>
-<g id="a_module~~graph~~ModuleGraph_node2"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
+<g id="a_module~~graph~~ModuleGraph_node6"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
 <polygon fill="#337ab7" stroke="#337ab7" points="307,-790 240,-790 240,-766 307,-766 307,-790"/>
 <text text-anchor="middle" x="273.5" y="-775.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
 </a>
 </g>
 </g>
-<!-- iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_node28" class="node">
-<title>iso_c_binding</title>
-<g id="a_module~~graph~~ModuleGraph_node28"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="122,-630 38,-630 38,-606 122,-606 122,-630"/>
-<text text-anchor="middle" x="80" y="-615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<!-- module~co_min_s&#45;&gt;module~utilities_m -->
+<g id="module~~graph~~ModuleGraph_edge3" class="edge">
+<title>module~co_min_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M431.31,-703.11C417.27,-706.34 400.64,-711.38 387,-719 368.05,-729.58 369.67,-740.94 351,-752 340.55,-758.19 328.41,-763.17 316.92,-767.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="315.53,-763.82 307.05,-770.18 317.64,-770.49 315.53,-763.82"/>
+</g>
+<!-- module~caffeine_assert_m -->
+<g id="module~~graph~~ModuleGraph_node9" class="node">
+<title>module~caffeine_assert_m</title>
+<g id="a_module~~graph~~ModuleGraph_node9"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="328,-630 219,-630 219,-606 328,-606 328,-630"/>
+<text text-anchor="middle" x="273.5" y="-615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
 </a>
 </g>
 </g>
-<!-- module~utilities_m&#45;&gt;iso_c_binding -->
+<!-- module~co_min_s&#45;&gt;module~caffeine_assert_m -->
 <g id="module~~graph~~ModuleGraph_edge1" class="edge">
-<title>module~utilities_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff3800" stroke-dasharray="5,2" d="M239.85,-771.04C225.57,-766.99 209.13,-760.88 196,-752 150.63,-721.32 112.57,-668.19 93.72,-638.9"/>
-<polygon fill="#ff3800" stroke="#ff3800" points="96.58,-636.88 88.29,-630.28 90.66,-640.61 96.58,-636.88"/>
+<title>module~co_min_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M431.36,-691.09C417.65,-687.51 401.26,-682.69 387,-677 357.61,-665.27 325.82,-648.15 303.55,-635.37"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="305.04,-632.18 294.63,-630.19 301.52,-638.24 305.04,-632.18"/>
+</g>
+<!-- module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_node15" class="node">
+<title>module~program_termination_m</title>
+<g id="a_module~~graph~~ModuleGraph_node15"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="344.5,-428 202.5,-428 202.5,-404 344.5,-404 344.5,-428"/>
+<text text-anchor="middle" x="273.5" y="-413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+</a>
+</g>
+</g>
+<!-- module~co_min_s&#45;&gt;module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_edge5" class="edge">
+<title>module~co_min_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M431.36,-696.98C415.93,-694.83 398.03,-689.53 387,-677 315.75,-596.02 422.6,-517.67 351,-437 350.13,-436.02 349.21,-435.07 348.26,-434.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="350.37,-431.38 340.3,-428.09 346.11,-436.94 350.37,-431.38"/>
 </g>
 <!-- module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_node3" class="node">
+<g id="module~~graph~~ModuleGraph_node21" class="node">
 <title>module~caffeine_h_m</title>
-<g id="a_module~~graph~~ModuleGraph_node3"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<g id="a_module~~graph~~ModuleGraph_node21"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
 <polygon fill="#337ab7" stroke="#337ab7" points="315.5,-550 231.5,-550 231.5,-526 315.5,-526 315.5,-550"/>
 <text text-anchor="middle" x="273.5" y="-535.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge2" class="edge">
-<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff7100" stroke-dasharray="5,2" d="M234.45,-550C222.08,-554.15 208.36,-559.02 196,-564 167.9,-575.33 136.84,-590.05 114.09,-601.26"/>
-<polygon fill="#ff7100" stroke="#ff7100" points="112.29,-598.25 104.88,-605.83 115.4,-604.52 112.29,-598.25"/>
-</g>
-<!-- module~team_type_m -->
-<g id="module~~graph~~ModuleGraph_node4" class="node">
-<title>module~team_type_m</title>
-<g id="a_module~~graph~~ModuleGraph_node4"><a xlink:href=".././module/team_type_m.html" xlink:title="team_type_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="122.5,-286 37.5,-286 37.5,-262 122.5,-262 122.5,-286"/>
-<text text-anchor="middle" x="80" y="-271.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
-</a>
-</g>
+<!-- module~co_min_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~graph~~ModuleGraph_edge4" class="edge">
+<title>module~co_min_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M431.17,-695.45C416.43,-692.83 399.23,-687.56 387,-677 357.49,-651.52 375.16,-627.6 351,-597 338.05,-580.6 319.6,-566.2 304.05,-555.72"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="305.59,-552.55 295.3,-550.03 301.78,-558.42 305.59,-552.55"/>
 </g>
 <!-- module~collective_subroutines_m -->
-<g id="module~~graph~~ModuleGraph_node5" class="node">
+<g id="module~~graph~~ModuleGraph_node26" class="node">
 <title>module~collective_subroutines_m</title>
-<g id="a_module~~graph~~ModuleGraph_node5"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
+<g id="a_module~~graph~~ModuleGraph_node26"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
 <polygon fill="#337ab7" stroke="#337ab7" points="346.5,-710 200.5,-710 200.5,-686 346.5,-686 346.5,-710"/>
 <text text-anchor="middle" x="273.5" y="-695.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
 </a>
 </g>
 </g>
-<!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge3" class="edge">
-<title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ffe200" stroke-dasharray="5,2" d="M234.45,-686C222.08,-681.85 208.36,-676.98 196,-672 167.9,-660.67 136.84,-645.95 114.09,-634.74"/>
-<polygon fill="#ffe200" stroke="#ffe200" points="115.4,-631.48 104.88,-630.17 112.29,-637.75 115.4,-631.48"/>
-</g>
-<!-- module~caffeine_assert_s -->
-<g id="module~~graph~~ModuleGraph_node6" class="node">
-<title>module~caffeine_assert_s</title>
-<g id="a_module~~graph~~ModuleGraph_node6"><a xlink:href=".././module/caffeine_assert_s.html" xlink:title="caffeine_assert_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="514,-626 410,-626 410,-602 514,-602 514,-626"/>
-<text text-anchor="middle" x="462" y="-611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_s</text>
-</a>
-</g>
+<!-- module~co_min_s&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~graph~~ModuleGraph_edge6" class="edge">
+<title>module~co_min_s&#45;&gt;module~collective_subroutines_m</title>
+<path fill="none" stroke="#ff0000" d="M431.45,-698C411.23,-698 383.36,-698 356.71,-698"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="356.57,-694.5 346.57,-698 356.57,-701.5 356.57,-694.5"/>
 </g>
-<!-- module~caffeine_assert_m -->
-<g id="module~~graph~~ModuleGraph_node20" class="node">
-<title>module~caffeine_assert_m</title>
-<g id="a_module~~graph~~ModuleGraph_node20"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="328,-630 219,-630 219,-606 328,-606 328,-630"/>
-<text text-anchor="middle" x="273.5" y="-615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
+<!-- iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_node28" class="node">
+<title>iso_c_binding</title>
+<g id="a_module~~graph~~ModuleGraph_node28"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="122,-630 38,-630 38,-606 122,-606 122,-630"/>
+<text text-anchor="middle" x="80" y="-615.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m -->
-<g id="module~~graph~~ModuleGraph_edge4" class="edge">
-<title>module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#e2ff00" d="M409.54,-615.1C387.47,-615.58 361.46,-616.13 338.19,-616.63"/>
-<polygon fill="#e2ff00" stroke="#e2ff00" points="337.99,-613.14 328.06,-616.85 338.14,-620.14 337.99,-613.14"/>
+<!-- module~co_min_s&#45;&gt;iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_edge2" class="edge">
+<title>module~co_min_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M431.34,-705.24C409.32,-710.22 378.49,-716.4 351,-719 282.42,-725.49 260.46,-743.29 196,-719 153.07,-702.82 115.74,-662.53 95.98,-638.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="98.67,-635.76 89.75,-630.05 93.16,-640.08 98.67,-635.76"/>
 </g>
-<!-- module~caffeinate_decaffeinate_s -->
-<g id="module~~graph~~ModuleGraph_node7" class="node">
-<title>module~caffeinate_decaffeinate_s</title>
-<g id="a_module~~graph~~ModuleGraph_node7"><a xlink:href=".././module/caffeinate_decaffeinate_s.html" xlink:title="caffeinate_decaffeinate_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="537,-468 387,-468 387,-444 537,-444 537,-468"/>
-<text text-anchor="middle" x="462" y="-453.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s</text>
+<!-- module~co_reduce_s -->
+<g id="module~~graph~~ModuleGraph_node2" class="node">
+<title>module~co_reduce_s</title>
+<g id="a_module~~graph~~ModuleGraph_node2"><a xlink:href=".././module/co_reduce_s.html" xlink:title="co_reduce_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="501,-584 423,-584 423,-560 501,-560 501,-584"/>
+<text text-anchor="middle" x="462" y="-569.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m -->
-<g id="module~~graph~~ModuleGraph_edge6" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m</title>
-<path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M405.04,-468C384.48,-472.41 361.02,-477.44 339.71,-482.01"/>
-<polygon fill="#aaff00" stroke="#aaff00" points="338.82,-478.63 329.77,-484.14 340.29,-485.47 338.82,-478.63"/>
-</g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge5" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M434.9,-468.07C420.54,-474.96 402.53,-483.99 387,-493 370.37,-502.65 368.5,-509.02 351,-517 342.99,-520.65 334.21,-523.79 325.54,-526.45"/>
-<polygon fill="#aaff00" stroke="#aaff00" points="324.49,-523.11 315.85,-529.24 326.43,-529.83 324.49,-523.11"/>
-</g>
-<!-- module~caffeinate_decaffeinate_m -->
-<g id="module~~graph~~ModuleGraph_node8" class="node">
-<title>module~caffeinate_decaffeinate_m</title>
-<g id="a_module~~graph~~ModuleGraph_node8"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="351,-386 196,-386 196,-362 351,-362 351,-386"/>
-<text text-anchor="middle" x="273.5" y="-371.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
-</a>
+<!-- module~co_reduce_s&#45;&gt;module~utilities_m -->
+<g id="module~~graph~~ModuleGraph_edge9" class="edge">
+<title>module~co_reduce_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#ff3800" stroke-dasharray="5,2" d="M422.97,-575.29C410.08,-578.19 396.55,-583.47 387,-593 345.78,-634.15 383.7,-670.8 351,-719 339.51,-735.94 321.59,-750.14 305.98,-760.36"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="303.74,-757.63 297.12,-765.91 307.45,-763.56 303.74,-757.63"/>
 </g>
+<!-- module~co_reduce_s&#45;&gt;module~caffeine_assert_m -->
+<g id="module~~graph~~ModuleGraph_edge7" class="edge">
+<title>module~co_reduce_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#ff3800" stroke-dasharray="5,2" d="M422.81,-581.42C396.96,-587.8 362.31,-596.34 333.01,-603.57"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="332.16,-600.17 323.29,-605.97 333.84,-606.97 332.16,-600.17"/>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m -->
-<g id="module~~graph~~ModuleGraph_edge9" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m</title>
-<path fill="none" stroke="#aaff00" d="M410.12,-443.99C402.07,-441.03 394.08,-437.41 387,-433 367.25,-420.7 370.95,-406.96 351,-395 347.95,-393.17 344.75,-391.5 341.44,-389.97"/>
-<polygon fill="#aaff00" stroke="#aaff00" points="342.49,-386.62 331.91,-386.03 339.81,-393.09 342.49,-386.62"/>
+<!-- module~co_reduce_s&#45;&gt;module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_edge12" class="edge">
+<title>module~co_reduce_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff3800" stroke-dasharray="5,2" d="M437.4,-559.95C421.42,-550.8 400.79,-536.92 387,-520 361.6,-488.83 381.37,-463.35 351,-437 349.48,-435.68 347.88,-434.44 346.22,-433.28"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="347.86,-430.18 337.47,-428.1 344.29,-436.21 347.86,-430.18"/>
 </g>
-<!-- module~program_termination_m -->
-<g id="module~~graph~~ModuleGraph_node14" class="node">
-<title>module~program_termination_m</title>
-<g id="a_module~~graph~~ModuleGraph_node14"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="344.5,-428 202.5,-428 202.5,-404 344.5,-404 344.5,-428"/>
-<text text-anchor="middle" x="273.5" y="-413.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<!-- module~caffeine_intrinsic_array_m -->
+<g id="module~~graph~~ModuleGraph_node16" class="node">
+<title>module~caffeine_intrinsic_array_m</title>
+<g id="a_module~~graph~~ModuleGraph_node16"><a xlink:href=".././module/caffeine_intrinsic_array_m.html" xlink:title="caffeine_intrinsic_array_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="350,-470 197,-470 197,-446 350,-446 350,-470"/>
+<text text-anchor="middle" x="273.5" y="-455.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m -->
+<!-- module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m -->
 <g id="module~~graph~~ModuleGraph_edge8" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M405.04,-444C384.76,-439.65 361.66,-434.69 340.58,-430.17"/>
-<polygon fill="#aaff00" stroke="#aaff00" points="341.25,-426.74 330.74,-428.06 339.78,-433.58 341.25,-426.74"/>
+<title>module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m</title>
+<path fill="none" stroke="#ff3800" stroke-dasharray="5,2" d="M441.04,-559.8C407.81,-539.49 341.03,-498.67 302.9,-475.36"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="304.67,-472.34 294.32,-470.11 301.02,-478.31 304.67,-472.34"/>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge7" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M387,-446.03C331.33,-442.02 254.84,-444.18 196,-475 144.34,-502.06 107.76,-563.54 91.11,-596.38"/>
-<polygon fill="#aaff00" stroke="#aaff00" points="87.85,-595.06 86.58,-605.58 94.13,-598.15 87.85,-595.06"/>
+<!-- module~co_reduce_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~graph~~ModuleGraph_edge11" class="edge">
+<title>module~co_reduce_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff3800" stroke-dasharray="5,2" d="M422.81,-565.04C394.76,-559.92 356.34,-552.92 325.64,-547.32"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="326.02,-543.83 315.55,-545.48 324.76,-550.72 326.02,-543.83"/>
 </g>
-<!-- module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m -->
+<!-- module~co_reduce_s&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~graph~~ModuleGraph_edge13" class="edge">
+<title>module~co_reduce_s&#45;&gt;module~collective_subroutines_m</title>
+<path fill="none" stroke="#ff3800" d="M422.88,-577.98C410.71,-581.11 397.64,-585.85 387,-593 365.45,-607.48 369.42,-620.71 351,-639 335.78,-654.11 316.67,-668.85 301.36,-679.82"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="299.01,-677.2 292.84,-685.81 303.04,-682.92 299.01,-677.2"/>
+</g>
+<!-- module~co_reduce_s&#45;&gt;iso_c_binding -->
 <g id="module~~graph~~ModuleGraph_edge10" class="edge">
-<title>module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#71ff00" stroke-dasharray="5,2" d="M230.87,-361.9C219.35,-358.01 206.99,-353.3 196,-348 162.97,-332.06 127.92,-308.41 105.32,-292.16"/>
-<polygon fill="#71ff00" stroke="#71ff00" points="107.16,-289.17 97.02,-286.11 103.04,-294.83 107.16,-289.17"/>
+<title>module~co_reduce_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff3800" stroke-dasharray="5,2" d="M422.7,-574.57C371.07,-578.27 276.34,-585.9 196,-597 175.03,-599.9 152.05,-603.92 132.19,-607.67"/>
+<polygon fill="#ff3800" stroke="#ff3800" points="131.28,-604.28 122.11,-609.6 132.59,-611.16 131.28,-604.28"/>
+</g>
+<!-- module~normal_termination_m -->
+<g id="module~~graph~~ModuleGraph_node3" class="node">
+<title>module~normal_termination_m</title>
+<g id="a_module~~graph~~ModuleGraph_node3"><a xlink:href=".././module/normal_termination_m.html" xlink:title="normal_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="340.5,-264 206.5,-264 206.5,-240 340.5,-240 340.5,-264"/>
+<text text-anchor="middle" x="273.5" y="-249.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_m</text>
+</a>
+</g>
 </g>
 <!-- module~sychronization_s -->
-<g id="module~~graph~~ModuleGraph_node9" class="node">
+<g id="module~~graph~~ModuleGraph_node4" class="node">
 <title>module~sychronization_s</title>
-<g id="a_module~~graph~~ModuleGraph_node9"><a xlink:href=".././module/sychronization_s.html" xlink:title="sychronization_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="512,-526 412,-526 412,-502 512,-502 512,-526"/>
-<text text-anchor="middle" x="462" y="-511.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sychronization_s</text>
+<g id="a_module~~graph~~ModuleGraph_node4"><a xlink:href=".././module/sychronization_s.html" xlink:title="sychronization_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="512,-469 412,-469 412,-445 512,-445 512,-469"/>
+<text text-anchor="middle" x="462" y="-454.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sychronization_s</text>
+</a>
+</g>
+</g>
+<!-- module~synchronization_m -->
+<g id="module~~graph~~ModuleGraph_node8" class="node">
+<title>module~synchronization_m</title>
+<g id="a_module~~graph~~ModuleGraph_node8"><a xlink:href=".././module/synchronization_m.html" xlink:title="synchronization_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="329.5,-344 217.5,-344 217.5,-320 329.5,-320 329.5,-344"/>
+<text text-anchor="middle" x="273.5" y="-329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m</text>
 </a>
 </g>
 </g>
 <!-- module~sychronization_s&#45;&gt;module~synchronization_m -->
-<g id="module~~graph~~ModuleGraph_edge12" class="edge">
+<g id="module~~graph~~ModuleGraph_edge15" class="edge">
 <title>module~sychronization_s&#45;&gt;module~synchronization_m</title>
-<path fill="none" stroke="#38ff00" d="M412,-509.27C389.9,-507.14 363.49,-504.59 339.75,-502.3"/>
-<polygon fill="#38ff00" stroke="#38ff00" points="340.04,-498.81 329.75,-501.33 339.37,-505.78 340.04,-498.81"/>
+<path fill="none" stroke="#ffaa00" d="M411.71,-449.6C402.75,-446.52 394.03,-442.16 387,-436 356.74,-409.52 381.37,-379.35 351,-353 347.36,-349.84 343.28,-347.15 338.95,-344.86"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="340.33,-341.64 329.78,-340.71 337.44,-348.02 340.33,-341.64"/>
 </g>
 <!-- module~sychronization_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge11" class="edge">
+<g id="module~~graph~~ModuleGraph_edge14" class="edge">
 <title>module~sychronization_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#38ff00" stroke-dasharray="5,2" d="M412,-520.31C385.4,-523.73 352.54,-527.96 325.61,-531.42"/>
-<polygon fill="#38ff00" stroke="#38ff00" points="325.08,-527.96 315.61,-532.71 325.97,-534.9 325.08,-527.96"/>
+<path fill="none" stroke="#ffaa00" stroke-dasharray="5,2" d="M412.73,-469.09C404.05,-471.71 395.17,-474.7 387,-478 357.23,-490 325.09,-507.66 302.81,-520.72"/>
+<polygon fill="#ffaa00" stroke="#ffaa00" points="301.02,-517.71 294.2,-525.82 304.59,-523.73 301.02,-517.71"/>
+</g>
+<!-- module~team_type_s -->
+<g id="module~~graph~~ModuleGraph_node5" class="node">
+<title>module~team_type_s</title>
+<g id="a_module~~graph~~ModuleGraph_node5"><a xlink:href=".././module/team_type_s.html" xlink:title="team_type_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="313,-24 234,-24 234,0 313,0 313,-24"/>
+<text text-anchor="middle" x="273.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_s</text>
+</a>
+</g>
+</g>
+<!-- module~team_type_m -->
+<g id="module~~graph~~ModuleGraph_node20" class="node">
+<title>module~team_type_m</title>
+<g id="a_module~~graph~~ModuleGraph_node20"><a xlink:href=".././module/team_type_m.html" xlink:title="team_type_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="122.5,-124 37.5,-124 37.5,-100 122.5,-100 122.5,-124"/>
+<text text-anchor="middle" x="80" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
+</a>
+</g>
+</g>
+<!-- module~team_type_s&#45;&gt;module~team_type_m -->
+<g id="module~~graph~~ModuleGraph_edge16" class="edge">
+<title>module~team_type_s&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#ffe200" d="M233.63,-23.17C221.34,-27.24 207.87,-32.27 196,-38 162.97,-53.94 127.92,-77.59 105.32,-93.84"/>
+<polygon fill="#ffe200" stroke="#ffe200" points="103.04,-91.17 97.02,-99.89 107.16,-96.83 103.04,-91.17"/>
+</g>
+<!-- module~utilities_m&#45;&gt;iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_edge17" class="edge">
+<title>module~utilities_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#e2ff00" stroke-dasharray="5,2" d="M239.85,-771.04C225.57,-766.99 209.13,-760.88 196,-752 150.63,-721.32 112.57,-668.19 93.72,-638.9"/>
+<polygon fill="#e2ff00" stroke="#e2ff00" points="96.58,-636.88 88.29,-630.28 90.66,-640.61 96.58,-636.88"/>
+</g>
+<!-- module~caffeinate_decaffeinate_m -->
+<g id="module~~graph~~ModuleGraph_node7" class="node">
+<title>module~caffeinate_decaffeinate_m</title>
+<g id="a_module~~graph~~ModuleGraph_node7"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="351,-184 196,-184 196,-160 351,-160 351,-184"/>
+<text text-anchor="middle" x="273.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
+</a>
+</g>
+</g>
+<!-- module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m -->
+<g id="module~~graph~~ModuleGraph_edge18" class="edge">
+<title>module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#aaff00" stroke-dasharray="5,2" d="M233.75,-159.86C203.54,-150.39 161.43,-137.2 129.07,-127.06"/>
+<polygon fill="#aaff00" stroke="#aaff00" points="129.96,-123.67 119.37,-124.02 127.86,-130.35 129.96,-123.67"/>
 </g>
 <!-- module~image_enumeration_s -->
 <g id="module~~graph~~ModuleGraph_node10" class="node">
 <title>module~image_enumeration_s</title>
 <g id="a_module~~graph~~ModuleGraph_node10"><a xlink:href=".././module/image_enumeration_s.html" xlink:title="image_enumeration_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="527.5,-316 396.5,-316 396.5,-292 527.5,-292 527.5,-316"/>
-<text text-anchor="middle" x="462" y="-301.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s</text>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="527.5,-164 396.5,-164 396.5,-140 527.5,-140 527.5,-164"/>
+<text text-anchor="middle" x="462" y="-149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s</text>
 </a>
 </g>
 </g>
 <!-- module~image_enumeration_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge13" class="edge">
+<g id="module~~graph~~ModuleGraph_edge19" class="edge">
 <title>module~image_enumeration_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M409.99,-316.11C401.29,-320.21 393.1,-325.69 387,-333 333.62,-396.99 407.68,-455.92 351,-517 344.18,-524.34 335.06,-529.21 325.5,-532.41"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="324.56,-529.04 315.86,-535.09 326.43,-535.79 324.56,-529.04"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M436.54,-164.18C419.72,-173.92 398.43,-189.2 387,-209 326.48,-313.85 411.49,-374.13 351,-479 340.98,-496.37 323.64,-510.38 308,-520.38"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="305.79,-517.63 299.05,-525.81 309.42,-523.62 305.79,-517.63"/>
 </g>
 <!-- module~image_enumeration_m -->
-<g id="module~~graph~~ModuleGraph_node21" class="node">
+<g id="module~~graph~~ModuleGraph_node24" class="node">
 <title>module~image_enumeration_m</title>
-<g id="a_module~~graph~~ModuleGraph_node21"><a xlink:href=".././module/image_enumeration_m.html" xlink:title="image_enumeration_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-226 205.5,-226 205.5,-202 341.5,-202 341.5,-226"/>
-<text text-anchor="middle" x="273.5" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m</text>
+<g id="a_module~~graph~~ModuleGraph_node24"><a xlink:href=".././module/image_enumeration_m.html" xlink:title="image_enumeration_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="341.5,-104 205.5,-104 205.5,-80 341.5,-80 341.5,-104"/>
+<text text-anchor="middle" x="273.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m</text>
 </a>
 </g>
 </g>
 <!-- module~image_enumeration_s&#45;&gt;module~image_enumeration_m -->
-<g id="module~~graph~~ModuleGraph_edge14" class="edge">
+<g id="module~~graph~~ModuleGraph_edge20" class="edge">
 <title>module~image_enumeration_s&#45;&gt;module~image_enumeration_m</title>
-<path fill="none" stroke="#00ff00" d="M420.5,-291.93C409.46,-288.21 397.63,-283.81 387,-279 356.65,-265.27 323.89,-245.76 301.59,-231.7"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="303.32,-228.65 293,-226.22 299.55,-234.55 303.32,-228.65"/>
+<path fill="none" stroke="#00ff00" d="M423.26,-139.86C393.97,-130.43 353.18,-117.31 321.73,-107.19"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="322.46,-103.75 311.87,-104.02 320.31,-110.42 322.46,-103.75"/>
 </g>
-<!-- module~normal_termination_m -->
+<!-- module~caffeine_characterizable_m -->
 <g id="module~~graph~~ModuleGraph_node11" class="node">
-<title>module~normal_termination_m</title>
-<g id="a_module~~graph~~ModuleGraph_node11"><a xlink:href=".././module/normal_termination_m.html" xlink:title="normal_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="340.5,-24 206.5,-24 206.5,0 340.5,0 340.5,-24"/>
-<text text-anchor="middle" x="273.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_m</text>
+<title>module~caffeine_characterizable_m</title>
+<g id="a_module~~graph~~ModuleGraph_node11"><a xlink:href=".././module/caffeine_characterizable_m.html" xlink:title="caffeine_characterizable_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="160,-328 0,-328 0,-304 160,-304 160,-328"/>
+<text text-anchor="middle" x="80" y="-313.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_characterizable_m</text>
 </a>
 </g>
 </g>
-<!-- module~team_type_s -->
+<!-- module~co_broadcast_s -->
 <g id="module~~graph~~ModuleGraph_node12" class="node">
-<title>module~team_type_s</title>
-<g id="a_module~~graph~~ModuleGraph_node12"><a xlink:href=".././module/team_type_s.html" xlink:title="team_type_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="313,-104 234,-104 234,-80 313,-80 313,-104"/>
-<text text-anchor="middle" x="273.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_s</text>
+<title>module~co_broadcast_s</title>
+<g id="a_module~~graph~~ModuleGraph_node12"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="509,-794 415,-794 415,-770 509,-770 509,-794"/>
+<text text-anchor="middle" x="462" y="-779.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
 </a>
 </g>
 </g>
-<!-- module~team_type_s&#45;&gt;module~team_type_m -->
-<g id="module~~graph~~ModuleGraph_edge15" class="edge">
-<title>module~team_type_s&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#00ff71" d="M233.73,-100.21C220.91,-104.17 207.09,-109.88 196,-118 146.04,-154.55 108.5,-219.13 91.32,-252.58"/>
-<polygon fill="#00ff71" stroke="#00ff71" points="88.01,-251.39 86.66,-261.89 94.27,-254.52 88.01,-251.39"/>
+<!-- module~co_broadcast_s&#45;&gt;module~utilities_m -->
+<g id="module~~graph~~ModuleGraph_edge23" class="edge">
+<title>module~co_broadcast_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#00ff71" stroke-dasharray="5,2" d="M414.9,-781.01C385.12,-780.37 346.63,-779.55 317.48,-778.92"/>
+<polygon fill="#00ff71" stroke="#00ff71" points="317.28,-775.42 307.2,-778.7 317.13,-782.42 317.28,-775.42"/>
 </g>
-<!-- module~caffeine_intrinsic_array_s -->
-<g id="module~~graph~~ModuleGraph_node13" class="node">
-<title>module~caffeine_intrinsic_array_s</title>
-<g id="a_module~~graph~~ModuleGraph_node13"><a xlink:href=".././module/caffeine_intrinsic_array_s.html" xlink:title="caffeine_intrinsic_array_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="536,-366 388,-366 388,-342 536,-342 536,-366"/>
-<text text-anchor="middle" x="462" y="-351.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_s</text>
-</a>
+<!-- module~co_broadcast_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~graph~~ModuleGraph_edge22" class="edge">
+<title>module~co_broadcast_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#00ff71" stroke-dasharray="5,2" d="M414.93,-777.02C404.55,-773.87 394.41,-768.88 387,-761 335.85,-706.66 390.95,-660.03 351,-597 340.12,-579.83 322.39,-565.69 306.74,-555.56"/>
+<polygon fill="#00ff71" stroke="#00ff71" points="308.18,-552.34 297.83,-550.07 304.51,-558.3 308.18,-552.34"/>
 </g>
+<!-- module~co_broadcast_s&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~graph~~ModuleGraph_edge24" class="edge">
+<title>module~co_broadcast_s&#45;&gt;module~collective_subroutines_m</title>
+<path fill="none" stroke="#00ff71" d="M414.64,-770.65C405.35,-767.87 395.76,-764.64 387,-761 356.47,-748.33 323.73,-729.31 301.49,-715.49"/>
+<polygon fill="#00ff71" stroke="#00ff71" points="303.26,-712.47 292.93,-710.1 299.53,-718.39 303.26,-712.47"/>
 </g>
-<!-- module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m -->
-<g id="module~~graph~~ModuleGraph_edge16" class="edge">
-<title>module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#00ffa9" stroke-dasharray="5,2" d="M430.91,-366.04C408.94,-374.63 378.35,-386.17 351,-395 344.48,-397.1 337.61,-399.18 330.77,-401.17"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="329.47,-397.9 320.81,-404 331.39,-404.63 329.47,-397.9"/>
+<!-- module~co_broadcast_s&#45;&gt;iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_edge21" class="edge">
+<title>module~co_broadcast_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#00ff71" stroke-dasharray="5,2" d="M435.43,-794.1C399.29,-809.59 331.31,-832.76 274.5,-818"/>
 </g>
-<!-- module~caffeine_intrinsic_array_m -->
-<g id="module~~graph~~ModuleGraph_node23" class="node">
-<title>module~caffeine_intrinsic_array_m</title>
-<g id="a_module~~graph~~ModuleGraph_node23"><a xlink:href=".././module/caffeine_intrinsic_array_m.html" xlink:title="caffeine_intrinsic_array_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="350,-306 197,-306 197,-282 350,-282 350,-306"/>
-<text text-anchor="middle" x="273.5" y="-291.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_m</text>
+<!-- module~caffeine_assert_s -->
+<g id="module~~graph~~ModuleGraph_node13" class="node">
+<title>module~caffeine_assert_s</title>
+<g id="a_module~~graph~~ModuleGraph_node13"><a xlink:href=".././module/caffeine_assert_s.html" xlink:title="caffeine_assert_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="514,-626 410,-626 410,-602 514,-602 514,-626"/>
+<text text-anchor="middle" x="462" y="-611.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_intrinsic_array_s&#45;&gt;module~caffeine_intrinsic_array_m -->
-<g id="module~~graph~~ModuleGraph_edge17" class="edge">
-<title>module~caffeine_intrinsic_array_s&#45;&gt;module~caffeine_intrinsic_array_m</title>
-<path fill="none" stroke="#00ffa9" d="M423.26,-341.86C393.97,-332.43 353.18,-319.31 321.73,-309.19"/>
-<polygon fill="#00ffa9" stroke="#00ffa9" points="322.46,-305.75 311.87,-306.02 320.31,-312.42 322.46,-305.75"/>
+<!-- module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m -->
+<g id="module~~graph~~ModuleGraph_edge25" class="edge">
+<title>module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#00ffa9" d="M409.54,-615.1C387.47,-615.58 361.46,-616.13 338.19,-616.63"/>
+<polygon fill="#00ffa9" stroke="#00ffa9" points="337.99,-613.14 328.06,-616.85 338.14,-620.14 337.99,-613.14"/>
 </g>
-<!-- module~caffeine_characterizable_m -->
-<g id="module~~graph~~ModuleGraph_node15" class="node">
-<title>module~caffeine_characterizable_m</title>
-<g id="a_module~~graph~~ModuleGraph_node15"><a xlink:href=".././module/caffeine_characterizable_m.html" xlink:title="caffeine_characterizable_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="160,-124 0,-124 0,-100 160,-100 160,-124"/>
-<text text-anchor="middle" x="80" y="-109.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_characterizable_m</text>
+<!-- module~program_termination_s -->
+<g id="module~~graph~~ModuleGraph_node14" class="node">
+<title>module~program_termination_s</title>
+<g id="a_module~~graph~~ModuleGraph_node14"><a xlink:href=".././module/program_termination_s.html" xlink:title="program_termination_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="530,-511 394,-511 394,-487 530,-487 530,-511"/>
+<text text-anchor="middle" x="462" y="-496.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_sum_s -->
-<g id="module~~graph~~ModuleGraph_node16" class="node">
-<title>module~co_sum_s</title>
-<g id="a_module~~graph~~ModuleGraph_node16"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="494,-794 430,-794 430,-770 494,-770 494,-794"/>
-<text text-anchor="middle" x="462" y="-779.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
-</a>
+<!-- module~program_termination_s&#45;&gt;module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_edge29" class="edge">
+<title>module~program_termination_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#00ffe2" d="M404.95,-486.87C398.66,-484.42 392.53,-481.49 387,-478 366.5,-465.05 371.56,-449.86 351,-437 348.2,-435.25 345.25,-433.64 342.2,-432.16"/>
+<polygon fill="#00ffe2" stroke="#00ffe2" points="343.41,-428.87 332.84,-428.12 340.63,-435.3 343.41,-428.87"/>
 </g>
-</g>
-<!-- module~co_sum_s&#45;&gt;module~utilities_m -->
-<g id="module~~graph~~ModuleGraph_edge18" class="edge">
-<title>module~co_sum_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M429.78,-781.33C398.96,-780.67 351.59,-779.65 317.27,-778.92"/>
-<polygon fill="#00a9ff" stroke="#00a9ff" points="317.15,-775.41 307.07,-778.7 317,-782.41 317.15,-775.41"/>
-</g>
-<!-- module~co_sum_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge20" class="edge">
-<title>module~co_sum_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M429.84,-780.4C414.93,-778.01 397.98,-772.67 387,-761 335.85,-706.66 390.95,-660.03 351,-597 340.12,-579.83 322.39,-565.69 306.74,-555.56"/>
-<polygon fill="#00a9ff" stroke="#00a9ff" points="308.18,-552.34 297.83,-550.07 304.51,-558.3 308.18,-552.34"/>
-</g>
-<!-- module~co_sum_s&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~graph~~ModuleGraph_edge21" class="edge">
-<title>module~co_sum_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#00a9ff" d="M429.85,-774.89C416.42,-771.39 400.69,-766.68 387,-761 356.47,-748.33 323.73,-729.31 301.49,-715.49"/>
-<polygon fill="#00a9ff" stroke="#00a9ff" points="303.26,-712.47 292.93,-710.1 299.53,-718.39 303.26,-712.47"/>
-</g>
-<!-- module~co_sum_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge19" class="edge">
-<title>module~co_sum_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M435.43,-794.1C399.29,-809.59 331.31,-832.76 274.5,-818"/>
-</g>
-<!-- module~program_termination_s -->
-<g id="module~~graph~~ModuleGraph_node17" class="node">
-<title>module~program_termination_s</title>
-<g id="a_module~~graph~~ModuleGraph_node17"><a xlink:href=".././module/program_termination_s.html" xlink:title="program_termination_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="530,-270 394,-270 394,-246 530,-246 530,-270"/>
-<text text-anchor="middle" x="462" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s</text>
-</a>
-</g>
-</g>
-<!-- module~program_termination_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge22" class="edge">
-<title>module~program_termination_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#0071ff" stroke-dasharray="5,2" d="M403.56,-270.04C397.28,-273.36 391.54,-277.6 387,-283 319.31,-363.56 421,-438.43 351,-517 344.27,-524.56 335.09,-529.51 325.44,-532.72"/>
-<polygon fill="#0071ff" stroke="#0071ff" points="324.41,-529.37 315.69,-535.39 326.26,-536.13 324.41,-529.37"/>
-</g>
-<!-- module~program_termination_s&#45;&gt;module~program_termination_m -->
-<g id="module~~graph~~ModuleGraph_edge25" class="edge">
-<title>module~program_termination_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#0071ff" d="M405.83,-270.03C398.87,-273.35 392.33,-277.59 387,-283 350.3,-320.24 388.76,-358.83 351,-395 349.73,-396.21 348.41,-397.35 347.02,-398.43"/>
-<polygon fill="#0071ff" stroke="#0071ff" points="345.06,-395.54 338.59,-403.93 348.88,-401.4 345.06,-395.54"/>
+<!-- module~program_termination_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~graph~~ModuleGraph_edge27" class="edge">
+<title>module~program_termination_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#00ffe2" stroke-dasharray="5,2" d="M403.52,-511.02C378.61,-516.23 349.69,-522.28 325.54,-527.33"/>
+<polygon fill="#00ffe2" stroke="#00ffe2" points="324.59,-523.95 315.52,-529.42 326.02,-530.8 324.59,-523.95"/>
 </g>
 <!-- module~program_termination_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge24" class="edge">
+<g id="module~~graph~~ModuleGraph_edge26" class="edge">
 <title>module~program_termination_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#0071ff" stroke-dasharray="5,2" d="M413.21,-245.98C355.52,-234.5 258.5,-225.21 196,-273 91.18,-353.15 80.86,-532.37 80.61,-595.48"/>
-<polygon fill="#0071ff" stroke="#0071ff" points="77.11,-595.88 80.65,-605.87 84.11,-595.85 77.11,-595.88"/>
+<path fill="none" stroke="#00ffe2" stroke-dasharray="5,2" d="M393.78,-491.96C338.53,-488.85 259.33,-490.65 196,-517 153.86,-534.53 116.5,-574 96.48,-598.08"/>
+<polygon fill="#00ffe2" stroke="#00ffe2" points="93.72,-595.92 90.14,-605.89 99.16,-600.33 93.72,-595.92"/>
 </g>
 <!-- iso_fortran_env -->
 <g id="module~~graph~~ModuleGraph_node29" class="node">
 <title>iso_fortran_env</title>
 <g id="a_module~~graph~~ModuleGraph_node29"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="320.5,-184 226.5,-184 226.5,-160 320.5,-160 320.5,-184"/>
-<text text-anchor="middle" x="273.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="320.5,-386 226.5,-386 226.5,-362 320.5,-362 320.5,-386"/>
+<text text-anchor="middle" x="273.5" y="-371.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
 <!-- module~program_termination_s&#45;&gt;iso_fortran_env -->
-<g id="module~~graph~~ModuleGraph_edge23" class="edge">
+<g id="module~~graph~~ModuleGraph_edge28" class="edge">
 <title>module~program_termination_s&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#0071ff" stroke-dasharray="5,2" d="M409.15,-246C401.39,-243.06 393.74,-239.44 387,-235 366.46,-221.49 371.76,-206.16 351,-193 344.76,-189.05 337.78,-185.83 330.64,-183.21"/>
-<polygon fill="#0071ff" stroke="#0071ff" points="331.46,-179.79 320.86,-180 329.27,-186.44 331.46,-179.79"/>
+<path fill="none" stroke="#00ffe2" stroke-dasharray="5,2" d="M400.44,-486.89C395.59,-484.45 391.02,-481.52 387,-478 356.74,-451.52 381.37,-421.35 351,-395 345,-389.8 337.83,-385.87 330.31,-382.91"/>
+<polygon fill="#00ffe2" stroke="#00ffe2" points="331.25,-379.54 320.66,-379.66 329.02,-386.17 331.25,-379.54"/>
+</g>
+<!-- module~caffeine_intrinsic_array_m&#45;&gt;module~caffeine_characterizable_m -->
+<g id="module~~graph~~ModuleGraph_edge30" class="edge">
+<title>module~caffeine_intrinsic_array_m&#45;&gt;module~caffeine_characterizable_m</title>
+<path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M215.09,-445.96C208.43,-443.49 201.91,-440.54 196,-437 152.21,-410.79 114.25,-363.39 94.82,-336.35"/>
+<polygon fill="#00a9ff" stroke="#00a9ff" points="97.58,-334.18 88.96,-328.02 91.85,-338.21 97.58,-334.18"/>
+</g>
+<!-- module~caffeine_intrinsic_array_s -->
+<g id="module~~graph~~ModuleGraph_node17" class="node">
+<title>module~caffeine_intrinsic_array_s</title>
+<g id="a_module~~graph~~ModuleGraph_node17"><a xlink:href=".././module/caffeine_intrinsic_array_s.html" xlink:title="caffeine_intrinsic_array_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="536,-427 388,-427 388,-403 536,-403 536,-427"/>
+<text text-anchor="middle" x="462" y="-412.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_s</text>
+</a>
+</g>
+</g>
+<!-- module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_edge31" class="edge">
+<title>module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#0071ff" stroke-dasharray="5,2" d="M387.83,-415.39C376.97,-415.45 365.72,-415.51 354.73,-415.57"/>
+<polygon fill="#0071ff" stroke="#0071ff" points="354.7,-412.07 344.72,-415.62 354.74,-419.07 354.7,-412.07"/>
+</g>
+<!-- module~caffeine_intrinsic_array_s&#45;&gt;module~caffeine_intrinsic_array_m -->
+<g id="module~~graph~~ModuleGraph_edge32" class="edge">
+<title>module~caffeine_intrinsic_array_s&#45;&gt;module~caffeine_intrinsic_array_m</title>
+<path fill="none" stroke="#0071ff" d="M408.55,-427.09C386.12,-432.27 359.75,-438.34 336.37,-443.73"/>
+<polygon fill="#0071ff" stroke="#0071ff" points="335.51,-440.34 326.55,-446 337.08,-447.16 335.51,-440.34"/>
 </g>
 <!-- module~co_max_s -->
 <g id="module~~graph~~ModuleGraph_node18" class="node">
 <title>module~co_max_s</title>
 <g id="a_module~~graph~~ModuleGraph_node18"><a xlink:href=".././module/co_max_s.html" xlink:title="co_max_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="494,-710 430,-710 430,-686 494,-686 494,-710"/>
-<text text-anchor="middle" x="462" y="-695.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
+<polygon fill="#5bc0de" stroke="#5bc0de" points="494,-668 430,-668 430,-644 494,-644 494,-668"/>
+<text text-anchor="middle" x="462" y="-653.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
 </a>
 </g>
 </g>
 <!-- module~co_max_s&#45;&gt;module~utilities_m -->
-<g id="module~~graph~~ModuleGraph_edge28" class="edge">
+<g id="module~~graph~~ModuleGraph_edge35" class="edge">
 <title>module~co_max_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.86,-703.45C416.14,-706.69 400.18,-711.64 387,-719 368.05,-729.58 369.67,-740.94 351,-752 340.55,-758.19 328.41,-763.17 316.92,-767.05"/>
-<polygon fill="#0038ff" stroke="#0038ff" points="315.53,-763.82 307.05,-770.18 317.64,-770.49 315.53,-763.82"/>
+<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.79,-660.64C415.9,-663.73 399.82,-668.79 387,-677 366.29,-690.25 368.83,-702.07 351,-719 335.34,-733.87 316.09,-748.7 300.81,-759.78"/>
+<polygon fill="#0038ff" stroke="#0038ff" points="298.44,-757.17 292.34,-765.84 302.51,-762.87 298.44,-757.17"/>
+</g>
+<!-- module~co_max_s&#45;&gt;module~caffeine_assert_m -->
+<g id="module~~graph~~ModuleGraph_edge33" class="edge">
+<title>module~co_max_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.78,-649.64C404.8,-644.55 368.95,-637.24 337.98,-630.93"/>
+<polygon fill="#0038ff" stroke="#0038ff" points="338.62,-627.49 328.12,-628.93 337.22,-634.35 338.62,-627.49"/>
+</g>
+<!-- module~co_max_s&#45;&gt;module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_edge37" class="edge">
+<title>module~co_max_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.66,-654.56C414.7,-652.22 397.77,-646.87 387,-635 326.88,-568.77 411.4,-502.97 351,-437 350.11,-436.03 349.18,-435.1 348.22,-434.21"/>
+<polygon fill="#0038ff" stroke="#0038ff" points="350.28,-431.39 340.18,-428.2 346.08,-436.99 350.28,-431.39"/>
 </g>
 <!-- module~co_max_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge27" class="edge">
+<g id="module~~graph~~ModuleGraph_edge36" class="edge">
 <title>module~co_max_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.7,-695.18C415.3,-692.48 398.83,-687.21 387,-677 357.49,-651.52 375.16,-627.6 351,-597 338.05,-580.6 319.6,-566.2 304.05,-555.72"/>
-<polygon fill="#0038ff" stroke="#0038ff" points="305.59,-552.55 295.3,-550.03 301.78,-558.42 305.59,-552.55"/>
+<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.97,-651.06C416.12,-647.91 400.02,-642.89 387,-635 367.1,-622.95 368.26,-612.6 351,-597 334.87,-582.43 315.47,-567.5 300.25,-556.3"/>
+<polygon fill="#0038ff" stroke="#0038ff" points="301.96,-553.22 291.82,-550.17 297.85,-558.88 301.96,-553.22"/>
 </g>
 <!-- module~co_max_s&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~graph~~ModuleGraph_edge31" class="edge">
+<g id="module~~graph~~ModuleGraph_edge38" class="edge">
 <title>module~co_max_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#0038ff" d="M429.78,-698C409.74,-698 382.69,-698 356.78,-698"/>
-<polygon fill="#0038ff" stroke="#0038ff" points="356.55,-694.5 346.55,-698 356.55,-701.5 356.55,-694.5"/>
-</g>
-<!-- module~co_max_s&#45;&gt;module~program_termination_m -->
-<g id="module~~graph~~ModuleGraph_edge26" class="edge">
-<title>module~co_max_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.64,-696.58C414.68,-694.24 397.75,-688.88 387,-677 325.83,-609.37 398.28,-552.98 351,-475 340.53,-457.74 322.99,-443.66 307.35,-433.6"/>
-<polygon fill="#0038ff" stroke="#0038ff" points="308.78,-430.37 298.42,-428.14 305.13,-436.34 308.78,-430.37"/>
-</g>
-<!-- module~co_max_s&#45;&gt;module~caffeine_assert_m -->
-<g id="module~~graph~~ModuleGraph_edge30" class="edge">
-<title>module~co_max_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.92,-690.71C416.51,-687.17 400.77,-682.5 387,-677 357.61,-665.27 325.82,-648.15 303.55,-635.37"/>
-<polygon fill="#0038ff" stroke="#0038ff" points="305.04,-632.18 294.63,-630.19 301.52,-638.24 305.04,-632.18"/>
+<path fill="none" stroke="#0038ff" d="M429.78,-663.03C404.8,-668.66 368.95,-676.73 337.98,-683.7"/>
+<polygon fill="#0038ff" stroke="#0038ff" points="337.11,-680.31 328.12,-685.92 338.65,-687.14 337.11,-680.31"/>
 </g>
 <!-- module~co_max_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge29" class="edge">
+<g id="module~~graph~~ModuleGraph_edge34" class="edge">
 <title>module~co_max_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.93,-705.55C408.02,-710.48 377.9,-716.45 351,-719 282.42,-725.49 260.46,-743.29 196,-719 153.07,-702.82 115.74,-662.53 95.98,-638.01"/>
-<polygon fill="#0038ff" stroke="#0038ff" points="98.67,-635.76 89.75,-630.05 93.16,-640.08 98.67,-635.76"/>
+<path fill="none" stroke="#0038ff" stroke-dasharray="5,2" d="M429.88,-655.18C380.26,-653.61 280.19,-649.35 196,-639 174.99,-636.42 152,-632.45 132.15,-628.66"/>
+<polygon fill="#0038ff" stroke="#0038ff" points="132.56,-625.17 122.07,-626.7 131.22,-632.05 132.56,-625.17"/>
 </g>
-<!-- module~co_reduce_s -->
+<!-- module~normal_termination_s -->
 <g id="module~~graph~~ModuleGraph_node19" class="node">
-<title>module~co_reduce_s</title>
-<g id="a_module~~graph~~ModuleGraph_node19"><a xlink:href=".././module/co_reduce_s.html" xlink:title="co_reduce_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="501,-584 423,-584 423,-560 501,-560 501,-584"/>
-<text text-anchor="middle" x="462" y="-569.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s</text>
-</a>
-</g>
-</g>
-<!-- module~co_reduce_s&#45;&gt;module~utilities_m -->
-<g id="module~~graph~~ModuleGraph_edge34" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M422.97,-575.29C410.08,-578.19 396.55,-583.47 387,-593 345.78,-634.15 383.7,-670.8 351,-719 339.51,-735.94 321.59,-750.14 305.98,-760.36"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="303.74,-757.63 297.12,-765.91 307.45,-763.56 303.74,-757.63"/>
-</g>
-<!-- module~co_reduce_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge33" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M422.81,-565.04C394.76,-559.92 356.34,-552.92 325.64,-547.32"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="326.02,-543.83 315.55,-545.48 324.76,-550.72 326.02,-543.83"/>
-</g>
-<!-- module~co_reduce_s&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~graph~~ModuleGraph_edge38" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#0000ff" d="M422.88,-577.98C410.71,-581.11 397.64,-585.85 387,-593 365.45,-607.48 369.42,-620.71 351,-639 335.78,-654.11 316.67,-668.85 301.36,-679.82"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="299.01,-677.2 292.84,-685.81 303.04,-682.92 299.01,-677.2"/>
-</g>
-<!-- module~co_reduce_s&#45;&gt;module~program_termination_m -->
-<g id="module~~graph~~ModuleGraph_edge32" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M427.19,-559.93C413.61,-553.92 398.49,-545.64 387,-535 364.18,-513.87 371.67,-498.23 351,-475 336.93,-459.18 318.13,-444.62 302.7,-433.92"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="304.3,-430.78 294.05,-428.09 300.38,-436.58 304.3,-430.78"/>
-</g>
-<!-- module~co_reduce_s&#45;&gt;module~caffeine_assert_m -->
-<g id="module~~graph~~ModuleGraph_edge37" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M422.81,-581.42C396.96,-587.8 362.31,-596.34 333.01,-603.57"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="332.16,-600.17 323.29,-605.97 333.84,-606.97 332.16,-600.17"/>
-</g>
-<!-- module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m -->
-<g id="module~~graph~~ModuleGraph_edge35" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M422.91,-560.76C409.7,-555.05 395.97,-546.77 387,-535 337.02,-469.42 394.42,-423.1 351,-353 340.37,-335.84 322.82,-321.77 307.21,-311.68"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="308.66,-308.46 298.31,-306.21 305,-314.43 308.66,-308.46"/>
-</g>
-<!-- module~co_reduce_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge36" class="edge">
-<title>module~co_reduce_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M422.7,-574.57C371.07,-578.27 276.34,-585.9 196,-597 175.03,-599.9 152.05,-603.92 132.19,-607.67"/>
-<polygon fill="#0000ff" stroke="#0000ff" points="131.28,-604.28 122.11,-609.6 132.59,-611.16 131.28,-604.28"/>
-</g>
-<!-- module~image_enumeration_m&#45;&gt;module~team_type_m -->
-<g id="module~~graph~~ModuleGraph_edge39" class="edge">
-<title>module~image_enumeration_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#7100ff" stroke-dasharray="5,2" d="M233.75,-226.14C203.54,-235.61 161.43,-248.8 129.07,-258.94"/>
-<polygon fill="#7100ff" stroke="#7100ff" points="127.86,-255.65 119.37,-261.98 129.96,-262.33 127.86,-255.65"/>
-</g>
-<!-- module~co_min_s -->
-<g id="module~~graph~~ModuleGraph_node22" class="node">
-<title>module~co_min_s</title>
-<g id="a_module~~graph~~ModuleGraph_node22"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="492.5,-668 431.5,-668 431.5,-644 492.5,-644 492.5,-668"/>
-<text text-anchor="middle" x="462" y="-653.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
+<title>module~normal_termination_s</title>
+<g id="a_module~~graph~~ModuleGraph_node19"><a xlink:href=".././module/normal_termination_s.html" xlink:title="normal_termination_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="526.5,-293 397.5,-293 397.5,-269 526.5,-269 526.5,-293"/>
+<text text-anchor="middle" x="462" y="-278.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;module~utilities_m -->
+<!-- module~normal_termination_s&#45;&gt;module~normal_termination_m -->
 <g id="module~~graph~~ModuleGraph_edge42" class="edge">
-<title>module~co_min_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M431.24,-660.32C417.03,-663.38 400.27,-668.51 387,-677 366.29,-690.25 368.83,-702.07 351,-719 335.34,-733.87 316.09,-748.7 300.81,-759.78"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="298.44,-757.17 292.34,-765.84 302.51,-762.87 298.44,-757.17"/>
-</g>
-<!-- module~co_min_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge41" class="edge">
-<title>module~co_min_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M431.42,-651.39C417.26,-648.26 400.48,-643.16 387,-635 367.1,-622.95 368.26,-612.6 351,-597 334.87,-582.43 315.47,-567.5 300.25,-556.3"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="301.96,-553.22 291.82,-550.17 297.85,-558.88 301.96,-553.22"/>
-</g>
-<!-- module~co_min_s&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~graph~~ModuleGraph_edge45" class="edge">
-<title>module~co_min_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#aa00ff" d="M431.45,-662.66C406.42,-668.29 369.68,-676.57 338.03,-683.69"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="336.94,-680.35 327.96,-685.96 338.48,-687.18 336.94,-680.35"/>
-</g>
-<!-- module~co_min_s&#45;&gt;module~program_termination_m -->
-<g id="module~~graph~~ModuleGraph_edge40" class="edge">
-<title>module~co_min_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M431.34,-654.6C416.1,-652.33 398.38,-647.03 387,-635 336.9,-582.06 390.18,-536.46 351,-475 340.07,-457.86 322.34,-443.72 306.7,-433.59"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="308.15,-430.37 297.8,-428.09 304.47,-436.32 308.15,-430.37"/>
-</g>
-<!-- module~co_min_s&#45;&gt;module~caffeine_assert_m -->
-<g id="module~~graph~~ModuleGraph_edge44" class="edge">
-<title>module~co_min_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M431.45,-649.98C406.52,-644.9 369.95,-637.45 338.38,-631.02"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="338.83,-627.54 328.33,-628.97 337.43,-634.39 338.83,-627.54"/>
-</g>
-<!-- module~co_min_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge43" class="edge">
-<title>module~co_min_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M431.48,-655.23C382.44,-653.7 281.11,-649.46 196,-639 174.99,-636.42 152,-632.45 132.15,-628.66"/>
-<polygon fill="#aa00ff" stroke="#aa00ff" points="132.56,-625.17 122.07,-626.7 131.22,-632.05 132.56,-625.17"/>
-</g>
-<!-- module~caffeine_intrinsic_array_m&#45;&gt;module~caffeine_characterizable_m -->
-<g id="module~~graph~~ModuleGraph_edge46" class="edge">
-<title>module~caffeine_intrinsic_array_m&#45;&gt;module~caffeine_characterizable_m</title>
-<path fill="none" stroke="#e200ff" stroke-dasharray="5,2" d="M255.15,-281.86C239.22,-270.43 215.23,-252.49 196,-235 158.69,-201.07 119.45,-157.02 97.82,-131.89"/>
-<polygon fill="#e200ff" stroke="#e200ff" points="100.34,-129.46 91.18,-124.14 95.02,-134.01 100.34,-129.46"/>
-</g>
-<!-- module~normal_termination_s -->
-<g id="module~~graph~~ModuleGraph_node24" class="node">
-<title>module~normal_termination_s</title>
-<g id="a_module~~graph~~ModuleGraph_node24"><a xlink:href=".././module/normal_termination_s.html" xlink:title="normal_termination_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="526.5,-164 397.5,-164 397.5,-140 526.5,-140 526.5,-164"/>
-<text text-anchor="middle" x="462" y="-149.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s</text>
-</a>
-</g>
+<title>module~normal_termination_s&#45;&gt;module~normal_termination_m</title>
+<path fill="none" stroke="#0000ff" d="M397.34,-271.1C382.36,-268.77 366.25,-266.27 350.79,-263.86"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="351.15,-260.38 340.73,-262.3 350.08,-267.29 351.15,-260.38"/>
 </g>
 <!-- module~normal_termination_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge47" class="edge">
+<g id="module~~graph~~ModuleGraph_edge40" class="edge">
 <title>module~normal_termination_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff00e2" stroke-dasharray="5,2" d="M424.22,-164.03C410.34,-170.44 395.8,-179.8 387,-193 306.66,-313.57 445.09,-406.82 351,-517 344.36,-524.78 335.14,-529.81 325.39,-533.03"/>
-<polygon fill="#ff00e2" stroke="#ff00e2" points="324.28,-529.71 315.54,-535.69 326.1,-536.47 324.28,-529.71"/>
-</g>
-<!-- module~normal_termination_s&#45;&gt;module~normal_termination_m -->
-<g id="module~~graph~~ModuleGraph_edge50" class="edge">
-<title>module~normal_termination_s&#45;&gt;module~normal_termination_m</title>
-<path fill="none" stroke="#ff00e2" d="M452.44,-139.85C435.58,-116.79 395.82,-66.44 351,-38 344.81,-34.07 337.96,-30.67 330.98,-27.73"/>
-<polygon fill="#ff00e2" stroke="#ff00e2" points="332.01,-24.38 321.43,-24.01 329.48,-30.9 332.01,-24.38"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M411.98,-293.02C402.56,-297.32 393.6,-303.14 387,-311 337.9,-369.48 391.72,-414.4 351,-479 340.16,-496.2 322.43,-510.34 306.77,-520.46"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="304.54,-517.72 297.86,-525.95 308.21,-523.68 304.54,-517.72"/>
 </g>
 <!-- module~normal_termination_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge49" class="edge">
+<g id="module~~graph~~ModuleGraph_edge39" class="edge">
 <title>module~normal_termination_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff00e2" stroke-dasharray="5,2" d="M427.5,-139.98C372.73,-122.66 263.36,-98.22 196,-151 194.86,-151.89 109.06,-503.07 86.42,-595.78"/>
-<polygon fill="#ff00e2" stroke="#ff00e2" points="83.01,-594.99 84.04,-605.54 89.81,-596.65 83.01,-594.99"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M428.94,-268.99C415.79,-263.81 400.51,-257.46 387,-251 370.49,-243.1 368.72,-235.59 351,-231 284.31,-213.72 251.22,-189.81 196,-231 188.32,-236.73 109.85,-515.06 87.13,-596.09"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="83.75,-595.2 84.42,-605.77 90.49,-597.08 83.75,-595.2"/>
 </g>
 <!-- module~normal_termination_s&#45;&gt;iso_fortran_env -->
-<g id="module~~graph~~ModuleGraph_edge48" class="edge">
+<g id="module~~graph~~ModuleGraph_edge41" class="edge">
 <title>module~normal_termination_s&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#ff00e2" stroke-dasharray="5,2" d="M397.34,-158.83C375.67,-161.15 351.61,-163.73 330.58,-165.99"/>
-<polygon fill="#ff00e2" stroke="#ff00e2" points="330.09,-162.52 320.52,-167.07 330.83,-169.48 330.09,-162.52"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M421.17,-293.14C409.55,-297.71 397.24,-303.63 387,-311 367.04,-325.36 371.76,-339.84 351,-353 344.76,-356.95 337.78,-360.17 330.64,-362.79"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="329.27,-359.56 320.86,-366 331.46,-366.21 329.27,-359.56"/>
 </g>
-<!-- module~co_broadcast_s -->
-<g id="module~~graph~~ModuleGraph_node25" class="node">
-<title>module~co_broadcast_s</title>
-<g id="a_module~~graph~~ModuleGraph_node25"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="509,-752 415,-752 415,-728 509,-728 509,-752"/>
-<text text-anchor="middle" x="462" y="-737.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
+<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_edge43" class="edge">
+<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#7100ff" stroke-dasharray="5,2" d="M234.45,-550C222.08,-554.15 208.36,-559.02 196,-564 167.9,-575.33 136.84,-590.05 114.09,-601.26"/>
+<polygon fill="#7100ff" stroke="#7100ff" points="112.29,-598.25 104.88,-605.83 115.4,-604.52 112.29,-598.25"/>
+</g>
+<!-- module~caffeinate_decaffeinate_s -->
+<g id="module~~graph~~ModuleGraph_node22" class="node">
+<title>module~caffeinate_decaffeinate_s</title>
+<g id="a_module~~graph~~ModuleGraph_node22"><a xlink:href=".././module/caffeinate_decaffeinate_s.html" xlink:title="caffeinate_decaffeinate_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="537,-344 387,-344 387,-320 537,-320 537,-344"/>
+<text text-anchor="middle" x="462" y="-329.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_broadcast_s&#45;&gt;module~utilities_m -->
-<g id="module~~graph~~ModuleGraph_edge51" class="edge">
-<title>module~co_broadcast_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M414.9,-749.39C384.99,-755.49 346.29,-763.37 317.1,-769.32"/>
-<polygon fill="#ff00aa" stroke="#ff00aa" points="316.3,-765.91 307.2,-771.34 317.7,-772.77 316.3,-765.91"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m -->
+<g id="module~~graph~~ModuleGraph_edge48" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m</title>
+<path fill="none" stroke="#aa00ff" d="M416.51,-319.92C405.97,-315.54 395.37,-309.69 387,-302 360.95,-278.06 373.56,-258.25 351,-231 337.59,-214.8 318.96,-200.32 303.45,-189.75"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="305.01,-186.59 294.73,-184 301.15,-192.43 305.01,-186.59"/>
 </g>
-<!-- module~co_broadcast_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~graph~~ModuleGraph_edge53" class="edge">
-<title>module~co_broadcast_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M414.93,-734.53C404.67,-731.38 394.59,-726.51 387,-719 346.82,-679.23 382.94,-643.65 351,-597 339.44,-580.11 321.51,-565.91 305.92,-555.68"/>
-<polygon fill="#ff00aa" stroke="#ff00aa" points="307.4,-552.48 297.07,-550.13 303.68,-558.41 307.4,-552.48"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m -->
+<g id="module~~graph~~ModuleGraph_edge46" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m</title>
+<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M386.75,-332C371.24,-332 354.99,-332 339.82,-332"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="339.52,-328.5 329.52,-332 339.52,-335.5 339.52,-328.5"/>
 </g>
-<!-- module~co_broadcast_s&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~graph~~ModuleGraph_edge54" class="edge">
-<title>module~co_broadcast_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff00aa" d="M414.9,-729.62C391.66,-724.39 363.13,-717.96 337.87,-712.27"/>
-<polygon fill="#ff00aa" stroke="#ff00aa" points="338.52,-708.83 328,-710.05 336.98,-715.66 338.52,-708.83"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_edge44" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M443.04,-344.18C421.84,-358.11 385.14,-380.81 351,-395 345.91,-397.11 340.55,-399.08 335.12,-400.89"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="333.79,-397.64 325.31,-403.99 335.9,-404.32 333.79,-397.64"/>
 </g>
-<!-- module~co_broadcast_s&#45;&gt;iso_c_binding -->
-<g id="module~~graph~~ModuleGraph_edge52" class="edge">
-<title>module~co_broadcast_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M414.79,-748.99C405.2,-751.97 395.45,-755.88 387,-761 367.1,-773.05 371.1,-787.28 351,-799 320.74,-816.65 308.41,-826.81 274.5,-818"/>
-<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M272.5,-818C238.59,-809.19 224.43,-819.47 196,-799 138.84,-757.83 103.35,-678.64 88.73,-640.13"/>
-<polygon fill="#ff00aa" stroke="#ff00aa" points="91.89,-638.58 85.15,-630.41 85.32,-641 91.89,-638.58"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~graph~~ModuleGraph_edge45" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M442.11,-344.02C425.71,-355.27 402.25,-373.39 387,-394 362.6,-426.98 376.06,-446.52 351,-479 338.32,-495.43 320.03,-509.76 304.51,-520.18"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="302.25,-517.48 295.76,-525.85 306.06,-523.35 302.25,-517.48"/>
+</g>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_edge47" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#aa00ff" stroke-dasharray="5,2" d="M434.85,-319.93C383.82,-298.35 269.58,-259.99 196,-311 99.33,-378.02 83.79,-536.93 81.4,-595.67"/>
+<polygon fill="#aa00ff" stroke="#aa00ff" points="77.9,-595.62 81.08,-605.73 84.89,-595.84 77.9,-595.62"/>
 </g>
 <!-- module~caffeine_m -->
-<g id="module~~graph~~ModuleGraph_node26" class="node">
+<g id="module~~graph~~ModuleGraph_node23" class="node">
 <title>module~caffeine_m</title>
-<g id="a_module~~graph~~ModuleGraph_node26"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="498,-424 426,-424 426,-400 498,-400 498,-424"/>
-<text text-anchor="middle" x="462" y="-409.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
+<g id="a_module~~graph~~ModuleGraph_node23"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="498,-242 426,-242 426,-218 498,-218 498,-242"/>
+<text text-anchor="middle" x="462" y="-227.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
 </a>
 </g>
 </g>
+<!-- module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m -->
+<g id="module~~graph~~ModuleGraph_edge50" class="edge">
+<title>module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m</title>
+<path fill="none" stroke="#e200ff" stroke-dasharray="5,2" d="M425.92,-219.09C396.85,-210.05 355.22,-197.1 322.97,-187.07"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="323.87,-183.69 313.28,-184.06 321.79,-190.37 323.87,-183.69"/>
+</g>
 <!-- module~caffeine_m&#45;&gt;module~synchronization_m -->
-<g id="module~~graph~~ModuleGraph_edge56" class="edge">
+<g id="module~~graph~~ModuleGraph_edge53" class="edge">
 <title>module~caffeine_m&#45;&gt;module~synchronization_m</title>
-<path fill="none" stroke="#ff0071" stroke-dasharray="5,2" d="M425.86,-421.39C413.4,-425.12 399.4,-429.77 387,-435 357.13,-447.6 324.77,-465.65 302.45,-478.85"/>
-<polygon fill="#ff0071" stroke="#ff0071" points="300.62,-475.86 293.84,-484 304.22,-481.87 300.62,-475.86"/>
+<path fill="none" stroke="#e200ff" stroke-dasharray="5,2" d="M427.63,-242.02C414.7,-247.07 399.93,-253.31 387,-260 355.72,-276.17 321.97,-298.49 299.68,-313.97"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="297.62,-311.14 291.45,-319.75 301.64,-316.87 297.62,-311.14"/>
+</g>
+<!-- module~caffeine_m&#45;&gt;module~program_termination_m -->
+<g id="module~~graph~~ModuleGraph_edge52" class="edge">
+<title>module~caffeine_m&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#e200ff" stroke-dasharray="5,2" d="M425.71,-237.11C411.9,-241.55 397,-248.67 387,-260 345.91,-306.56 394.75,-350.93 351,-395 349.91,-396.1 348.77,-397.14 347.58,-398.13"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="345.41,-395.38 339.15,-403.93 349.37,-401.15 345.41,-395.38"/>
 </g>
 <!-- module~caffeine_m&#45;&gt;module~team_type_m -->
-<g id="module~~graph~~ModuleGraph_edge59" class="edge">
+<g id="module~~graph~~ModuleGraph_edge49" class="edge">
 <title>module~caffeine_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#ff0071" stroke-dasharray="5,2" d="M435.38,-399.85C421,-392.87 402.83,-383.77 387,-375 370.6,-365.91 368.31,-360.21 351,-353 285.52,-325.74 263.94,-335.38 196,-315 171,-307.5 143.44,-297.73 121.57,-289.61"/>
-<polygon fill="#ff0071" stroke="#ff0071" points="122.55,-286.23 111.95,-286.01 120.09,-292.79 122.55,-286.23"/>
+<path fill="none" stroke="#e200ff" stroke-dasharray="5,2" d="M444.9,-217.79C416.93,-196.67 361.36,-155.18 351,-151 279.04,-122 188.63,-114.14 132.84,-112.25"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="132.93,-108.75 122.83,-111.96 132.73,-115.75 132.93,-108.75"/>
+</g>
+<!-- module~caffeine_m&#45;&gt;module~image_enumeration_m -->
+<g id="module~~graph~~ModuleGraph_edge54" class="edge">
+<title>module~caffeine_m&#45;&gt;module~image_enumeration_m</title>
+<path fill="none" stroke="#e200ff" stroke-dasharray="5,2" d="M441.95,-217.96C426.09,-207.35 403.53,-190.85 387,-173 367.15,-151.56 374.09,-135.9 351,-118 346.05,-114.16 340.51,-110.88 334.72,-108.06"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="336.04,-104.82 325.48,-104.02 333.23,-111.23 336.04,-104.82"/>
 </g>
 <!-- module~caffeine_m&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~graph~~ModuleGraph_edge57" class="edge">
+<g id="module~~graph~~ModuleGraph_edge51" class="edge">
 <title>module~caffeine_m&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0071" stroke-dasharray="5,2" d="M425.79,-415.07C411.82,-418.09 396.78,-423.89 387,-435 326.15,-504.09 398.67,-560.23 351,-639 340.55,-656.27 323.01,-670.35 307.36,-680.41"/>
-<polygon fill="#ff0071" stroke="#ff0071" points="305.14,-677.67 298.43,-685.87 308.79,-683.64 305.14,-677.67"/>
-</g>
-<!-- module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m -->
-<g id="module~~graph~~ModuleGraph_edge60" class="edge">
-<title>module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m</title>
-<path fill="none" stroke="#ff0071" stroke-dasharray="5,2" d="M425.92,-404.85C402.8,-400.14 371.74,-393.81 343.77,-388.11"/>
-<polygon fill="#ff0071" stroke="#ff0071" points="344.12,-384.61 333.63,-386.05 342.73,-391.47 344.12,-384.61"/>
+<path fill="none" stroke="#e200ff" stroke-dasharray="5,2" d="M425.9,-235.98C411.6,-240.25 396.27,-247.55 387,-260 336.46,-327.85 391.88,-564.93 351,-639 341.31,-656.55 323.99,-670.58 308.28,-680.54"/>
+<polygon fill="#e200ff" stroke="#e200ff" points="306.06,-677.79 299.28,-685.94 309.66,-683.8 306.06,-677.79"/>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~program_termination_m -->
+<!-- module~image_enumeration_m&#45;&gt;module~team_type_m -->
 <g id="module~~graph~~ModuleGraph_edge55" class="edge">
-<title>module~caffeine_m&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0071" stroke-dasharray="5,2" d="M425.92,-412.75C405.8,-413.18 379.65,-413.74 354.77,-414.28"/>
-<polygon fill="#ff0071" stroke="#ff0071" points="354.5,-410.78 344.57,-414.5 354.65,-417.78 354.5,-410.78"/>
+<title>module~image_enumeration_m&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#ff00e2" stroke-dasharray="5,2" d="M205.25,-99.02C181.42,-101.51 155,-104.27 132.67,-106.6"/>
+<polygon fill="#ff00e2" stroke="#ff00e2" points="132.3,-103.12 122.72,-107.64 133.03,-110.09 132.3,-103.12"/>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~image_enumeration_m -->
+<!-- module~co_sum_s -->
+<g id="module~~graph~~ModuleGraph_node25" class="node">
+<title>module~co_sum_s</title>
+<g id="a_module~~graph~~ModuleGraph_node25"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="494,-752 430,-752 430,-728 494,-728 494,-752"/>
+<text text-anchor="middle" x="462" y="-737.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
+</a>
+</g>
+</g>
+<!-- module~co_sum_s&#45;&gt;module~utilities_m -->
 <g id="module~~graph~~ModuleGraph_edge58" class="edge">
-<title>module~caffeine_m&#45;&gt;module~image_enumeration_m</title>
-<path fill="none" stroke="#ff0071" stroke-dasharray="5,2" d="M425.69,-400.86C412.04,-395.03 397.27,-386.63 387,-375 355.18,-338.96 379.19,-311.94 351,-273 338.91,-256.3 320.81,-242.04 305.24,-231.73"/>
-<polygon fill="#ff0071" stroke="#ff0071" points="306.75,-228.54 296.43,-226.12 302.99,-234.44 306.75,-228.54"/>
+<title>module~co_sum_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M429.78,-746.36C398.96,-752.64 351.59,-762.29 317.27,-769.29"/>
+<polygon fill="#ff00aa" stroke="#ff00aa" points="316.17,-765.94 307.07,-771.36 317.57,-772.8 316.17,-765.94"/>
+</g>
+<!-- module~co_sum_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~graph~~ModuleGraph_edge57" class="edge">
+<title>module~co_sum_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M429.81,-738C415.08,-735.5 398.3,-730.18 387,-719 346.82,-679.23 382.94,-643.65 351,-597 339.44,-580.11 321.51,-565.91 305.92,-555.68"/>
+<polygon fill="#ff00aa" stroke="#ff00aa" points="307.4,-552.48 297.07,-550.13 303.68,-558.41 307.4,-552.48"/>
+</g>
+<!-- module~co_sum_s&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~graph~~ModuleGraph_edge59" class="edge">
+<title>module~co_sum_s&#45;&gt;module~collective_subroutines_m</title>
+<path fill="none" stroke="#ff00aa" d="M429.78,-732.97C404.8,-727.34 368.95,-719.27 337.98,-712.3"/>
+<polygon fill="#ff00aa" stroke="#ff00aa" points="338.65,-708.86 328.12,-710.08 337.11,-715.69 338.65,-708.86"/>
+</g>
+<!-- module~co_sum_s&#45;&gt;iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_edge56" class="edge">
+<title>module~co_sum_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M429.97,-744.94C416.12,-748.09 400.02,-753.11 387,-761 367.1,-773.05 371.1,-787.28 351,-799 320.74,-816.65 308.41,-826.81 274.5,-818"/>
+<path fill="none" stroke="#ff00aa" stroke-dasharray="5,2" d="M272.5,-818C238.59,-809.19 224.43,-819.47 196,-799 138.84,-757.83 103.35,-678.64 88.73,-640.13"/>
+<polygon fill="#ff00aa" stroke="#ff00aa" points="91.89,-638.58 85.15,-630.41 85.32,-641 91.89,-638.58"/>
+</g>
+<!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
+<g id="module~~graph~~ModuleGraph_edge60" class="edge">
+<title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0071" stroke-dasharray="5,2" d="M234.45,-686C222.08,-681.85 208.36,-676.98 196,-672 167.9,-660.67 136.84,-645.95 114.09,-634.74"/>
+<polygon fill="#ff0071" stroke="#ff0071" points="115.4,-631.48 104.88,-630.17 112.29,-637.75 115.4,-631.48"/>
 </g>
 <!-- proc~assert -->
 <g id="module~~graph~~ModuleGraph_node27" class="node">
 <title>proc~assert</title>
 <g id="a_module~~graph~~ModuleGraph_node27"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="489,-226 435,-226 435,-202 489,-202 489,-226"/>
-<text text-anchor="middle" x="462" y="-211.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="489,-104 435,-104 435,-80 489,-80 489,-104"/>
+<text text-anchor="middle" x="462" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~assert&#45;&gt;module~program_termination_m -->
+<!-- proc~assert&#45;&gt;module~caffeine_characterizable_m -->
 <g id="module~~graph~~ModuleGraph_edge63" class="edge">
-<title>proc~assert&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0038" stroke-dasharray="5,2" d="M434.94,-215.68C418.95,-218.09 399.25,-223.77 387,-237 338.08,-289.86 400.8,-342.97 351,-395 350.06,-395.98 349.08,-396.91 348.07,-397.81"/>
-<polygon fill="#ff0038" stroke="#ff0038" points="345.73,-395.18 339.65,-403.86 349.81,-400.86 345.73,-395.18"/>
+<title>proc~assert&#45;&gt;module~caffeine_characterizable_m</title>
+<path fill="none" stroke="#ff0038" stroke-dasharray="5,2" d="M434.81,-80.29C384.21,-59.62 271.38,-23.11 196,-71 185.66,-77.57 115.89,-235.93 90.35,-294.49"/>
+<polygon fill="#ff0038" stroke="#ff0038" points="87.03,-293.34 86.25,-303.9 93.45,-296.13 87.03,-293.34"/>
 </g>
-<!-- proc~assert&#45;&gt;module~caffeine_characterizable_m -->
+<!-- proc~assert&#45;&gt;module~program_termination_m -->
 <g id="module~~graph~~ModuleGraph_edge61" class="edge">
-<title>proc~assert&#45;&gt;module~caffeine_characterizable_m</title>
-<path fill="none" stroke="#ff0038" stroke-dasharray="5,2" d="M434.9,-205.03C419.1,-198.4 399.62,-187.91 387,-173 355.95,-136.3 390.24,-98.77 351,-71 277.25,-18.82 163.69,-67.04 110.45,-95.1"/>
-<polygon fill="#ff0038" stroke="#ff0038" points="108.67,-92.08 101.54,-99.91 112,-98.24 108.67,-92.08"/>
+<title>proc~assert&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0038" stroke-dasharray="5,2" d="M434.93,-99.01C418.5,-104.82 398.32,-114.82 387,-131 319.1,-228.02 429.01,-305.91 351,-395 350.13,-395.99 349.22,-396.94 348.28,-397.84"/>
+<polygon fill="#ff0038" stroke="#ff0038" points="346.13,-395.08 340.35,-403.96 350.4,-400.62 346.13,-395.08"/>
 </g>
 <!-- proc~assert&#45;&gt;module~image_enumeration_m -->
 <g id="module~~graph~~ModuleGraph_edge62" class="edge">
 <title>proc~assert&#45;&gt;module~image_enumeration_m</title>
-<path fill="none" stroke="#ff0038" stroke-dasharray="5,2" d="M434.67,-214C413.12,-214 381.48,-214 352,-214"/>
-<polygon fill="#ff0038" stroke="#ff0038" points="351.68,-210.5 341.68,-214 351.68,-217.5 351.68,-210.5"/>
+<path fill="none" stroke="#ff0038" stroke-dasharray="5,2" d="M434.67,-92C413.12,-92 381.48,-92 352,-92"/>
+<polygon fill="#ff0038" stroke="#ff0038" points="351.68,-88.5 341.68,-92 351.68,-95.5 351.68,-88.5"/>
 </g>
 </g>
 </svg>
@@ -845,7 +845,7 @@ <h1>Modules</h1>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/lists/procedures.html b/lists/procedures.html
index 36696197..9bceffc9 100644
--- a/lists/procedures.html
+++ b/lists/procedures.html
@@ -114,8 +114,8 @@ <h1>Procedures</h1>
 			   <tr><td><a href='../interface/caf_error_stop.html'>caf_error_stop</a></td><td><a href='../module/program_termination_m.html'>program_termination_m</a></td><td>Interface</td><td></td></tr>
 			   <tr><td><a href='../interface/caf_form_team.html'>caf_form_team</a></td><td><a href='../module/team_type_m.html'>team_type_m</a></td><td>Interface</td><td></td></tr>
 			   <tr><td><a href='../interface/caf_num_images.html'>caf_num_images</a></td><td><a href='../module/image_enumeration_m.html'>image_enumeration_m</a></td><td>Interface</td><td></td></tr>
-			   <tr><td><a href='../interface/caf_stop.html'>caf_stop</a></td><td><a href='../module/program_termination_m.html'>program_termination_m</a></td><td>Interface</td><td></td></tr>
-			   <tr><td><a href='../interface/caf_stop~2.html'>caf_stop</a></td><td><a href='../module/normal_termination_m.html'>normal_termination_m</a></td><td>Interface</td><td></td></tr>
+			   <tr><td><a href='../interface/caf_stop.html'>caf_stop</a></td><td><a href='../module/normal_termination_m.html'>normal_termination_m</a></td><td>Interface</td><td></td></tr>
+			   <tr><td><a href='../interface/caf_stop~2.html'>caf_stop</a></td><td><a href='../module/program_termination_m.html'>program_termination_m</a></td><td>Interface</td><td></td></tr>
 			   <tr><td><a href='../interface/caf_sync_all.html'>caf_sync_all</a></td><td><a href='../module/synchronization_m.html'>synchronization_m</a></td><td>Interface</td><td></td></tr>
 			   <tr><td><a href='../interface/caf_this_image.html'>caf_this_image</a></td><td><a href='../module/image_enumeration_m.html'>image_enumeration_m</a></td><td>Interface</td><td></td></tr>
 			   <tr><td><a href='../proc/f_c_string.html'>f_c_string</a></td><td><a href='../module/program_termination_s.html'>program_termination_s</a></td><td>Function</td><td></td></tr>
@@ -132,955 +132,955 @@ <h1>Procedures</h1>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: call~~graph~~CallGraph Pages: 1 -->
-<svg id="callgraphCallGraph" width="855pt" height="1133pt"
- viewBox="0.00 0.00 855.00 1132.98" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="call~~graph~~CallGraph" class="graph" transform="scale(1.26 1.26) rotate(0) translate(4 1428.45)">
+<svg id="callgraphCallGraph" width="855pt" height="1165pt"
+ viewBox="0.00 0.00 855.00 1165.05" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="call~~graph~~CallGraph" class="graph" transform="scale(1.26 1.26) rotate(0) translate(4 1469)">
 <title>call~~graph~~CallGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-1428.45 1077,-1428.45 1077,4 -4,4"/>
-<!-- interface~caf_c_numeric_type -->
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-1469 1077,-1469 1077,4 -4,4"/>
+<!-- proc~caf_co_reduce -->
 <g id="call~~graph~~CallGraph_node1" class="node">
-<title>interface~caf_c_numeric_type</title>
-<g id="a_call~~graph~~CallGraph_node1"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="533,-289.45 415,-289.45 415,-265.45 533,-265.45 533,-289.45"/>
-<text text-anchor="middle" x="474" y="-275.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
-</a>
-</g>
-</g>
-<!-- proc~get_c_ptr_character -->
-<g id="call~~graph~~CallGraph_node2" class="node">
-<title>proc~get_c_ptr_character</title>
-<g id="a_call~~graph~~CallGraph_node2"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="829.5,-205.45 711.5,-205.45 711.5,-181.45 829.5,-181.45 829.5,-205.45"/>
-<text text-anchor="middle" x="770.5" y="-191.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<title>proc~caf_co_reduce</title>
+<g id="a_call~~graph~~CallGraph_node1"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#d9534f" stroke="#d9534f" points="666,-254 577,-254 577,-230 666,-230 666,-254"/>
+<text text-anchor="middle" x="621.5" y="-239.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_this_image -->
+<!-- proc~optional_value -->
 <g id="call~~graph~~CallGraph_node3" class="node">
-<title>interface~caf_this_image</title>
-<g id="a_call~~graph~~CallGraph_node3"><a xlink:href=".././interface/caf_this_image.html" xlink:title="caf_this_image">
-<polygon fill="#a7506f" stroke="#a7506f" points="135,-507.45 43,-507.45 43,-483.45 135,-483.45 135,-507.45"/>
-<text text-anchor="middle" x="89" y="-493.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_this_image</text>
+<title>proc~optional_value</title>
+<g id="a_call~~graph~~CallGraph_node3"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="816,-365 725,-365 725,-341 816,-341 816,-365"/>
+<text text-anchor="middle" x="770.5" y="-350.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_c_is_f_string -->
-<g id="call~~graph~~CallGraph_node4" class="node">
-<title>interface~caf_c_is_f_string</title>
-<g id="a_call~~graph~~CallGraph_node4"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
-<polygon fill="#a7506f" stroke="#a7506f" points="819.5,-495.45 721.5,-495.45 721.5,-471.45 819.5,-471.45 819.5,-495.45"/>
-<text text-anchor="middle" x="770.5" y="-481.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
-</a>
-</g>
+<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
+<g id="call~~graph~~CallGraph_edge5" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M653.84,-254.12C661.01,-257.85 668.21,-262.46 674,-268 697.59,-290.55 685.01,-311 710,-332 711.94,-333.63 714.03,-335.14 716.2,-336.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="714.53,-339.62 724.98,-341.37 717.91,-333.48 714.53,-339.62"/>
 </g>
-<!-- interface~assert -->
-<g id="call~~graph~~CallGraph_node5" class="node">
-<title>interface~assert</title>
-<g id="a_call~~graph~~CallGraph_node5"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="797.5,-411.45 743.5,-411.45 743.5,-387.45 797.5,-387.45 797.5,-411.45"/>
-<text text-anchor="middle" x="770.5" y="-397.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<!-- interface~caf_c_same_cfi_type -->
+<g id="call~~graph~~CallGraph_node12" class="node">
+<title>interface~caf_c_same_cfi_type</title>
+<g id="a_call~~graph~~CallGraph_node12"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="831,-239 710,-239 710,-215 831,-215 831,-239"/>
+<text text-anchor="middle" x="770.5" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
 </a>
 </g>
 </g>
-<!-- proc~assert -->
-<g id="call~~graph~~CallGraph_node53" class="node">
-<title>proc~assert</title>
-<g id="a_call~~graph~~CallGraph_node53"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="935,-474.45 881,-474.45 881,-450.45 935,-450.45 935,-474.45"/>
-<text text-anchor="middle" x="908" y="-460.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
+<g id="call~~graph~~CallGraph_edge6" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
+<path fill="none" stroke="#ff0000" d="M666.21,-237.54C676.81,-236.46 688.41,-235.27 699.88,-234.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="700.31,-237.58 709.91,-233.08 699.6,-230.61 700.31,-237.58"/>
+</g>
+<!-- interface~caf_c_is_f_string -->
+<g id="call~~graph~~CallGraph_node21" class="node">
+<title>interface~caf_c_is_f_string</title>
+<g id="a_call~~graph~~CallGraph_node21"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
+<polygon fill="#a7506f" stroke="#a7506f" points="819.5,-117 721.5,-117 721.5,-93 819.5,-93 819.5,-117"/>
+<text text-anchor="middle" x="770.5" y="-102.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
 </a>
 </g>
 </g>
-<!-- interface~assert&#45;&gt;proc~assert -->
-<g id="call~~graph~~CallGraph_edge1" class="edge">
-<title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#ff5e00" stroke-dasharray="5,2" d="M797.64,-407.63C808.16,-411.19 820.31,-415.65 831,-420.45 847.13,-427.7 864.44,-437.12 878.45,-445.21"/>
-<polygon fill="#ff5e00" stroke="#ff5e00" points="876.75,-448.26 887.14,-450.29 880.28,-442.22 876.75,-448.26"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="call~~graph~~CallGraph_edge3" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M655.1,-229.9C661.97,-226.23 668.73,-221.63 674,-216 702.02,-186.04 681.16,-160.17 710,-131 713.39,-127.57 717.3,-124.57 721.48,-121.93"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="723.26,-124.95 730.32,-117.04 719.87,-118.82 723.26,-124.95"/>
 </g>
 <!-- interface~caf_c_elem_len -->
-<g id="call~~graph~~CallGraph_node6" class="node">
+<g id="call~~graph~~CallGraph_node23" class="node">
 <title>interface~caf_c_elem_len</title>
-<g id="a_call~~graph~~CallGraph_node6"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
-<polygon fill="#a7506f" stroke="#a7506f" points="817.5,-369.45 723.5,-369.45 723.5,-345.45 817.5,-345.45 817.5,-369.45"/>
-<text text-anchor="middle" x="770.5" y="-355.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
+<g id="a_call~~graph~~CallGraph_node23"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
+<polygon fill="#a7506f" stroke="#a7506f" points="817.5,-197 723.5,-197 723.5,-173 817.5,-173 817.5,-197"/>
+<text text-anchor="middle" x="770.5" y="-182.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_character~2 -->
-<g id="call~~graph~~CallGraph_node7" class="node">
-<title>proc~caf_stop_character~2</title>
-<g id="a_call~~graph~~CallGraph_node7"><a xlink:href=".././proc/caf_stop_character~2.html" xlink:title="caf_stop_character">
-<polygon fill="#777777" stroke="#777777" points="353.5,-752.45 239.5,-752.45 239.5,-728.45 353.5,-728.45 353.5,-752.45"/>
-<text text-anchor="middle" x="296.5" y="-738.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_character</text>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<g id="call~~graph~~CallGraph_edge4" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
+<path fill="none" stroke="#ff0000" d="M650.73,-229.96C667.8,-222.78 690.05,-213.62 710,-206 714.8,-204.17 719.84,-202.3 724.87,-200.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="726.24,-203.7 734.47,-197.03 723.87,-197.11 726.24,-203.7"/>
+</g>
+<!-- interface~caf_error_stop -->
+<g id="call~~graph~~CallGraph_node27" class="node">
+<title>interface~caf_error_stop</title>
+<g id="a_call~~graph~~CallGraph_node27"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="1073,-444 985,-444 985,-420 1073,-420 1073,-444"/>
+<text text-anchor="middle" x="1029" y="-429.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_c_decaffeinate -->
-<g id="call~~graph~~CallGraph_node13" class="node">
-<title>interface~caf_c_decaffeinate</title>
-<g id="a_call~~graph~~CallGraph_node13"><a xlink:href=".././interface/caf_c_decaffeinate.html" xlink:title="caf_c_decaffeinate">
-<polygon fill="#a7506f" stroke="#a7506f" points="530.5,-647.45 417.5,-647.45 417.5,-623.45 530.5,-623.45 530.5,-647.45"/>
-<text text-anchor="middle" x="474" y="-633.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_decaffeinate</text>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
+<g id="call~~graph~~CallGraph_edge9" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M652.68,-229.91C660.11,-226.11 667.73,-221.46 674,-216 695.2,-197.54 685.1,-177.05 710,-164 757.64,-139.04 783.02,-139.72 831,-164 936.3,-217.29 999.03,-356.3 1020.04,-410.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="1016.87,-411.69 1023.69,-419.8 1023.41,-409.2 1016.87,-411.69"/>
+</g>
+<!-- interface~caf_c_co_reduce -->
+<g id="call~~graph~~CallGraph_node37" class="node">
+<title>interface~caf_c_co_reduce</title>
+<g id="a_call~~graph~~CallGraph_node37"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="820.5,-323 720.5,-323 720.5,-299 820.5,-299 820.5,-323"/>
+<text text-anchor="middle" x="770.5" y="-308.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
 <g id="call~~graph~~CallGraph_edge2" class="edge">
-<title>proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#ff8d00" d="M353.64,-729.77C362.4,-727.04 371.14,-723.65 379,-719.45 409.74,-703.03 438.61,-674.53 456.04,-655.34"/>
-<polygon fill="#ff8d00" stroke="#ff8d00" points="458.76,-657.55 462.78,-647.75 453.53,-652.9 458.76,-657.55"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
+<path fill="none" stroke="#ff0000" d="M647.34,-254.03C655.87,-258.3 665.42,-263.23 674,-268 690.38,-277.12 693.07,-281.95 710,-290 713.84,-291.83 717.88,-293.58 721.98,-295.24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="720.97,-298.61 731.56,-298.95 723.5,-292.08 720.97,-298.61"/>
 </g>
-<!-- interface~caf_c_sync_all -->
-<g id="call~~graph~~CallGraph_node8" class="node">
-<title>interface~caf_c_sync_all</title>
-<g id="a_call~~graph~~CallGraph_node8"><a xlink:href=".././interface/caf_c_sync_all.html" xlink:title="caf_c_sync_all">
-<polygon fill="#a7506f" stroke="#a7506f" points="814.5,-773.45 726.5,-773.45 726.5,-749.45 814.5,-749.45 814.5,-773.45"/>
-<text text-anchor="middle" x="770.5" y="-759.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_sync_all</text>
+<!-- proc~get_c_ptr_character -->
+<g id="call~~graph~~CallGraph_node45" class="node">
+<title>proc~get_c_ptr_character</title>
+<g id="a_call~~graph~~CallGraph_node45"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="829.5,-407 711.5,-407 711.5,-383 829.5,-383 829.5,-407"/>
+<text text-anchor="middle" x="770.5" y="-392.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_form_team -->
-<g id="call~~graph~~CallGraph_node9" class="node">
-<title>proc~caf_form_team</title>
-<g id="a_call~~graph~~CallGraph_node9"><a xlink:href=".././proc/caf_form_team.html" xlink:title="caf_form_team">
-<polygon fill="#d9534f" stroke="#d9534f" points="343,-836.45 250,-836.45 250,-812.45 343,-812.45 343,-836.45"/>
-<text text-anchor="middle" x="296.5" y="-822.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_form_team</text>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
+<g id="call~~graph~~CallGraph_edge8" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0000" d="M627.33,-254.1C638.21,-279.87 667.07,-340.52 710,-374 711.82,-375.42 713.75,-376.75 715.76,-378"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="714.46,-381.27 724.92,-382.92 717.77,-375.11 714.46,-381.27"/>
+</g>
+<!-- interface~assert -->
+<g id="call~~graph~~CallGraph_node46" class="node">
+<title>interface~assert</title>
+<g id="a_call~~graph~~CallGraph_node46"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="797.5,-281 743.5,-281 743.5,-257 797.5,-257 797.5,-281"/>
+<text text-anchor="middle" x="770.5" y="-266.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_c_co_broadcast -->
-<g id="call~~graph~~CallGraph_node10" class="node">
-<title>interface~caf_c_co_broadcast</title>
-<g id="a_call~~graph~~CallGraph_node10"><a xlink:href=".././interface/caf_c_co_broadcast.html" xlink:title="caf_c_co_broadcast">
-<polygon fill="#a7506f" stroke="#a7506f" points="828.5,-567.45 712.5,-567.45 712.5,-543.45 828.5,-543.45 828.5,-567.45"/>
-<text text-anchor="middle" x="770.5" y="-553.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_broadcast</text>
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<g id="call~~graph~~CallGraph_edge1" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M666.21,-250.03C687.54,-253.95 712.9,-258.6 733.16,-262.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="732.77,-265.81 743.24,-264.18 734.03,-258.93 732.77,-265.81"/>
+</g>
+<!-- proc~get_c_ptr -->
+<g id="call~~graph~~CallGraph_node65" class="node">
+<title>proc~get_c_ptr</title>
+<g id="a_call~~graph~~CallGraph_node65"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-491 740,-491 740,-467 801,-467 801,-491"/>
+<text text-anchor="middle" x="770.5" y="-476.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum -->
-<g id="call~~graph~~CallGraph_node11" class="node">
-<title>proc~caf_co_sum</title>
-<g id="a_call~~graph~~CallGraph_node11"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#d9534f" stroke="#d9534f" points="659,-163.45 584,-163.45 584,-139.45 659,-139.45 659,-163.45"/>
-<text text-anchor="middle" x="621.5" y="-149.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
-</a>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<g id="call~~graph~~CallGraph_edge7" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M623.94,-254.21C628.86,-290.53 648.27,-399.03 710,-458 715.61,-463.36 722.67,-467.36 729.94,-470.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="729.29,-473.82 739.89,-473.82 731.6,-467.21 729.29,-473.82"/>
 </g>
+<!-- interface~as_character -->
+<g id="call~~graph~~CallGraph_node2" class="node">
+<title>interface~as_character</title>
+<g id="a_call~~graph~~CallGraph_node2"><a xlink:href=".././interface/as_character.html" xlink:title="as_character">
+<polygon fill="#a7506f" stroke="#a7506f" points="811.5,-646 729.5,-646 729.5,-622 811.5,-622 811.5,-646"/>
+<text text-anchor="middle" x="770.5" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
+</a>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
-<g id="call~~graph~~CallGraph_edge6" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ffeb00" d="M659.22,-161.94C676.81,-166.97 698.2,-173.08 717.44,-178.58"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="716.7,-182.01 727.27,-181.39 718.62,-175.28 716.7,-182.01"/>
 </g>
-<!-- interface~caf_c_co_sum -->
-<g id="call~~graph~~CallGraph_node16" class="node">
-<title>interface~caf_c_co_sum</title>
-<g id="a_call~~graph~~CallGraph_node16"><a xlink:href=".././interface/caf_c_co_sum.html" xlink:title="caf_c_co_sum">
-<polygon fill="#a7506f" stroke="#a7506f" points="813.5,-163.45 727.5,-163.45 727.5,-139.45 813.5,-139.45 813.5,-163.45"/>
-<text text-anchor="middle" x="770.5" y="-149.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_sum</text>
+<!-- proc~as_character -->
+<g id="call~~graph~~CallGraph_node64" class="node">
+<title>proc~as_character</title>
+<g id="a_call~~graph~~CallGraph_node64"><a xlink:href=".././proc/as_character.html" xlink:title="as_character">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="949,-646 867,-646 867,-622 949,-622 949,-646"/>
+<text text-anchor="middle" x="908" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum -->
-<g id="call~~graph~~CallGraph_edge4" class="edge">
-<title>proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum</title>
-<path fill="none" stroke="#ffeb00" d="M659.22,-151.45C676.73,-151.45 698,-151.45 717.17,-151.45"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="717.27,-154.95 727.27,-151.45 717.27,-147.95 717.27,-154.95"/>
+<!-- interface~as_character&#45;&gt;proc~as_character -->
+<g id="call~~graph~~CallGraph_edge10" class="edge">
+<title>interface~as_character&#45;&gt;proc~as_character</title>
+<path fill="none" stroke="#ff1700" stroke-dasharray="5,2" d="M811.79,-634C825.86,-634 841.83,-634 856.62,-634"/>
+<polygon fill="#ff1700" stroke="#ff1700" points="856.63,-637.5 866.63,-634 856.63,-630.5 856.63,-637.5"/>
 </g>
-<!-- proc~optional_value -->
-<g id="call~~graph~~CallGraph_node52" class="node">
-<title>proc~optional_value</title>
-<g id="a_call~~graph~~CallGraph_node52"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="816,-121.45 725,-121.45 725,-97.45 816,-97.45 816,-121.45"/>
-<text text-anchor="middle" x="770.5" y="-107.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<!-- interface~caf_co_min -->
+<g id="call~~graph~~CallGraph_node4" class="node">
+<title>interface~caf_co_min</title>
+<g id="a_call~~graph~~CallGraph_node4"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
+<polygon fill="#a7506f" stroke="#a7506f" points="125.5,-149 52.5,-149 52.5,-125 125.5,-125 125.5,-149"/>
+<text text-anchor="middle" x="89" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
-<g id="call~~graph~~CallGraph_edge5" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ffeb00" d="M659.22,-140.96C676.81,-135.93 698.2,-129.82 717.44,-124.33"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="718.62,-127.63 727.27,-121.52 716.7,-120.9 718.62,-127.63"/>
-</g>
-<!-- proc~get_c_ptr -->
-<g id="call~~graph~~CallGraph_node63" class="node">
-<title>proc~get_c_ptr</title>
-<g id="a_call~~graph~~CallGraph_node63"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="801,-453.45 740,-453.45 740,-429.45 801,-429.45 801,-453.45"/>
-<text text-anchor="middle" x="770.5" y="-439.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
+<!-- proc~caf_co_min -->
+<g id="call~~graph~~CallGraph_node40" class="node">
+<title>proc~caf_co_min</title>
+<g id="a_call~~graph~~CallGraph_node40"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
+<polygon fill="#d9534f" stroke="#d9534f" points="333,-149 260,-149 260,-125 333,-125 333,-149"/>
+<text text-anchor="middle" x="296.5" y="-134.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr -->
-<g id="call~~graph~~CallGraph_edge3" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ffeb00" d="M629.89,-163.69C640.98,-182.55 661.91,-220.13 674,-254.45 699.08,-325.66 660.08,-363.82 710,-420.45 715.35,-426.52 722.56,-430.83 730.12,-433.9"/>
-<polygon fill="#ffeb00" stroke="#ffeb00" points="729.16,-437.27 739.76,-437.16 731.4,-430.64 729.16,-437.27"/>
+<!-- interface~caf_co_min&#45;&gt;proc~caf_co_min -->
+<g id="call~~graph~~CallGraph_edge11" class="edge">
+<title>interface~caf_co_min&#45;&gt;proc~caf_co_min</title>
+<path fill="none" stroke="#ff4600" stroke-dasharray="5,2" d="M125.8,-137C160.17,-137 212.24,-137 249.64,-137"/>
+<polygon fill="#ff4600" stroke="#ff4600" points="249.77,-140.5 259.77,-137 249.77,-133.5 249.77,-140.5"/>
 </g>
-<!-- interface~caf_c_caffeinate -->
-<g id="call~~graph~~CallGraph_node12" class="node">
-<title>interface~caf_c_caffeinate</title>
-<g id="a_call~~graph~~CallGraph_node12"><a xlink:href=".././interface/caf_c_caffeinate.html" xlink:title="caf_c_caffeinate">
-<polygon fill="#a7506f" stroke="#a7506f" points="524,-815.45 424,-815.45 424,-791.45 524,-791.45 524,-815.45"/>
-<text text-anchor="middle" x="474" y="-801.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_caffeinate</text>
+<!-- proc~assert -->
+<g id="call~~graph~~CallGraph_node5" class="node">
+<title>proc~assert</title>
+<g id="a_call~~graph~~CallGraph_node5"><a xlink:href=".././proc/assert.html" xlink:title="assert">
+<polygon fill="#d9534f" stroke="#d9534f" points="935,-424 881,-424 881,-400 935,-400 935,-424"/>
+<text text-anchor="middle" x="908" y="-409.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_c_co_reduce -->
-<g id="call~~graph~~CallGraph_node14" class="node">
-<title>interface~caf_c_co_reduce</title>
-<g id="a_call~~graph~~CallGraph_node14"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="820.5,-327.45 720.5,-327.45 720.5,-303.45 820.5,-303.45 820.5,-327.45"/>
-<text text-anchor="middle" x="770.5" y="-313.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
+<!-- proc~assert&#45;&gt;interface~caf_error_stop -->
+<g id="call~~graph~~CallGraph_edge12" class="edge">
+<title>proc~assert&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff5e00" d="M935.12,-416.39C946.79,-418.35 960.99,-420.74 974.75,-423.05"/>
+<polygon fill="#ff5e00" stroke="#ff5e00" points="974.2,-426.51 984.64,-424.71 975.36,-419.6 974.2,-426.51"/>
+</g>
+<!-- interface~caf_this_image -->
+<g id="call~~graph~~CallGraph_node6" class="node">
+<title>interface~caf_this_image</title>
+<g id="a_call~~graph~~CallGraph_node6"><a xlink:href=".././interface/caf_this_image.html" xlink:title="caf_this_image">
+<polygon fill="#a7506f" stroke="#a7506f" points="135,-443 43,-443 43,-419 135,-419 135,-443"/>
+<text text-anchor="middle" x="89" y="-428.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_this_image</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_integer -->
-<g id="call~~graph~~CallGraph_node15" class="node">
-<title>proc~caf_stop_integer</title>
-<g id="a_call~~graph~~CallGraph_node15"><a xlink:href=".././proc/caf_stop_integer.html" xlink:title="caf_stop_integer">
-<polygon fill="#777777" stroke="#777777" points="346.5,-710.45 246.5,-710.45 246.5,-686.45 346.5,-686.45 346.5,-710.45"/>
-<text text-anchor="middle" x="296.5" y="-696.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_integer</text>
+<!-- proc~caf_error_stop_integer -->
+<g id="call~~graph~~CallGraph_node7" class="node">
+<title>proc~caf_error_stop_integer</title>
+<g id="a_call~~graph~~CallGraph_node7"><a xlink:href=".././proc/caf_error_stop_integer.html" xlink:title="caf_error_stop_integer">
+<polygon fill="#777777" stroke="#777777" points="155,-513 23,-513 23,-489 155,-489 155,-513"/>
+<text text-anchor="middle" x="89" y="-498.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop_integer</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_integer&#45;&gt;interface~caf_c_decaffeinate -->
-<g id="call~~graph~~CallGraph_edge7" class="edge">
-<title>proc~caf_stop_integer&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#b4ff00" d="M346.6,-687.23C357.38,-684.37 368.65,-681.07 379,-677.45 399.64,-670.24 422.03,-660.33 439.77,-651.94"/>
-<polygon fill="#b4ff00" stroke="#b4ff00" points="441.6,-654.95 449.11,-647.47 438.58,-648.63 441.6,-654.95"/>
-</g>
-<!-- interface~caf_decaffeinate -->
-<g id="call~~graph~~CallGraph_node17" class="node">
-<title>interface~caf_decaffeinate</title>
-<g id="a_call~~graph~~CallGraph_node17"><a xlink:href=".././interface/caf_decaffeinate.html" xlink:title="caf_decaffeinate">
-<polygon fill="#a7506f" stroke="#a7506f" points="140,-626.45 38,-626.45 38,-602.45 140,-602.45 140,-626.45"/>
-<text text-anchor="middle" x="89" y="-612.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
+<!-- proc~caf_co_broadcast -->
+<g id="call~~graph~~CallGraph_node8" class="node">
+<title>proc~caf_co_broadcast</title>
+<g id="a_call~~graph~~CallGraph_node8"><a xlink:href=".././proc/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
+<polygon fill="#d9534f" stroke="#d9534f" points="674,-566 569,-566 569,-542 674,-542 674,-566"/>
+<text text-anchor="middle" x="621.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_decaffeinate -->
-<g id="call~~graph~~CallGraph_node55" class="node">
-<title>proc~caf_decaffeinate</title>
-<g id="a_call~~graph~~CallGraph_node55"><a xlink:href=".././proc/caf_decaffeinate.html" xlink:title="caf_decaffeinate">
-<polygon fill="#d9534f" stroke="#d9534f" points="347.5,-626.45 245.5,-626.45 245.5,-602.45 347.5,-602.45 347.5,-626.45"/>
-<text text-anchor="middle" x="296.5" y="-612.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
+<!-- interface~caf_c_co_broadcast -->
+<g id="call~~graph~~CallGraph_node30" class="node">
+<title>interface~caf_c_co_broadcast</title>
+<g id="a_call~~graph~~CallGraph_node30"><a xlink:href=".././interface/caf_c_co_broadcast.html" xlink:title="caf_c_co_broadcast">
+<polygon fill="#a7506f" stroke="#a7506f" points="828.5,-566 712.5,-566 712.5,-542 828.5,-542 828.5,-566"/>
+<text text-anchor="middle" x="770.5" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_broadcast</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_decaffeinate&#45;&gt;proc~caf_decaffeinate -->
-<g id="call~~graph~~CallGraph_edge8" class="edge">
-<title>interface~caf_decaffeinate&#45;&gt;proc~caf_decaffeinate</title>
-<path fill="none" stroke="#85ff00" stroke-dasharray="5,2" d="M140.01,-614.45C168.72,-614.45 204.97,-614.45 235.25,-614.45"/>
-<polygon fill="#85ff00" stroke="#85ff00" points="235.27,-617.95 245.27,-614.45 235.27,-610.95 235.27,-617.95"/>
-</g>
-<!-- interface~caf_c_co_min -->
-<g id="call~~graph~~CallGraph_node18" class="node">
-<title>interface~caf_c_co_min</title>
-<g id="a_call~~graph~~CallGraph_node18"><a xlink:href=".././interface/caf_c_co_min.html" xlink:title="caf_c_co_min">
-<polygon fill="#a7506f" stroke="#a7506f" points="516,-133.45 432,-133.45 432,-109.45 516,-109.45 516,-133.45"/>
-<text text-anchor="middle" x="474" y="-119.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_min</text>
-</a>
+<!-- proc~caf_co_broadcast&#45;&gt;interface~caf_c_co_broadcast -->
+<g id="call~~graph~~CallGraph_edge14" class="edge">
+<title>proc~caf_co_broadcast&#45;&gt;interface~caf_c_co_broadcast</title>
+<path fill="none" stroke="#ffa400" d="M674.33,-554C683.37,-554 692.9,-554 702.29,-554"/>
+<polygon fill="#ffa400" stroke="#ffa400" points="702.39,-557.5 712.39,-554 702.39,-550.5 702.39,-557.5"/>
 </g>
+<!-- proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr -->
+<g id="call~~graph~~CallGraph_edge13" class="edge">
+<title>proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ffa400" d="M646.36,-541.99C655.07,-537.6 664.98,-532.59 674,-528 694.93,-517.35 718.4,-505.31 736.83,-495.83"/>
+<polygon fill="#ffa400" stroke="#ffa400" points="738.68,-498.81 745.97,-491.13 735.48,-492.59 738.68,-498.81"/>
 </g>
-<!-- interface~caf_c_co_max -->
-<g id="call~~graph~~CallGraph_node19" class="node">
-<title>interface~caf_c_co_max</title>
-<g id="a_call~~graph~~CallGraph_node19"><a xlink:href=".././interface/caf_c_co_max.html" xlink:title="caf_c_co_max">
-<polygon fill="#a7506f" stroke="#a7506f" points="517.5,-449.45 430.5,-449.45 430.5,-425.45 517.5,-425.45 517.5,-449.45"/>
-<text text-anchor="middle" x="474" y="-435.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_max</text>
+<!-- proc~this_image_team -->
+<g id="call~~graph~~CallGraph_node9" class="node">
+<title>proc~this_image_team</title>
+<g id="a_call~~graph~~CallGraph_node9"><a xlink:href=".././proc/this_image_team.html" xlink:title="this_image_team">
+<polygon fill="#777777" stroke="#777777" points="140.5,-569 37.5,-569 37.5,-545 140.5,-545 140.5,-569"/>
+<text text-anchor="middle" x="89" y="-554.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">this_image_team</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_sync_all -->
-<g id="call~~graph~~CallGraph_node20" class="node">
-<title>interface~caf_sync_all</title>
-<g id="a_call~~graph~~CallGraph_node20"><a xlink:href=".././interface/caf_sync_all.html" xlink:title="caf_sync_all">
-<polygon fill="#a7506f" stroke="#a7506f" points="512,-773.45 436,-773.45 436,-749.45 512,-749.45 512,-773.45"/>
-<text text-anchor="middle" x="474" y="-759.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_sync_all</text>
+<!-- interface~caf_c_this_image -->
+<g id="call~~graph~~CallGraph_node17" class="node">
+<title>interface~caf_c_this_image</title>
+<g id="a_call~~graph~~CallGraph_node17"><a xlink:href=".././interface/caf_c_this_image.html" xlink:title="caf_c_this_image">
+<polygon fill="#a7506f" stroke="#a7506f" points="348,-569 245,-569 245,-545 348,-545 348,-569"/>
+<text text-anchor="middle" x="296.5" y="-554.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_this_image</text>
 </a>
 </g>
 </g>
+<!-- proc~this_image_team&#45;&gt;interface~caf_c_this_image -->
+<g id="call~~graph~~CallGraph_edge15" class="edge">
+<title>proc~this_image_team&#45;&gt;interface~caf_c_this_image</title>
+<path fill="none" stroke="#ffbc00" d="M140.53,-557C168.92,-557 204.54,-557 234.48,-557"/>
+<polygon fill="#ffbc00" stroke="#ffbc00" points="234.8,-560.5 244.8,-557 234.8,-553.5 234.8,-560.5"/>
+</g>
 <!-- proc~caf_sync_all -->
-<g id="call~~graph~~CallGraph_node48" class="node">
+<g id="call~~graph~~CallGraph_node10" class="node">
 <title>proc~caf_sync_all</title>
-<g id="a_call~~graph~~CallGraph_node48"><a xlink:href=".././proc/caf_sync_all.html" xlink:title="caf_sync_all">
-<polygon fill="#d9534f" stroke="#d9534f" points="659.5,-773.45 583.5,-773.45 583.5,-749.45 659.5,-749.45 659.5,-773.45"/>
-<text text-anchor="middle" x="621.5" y="-759.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_sync_all</text>
+<g id="a_call~~graph~~CallGraph_node10"><a xlink:href=".././proc/caf_sync_all.html" xlink:title="caf_sync_all">
+<polygon fill="#d9534f" stroke="#d9534f" points="659.5,-688 583.5,-688 583.5,-664 659.5,-664 659.5,-688"/>
+<text text-anchor="middle" x="621.5" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_sync_all</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_sync_all&#45;&gt;proc~caf_sync_all -->
-<g id="call~~graph~~CallGraph_edge9" class="edge">
-<title>interface~caf_sync_all&#45;&gt;proc~caf_sync_all</title>
-<path fill="none" stroke="#3eff00" stroke-dasharray="5,2" d="M512.09,-761.45C530.73,-761.45 553.52,-761.45 573.39,-761.45"/>
-<polygon fill="#3eff00" stroke="#3eff00" points="573.48,-764.95 583.48,-761.45 573.48,-757.95 573.48,-764.95"/>
-</g>
-<!-- interface~caf_stop -->
-<g id="call~~graph~~CallGraph_node21" class="node">
-<title>interface~caf_stop</title>
-<g id="a_call~~graph~~CallGraph_node21"><a xlink:href=".././interface/caf_stop.html" xlink:title="caf_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="117.5,-878.45 60.5,-878.45 60.5,-854.45 117.5,-854.45 117.5,-878.45"/>
-<text text-anchor="middle" x="89" y="-864.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop</text>
+<!-- interface~caf_c_sync_all -->
+<g id="call~~graph~~CallGraph_node29" class="node">
+<title>interface~caf_c_sync_all</title>
+<g id="a_call~~graph~~CallGraph_node29"><a xlink:href=".././interface/caf_c_sync_all.html" xlink:title="caf_c_sync_all">
+<polygon fill="#a7506f" stroke="#a7506f" points="814.5,-688 726.5,-688 726.5,-664 814.5,-664 814.5,-688"/>
+<text text-anchor="middle" x="770.5" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_sync_all</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_broadcast -->
-<g id="call~~graph~~CallGraph_node22" class="node">
-<title>proc~caf_co_broadcast</title>
-<g id="a_call~~graph~~CallGraph_node22"><a xlink:href=".././proc/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
-<polygon fill="#d9534f" stroke="#d9534f" points="674,-567.45 569,-567.45 569,-543.45 674,-543.45 674,-567.45"/>
-<text text-anchor="middle" x="621.5" y="-553.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
-</a>
+<!-- proc~caf_sync_all&#45;&gt;interface~caf_c_sync_all -->
+<g id="call~~graph~~CallGraph_edge16" class="edge">
+<title>proc~caf_sync_all&#45;&gt;interface~caf_c_sync_all</title>
+<path fill="none" stroke="#ffd300" d="M659.59,-676C676.75,-676 697.44,-676 716.22,-676"/>
+<polygon fill="#ffd300" stroke="#ffd300" points="716.42,-679.5 726.42,-676 716.42,-672.5 716.42,-679.5"/>
 </g>
+<!-- interface~caf_co_reduce -->
+<g id="call~~graph~~CallGraph_node11" class="node">
+<title>interface~caf_co_reduce</title>
+<g id="a_call~~graph~~CallGraph_node11"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="518.5,-326 429.5,-326 429.5,-302 518.5,-302 518.5,-326"/>
+<text text-anchor="middle" x="474" y="-311.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+</a>
 </g>
-<!-- proc~caf_co_broadcast&#45;&gt;interface~caf_c_co_broadcast -->
-<g id="call~~graph~~CallGraph_edge11" class="edge">
-<title>proc~caf_co_broadcast&#45;&gt;interface~caf_c_co_broadcast</title>
-<path fill="none" stroke="#0fff00" d="M674.33,-555.45C683.37,-555.45 692.9,-555.45 702.29,-555.45"/>
-<polygon fill="#0fff00" stroke="#0fff00" points="702.39,-558.95 712.39,-555.45 702.39,-551.95 702.39,-558.95"/>
 </g>
-<!-- proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr -->
-<g id="call~~graph~~CallGraph_edge10" class="edge">
-<title>proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#0fff00" d="M630.8,-543.44C644.92,-523.86 675.45,-484.97 710,-462.45 716.18,-458.42 723.23,-455.06 730.27,-452.29"/>
-<polygon fill="#0fff00" stroke="#0fff00" points="731.53,-455.55 739.76,-448.88 729.17,-448.97 731.53,-455.55"/>
+<!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
+<g id="call~~graph~~CallGraph_edge17" class="edge">
+<title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
+<path fill="none" stroke="#ffeb00" stroke-dasharray="5,2" d="M502.9,-301.92C512.5,-297.65 523.28,-292.73 533,-288 551.84,-278.84 572.6,-267.96 589.17,-259.08"/>
+<polygon fill="#ffeb00" stroke="#ffeb00" points="591.25,-261.93 598.4,-254.11 587.93,-255.77 591.25,-261.93"/>
 </g>
 <!-- proc~inner_caf_error_stop_character -->
-<g id="call~~graph~~CallGraph_node23" class="node">
+<g id="call~~graph~~CallGraph_node13" class="node">
 <title>proc~inner_caf_error_stop_character</title>
-<g id="a_call~~graph~~CallGraph_node23"><a xlink:href=".././proc/inner_caf_error_stop_character.html" xlink:title="inner_caf_error_stop_character">
-<polygon fill="#d9534f" stroke="#d9534f" points="178,-920.45 0,-920.45 0,-896.45 178,-896.45 178,-920.45"/>
-<text text-anchor="middle" x="89" y="-906.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inner_caf_error_stop_character</text>
+<g id="a_call~~graph~~CallGraph_node13"><a xlink:href=".././proc/inner_caf_error_stop_character.html" xlink:title="inner_caf_error_stop_character">
+<polygon fill="#d9534f" stroke="#d9534f" points="178,-709 0,-709 0,-685 178,-685 178,-709"/>
+<text text-anchor="middle" x="89" y="-694.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inner_caf_error_stop_character</text>
 </a>
 </g>
 </g>
 <!-- proc~c_f_string -->
-<g id="call~~graph~~CallGraph_node47" class="node">
+<g id="call~~graph~~CallGraph_node15" class="node">
 <title>proc~c_f_string</title>
-<g id="a_call~~graph~~CallGraph_node47"><a xlink:href=".././proc/c_f_string.html" xlink:title="c_f_string">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-920.45 265,-920.45 265,-896.45 328,-896.45 328,-920.45"/>
-<text text-anchor="middle" x="296.5" y="-906.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">c_f_string</text>
+<g id="a_call~~graph~~CallGraph_node15"><a xlink:href=".././proc/c_f_string.html" xlink:title="c_f_string">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-709 265,-709 265,-685 328,-685 328,-709"/>
+<text text-anchor="middle" x="296.5" y="-694.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">c_f_string</text>
 </a>
 </g>
 </g>
 <!-- proc~inner_caf_error_stop_character&#45;&gt;proc~c_f_string -->
-<g id="call~~graph~~CallGraph_edge12" class="edge">
+<g id="call~~graph~~CallGraph_edge18" class="edge">
 <title>proc~inner_caf_error_stop_character&#45;&gt;proc~c_f_string</title>
-<path fill="none" stroke="#00ff07" d="M178.04,-908.45C204.63,-908.45 232.56,-908.45 254.51,-908.45"/>
-<polygon fill="#00ff07" stroke="#00ff07" points="254.77,-911.95 264.77,-908.45 254.77,-904.95 254.77,-911.95"/>
+<path fill="none" stroke="#e3ff00" d="M178.04,-697C204.63,-697 232.56,-697 254.51,-697"/>
+<polygon fill="#e3ff00" stroke="#e3ff00" points="254.77,-700.5 264.77,-697 254.77,-693.5 254.77,-700.5"/>
 </g>
-<!-- interface~caf_co_sum -->
-<g id="call~~graph~~CallGraph_node24" class="node">
-<title>interface~caf_co_sum</title>
-<g id="a_call~~graph~~CallGraph_node24"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#a7506f" stroke="#a7506f" points="511.5,-91.45 436.5,-91.45 436.5,-67.45 511.5,-67.45 511.5,-91.45"/>
-<text text-anchor="middle" x="474" y="-77.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
+<!-- interface~caf_c_numeric_type -->
+<g id="call~~graph~~CallGraph_node14" class="node">
+<title>interface~caf_c_numeric_type</title>
+<g id="a_call~~graph~~CallGraph_node14"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="533,-246 415,-246 415,-222 533,-222 533,-246"/>
+<text text-anchor="middle" x="474" y="-231.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_sum&#45;&gt;proc~caf_co_sum -->
-<g id="call~~graph~~CallGraph_edge13" class="edge">
-<title>interface~caf_co_sum&#45;&gt;proc~caf_co_sum</title>
-<path fill="none" stroke="#00ff1f" stroke-dasharray="5,2" d="M511.3,-91.46C518.58,-94.18 526.11,-97.23 533,-100.45 553.83,-110.2 576.21,-123.29 593.13,-133.78"/>
-<polygon fill="#00ff1f" stroke="#00ff1f" points="591.58,-136.94 601.92,-139.29 595.31,-131.01 591.58,-136.94"/>
+<!-- proc~caf_stop_integer -->
+<g id="call~~graph~~CallGraph_node16" class="node">
+<title>proc~caf_stop_integer</title>
+<g id="a_call~~graph~~CallGraph_node16"><a xlink:href=".././proc/caf_stop_integer.html" xlink:title="caf_stop_integer">
+<polygon fill="#777777" stroke="#777777" points="346.5,-961 246.5,-961 246.5,-937 346.5,-937 346.5,-961"/>
+<text text-anchor="middle" x="296.5" y="-946.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_integer</text>
+</a>
 </g>
-<!-- proc~caf_caffeinate -->
-<g id="call~~graph~~CallGraph_node25" class="node">
-<title>proc~caf_caffeinate</title>
-<g id="a_call~~graph~~CallGraph_node25"><a xlink:href=".././proc/caf_caffeinate.html" xlink:title="caf_caffeinate">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="340.5,-794.45 252.5,-794.45 252.5,-770.45 340.5,-770.45 340.5,-794.45"/>
-<text text-anchor="middle" x="296.5" y="-780.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_caffeinate</text>
+</g>
+<!-- interface~caf_c_decaffeinate -->
+<g id="call~~graph~~CallGraph_node28" class="node">
+<title>interface~caf_c_decaffeinate</title>
+<g id="a_call~~graph~~CallGraph_node28"><a xlink:href=".././interface/caf_c_decaffeinate.html" xlink:title="caf_c_decaffeinate">
+<polygon fill="#a7506f" stroke="#a7506f" points="530.5,-856 417.5,-856 417.5,-832 530.5,-832 530.5,-856"/>
+<text text-anchor="middle" x="474" y="-841.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_decaffeinate</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_caffeinate&#45;&gt;interface~caf_c_caffeinate -->
-<g id="call~~graph~~CallGraph_edge14" class="edge">
-<title>proc~caf_caffeinate&#45;&gt;interface~caf_c_caffeinate</title>
-<path fill="none" stroke="#00ff36" d="M340.88,-787.64C362.91,-790.28 390,-793.52 413.9,-796.38"/>
-<polygon fill="#00ff36" stroke="#00ff36" points="413.58,-799.87 423.92,-797.58 414.41,-792.92 413.58,-799.87"/>
+<!-- proc~caf_stop_integer&#45;&gt;interface~caf_c_decaffeinate -->
+<g id="call~~graph~~CallGraph_edge19" class="edge">
+<title>proc~caf_stop_integer&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#9cff00" d="M346.76,-940.33C357.75,-937.31 369.08,-933.3 379,-928 409.74,-911.57 438.61,-883.08 456.04,-863.89"/>
+<polygon fill="#9cff00" stroke="#9cff00" points="458.76,-866.09 462.78,-856.29 453.53,-861.45 458.76,-866.09"/>
 </g>
-<!-- proc~caf_caffeinate&#45;&gt;interface~caf_sync_all -->
-<g id="call~~graph~~CallGraph_edge15" class="edge">
-<title>proc~caf_caffeinate&#45;&gt;interface~caf_sync_all</title>
-<path fill="none" stroke="#00ff36" d="M340.88,-777.26C366.6,-774.18 399.22,-770.28 425.61,-767.12"/>
-<polygon fill="#00ff36" stroke="#00ff36" points="426.25,-770.57 435.76,-765.91 425.41,-763.62 426.25,-770.57"/>
+<!-- proc~caf_decaffeinate -->
+<g id="call~~graph~~CallGraph_node18" class="node">
+<title>proc~caf_decaffeinate</title>
+<g id="a_call~~graph~~CallGraph_node18"><a xlink:href=".././proc/caf_decaffeinate.html" xlink:title="caf_decaffeinate">
+<polygon fill="#d9534f" stroke="#d9534f" points="347.5,-919 245.5,-919 245.5,-895 347.5,-895 347.5,-919"/>
+<text text-anchor="middle" x="296.5" y="-904.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
+</a>
 </g>
-<!-- interface~caf_co_max -->
-<g id="call~~graph~~CallGraph_node26" class="node">
-<title>interface~caf_co_max</title>
-<g id="a_call~~graph~~CallGraph_node26"><a xlink:href=".././interface/caf_co_max.html" xlink:title="caf_co_max">
-<polygon fill="#a7506f" stroke="#a7506f" points="127,-429.45 51,-429.45 51,-405.45 127,-405.45 127,-429.45"/>
-<text text-anchor="middle" x="89" y="-415.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+</g>
+<!-- proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate -->
+<g id="call~~graph~~CallGraph_edge20" class="edge">
+<title>proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#6dff00" d="M347.89,-895.43C358.28,-892.65 369.07,-889.47 379,-886 399.64,-878.79 422.03,-868.87 439.77,-860.49"/>
+<polygon fill="#6dff00" stroke="#6dff00" points="441.6,-863.49 449.11,-856.02 438.58,-857.18 441.6,-863.49"/>
+</g>
+<!-- proc~f_c_string -->
+<g id="call~~graph~~CallGraph_node19" class="node">
+<title>proc~f_c_string</title>
+<g id="a_call~~graph~~CallGraph_node19"><a xlink:href=".././proc/f_c_string.html" xlink:title="f_c_string">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-1003 265,-1003 265,-979 328,-979 328,-1003"/>
+<text text-anchor="middle" x="296.5" y="-988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">f_c_string</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max -->
-<g id="call~~graph~~CallGraph_node46" class="node">
-<title>proc~caf_co_max</title>
-<g id="a_call~~graph~~CallGraph_node46"><a xlink:href=".././proc/caf_co_max.html" xlink:title="caf_co_max">
-<polygon fill="#d9534f" stroke="#d9534f" points="334.5,-429.45 258.5,-429.45 258.5,-405.45 334.5,-405.45 334.5,-429.45"/>
-<text text-anchor="middle" x="296.5" y="-415.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+<!-- interface~caf_c_num_images -->
+<g id="call~~graph~~CallGraph_node20" class="node">
+<title>interface~caf_c_num_images</title>
+<g id="a_call~~graph~~CallGraph_node20"><a xlink:href=".././interface/caf_c_num_images.html" xlink:title="caf_c_num_images">
+<polygon fill="#a7506f" stroke="#a7506f" points="353.5,-1045 239.5,-1045 239.5,-1021 353.5,-1021 353.5,-1045"/>
+<text text-anchor="middle" x="296.5" y="-1030.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_num_images</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_max&#45;&gt;proc~caf_co_max -->
-<g id="call~~graph~~CallGraph_edge16" class="edge">
-<title>interface~caf_co_max&#45;&gt;proc~caf_co_max</title>
-<path fill="none" stroke="#00ff4e" stroke-dasharray="5,2" d="M127.21,-417.45C161.01,-417.45 211.03,-417.45 247.76,-417.45"/>
-<polygon fill="#00ff4e" stroke="#00ff4e" points="248.22,-420.95 258.22,-417.45 248.22,-413.95 248.22,-420.95"/>
+<!-- proc~num_images_team -->
+<g id="call~~graph~~CallGraph_node22" class="node">
+<title>proc~num_images_team</title>
+<g id="a_call~~graph~~CallGraph_node22"><a xlink:href=".././proc/num_images_team.html" xlink:title="num_images_team">
+<polygon fill="#777777" stroke="#777777" points="146,-1045 32,-1045 32,-1021 146,-1021 146,-1045"/>
+<text text-anchor="middle" x="89" y="-1030.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">num_images_team</text>
+</a>
 </g>
-<!-- interface~caf_stop~2 -->
-<g id="call~~graph~~CallGraph_node27" class="node">
-<title>interface~caf_stop~2</title>
-<g id="a_call~~graph~~CallGraph_node27"><a xlink:href=".././interface/caf_stop~2.html" xlink:title="caf_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="117.5,-962.45 60.5,-962.45 60.5,-938.45 117.5,-938.45 117.5,-962.45"/>
-<text text-anchor="middle" x="89" y="-948.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop</text>
+</g>
+<!-- proc~num_images_team&#45;&gt;interface~caf_c_num_images -->
+<g id="call~~graph~~CallGraph_edge21" class="edge">
+<title>proc~num_images_team&#45;&gt;interface~caf_c_num_images</title>
+<path fill="none" stroke="#0fff00" d="M146.15,-1033C171.87,-1033 202.52,-1033 229.34,-1033"/>
+<polygon fill="#0fff00" stroke="#0fff00" points="229.41,-1036.5 239.41,-1033 229.41,-1029.5 229.41,-1036.5"/>
+</g>
+<!-- interface~caf_sync_all -->
+<g id="call~~graph~~CallGraph_node24" class="node">
+<title>interface~caf_sync_all</title>
+<g id="a_call~~graph~~CallGraph_node24"><a xlink:href=".././interface/caf_sync_all.html" xlink:title="caf_sync_all">
+<polygon fill="#a7506f" stroke="#a7506f" points="512,-688 436,-688 436,-664 512,-664 512,-688"/>
+<text text-anchor="middle" x="474" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_sync_all</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_error_stop_character -->
-<g id="call~~graph~~CallGraph_node28" class="node">
-<title>proc~caf_error_stop_character</title>
-<g id="a_call~~graph~~CallGraph_node28"><a xlink:href=".././proc/caf_error_stop_character.html" xlink:title="caf_error_stop_character">
-<polygon fill="#777777" stroke="#777777" points="161.5,-1004.45 16.5,-1004.45 16.5,-980.45 161.5,-980.45 161.5,-1004.45"/>
-<text text-anchor="middle" x="89" y="-990.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop_character</text>
+<!-- interface~caf_sync_all&#45;&gt;proc~caf_sync_all -->
+<g id="call~~graph~~CallGraph_edge22" class="edge">
+<title>interface~caf_sync_all&#45;&gt;proc~caf_sync_all</title>
+<path fill="none" stroke="#00ff1f" stroke-dasharray="5,2" d="M512.09,-676C530.73,-676 553.52,-676 573.39,-676"/>
+<polygon fill="#00ff1f" stroke="#00ff1f" points="573.48,-679.5 583.48,-676 573.48,-672.5 573.48,-679.5"/>
+</g>
+<!-- interface~caf_c_caffeinate -->
+<g id="call~~graph~~CallGraph_node25" class="node">
+<title>interface~caf_c_caffeinate</title>
+<g id="a_call~~graph~~CallGraph_node25"><a xlink:href=".././interface/caf_c_caffeinate.html" xlink:title="caf_c_caffeinate">
+<polygon fill="#a7506f" stroke="#a7506f" points="524,-646 424,-646 424,-622 524,-622 524,-646"/>
+<text text-anchor="middle" x="474" y="-631.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_caffeinate</text>
 </a>
 </g>
 </g>
-<!-- proc~f_c_string -->
-<g id="call~~graph~~CallGraph_node49" class="node">
-<title>proc~f_c_string</title>
-<g id="a_call~~graph~~CallGraph_node49"><a xlink:href=".././proc/f_c_string.html" xlink:title="f_c_string">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="328,-1004.45 265,-1004.45 265,-980.45 328,-980.45 328,-1004.45"/>
-<text text-anchor="middle" x="296.5" y="-990.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">f_c_string</text>
+<!-- proc~caf_stop_character~2 -->
+<g id="call~~graph~~CallGraph_node26" class="node">
+<title>proc~caf_stop_character~2</title>
+<g id="a_call~~graph~~CallGraph_node26"><a xlink:href=".././proc/caf_stop_character~2.html" xlink:title="caf_stop_character">
+<polygon fill="#777777" stroke="#777777" points="353.5,-877 239.5,-877 239.5,-853 353.5,-853 353.5,-877"/>
+<text text-anchor="middle" x="296.5" y="-862.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_error_stop_character&#45;&gt;proc~f_c_string -->
-<g id="call~~graph~~CallGraph_edge17" class="edge">
-<title>proc~caf_error_stop_character&#45;&gt;proc~f_c_string</title>
-<path fill="none" stroke="#00ff7d" d="M161.59,-992.45C192.77,-992.45 228.2,-992.45 254.77,-992.45"/>
-<polygon fill="#00ff7d" stroke="#00ff7d" points="254.86,-995.95 264.86,-992.45 254.86,-988.95 254.86,-995.95"/>
+<!-- proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate -->
+<g id="call~~graph~~CallGraph_edge23" class="edge">
+<title>proc~caf_stop_character~2&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#00ff4e" d="M353.51,-858.3C370.53,-856.26 389.4,-854 407.02,-851.9"/>
+<polygon fill="#00ff4e" stroke="#00ff4e" points="407.71,-855.34 417.22,-850.67 406.87,-848.39 407.71,-855.34"/>
 </g>
-<!-- interface~caf_co_min -->
-<g id="call~~graph~~CallGraph_node29" class="node">
-<title>interface~caf_co_min</title>
-<g id="a_call~~graph~~CallGraph_node29"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
-<polygon fill="#a7506f" stroke="#a7506f" points="125.5,-192.45 52.5,-192.45 52.5,-168.45 125.5,-168.45 125.5,-192.45"/>
-<text text-anchor="middle" x="89" y="-178.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
+<!-- proc~this_image_coarray_team -->
+<g id="call~~graph~~CallGraph_node31" class="node">
+<title>proc~this_image_coarray_team</title>
+<g id="a_call~~graph~~CallGraph_node31"><a xlink:href=".././proc/this_image_coarray_team.html" xlink:title="this_image_coarray_team">
+<polygon fill="#777777" stroke="#777777" points="164,-1087 14,-1087 14,-1063 164,-1063 164,-1087"/>
+<text text-anchor="middle" x="89" y="-1072.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">this_image_coarray_team</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min -->
-<g id="call~~graph~~CallGraph_node33" class="node">
-<title>proc~caf_co_min</title>
-<g id="a_call~~graph~~CallGraph_node33"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
-<polygon fill="#d9534f" stroke="#d9534f" points="333,-192.45 260,-192.45 260,-168.45 333,-168.45 333,-192.45"/>
-<text text-anchor="middle" x="296.5" y="-178.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
+<!-- interface~caf_end_team -->
+<g id="call~~graph~~CallGraph_node32" class="node">
+<title>interface~caf_end_team</title>
+<g id="a_call~~graph~~CallGraph_node32"><a xlink:href=".././interface/caf_end_team.html" xlink:title="caf_end_team">
+<polygon fill="#a7506f" stroke="#a7506f" points="133,-1129 45,-1129 45,-1105 133,-1105 133,-1129"/>
+<text text-anchor="middle" x="89" y="-1114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_end_team</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_min&#45;&gt;proc~caf_co_min -->
-<g id="call~~graph~~CallGraph_edge18" class="edge">
-<title>interface~caf_co_min&#45;&gt;proc~caf_co_min</title>
-<path fill="none" stroke="#00ff95" stroke-dasharray="5,2" d="M125.8,-180.45C160.17,-180.45 212.24,-180.45 249.64,-180.45"/>
-<polygon fill="#00ff95" stroke="#00ff95" points="249.77,-183.95 259.77,-180.45 249.77,-176.95 249.77,-183.95"/>
-</g>
 <!-- proc~caf_end_team -->
-<g id="call~~graph~~CallGraph_node30" class="node">
+<g id="call~~graph~~CallGraph_node49" class="node">
 <title>proc~caf_end_team</title>
-<g id="a_call~~graph~~CallGraph_node30"><a xlink:href=".././proc/caf_end_team.html" xlink:title="caf_end_team">
-<polygon fill="#d9534f" stroke="#d9534f" points="340.5,-1046.45 252.5,-1046.45 252.5,-1022.45 340.5,-1022.45 340.5,-1046.45"/>
-<text text-anchor="middle" x="296.5" y="-1032.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_end_team</text>
+<g id="a_call~~graph~~CallGraph_node49"><a xlink:href=".././proc/caf_end_team.html" xlink:title="caf_end_team">
+<polygon fill="#d9534f" stroke="#d9534f" points="340.5,-1129 252.5,-1129 252.5,-1105 340.5,-1105 340.5,-1129"/>
+<text text-anchor="middle" x="296.5" y="-1114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_end_team</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_reduce -->
-<g id="call~~graph~~CallGraph_node31" class="node">
-<title>interface~caf_co_reduce</title>
-<g id="a_call~~graph~~CallGraph_node31"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="518.5,-331.45 429.5,-331.45 429.5,-307.45 518.5,-307.45 518.5,-331.45"/>
-<text text-anchor="middle" x="474" y="-317.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<!-- interface~caf_end_team&#45;&gt;proc~caf_end_team -->
+<g id="call~~graph~~CallGraph_edge24" class="edge">
+<title>interface~caf_end_team&#45;&gt;proc~caf_end_team</title>
+<path fill="none" stroke="#00ffdb" stroke-dasharray="5,2" d="M133.08,-1117C164.86,-1117 208.31,-1117 242.27,-1117"/>
+<polygon fill="#00ffdb" stroke="#00ffdb" points="242.48,-1120.5 252.48,-1117 242.48,-1113.5 242.48,-1120.5"/>
+</g>
+<!-- interface~caf_c_co_min -->
+<g id="call~~graph~~CallGraph_node33" class="node">
+<title>interface~caf_c_co_min</title>
+<g id="a_call~~graph~~CallGraph_node33"><a xlink:href=".././interface/caf_c_co_min.html" xlink:title="caf_c_co_min">
+<polygon fill="#a7506f" stroke="#a7506f" points="516,-90 432,-90 432,-66 516,-66 516,-90"/>
+<text text-anchor="middle" x="474" y="-75.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_min</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce -->
-<g id="call~~graph~~CallGraph_node61" class="node">
-<title>proc~caf_co_reduce</title>
-<g id="a_call~~graph~~CallGraph_node61"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="666,-287.45 577,-287.45 577,-263.45 666,-263.45 666,-287.45"/>
-<text text-anchor="middle" x="621.5" y="-273.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<!-- interface~caf_stop~2 -->
+<g id="call~~graph~~CallGraph_node34" class="node">
+<title>interface~caf_stop~2</title>
+<g id="a_call~~graph~~CallGraph_node34"><a xlink:href=".././interface/caf_stop~2.html" xlink:title="caf_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="117.5,-1171 60.5,-1171 60.5,-1147 117.5,-1147 117.5,-1171"/>
+<text text-anchor="middle" x="89" y="-1156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
-<g id="call~~graph~~CallGraph_edge19" class="edge">
-<title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#00ffc4" stroke-dasharray="5,2" d="M514.76,-307.43C532.16,-302.17 552.76,-295.94 571.13,-290.38"/>
-<polygon fill="#00ffc4" stroke="#00ffc4" points="572.23,-293.71 580.79,-287.46 570.2,-287.01 572.23,-293.71"/>
-</g>
-<!-- interface~caf_co_broadcast -->
-<g id="call~~graph~~CallGraph_node32" class="node">
-<title>interface~caf_co_broadcast</title>
-<g id="a_call~~graph~~CallGraph_node32"><a xlink:href=".././interface/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
-<polygon fill="#a7506f" stroke="#a7506f" points="526.5,-567.45 421.5,-567.45 421.5,-543.45 526.5,-543.45 526.5,-567.45"/>
-<text text-anchor="middle" x="474" y="-553.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
+<!-- interface~caf_c_co_max -->
+<g id="call~~graph~~CallGraph_node35" class="node">
+<title>interface~caf_c_co_max</title>
+<g id="a_call~~graph~~CallGraph_node35"><a xlink:href=".././interface/caf_c_co_max.html" xlink:title="caf_c_co_max">
+<polygon fill="#a7506f" stroke="#a7506f" points="517.5,-406 430.5,-406 430.5,-382 517.5,-382 517.5,-406"/>
+<text text-anchor="middle" x="474" y="-391.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_max</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast -->
-<g id="call~~graph~~CallGraph_edge20" class="edge">
-<title>interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast</title>
-<path fill="none" stroke="#00ffdb" stroke-dasharray="5,2" d="M526.71,-555.45C537.11,-555.45 548.13,-555.45 558.83,-555.45"/>
-<polygon fill="#00ffdb" stroke="#00ffdb" points="558.96,-558.95 568.96,-555.45 558.96,-551.95 558.96,-558.95"/>
+<!-- proc~num_images_team_number -->
+<g id="call~~graph~~CallGraph_node36" class="node">
+<title>proc~num_images_team_number</title>
+<g id="a_call~~graph~~CallGraph_node36"><a xlink:href=".././proc/num_images_team_number.html" xlink:title="num_images_team_number">
+<polygon fill="#777777" stroke="#777777" points="169.5,-1213 8.5,-1213 8.5,-1189 169.5,-1189 169.5,-1213"/>
+<text text-anchor="middle" x="89" y="-1198.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">num_images_team_number</text>
+</a>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type -->
-<g id="call~~graph~~CallGraph_edge21" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type</title>
-<path fill="none" stroke="#00fff3" d="M315.82,-192.48C338.6,-207.22 378.9,-232.54 415,-251.45 421.31,-254.75 428.11,-258.04 434.77,-261.12"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="433.79,-264.51 444.35,-265.44 436.68,-258.13 433.79,-264.51"/>
 </g>
-<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr_character -->
-<g id="call~~graph~~CallGraph_edge26" class="edge">
-<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#00fff3" d="M333.01,-181.07C379.12,-181.9 462.07,-183.5 533,-185.45 589.62,-187.01 653.86,-189.21 701.08,-190.91"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="701.07,-194.41 711.19,-191.28 701.32,-187.42 701.07,-194.41"/>
+<!-- proc~caf_stop_character -->
+<g id="call~~graph~~CallGraph_node38" class="node">
+<title>proc~caf_stop_character</title>
+<g id="a_call~~graph~~CallGraph_node38"><a xlink:href=".././proc/caf_stop_character.html" xlink:title="caf_stop_character">
+<polygon fill="#777777" stroke="#777777" points="353.5,-835 239.5,-835 239.5,-811 353.5,-811 353.5,-835"/>
+<text text-anchor="middle" x="296.5" y="-820.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_character</text>
+</a>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string -->
-<g id="call~~graph~~CallGraph_edge28" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#00fff3" d="M329.73,-192.59C353.24,-201.29 385.93,-213.08 415,-222.45 466.94,-239.2 491.41,-221.11 533,-256.45 561.48,-280.66 546.85,-302.34 569,-332.45 619.5,-401.12 636.98,-418.48 710,-462.45 712.82,-464.15 715.79,-465.73 718.84,-467.21"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="717.61,-470.5 728.17,-471.34 720.44,-464.09 717.61,-470.5"/>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_co_min -->
-<g id="call~~graph~~CallGraph_edge27" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_co_min</title>
-<path fill="none" stroke="#00fff3" d="M333.02,-168.51C360.28,-159.35 398.13,-146.62 427.59,-136.72"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="428.87,-139.98 437.24,-133.48 426.64,-133.34 428.87,-139.98"/>
+<!-- proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate -->
+<g id="call~~graph~~CallGraph_edge25" class="edge">
+<title>proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#0095ff" d="M353.51,-829.7C370.53,-831.74 389.4,-834 407.02,-836.1"/>
+<polygon fill="#0095ff" stroke="#0095ff" points="406.87,-839.61 417.22,-837.33 407.71,-832.66 406.87,-839.61"/>
+</g>
+<!-- interface~caf_c_co_sum -->
+<g id="call~~graph~~CallGraph_node39" class="node">
+<title>interface~caf_c_co_sum</title>
+<g id="a_call~~graph~~CallGraph_node39"><a xlink:href=".././interface/caf_c_co_sum.html" xlink:title="caf_c_co_sum">
+<polygon fill="#a7506f" stroke="#a7506f" points="813.5,-449 727.5,-449 727.5,-425 813.5,-425 813.5,-449"/>
+<text text-anchor="middle" x="770.5" y="-434.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_sum</text>
+</a>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
-<g id="call~~graph~~CallGraph_edge24" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#00fff3" d="M306.52,-192.56C324.61,-216.09 367.7,-268.31 415,-298.45 417.62,-300.13 420.4,-301.69 423.26,-303.15"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="422.05,-306.44 432.59,-307.45 424.97,-300.08 422.05,-306.44"/>
 </g>
 <!-- proc~caf_co_min&#45;&gt;proc~optional_value -->
-<g id="call~~graph~~CallGraph_edge23" class="edge">
+<g id="call~~graph~~CallGraph_edge28" class="edge">
 <title>proc~caf_co_min&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#00fff3" d="M304.37,-168.41C320.02,-142.37 361.15,-81.35 415,-58.45 525.48,-11.47 670.98,-64.37 735.81,-93.21"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="734.59,-96.5 745.14,-97.45 737.48,-90.13 734.59,-96.5"/>
+<path fill="none" stroke="#0066ff" d="M333.22,-125.93C383.36,-112.77 474.95,-97.74 533,-142 577.62,-176.02 532.75,-220.17 569,-263 606.32,-307.09 669.62,-330.51 715.12,-342.28"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="714.28,-345.68 724.83,-344.69 715.97,-338.89 714.28,-345.68"/>
 </g>
-<!-- interface~caf_error_stop -->
-<g id="call~~graph~~CallGraph_node60" class="node">
-<title>interface~caf_error_stop</title>
-<g id="a_call~~graph~~CallGraph_node60"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="1073,-494.45 985,-494.45 985,-470.45 1073,-470.45 1073,-494.45"/>
-<text text-anchor="middle" x="1029" y="-480.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
-</a>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
+<g id="call~~graph~~CallGraph_edge32" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
+<path fill="none" stroke="#0066ff" d="M309.56,-149.17C339.49,-179.35 417.37,-257.9 453.75,-294.59"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="451.33,-297.11 460.85,-301.75 456.3,-292.18 451.33,-297.11"/>
 </g>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type -->
+<g id="call~~graph~~CallGraph_edge27" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type</title>
+<path fill="none" stroke="#0066ff" d="M315.82,-149.03C338.6,-163.76 378.9,-189.09 415,-208 421.31,-211.3 428.11,-214.59 434.77,-217.66"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="433.79,-221.06 444.35,-221.99 436.68,-214.68 433.79,-221.06"/>
+</g>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string -->
+<g id="call~~graph~~CallGraph_edge26" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#0066ff" d="M309.86,-124.75C329.89,-105.85 371.6,-70.37 415,-57 526.5,-22.65 665.25,-64.56 731.22,-89.31"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="730.2,-92.66 740.79,-92.97 732.7,-86.12 730.2,-92.66"/>
 </g>
 <!-- proc~caf_co_min&#45;&gt;interface~caf_error_stop -->
-<g id="call~~graph~~CallGraph_edge25" class="edge">
+<g id="call~~graph~~CallGraph_edge33" class="edge">
 <title>proc~caf_co_min&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#00fff3" d="M303.46,-168.31C318.08,-139.95 358.68,-69.26 415,-36.45 495.05,10.19 527.85,-1.45 620.5,-1.45 620.5,-1.45 620.5,-1.45 771.5,-1.45 982.03,-1.45 1020.36,-364.66 1026.79,-459.84"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="1023.31,-460.32 1027.42,-470.08 1030.3,-459.88 1023.31,-460.32"/>
+<path fill="none" stroke="#0066ff" d="M308.49,-124.75C327.84,-104 370.21,-62.14 415,-41 499.22,-1.25 527.37,0 620.5,0 620.5,0 620.5,0 771.5,0 964.31,0 1015.39,-322.08 1025.74,-410.04"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="1022.27,-410.45 1026.86,-419.99 1029.22,-409.67 1022.27,-410.45"/>
 </g>
-<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr -->
-<g id="call~~graph~~CallGraph_edge22" class="edge">
-<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#00fff3" d="M333.31,-183.08C391.22,-187.95 502.07,-200.1 533,-223.45 561.87,-245.25 542.55,-271.78 569,-296.45 605.87,-330.85 637.82,-304.32 674,-339.45 702.27,-366.89 681.07,-393.72 710,-420.45 715.64,-425.67 722.66,-429.6 729.87,-432.56"/>
-<polygon fill="#00fff3" stroke="#00fff3" points="729.12,-436.01 739.72,-436.03 731.45,-429.41 729.12,-436.01"/>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_co_min -->
+<g id="call~~graph~~CallGraph_edge29" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_co_min</title>
+<path fill="none" stroke="#0066ff" d="M333.02,-125.06C360.28,-115.89 398.13,-103.17 427.59,-93.27"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="428.87,-96.53 437.24,-90.02 426.64,-89.89 428.87,-96.53"/>
 </g>
-<!-- proc~num_images_team -->
-<g id="call~~graph~~CallGraph_node34" class="node">
-<title>proc~num_images_team</title>
-<g id="a_call~~graph~~CallGraph_node34"><a xlink:href=".././proc/num_images_team.html" xlink:title="num_images_team">
-<polygon fill="#777777" stroke="#777777" points="146,-1088.45 32,-1088.45 32,-1064.45 146,-1064.45 146,-1088.45"/>
-<text text-anchor="middle" x="89" y="-1074.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">num_images_team</text>
-</a>
+<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr_character -->
+<g id="call~~graph~~CallGraph_edge31" class="edge">
+<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#0066ff" d="M333.35,-138.97C391.88,-142.92 504.32,-153.78 533,-180 577.25,-220.45 530.04,-264.43 569,-310 602.58,-349.27 657.45,-370.84 701.3,-382.41"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="700.5,-385.82 711.05,-384.87 702.21,-379.03 700.5,-385.82"/>
 </g>
+<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr -->
+<g id="call~~graph~~CallGraph_edge30" class="edge">
+<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#0066ff" d="M330.79,-149.09C354.23,-157.49 386.42,-168.78 415,-178 467.06,-194.79 497.16,-171.68 533,-213 604.82,-295.81 490.06,-380.94 569,-457 611.35,-497.8 684.4,-494.54 729.67,-487.47"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="730.44,-490.89 739.71,-485.77 729.26,-483.99 730.44,-490.89"/>
 </g>
-<!-- interface~caf_c_num_images -->
-<g id="call~~graph~~CallGraph_node64" class="node">
-<title>interface~caf_c_num_images</title>
-<g id="a_call~~graph~~CallGraph_node64"><a xlink:href=".././interface/caf_c_num_images.html" xlink:title="caf_c_num_images">
-<polygon fill="#a7506f" stroke="#a7506f" points="353.5,-1088.45 239.5,-1088.45 239.5,-1064.45 353.5,-1064.45 353.5,-1088.45"/>
-<text text-anchor="middle" x="296.5" y="-1074.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_num_images</text>
+<!-- interface~caf_co_sum -->
+<g id="call~~graph~~CallGraph_node41" class="node">
+<title>interface~caf_co_sum</title>
+<g id="a_call~~graph~~CallGraph_node41"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#a7506f" stroke="#a7506f" points="511.5,-486 436.5,-486 436.5,-462 511.5,-462 511.5,-486"/>
+<text text-anchor="middle" x="474" y="-471.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
 </a>
 </g>
 </g>
-<!-- proc~num_images_team&#45;&gt;interface~caf_c_num_images -->
-<g id="call~~graph~~CallGraph_edge29" class="edge">
-<title>proc~num_images_team&#45;&gt;interface~caf_c_num_images</title>
-<path fill="none" stroke="#00f3ff" d="M146.15,-1076.45C171.87,-1076.45 202.52,-1076.45 229.34,-1076.45"/>
-<polygon fill="#00f3ff" stroke="#00f3ff" points="229.41,-1079.95 239.41,-1076.45 229.41,-1072.95 229.41,-1079.95"/>
-</g>
-<!-- proc~as_character -->
-<g id="call~~graph~~CallGraph_node35" class="node">
-<title>proc~as_character</title>
-<g id="a_call~~graph~~CallGraph_node35"><a xlink:href=".././proc/as_character.html" xlink:title="as_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="949,-689.45 867,-689.45 867,-665.45 949,-665.45 949,-689.45"/>
-<text text-anchor="middle" x="908" y="-675.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
+<!-- proc~caf_co_sum -->
+<g id="call~~graph~~CallGraph_node56" class="node">
+<title>proc~caf_co_sum</title>
+<g id="a_call~~graph~~CallGraph_node56"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#d9534f" stroke="#d9534f" points="659,-448 584,-448 584,-424 659,-424 659,-448"/>
+<text text-anchor="middle" x="621.5" y="-433.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
 </a>
 </g>
 </g>
-<!-- proc~as_character&#45;&gt;interface~caf_error_stop -->
-<g id="call~~graph~~CallGraph_edge30" class="edge">
-<title>proc~as_character&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#00dbff" d="M937.76,-665.39C941.86,-662.85 945.77,-659.87 949,-656.45 991.32,-611.64 1013.82,-540.23 1022.98,-504.43"/>
-<polygon fill="#00dbff" stroke="#00dbff" points="1026.43,-505.08 1025.4,-494.53 1019.63,-503.41 1026.43,-505.08"/>
+<!-- interface~caf_co_sum&#45;&gt;proc~caf_co_sum -->
+<g id="call~~graph~~CallGraph_edge34" class="edge">
+<title>interface~caf_co_sum&#45;&gt;proc~caf_co_sum</title>
+<path fill="none" stroke="#004eff" stroke-dasharray="5,2" d="M511.72,-464.41C530.58,-459.48 553.78,-453.43 573.9,-448.17"/>
+<polygon fill="#004eff" stroke="#004eff" points="575,-451.5 583.8,-445.59 573.24,-444.73 575,-451.5"/>
 </g>
-<!-- proc~num_images_team_number -->
-<g id="call~~graph~~CallGraph_node36" class="node">
-<title>proc~num_images_team_number</title>
-<g id="a_call~~graph~~CallGraph_node36"><a xlink:href=".././proc/num_images_team_number.html" xlink:title="num_images_team_number">
-<polygon fill="#777777" stroke="#777777" points="169.5,-1130.45 8.5,-1130.45 8.5,-1106.45 169.5,-1106.45 169.5,-1130.45"/>
-<text text-anchor="middle" x="89" y="-1116.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">num_images_team_number</text>
+<!-- proc~this_image_coarray_dim_team -->
+<g id="call~~graph~~CallGraph_node42" class="node">
+<title>proc~this_image_coarray_dim_team</title>
+<g id="a_call~~graph~~CallGraph_node42"><a xlink:href=".././proc/this_image_coarray_dim_team.html" xlink:title="this_image_coarray_dim_team">
+<polygon fill="#777777" stroke="#777777" points="176.5,-1255 1.5,-1255 1.5,-1231 176.5,-1231 176.5,-1255"/>
+<text text-anchor="middle" x="89" y="-1240.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">this_image_coarray_dim_team</text>
 </a>
 </g>
 </g>
-<!-- proc~this_image_team -->
-<g id="call~~graph~~CallGraph_node37" class="node">
-<title>proc~this_image_team</title>
-<g id="a_call~~graph~~CallGraph_node37"><a xlink:href=".././proc/this_image_team.html" xlink:title="this_image_team">
-<polygon fill="#777777" stroke="#777777" points="140.5,-1172.45 37.5,-1172.45 37.5,-1148.45 140.5,-1148.45 140.5,-1172.45"/>
-<text text-anchor="middle" x="89" y="-1158.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">this_image_team</text>
+<!-- interface~caf_num_images -->
+<g id="call~~graph~~CallGraph_node43" class="node">
+<title>interface~caf_num_images</title>
+<g id="a_call~~graph~~CallGraph_node43"><a xlink:href=".././interface/caf_num_images.html" xlink:title="caf_num_images">
+<polygon fill="#a7506f" stroke="#a7506f" points="140.5,-1297 37.5,-1297 37.5,-1273 140.5,-1273 140.5,-1297"/>
+<text text-anchor="middle" x="89" y="-1282.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_num_images</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_c_this_image -->
-<g id="call~~graph~~CallGraph_node50" class="node">
-<title>interface~caf_c_this_image</title>
-<g id="a_call~~graph~~CallGraph_node50"><a xlink:href=".././interface/caf_c_this_image.html" xlink:title="caf_c_this_image">
-<polygon fill="#a7506f" stroke="#a7506f" points="348,-1172.45 245,-1172.45 245,-1148.45 348,-1148.45 348,-1172.45"/>
-<text text-anchor="middle" x="296.5" y="-1158.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_this_image</text>
+<!-- interface~intrinsic_array_t -->
+<g id="call~~graph~~CallGraph_node44" class="node">
+<title>interface~intrinsic_array_t</title>
+<g id="a_call~~graph~~CallGraph_node44"><a xlink:href=".././interface/intrinsic_array_t.html" xlink:title="intrinsic_array_t">
+<polygon fill="#a7506f" stroke="#a7506f" points="137.5,-1339 40.5,-1339 40.5,-1315 137.5,-1315 137.5,-1339"/>
+<text text-anchor="middle" x="89" y="-1324.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_t</text>
 </a>
 </g>
 </g>
-<!-- proc~this_image_team&#45;&gt;interface~caf_c_this_image -->
-<g id="call~~graph~~CallGraph_edge31" class="edge">
-<title>proc~this_image_team&#45;&gt;interface~caf_c_this_image</title>
-<path fill="none" stroke="#00acff" d="M140.53,-1160.45C168.92,-1160.45 204.54,-1160.45 234.48,-1160.45"/>
-<polygon fill="#00acff" stroke="#00acff" points="234.8,-1163.95 244.8,-1160.45 234.8,-1156.95 234.8,-1163.95"/>
-</g>
-<!-- proc~this_image_coarray_team -->
-<g id="call~~graph~~CallGraph_node38" class="node">
-<title>proc~this_image_coarray_team</title>
-<g id="a_call~~graph~~CallGraph_node38"><a xlink:href=".././proc/this_image_coarray_team.html" xlink:title="this_image_coarray_team">
-<polygon fill="#777777" stroke="#777777" points="164,-1214.45 14,-1214.45 14,-1190.45 164,-1190.45 164,-1214.45"/>
-<text text-anchor="middle" x="89" y="-1200.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">this_image_coarray_team</text>
-</a>
-</g>
+<!-- interface~assert&#45;&gt;proc~assert -->
+<g id="call~~graph~~CallGraph_edge35" class="edge">
+<title>interface~assert&#45;&gt;proc~assert</title>
+<path fill="none" stroke="#2700ff" stroke-dasharray="5,2" d="M797.72,-274.17C808.85,-277.34 821.43,-282.32 831,-290 864.65,-317.01 887.51,-363.19 898.81,-390.32"/>
+<polygon fill="#2700ff" stroke="#2700ff" points="895.6,-391.73 902.57,-399.71 902.1,-389.13 895.6,-391.73"/>
 </g>
-<!-- proc~construct -->
-<g id="call~~graph~~CallGraph_node39" class="node">
-<title>proc~construct</title>
-<g id="a_call~~graph~~CallGraph_node39"><a xlink:href=".././proc/construct.html" xlink:title="construct">
-<polygon fill="#777777" stroke="#777777" points="939,-647.45 877,-647.45 877,-623.45 939,-623.45 939,-647.45"/>
-<text text-anchor="middle" x="908" y="-633.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">construct</text>
+<!-- interface~caf_change_team -->
+<g id="call~~graph~~CallGraph_node47" class="node">
+<title>interface~caf_change_team</title>
+<g id="a_call~~graph~~CallGraph_node47"><a xlink:href=".././interface/caf_change_team.html" xlink:title="caf_change_team">
+<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-1381 35.5,-1381 35.5,-1357 142.5,-1357 142.5,-1381"/>
+<text text-anchor="middle" x="89" y="-1366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_change_team</text>
 </a>
 </g>
 </g>
-<!-- proc~construct&#45;&gt;interface~caf_error_stop -->
-<g id="call~~graph~~CallGraph_edge32" class="edge">
-<title>proc~construct&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#007dff" d="M931.48,-623.28C937.58,-619.36 943.9,-614.66 949,-609.45 980.43,-577.39 1005.44,-530.7 1018.37,-503.77"/>
-<polygon fill="#007dff" stroke="#007dff" points="1021.64,-505.03 1022.72,-494.49 1015.31,-502.06 1021.64,-505.03"/>
-</g>
-<!-- interface~caf_form_team -->
-<g id="call~~graph~~CallGraph_node40" class="node">
-<title>interface~caf_form_team</title>
-<g id="a_call~~graph~~CallGraph_node40"><a xlink:href=".././interface/caf_form_team.html" xlink:title="caf_form_team">
-<polygon fill="#a7506f" stroke="#a7506f" points="135.5,-836.45 42.5,-836.45 42.5,-812.45 135.5,-812.45 135.5,-836.45"/>
-<text text-anchor="middle" x="89" y="-822.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_form_team</text>
+<!-- proc~caf_change_team -->
+<g id="call~~graph~~CallGraph_node50" class="node">
+<title>proc~caf_change_team</title>
+<g id="a_call~~graph~~CallGraph_node50"><a xlink:href=".././proc/caf_change_team.html" xlink:title="caf_change_team">
+<polygon fill="#d9534f" stroke="#d9534f" points="350,-1381 243,-1381 243,-1357 350,-1357 350,-1381"/>
+<text text-anchor="middle" x="296.5" y="-1366.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_change_team</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_form_team&#45;&gt;proc~caf_form_team -->
-<g id="call~~graph~~CallGraph_edge33" class="edge">
-<title>interface~caf_form_team&#45;&gt;proc~caf_form_team</title>
-<path fill="none" stroke="#0066ff" stroke-dasharray="5,2" d="M135.61,-824.45C166.23,-824.45 206.78,-824.45 239.38,-824.45"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="239.67,-827.95 249.67,-824.45 239.67,-820.95 239.67,-827.95"/>
+<!-- interface~caf_change_team&#45;&gt;proc~caf_change_team -->
+<g id="call~~graph~~CallGraph_edge36" class="edge">
+<title>interface~caf_change_team&#45;&gt;proc~caf_change_team</title>
+<path fill="none" stroke="#3e00ff" stroke-dasharray="5,2" d="M142.65,-1369C170.09,-1369 203.82,-1369 232.62,-1369"/>
+<polygon fill="#3e00ff" stroke="#3e00ff" points="232.98,-1372.5 242.98,-1369 232.98,-1365.5 232.98,-1372.5"/>
 </g>
 <!-- proc~caf_stop_integer~2 -->
-<g id="call~~graph~~CallGraph_node41" class="node">
+<g id="call~~graph~~CallGraph_node48" class="node">
 <title>proc~caf_stop_integer~2</title>
-<g id="a_call~~graph~~CallGraph_node41"><a xlink:href=".././proc/caf_stop_integer~2.html" xlink:title="caf_stop_integer">
-<polygon fill="#777777" stroke="#777777" points="346.5,-668.45 246.5,-668.45 246.5,-644.45 346.5,-644.45 346.5,-668.45"/>
-<text text-anchor="middle" x="296.5" y="-654.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_integer</text>
+<g id="a_call~~graph~~CallGraph_node48"><a xlink:href=".././proc/caf_stop_integer~2.html" xlink:title="caf_stop_integer">
+<polygon fill="#777777" stroke="#777777" points="346.5,-793 246.5,-793 246.5,-769 346.5,-769 346.5,-793"/>
+<text text-anchor="middle" x="296.5" y="-778.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_integer</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_stop_integer~2&#45;&gt;interface~caf_c_decaffeinate -->
-<g id="call~~graph~~CallGraph_edge34" class="edge">
+<g id="call~~graph~~CallGraph_edge37" class="edge">
 <title>proc~caf_stop_integer~2&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#004eff" d="M346.85,-650.55C365.59,-648.31 387.23,-645.72 407.24,-643.32"/>
-<polygon fill="#004eff" stroke="#004eff" points="407.71,-646.79 417.22,-642.13 406.88,-639.84 407.71,-646.79"/>
+<path fill="none" stroke="#5600ff" d="M346.6,-792.23C357.38,-795.09 368.65,-798.38 379,-802 399.64,-809.21 422.03,-819.13 439.77,-827.51"/>
+<polygon fill="#5600ff" stroke="#5600ff" points="438.58,-830.82 449.11,-831.98 441.6,-824.51 438.58,-830.82"/>
 </g>
-<!-- interface~caf_change_team -->
-<g id="call~~graph~~CallGraph_node42" class="node">
-<title>interface~caf_change_team</title>
-<g id="a_call~~graph~~CallGraph_node42"><a xlink:href=".././interface/caf_change_team.html" xlink:title="caf_change_team">
-<polygon fill="#a7506f" stroke="#a7506f" points="142.5,-1256.45 35.5,-1256.45 35.5,-1232.45 142.5,-1232.45 142.5,-1256.45"/>
-<text text-anchor="middle" x="89" y="-1242.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_change_team</text>
+<!-- proc~caf_form_team -->
+<g id="call~~graph~~CallGraph_node51" class="node">
+<title>proc~caf_form_team</title>
+<g id="a_call~~graph~~CallGraph_node51"><a xlink:href=".././proc/caf_form_team.html" xlink:title="caf_form_team">
+<polygon fill="#d9534f" stroke="#d9534f" points="343,-1423 250,-1423 250,-1399 343,-1399 343,-1423"/>
+<text text-anchor="middle" x="296.5" y="-1408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_form_team</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_change_team -->
-<g id="call~~graph~~CallGraph_node45" class="node">
-<title>proc~caf_change_team</title>
-<g id="a_call~~graph~~CallGraph_node45"><a xlink:href=".././proc/caf_change_team.html" xlink:title="caf_change_team">
-<polygon fill="#d9534f" stroke="#d9534f" points="350,-1256.45 243,-1256.45 243,-1232.45 350,-1232.45 350,-1256.45"/>
-<text text-anchor="middle" x="296.5" y="-1242.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_change_team</text>
+<!-- interface~caf_stop -->
+<g id="call~~graph~~CallGraph_node52" class="node">
+<title>interface~caf_stop</title>
+<g id="a_call~~graph~~CallGraph_node52"><a xlink:href=".././interface/caf_stop.html" xlink:title="caf_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="117.5,-1465 60.5,-1465 60.5,-1441 117.5,-1441 117.5,-1465"/>
+<text text-anchor="middle" x="89" y="-1450.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_change_team&#45;&gt;proc~caf_change_team -->
-<g id="call~~graph~~CallGraph_edge35" class="edge">
-<title>interface~caf_change_team&#45;&gt;proc~caf_change_team</title>
-<path fill="none" stroke="#0036ff" stroke-dasharray="5,2" d="M142.65,-1244.45C170.09,-1244.45 203.82,-1244.45 232.62,-1244.45"/>
-<polygon fill="#0036ff" stroke="#0036ff" points="232.98,-1247.95 242.98,-1244.45 232.98,-1240.95 232.98,-1247.95"/>
-</g>
-<!-- interface~as_character -->
-<g id="call~~graph~~CallGraph_node43" class="node">
-<title>interface~as_character</title>
-<g id="a_call~~graph~~CallGraph_node43"><a xlink:href=".././interface/as_character.html" xlink:title="as_character">
-<polygon fill="#a7506f" stroke="#a7506f" points="811.5,-689.45 729.5,-689.45 729.5,-665.45 811.5,-665.45 811.5,-689.45"/>
-<text text-anchor="middle" x="770.5" y="-675.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">as_character</text>
+<!-- proc~caf_caffeinate -->
+<g id="call~~graph~~CallGraph_node53" class="node">
+<title>proc~caf_caffeinate</title>
+<g id="a_call~~graph~~CallGraph_node53"><a xlink:href=".././proc/caf_caffeinate.html" xlink:title="caf_caffeinate">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="340.5,-667 252.5,-667 252.5,-643 340.5,-643 340.5,-667"/>
+<text text-anchor="middle" x="296.5" y="-652.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_caffeinate</text>
 </a>
 </g>
 </g>
-<!-- interface~as_character&#45;&gt;proc~as_character -->
-<g id="call~~graph~~CallGraph_edge36" class="edge">
-<title>interface~as_character&#45;&gt;proc~as_character</title>
-<path fill="none" stroke="#001fff" stroke-dasharray="5,2" d="M811.79,-677.45C825.86,-677.45 841.83,-677.45 856.62,-677.45"/>
-<polygon fill="#001fff" stroke="#001fff" points="856.63,-680.95 866.63,-677.45 856.63,-673.95 856.63,-680.95"/>
+<!-- proc~caf_caffeinate&#45;&gt;interface~caf_sync_all -->
+<g id="call~~graph~~CallGraph_edge39" class="edge">
+<title>proc~caf_caffeinate&#45;&gt;interface~caf_sync_all</title>
+<path fill="none" stroke="#cc00ff" d="M340.88,-660.19C366.6,-663.27 399.22,-667.17 425.61,-670.33"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="425.41,-673.83 435.76,-671.54 426.25,-666.88 425.41,-673.83"/>
 </g>
-<!-- interface~caf_end_team -->
-<g id="call~~graph~~CallGraph_node44" class="node">
-<title>interface~caf_end_team</title>
-<g id="a_call~~graph~~CallGraph_node44"><a xlink:href=".././interface/caf_end_team.html" xlink:title="caf_end_team">
-<polygon fill="#a7506f" stroke="#a7506f" points="133,-1046.45 45,-1046.45 45,-1022.45 133,-1022.45 133,-1046.45"/>
-<text text-anchor="middle" x="89" y="-1032.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_end_team</text>
+<!-- proc~caf_caffeinate&#45;&gt;interface~caf_c_caffeinate -->
+<g id="call~~graph~~CallGraph_edge38" class="edge">
+<title>proc~caf_caffeinate&#45;&gt;interface~caf_c_caffeinate</title>
+<path fill="none" stroke="#cc00ff" d="M340.88,-649.81C362.91,-647.17 390,-643.93 413.9,-641.07"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="414.41,-644.54 423.92,-639.87 413.58,-637.59 414.41,-644.54"/>
+</g>
+<!-- interface~caf_caffeinate -->
+<g id="call~~graph~~CallGraph_node54" class="node">
+<title>interface~caf_caffeinate</title>
+<g id="a_call~~graph~~CallGraph_node54"><a xlink:href=".././interface/caf_caffeinate.html" xlink:title="caf_caffeinate">
+<polygon fill="#a7506f" stroke="#a7506f" points="133,-667 45,-667 45,-643 133,-643 133,-667"/>
+<text text-anchor="middle" x="89" y="-652.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_caffeinate</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_end_team&#45;&gt;proc~caf_end_team -->
-<g id="call~~graph~~CallGraph_edge37" class="edge">
-<title>interface~caf_end_team&#45;&gt;proc~caf_end_team</title>
-<path fill="none" stroke="#0007ff" stroke-dasharray="5,2" d="M133.08,-1034.45C164.86,-1034.45 208.31,-1034.45 242.27,-1034.45"/>
-<polygon fill="#0007ff" stroke="#0007ff" points="242.48,-1037.95 252.48,-1034.45 242.48,-1030.95 242.48,-1037.95"/>
+<!-- interface~caf_caffeinate&#45;&gt;proc~caf_caffeinate -->
+<g id="call~~graph~~CallGraph_edge40" class="edge">
+<title>interface~caf_caffeinate&#45;&gt;proc~caf_caffeinate</title>
+<path fill="none" stroke="#e300ff" stroke-dasharray="5,2" d="M133.08,-655C164.86,-655 208.31,-655 242.27,-655"/>
+<polygon fill="#e300ff" stroke="#e300ff" points="242.48,-658.5 252.48,-655 242.48,-651.5 242.48,-658.5"/>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type -->
-<g id="call~~graph~~CallGraph_edge38" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type</title>
-<path fill="none" stroke="#2700ff" d="M306.49,-405.24C324.55,-381.5 367.57,-328.83 415,-298.45 417.58,-296.8 420.3,-295.26 423.11,-293.82"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="424.68,-296.95 432.27,-289.57 421.73,-290.6 424.68,-296.95"/>
+<!-- proc~inner_caf_error_stop_integer -->
+<g id="call~~graph~~CallGraph_node55" class="node">
+<title>proc~inner_caf_error_stop_integer</title>
+<g id="a_call~~graph~~CallGraph_node55"><a xlink:href=".././proc/inner_caf_error_stop_integer.html" xlink:title="inner_caf_error_stop_integer">
+<polygon fill="#d9534f" stroke="#d9534f" points="379,-751 214,-751 214,-727 379,-727 379,-751"/>
+<text text-anchor="middle" x="296.5" y="-736.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inner_caf_error_stop_integer</text>
+</a>
 </g>
-<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr_character -->
+</g>
+<!-- proc~inner_caf_error_stop_integer&#45;&gt;interface~caf_c_decaffeinate -->
+<g id="call~~graph~~CallGraph_edge41" class="edge">
+<title>proc~inner_caf_error_stop_integer&#45;&gt;interface~caf_c_decaffeinate</title>
+<path fill="none" stroke="#fb00ff" d="M357.94,-751.08C365.24,-753.54 372.43,-756.49 379,-760 409.74,-776.43 438.61,-804.92 456.04,-824.11"/>
+<polygon fill="#fb00ff" stroke="#fb00ff" points="453.53,-826.55 462.78,-831.71 458.76,-821.91 453.53,-826.55"/>
+</g>
+<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
 <g id="call~~graph~~CallGraph_edge43" class="edge">
-<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#2700ff" d="M334.71,-415.14C393.53,-410.74 504.28,-399.2 533,-373.45 574.14,-336.57 529.96,-293.56 569,-254.45 603.75,-219.65 657.7,-204.59 700.88,-198.13"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="701.61,-201.57 711.05,-196.74 700.66,-194.63 701.61,-201.57"/>
+<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff00eb" d="M636.86,-423.91C653.57,-410.33 682.39,-388.3 710,-374 713.51,-372.18 717.21,-370.46 720.99,-368.84"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="722.46,-372.02 730.43,-365.04 719.85,-365.52 722.46,-372.02"/>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum -->
 <g id="call~~graph~~CallGraph_edge45" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#2700ff" d="M314.8,-429.51C336.87,-444.11 376.78,-467.91 415,-477.45 516.75,-502.84 640.08,-497.09 711.2,-490.41"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="711.69,-493.88 721.3,-489.42 711.01,-486.91 711.69,-493.88"/>
+<title>proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum</title>
+<path fill="none" stroke="#ff00eb" d="M659.22,-436.25C676.73,-436.37 698,-436.51 717.17,-436.64"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="717.25,-440.14 727.27,-436.71 717.3,-433.14 717.25,-440.14"/>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_co_max -->
+<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
 <g id="call~~graph~~CallGraph_edge44" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_co_max</title>
-<path fill="none" stroke="#2700ff" d="M334.72,-421.69C359.52,-424.52 392.5,-428.28 420.02,-431.42"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="419.95,-434.93 430.28,-432.58 420.74,-427.97 419.95,-434.93"/>
+<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff00eb" d="M659.22,-425.76C676.6,-420.91 697.67,-415.03 716.73,-409.72"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="717.78,-413.06 726.48,-407 715.9,-406.32 717.78,-413.06"/>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
-<g id="call~~graph~~CallGraph_edge41" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#2700ff" d="M315.79,-405.23C338.55,-390.26 378.82,-364.55 415,-345.45 421.23,-342.17 427.96,-338.9 434.55,-335.85"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="436.37,-338.87 444.03,-331.56 433.48,-332.49 436.37,-338.87"/>
+<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr -->
+<g id="call~~graph~~CallGraph_edge42" class="edge">
+<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff00eb" d="M659.22,-446.74C680.75,-453.04 707.96,-461 729.96,-467.43"/>
+<polygon fill="#ff00eb" stroke="#ff00eb" points="729.09,-470.82 739.67,-470.27 731.05,-464.11 729.09,-470.82"/>
 </g>
-<!-- proc~caf_co_max&#45;&gt;proc~optional_value -->
-<g id="call~~graph~~CallGraph_edge40" class="edge">
-<title>proc~caf_co_max&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#2700ff" d="M327.68,-405.34C351.27,-396.07 384.97,-383.25 415,-373.45 466.77,-356.56 496.52,-380.89 533,-340.45 596.43,-270.14 499.89,-195.19 569,-130.45 607.39,-94.49 669.81,-93.52 714.81,-98.84"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="714.62,-102.35 724.99,-100.19 715.54,-95.41 714.62,-102.35"/>
+<!-- interface~caf_co_max -->
+<g id="call~~graph~~CallGraph_node57" class="node">
+<title>interface~caf_co_max</title>
+<g id="a_call~~graph~~CallGraph_node57"><a xlink:href=".././interface/caf_co_max.html" xlink:title="caf_co_max">
+<polygon fill="#a7506f" stroke="#a7506f" points="127,-373 51,-373 51,-349 127,-349 127,-373"/>
+<text text-anchor="middle" x="89" y="-358.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+</a>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_error_stop -->
-<g id="call~~graph~~CallGraph_edge42" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#2700ff" d="M309.82,-429.48C326.7,-446.35 357.39,-478.47 379,-509.45 398.34,-537.18 386.82,-557.79 415,-576.45 491.47,-627.1 528.78,-595.45 620.5,-595.45 620.5,-595.45 620.5,-595.45 771.5,-595.45 864.37,-595.45 961.33,-532.65 1004.66,-500.68"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="1006.94,-503.35 1012.84,-494.55 1002.74,-497.75 1006.94,-503.35"/>
 </g>
-<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr -->
-<g id="call~~graph~~CallGraph_edge39" class="edge">
-<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#2700ff" d="M323.89,-429.54C347.27,-439.54 382.62,-452.97 415,-458.45 528.02,-477.61 664,-459.94 729.87,-448.86"/>
-<polygon fill="#2700ff" stroke="#2700ff" points="730.57,-452.29 739.83,-447.14 729.38,-445.39 730.57,-452.29"/>
+<!-- proc~caf_co_max -->
+<g id="call~~graph~~CallGraph_node63" class="node">
+<title>proc~caf_co_max</title>
+<g id="a_call~~graph~~CallGraph_node63"><a xlink:href=".././proc/caf_co_max.html" xlink:title="caf_co_max">
+<polygon fill="#d9534f" stroke="#d9534f" points="334.5,-373 258.5,-373 258.5,-349 334.5,-349 334.5,-373"/>
+<text text-anchor="middle" x="296.5" y="-358.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+</a>
 </g>
-<!-- proc~caf_sync_all&#45;&gt;interface~caf_c_sync_all -->
+</g>
+<!-- interface~caf_co_max&#45;&gt;proc~caf_co_max -->
 <g id="call~~graph~~CallGraph_edge46" class="edge">
-<title>proc~caf_sync_all&#45;&gt;interface~caf_c_sync_all</title>
-<path fill="none" stroke="#5600ff" d="M659.59,-761.45C676.75,-761.45 697.44,-761.45 716.22,-761.45"/>
-<polygon fill="#5600ff" stroke="#5600ff" points="716.42,-764.95 726.42,-761.45 716.42,-757.95 716.42,-764.95"/>
+<title>interface~caf_co_max&#45;&gt;proc~caf_co_max</title>
+<path fill="none" stroke="#ff00d3" stroke-dasharray="5,2" d="M127.21,-361C161.01,-361 211.03,-361 247.76,-361"/>
+<polygon fill="#ff00d3" stroke="#ff00d3" points="248.22,-364.5 258.22,-361 248.22,-357.5 248.22,-364.5"/>
 </g>
-<!-- interface~intrinsic_array_t -->
-<g id="call~~graph~~CallGraph_node51" class="node">
-<title>interface~intrinsic_array_t</title>
-<g id="a_call~~graph~~CallGraph_node51"><a xlink:href=".././interface/intrinsic_array_t.html" xlink:title="intrinsic_array_t">
-<polygon fill="#a7506f" stroke="#a7506f" points="137.5,-1298.45 40.5,-1298.45 40.5,-1274.45 137.5,-1274.45 137.5,-1298.45"/>
-<text text-anchor="middle" x="89" y="-1284.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_t</text>
+<!-- interface~caf_decaffeinate -->
+<g id="call~~graph~~CallGraph_node58" class="node">
+<title>interface~caf_decaffeinate</title>
+<g id="a_call~~graph~~CallGraph_node58"><a xlink:href=".././interface/caf_decaffeinate.html" xlink:title="caf_decaffeinate">
+<polygon fill="#a7506f" stroke="#a7506f" points="140,-919 38,-919 38,-895 140,-895 140,-919"/>
+<text text-anchor="middle" x="89" y="-904.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_decaffeinate</text>
 </a>
 </g>
 </g>
-<!-- proc~assert&#45;&gt;interface~caf_error_stop -->
+<!-- interface~caf_decaffeinate&#45;&gt;proc~caf_decaffeinate -->
 <g id="call~~graph~~CallGraph_edge47" class="edge">
-<title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#cc00ff" d="M935.12,-466.84C946.79,-468.8 960.99,-471.19 974.75,-473.5"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="974.2,-476.96 984.64,-475.17 975.36,-470.06 974.2,-476.96"/>
+<title>interface~caf_decaffeinate&#45;&gt;proc~caf_decaffeinate</title>
+<path fill="none" stroke="#ff00bc" stroke-dasharray="5,2" d="M140.01,-907C168.72,-907 204.97,-907 235.25,-907"/>
+<polygon fill="#ff00bc" stroke="#ff00bc" points="235.27,-910.5 245.27,-907 235.27,-903.5 235.27,-910.5"/>
 </g>
-<!-- proc~caf_error_stop_integer -->
-<g id="call~~graph~~CallGraph_node54" class="node">
-<title>proc~caf_error_stop_integer</title>
-<g id="a_call~~graph~~CallGraph_node54"><a xlink:href=".././proc/caf_error_stop_integer.html" xlink:title="caf_error_stop_integer">
-<polygon fill="#777777" stroke="#777777" points="155,-1340.45 23,-1340.45 23,-1316.45 155,-1316.45 155,-1340.45"/>
-<text text-anchor="middle" x="89" y="-1326.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop_integer</text>
+<!-- proc~construct -->
+<g id="call~~graph~~CallGraph_node59" class="node">
+<title>proc~construct</title>
+<g id="a_call~~graph~~CallGraph_node59"><a xlink:href=".././proc/construct.html" xlink:title="construct">
+<polygon fill="#777777" stroke="#777777" points="939,-688 877,-688 877,-664 939,-664 939,-688"/>
+<text text-anchor="middle" x="908" y="-673.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">construct</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- proc~construct&#45;&gt;interface~caf_error_stop -->
 <g id="call~~graph~~CallGraph_edge48" class="edge">
-<title>proc~caf_decaffeinate&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#fb00ff" d="M347.79,-620.47C366.34,-622.69 387.63,-625.24 407.33,-627.59"/>
-<polygon fill="#fb00ff" stroke="#fb00ff" points="407.12,-631.09 417.47,-628.81 407.95,-624.14 407.12,-631.09"/>
+<title>proc~construct&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff00a4" d="M938.43,-663.92C942.34,-661.4 946.02,-658.44 949,-655 1001.2,-594.74 1019.66,-497.66 1025.53,-454.24"/>
+<polygon fill="#ff00a4" stroke="#ff00a4" points="1029.02,-454.54 1026.8,-444.18 1022.08,-453.66 1029.02,-454.54"/>
 </g>
-<!-- proc~caf_stop_character -->
-<g id="call~~graph~~CallGraph_node56" class="node">
-<title>proc~caf_stop_character</title>
-<g id="a_call~~graph~~CallGraph_node56"><a xlink:href=".././proc/caf_stop_character.html" xlink:title="caf_stop_character">
-<polygon fill="#777777" stroke="#777777" points="353.5,-584.45 239.5,-584.45 239.5,-560.45 353.5,-560.45 353.5,-584.45"/>
-<text text-anchor="middle" x="296.5" y="-570.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_stop_character</text>
+<!-- interface~caf_form_team -->
+<g id="call~~graph~~CallGraph_node60" class="node">
+<title>interface~caf_form_team</title>
+<g id="a_call~~graph~~CallGraph_node60"><a xlink:href=".././interface/caf_form_team.html" xlink:title="caf_form_team">
+<polygon fill="#a7506f" stroke="#a7506f" points="135.5,-1423 42.5,-1423 42.5,-1399 135.5,-1399 135.5,-1423"/>
+<text text-anchor="middle" x="89" y="-1408.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_form_team</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- interface~caf_form_team&#45;&gt;proc~caf_form_team -->
 <g id="call~~graph~~CallGraph_edge49" class="edge">
-<title>proc~caf_stop_character&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#ff00eb" d="M349.63,-584.49C359.47,-587.16 369.62,-590.17 379,-593.45 379.77,-593.72 410.63,-607.52 436.78,-619.23"/>
-<polygon fill="#ff00eb" stroke="#ff00eb" points="435.58,-622.53 446.14,-623.42 438.44,-616.14 435.58,-622.53"/>
+<title>interface~caf_form_team&#45;&gt;proc~caf_form_team</title>
+<path fill="none" stroke="#ff008d" stroke-dasharray="5,2" d="M135.61,-1411C166.23,-1411 206.78,-1411 239.38,-1411"/>
+<polygon fill="#ff008d" stroke="#ff008d" points="239.67,-1414.5 249.67,-1411 239.67,-1407.5 239.67,-1414.5"/>
 </g>
-<!-- interface~caf_caffeinate -->
-<g id="call~~graph~~CallGraph_node57" class="node">
-<title>interface~caf_caffeinate</title>
-<g id="a_call~~graph~~CallGraph_node57"><a xlink:href=".././interface/caf_caffeinate.html" xlink:title="caf_caffeinate">
-<polygon fill="#a7506f" stroke="#a7506f" points="133,-794.45 45,-794.45 45,-770.45 133,-770.45 133,-794.45"/>
-<text text-anchor="middle" x="89" y="-780.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_caffeinate</text>
+<!-- proc~caf_error_stop_character -->
+<g id="call~~graph~~CallGraph_node61" class="node">
+<title>proc~caf_error_stop_character</title>
+<g id="a_call~~graph~~CallGraph_node61"><a xlink:href=".././proc/caf_error_stop_character.html" xlink:title="caf_error_stop_character">
+<polygon fill="#777777" stroke="#777777" points="161.5,-1003 16.5,-1003 16.5,-979 161.5,-979 161.5,-1003"/>
+<text text-anchor="middle" x="89" y="-988.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop_character</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_caffeinate&#45;&gt;proc~caf_caffeinate -->
+<!-- proc~caf_error_stop_character&#45;&gt;proc~f_c_string -->
 <g id="call~~graph~~CallGraph_edge50" class="edge">
-<title>interface~caf_caffeinate&#45;&gt;proc~caf_caffeinate</title>
-<path fill="none" stroke="#ff00d3" stroke-dasharray="5,2" d="M133.08,-782.45C164.86,-782.45 208.31,-782.45 242.27,-782.45"/>
-<polygon fill="#ff00d3" stroke="#ff00d3" points="242.48,-785.95 252.48,-782.45 242.48,-778.95 242.48,-785.95"/>
-</g>
-<!-- proc~this_image_coarray_dim_team -->
-<g id="call~~graph~~CallGraph_node58" class="node">
-<title>proc~this_image_coarray_dim_team</title>
-<g id="a_call~~graph~~CallGraph_node58"><a xlink:href=".././proc/this_image_coarray_dim_team.html" xlink:title="this_image_coarray_dim_team">
-<polygon fill="#777777" stroke="#777777" points="176.5,-1382.45 1.5,-1382.45 1.5,-1358.45 176.5,-1358.45 176.5,-1382.45"/>
-<text text-anchor="middle" x="89" y="-1368.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">this_image_coarray_dim_team</text>
-</a>
-</g>
+<title>proc~caf_error_stop_character&#45;&gt;proc~f_c_string</title>
+<path fill="none" stroke="#ff0075" d="M161.59,-991C192.77,-991 228.2,-991 254.77,-991"/>
+<polygon fill="#ff0075" stroke="#ff0075" points="254.86,-994.5 264.86,-991 254.86,-987.5 254.86,-994.5"/>
 </g>
-<!-- proc~inner_caf_error_stop_integer -->
-<g id="call~~graph~~CallGraph_node59" class="node">
-<title>proc~inner_caf_error_stop_integer</title>
-<g id="a_call~~graph~~CallGraph_node59"><a xlink:href=".././proc/inner_caf_error_stop_integer.html" xlink:title="inner_caf_error_stop_integer">
-<polygon fill="#d9534f" stroke="#d9534f" points="379,-542.45 214,-542.45 214,-518.45 379,-518.45 379,-542.45"/>
-<text text-anchor="middle" x="296.5" y="-528.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">inner_caf_error_stop_integer</text>
+<!-- interface~caf_co_broadcast -->
+<g id="call~~graph~~CallGraph_node62" class="node">
+<title>interface~caf_co_broadcast</title>
+<g id="a_call~~graph~~CallGraph_node62"><a xlink:href=".././interface/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
+<polygon fill="#a7506f" stroke="#a7506f" points="526.5,-566 421.5,-566 421.5,-542 526.5,-542 526.5,-566"/>
+<text text-anchor="middle" x="474" y="-551.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
 </a>
 </g>
 </g>
-<!-- proc~inner_caf_error_stop_integer&#45;&gt;interface~caf_c_decaffeinate -->
+<!-- interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast -->
 <g id="call~~graph~~CallGraph_edge51" class="edge">
-<title>proc~inner_caf_error_stop_integer&#45;&gt;interface~caf_c_decaffeinate</title>
-<path fill="none" stroke="#ff00a4" d="M363.18,-542.5C368.8,-544.96 374.17,-547.91 379,-551.45 403.45,-569.42 392.16,-589.48 415,-609.45 418.95,-612.9 423.43,-615.97 428.11,-618.68"/>
-<polygon fill="#ff00a4" stroke="#ff00a4" points="426.78,-621.93 437.27,-623.44 430.01,-615.72 426.78,-621.93"/>
-</g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
-<g id="call~~graph~~CallGraph_edge58" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0075" d="M650.12,-263.43C658.12,-259.45 666.66,-254.69 674,-249.45 692.17,-236.5 691.04,-226.22 710,-214.45 712.75,-212.75 715.65,-211.16 718.64,-209.68"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="720.1,-212.86 727.78,-205.57 717.23,-206.48 720.1,-212.86"/>
-</g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
-<g id="call~~graph~~CallGraph_edge60" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0075" d="M634.78,-287.63C646.4,-299.78 663.57,-319.48 674,-339.45 700.36,-389.95 670.84,-421.09 710,-462.45 711.04,-463.55 712.13,-464.58 713.28,-465.57"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="711.28,-468.44 721.49,-471.3 715.29,-462.7 711.28,-468.44"/>
-</g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
-<g id="call~~graph~~CallGraph_edge57" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#ff0075" d="M654.68,-287.55C661.65,-291.24 668.56,-295.85 674,-301.45 700.31,-328.57 682.01,-353.08 710,-378.45 716.72,-384.55 725.32,-388.9 733.88,-391.99"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="732.84,-395.33 743.43,-394.98 734.93,-388.65 732.84,-395.33"/>
+<title>interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast</title>
+<path fill="none" stroke="#ff005e" stroke-dasharray="5,2" d="M526.71,-554C537.11,-554 548.13,-554 558.83,-554"/>
+<polygon fill="#ff005e" stroke="#ff005e" points="558.96,-557.5 568.96,-554 558.96,-550.5 558.96,-557.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<!-- proc~caf_co_max&#45;&gt;proc~optional_value -->
 <g id="call~~graph~~CallGraph_edge55" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
-<path fill="none" stroke="#ff0075" d="M650.12,-287.47C658.12,-291.45 666.66,-296.22 674,-301.45 692.17,-314.41 691.04,-324.69 710,-336.45 712.75,-338.16 715.65,-339.75 718.64,-341.23"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="717.23,-344.43 727.78,-345.34 720.1,-338.04 717.23,-344.43"/>
+<title>proc~caf_co_max&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0046" d="M334.54,-360.37C417.26,-358.97 617.38,-355.58 714.63,-353.93"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="714.9,-357.43 724.84,-353.76 714.78,-350.43 714.9,-357.43"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
-<g id="call~~graph~~CallGraph_edge59" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
-<path fill="none" stroke="#ff0075" d="M666.21,-287.35C681.63,-291.54 699.15,-296.31 715.33,-300.71"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="714.63,-304.15 725.2,-303.4 716.47,-297.4 714.63,-304.15"/>
+<!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
+<g id="call~~graph~~CallGraph_edge58" class="edge">
+<title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
+<path fill="none" stroke="#ff0046" d="M334.72,-351.03C359.36,-344.43 392.07,-335.67 419.49,-328.33"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="420.57,-331.66 429.33,-325.7 418.76,-324.9 420.57,-331.66"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type -->
+<g id="call~~graph~~CallGraph_edge54" class="edge">
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type</title>
+<path fill="none" stroke="#ff0046" d="M309.25,-348.82C329.41,-328.43 372.53,-286.96 415,-260 420.44,-256.55 426.42,-253.31 432.4,-250.38"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="434.15,-253.43 441.74,-246.04 431.2,-247.08 434.15,-253.43"/>
+</g>
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string -->
 <g id="call~~graph~~CallGraph_edge53" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0075" d="M628.52,-263.21C644.17,-231.81 686.52,-149.58 710,-130.45 711.79,-128.99 713.7,-127.63 715.68,-126.36"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="717.7,-129.24 724.78,-121.35 714.33,-123.1 717.7,-129.24"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0046" d="M315.58,-348.9C338.12,-334.21 378.17,-309.36 415,-293 465.35,-270.63 485.58,-283.05 533,-255 551.94,-243.79 551.36,-234.15 569,-221 623.89,-180.08 694.44,-142.28 735.55,-121.56"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="737.22,-124.63 744.6,-117.03 734.09,-118.37 737.22,-124.63"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
-<g id="call~~graph~~CallGraph_edge56" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0075" d="M666.13,-271.32C709.84,-268.99 778.05,-270.4 831,-294.45 915.03,-332.63 985.47,-421.92 1014.17,-462.16"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="1011.35,-464.23 1019.96,-470.4 1017.08,-460.21 1011.35,-464.23"/>
+<!-- proc~caf_co_max&#45;&gt;interface~caf_error_stop -->
+<g id="call~~graph~~CallGraph_edge59" class="edge">
+<title>proc~caf_co_max&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0046" d="M302.41,-373.2C319.39,-414.81 376.72,-549.9 415,-575 491.7,-625.3 528.78,-594 620.5,-594 620.5,-594 620.5,-594 771.5,-594 876.89,-594 974.24,-495.02 1011.73,-451.8"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="1014.4,-454.06 1018.22,-444.18 1009.07,-449.52 1014.4,-454.06"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_co_max -->
 <g id="call~~graph~~CallGraph_edge52" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0075" d="M656.35,-287.58C662.92,-291.21 669.23,-295.78 674,-301.45 709.53,-343.77 671.83,-380.5 710,-420.45 715.53,-426.24 722.76,-430.44 730.26,-433.48"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="729.21,-436.82 739.8,-436.75 731.48,-430.2 729.21,-436.82"/>
-</g>
-<!-- interface~caf_c_same_cfi_type -->
-<g id="call~~graph~~CallGraph_node65" class="node">
-<title>interface~caf_c_same_cfi_type</title>
-<g id="a_call~~graph~~CallGraph_node65"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="831,-247.45 710,-247.45 710,-223.45 831,-223.45 831,-247.45"/>
-<text text-anchor="middle" x="770.5" y="-233.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
-</a>
-</g>
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_co_max</title>
+<path fill="none" stroke="#ff0046" d="M334.72,-368C359.63,-372.68 392.79,-378.92 420.39,-384.11"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="419.8,-387.56 430.28,-385.97 421.1,-380.68 419.8,-387.56"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
-<g id="call~~graph~~CallGraph_edge54" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
-<path fill="none" stroke="#ff0075" d="M666.21,-263.56C681.63,-259.36 699.15,-254.6 715.33,-250.19"/>
-<polygon fill="#ff0075" stroke="#ff0075" points="716.47,-253.51 725.2,-247.51 714.63,-246.76 716.47,-253.51"/>
+<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr_character -->
+<g id="call~~graph~~CallGraph_edge57" class="edge">
+<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0046" d="M316.95,-373.14C339.53,-386.45 378.37,-406.99 415,-415 466.23,-426.21 480.6,-417.21 533,-415 589.76,-412.6 653.99,-406.99 701.17,-402.31"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="701.67,-405.78 711.27,-401.3 700.97,-398.82 701.67,-405.78"/>
 </g>
-<!-- interface~caf_num_images -->
-<g id="call~~graph~~CallGraph_node62" class="node">
-<title>interface~caf_num_images</title>
-<g id="a_call~~graph~~CallGraph_node62"><a xlink:href=".././interface/caf_num_images.html" xlink:title="caf_num_images">
-<polygon fill="#a7506f" stroke="#a7506f" points="140.5,-1424.45 37.5,-1424.45 37.5,-1400.45 140.5,-1400.45 140.5,-1424.45"/>
-<text text-anchor="middle" x="89" y="-1410.05" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_num_images</text>
-</a>
+<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr -->
+<g id="call~~graph~~CallGraph_edge56" class="edge">
+<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0046" d="M303.6,-373.34C318.22,-401.36 358.35,-469.33 415,-495 520.42,-542.77 662.01,-511.81 729.93,-491.95"/>
+<polygon fill="#ff0046" stroke="#ff0046" points="731.22,-495.22 739.79,-488.99 729.2,-488.51 731.22,-495.22"/>
 </g>
+<!-- proc~as_character&#45;&gt;interface~caf_error_stop -->
+<g id="call~~graph~~CallGraph_edge60" class="edge">
+<title>proc~as_character&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff002f" d="M932.36,-621.99C938.33,-618.12 944.37,-613.41 949,-608 989.27,-560.97 1012.58,-490.08 1022.42,-454.32"/>
+<polygon fill="#ff002f" stroke="#ff002f" points="1025.87,-454.97 1025.05,-444.41 1019.1,-453.18 1025.87,-454.97"/>
 </g>
 </g>
 </svg>
@@ -1157,7 +1157,7 @@ <h1>Procedures</h1>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/lists/types.html b/lists/types.html
index 126be709..86ec79df 100644
--- a/lists/types.html
+++ b/lists/types.html
@@ -101,34 +101,34 @@ <h1>Derived Types</h1>
 <g id="type~~graph~~TypeGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 70)">
 <title>type~~graph~~TypeGraph</title>
 <polygon fill="white" stroke="transparent" points="-4,4 -4,-70 242,-70 242,4 -4,4"/>
-<!-- type~intrinsic_array_t -->
-<g id="type~~graph~~TypeGraph_node1" class="node">
-<title>type~intrinsic_array_t</title>
-<g id="a_type~~graph~~TypeGraph_node1"><a xlink:href=".././type/intrinsic_array_t.html" xlink:title="intrinsic_array_t">
-<polygon fill="#5cb85c" stroke="#5cb85c" points="238,-24 141,-24 141,0 238,0 238,-24"/>
-<text text-anchor="middle" x="189.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_t</text>
-</a>
-</g>
-</g>
 <!-- type~characterizable_t -->
-<g id="type~~graph~~TypeGraph_node3" class="node">
+<g id="type~~graph~~TypeGraph_node1" class="node">
 <title>type~characterizable_t</title>
-<g id="a_type~~graph~~TypeGraph_node3"><a xlink:href=".././type/characterizable_t.html" xlink:title="characterizable_t">
+<g id="a_type~~graph~~TypeGraph_node1"><a xlink:href=".././type/characterizable_t.html" xlink:title="characterizable_t">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="105,-24 0,-24 0,0 105,0 105,-24"/>
 <text text-anchor="middle" x="52.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">characterizable_t</text>
 </a>
 </g>
 </g>
+<!-- type~intrinsic_array_t -->
+<g id="type~~graph~~TypeGraph_node2" class="node">
+<title>type~intrinsic_array_t</title>
+<g id="a_type~~graph~~TypeGraph_node2"><a xlink:href=".././type/intrinsic_array_t.html" xlink:title="intrinsic_array_t">
+<polygon fill="#5cb85c" stroke="#5cb85c" points="238,-24 141,-24 141,0 238,0 238,-24"/>
+<text text-anchor="middle" x="189.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_t</text>
+</a>
+</g>
+</g>
 <!-- type~intrinsic_array_t&#45;&gt;type~characterizable_t -->
 <g id="type~~graph~~TypeGraph_edge1" class="edge">
 <title>type~intrinsic_array_t&#45;&gt;type~characterizable_t</title>
-<path fill="none" stroke="#ff0000" d="M140.9,-12C132.61,-12 123.88,-12 115.27,-12"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="115.25,-8.5 105.25,-12 115.25,-15.5 115.25,-8.5"/>
+<path fill="none" stroke="#00ff00" d="M140.9,-12C132.61,-12 123.88,-12 115.27,-12"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="115.25,-8.5 105.25,-12 115.25,-15.5 115.25,-8.5"/>
 </g>
 <!-- type~team_type -->
-<g id="type~~graph~~TypeGraph_node2" class="node">
+<g id="type~~graph~~TypeGraph_node3" class="node">
 <title>type~team_type</title>
-<g id="a_type~~graph~~TypeGraph_node2"><a xlink:href=".././type/team_type.html" xlink:title="team_type">
+<g id="a_type~~graph~~TypeGraph_node3"><a xlink:href=".././type/team_type.html" xlink:title="team_type">
 <polygon fill="#5cb85c" stroke="#5cb85c" points="224,-66 155,-66 155,-42 224,-42 224,-66"/>
 <text text-anchor="middle" x="189.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type</text>
 </a>
@@ -185,7 +185,7 @@ <h1>Derived Types</h1>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeinate_decaffeinate_m.html b/module/caffeinate_decaffeinate_m.html
index f0799706..1619e376 100644
--- a/module/caffeinate_decaffeinate_m.html
+++ b/module/caffeinate_decaffeinate_m.html
@@ -471,7 +471,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeinate_decaffeinate_s.html b/module/caffeinate_decaffeinate_s.html
index 8b2cb751..49989138 100644
--- a/module/caffeinate_decaffeinate_s.html
+++ b/module/caffeinate_decaffeinate_s.html
@@ -136,10 +136,10 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
-    <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href='../module/synchronization_m.html'>synchronization_m</a></li>
-    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
     <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
+    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
+    <li><a href='../module/synchronization_m.html'>synchronization_m</a></li>
+    <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
   </ul>
       </li>
       <li class="list-group-item">
@@ -163,104 +163,104 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~caffeinate_decaffeinate_s -->
 <g id="module~~caffeinate_decaffeinate_s~~UsesGraph_node1" class="node">
 <title>module~caffeinate_decaffeinate_s</title>
-<polygon fill="none" stroke="black" points="462,-104 312,-104 312,-80 462,-80 462,-104"/>
-<text text-anchor="middle" x="387" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50">caffeinate_decaffeinate_s</text>
+<polygon fill="none" stroke="black" points="462,-108 312,-108 312,-84 462,-84 462,-108"/>
+<text text-anchor="middle" x="387" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">caffeinate_decaffeinate_s</text>
 </g>
-<!-- module~caffeine_h_m -->
+<!-- iso_c_binding -->
 <g id="module~~caffeinate_decaffeinate_s~~UsesGraph_node2" class="node">
-<title>module~caffeine_h_m</title>
-<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node2"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="240.5,-188 156.5,-188 156.5,-164 240.5,-164 240.5,-188"/>
-<text text-anchor="middle" x="198.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<title>iso_c_binding</title>
+<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node2"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="84.5,-106 0.5,-106 0.5,-82 84.5,-82 84.5,-106"/>
+<text text-anchor="middle" x="42.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge1" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M368.04,-104.18C346.84,-118.11 310.14,-140.81 276,-155 267.87,-158.38 259.03,-161.38 250.34,-163.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="249.29,-160.64 240.64,-166.75 251.21,-167.37 249.29,-160.64"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding -->
+<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge4" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M333.97,-108.02C315.74,-111.67 295.07,-115.2 276,-117 207.42,-123.49 189.17,-126.9 121,-117 109.62,-115.35 97.59,-112.4 86.49,-109.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="87.18,-105.7 76.6,-106.11 85.13,-112.39 87.18,-105.7"/>
 </g>
-<!-- module~synchronization_m -->
+<!-- module~caffeinate_decaffeinate_m -->
 <g id="module~~caffeinate_decaffeinate_s~~UsesGraph_node3" class="node">
-<title>module~synchronization_m</title>
-<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node3"><a xlink:href=".././module/synchronization_m.html" xlink:title="synchronization_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="254.5,-146 142.5,-146 142.5,-122 254.5,-122 254.5,-146"/>
-<text text-anchor="middle" x="198.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m</text>
+<title>module~caffeinate_decaffeinate_m</title>
+<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node3"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="276,-188 121,-188 121,-164 276,-164 276,-188"/>
+<text text-anchor="middle" x="198.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m -->
-<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge2" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.56,-104.04C310.8,-108.93 285.49,-114.63 262.82,-119.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="261.94,-116.35 252.95,-121.96 263.48,-123.18 261.94,-116.35"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m -->
+<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge5" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m</title>
+<path fill="none" stroke="#ff0000" d="M363.64,-108.04C341.68,-119.6 307.06,-137.16 276,-150 266.96,-153.74 257.16,-157.37 247.69,-160.68"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="246.32,-157.45 237.99,-163.99 248.59,-164.07 246.32,-157.45"/>
 </g>
 <!-- module~program_termination_m -->
 <g id="module~~caffeinate_decaffeinate_s~~UsesGraph_node4" class="node">
 <title>module~program_termination_m</title>
 <g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node4"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="269.5,-104 127.5,-104 127.5,-80 269.5,-80 269.5,-104"/>
-<text text-anchor="middle" x="198.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="269.5,-108 127.5,-108 127.5,-84 269.5,-84 269.5,-108"/>
+<text text-anchor="middle" x="198.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
 </a>
 </g>
 </g>
 <!-- module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m -->
-<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge4" class="edge">
+<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge1" class="edge">
 <title>module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M311.75,-92C301.21,-92 290.32,-92 279.67,-92"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="279.55,-88.5 269.55,-92 279.55,-95.5 279.55,-88.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M311.75,-96C301.21,-96 290.32,-96 279.67,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="279.55,-92.5 269.55,-96 279.55,-99.5 279.55,-92.5"/>
 </g>
-<!-- iso_c_binding -->
+<!-- module~caffeine_h_m -->
 <g id="module~~caffeinate_decaffeinate_s~~UsesGraph_node5" class="node">
-<title>iso_c_binding</title>
-<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node5"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84.5,-127 0.5,-127 0.5,-103 84.5,-103 84.5,-127"/>
-<text text-anchor="middle" x="42.5" y="-112.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<title>module~caffeine_h_m</title>
+<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node5"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="240.5,-66 156.5,-66 156.5,-42 240.5,-42 240.5,-66"/>
+<text text-anchor="middle" x="198.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding -->
-<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge3" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M342.99,-79.93C289.91,-66.99 197.3,-50.85 121,-71 101.67,-76.1 82.12,-87.26 67.48,-97.06"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="65.27,-94.34 59.06,-102.92 69.26,-100.09 65.27,-94.34"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge2" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M332.56,-83.96C306.71,-78.14 275.84,-71.19 250.35,-65.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="251.02,-62.02 240.5,-63.23 249.49,-68.84 251.02,-62.02"/>
 </g>
-<!-- module~caffeinate_decaffeinate_m -->
+<!-- module~synchronization_m -->
 <g id="module~~caffeinate_decaffeinate_s~~UsesGraph_node6" class="node">
-<title>module~caffeinate_decaffeinate_m</title>
-<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node6"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="276,-24 121,-24 121,0 276,0 276,-24"/>
-<text text-anchor="middle" x="198.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
+<title>module~synchronization_m</title>
+<g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node6"><a xlink:href=".././module/synchronization_m.html" xlink:title="synchronization_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="254.5,-24 142.5,-24 142.5,0 254.5,0 254.5,-24"/>
+<text text-anchor="middle" x="198.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m -->
-<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge5" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m</title>
-<path fill="none" stroke="#ff0000" d="M363.64,-79.96C341.68,-68.4 307.06,-50.84 276,-38 266.96,-34.26 257.16,-30.63 247.69,-27.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="248.59,-23.93 237.99,-24.01 246.32,-30.55 248.59,-23.93"/>
-</g>
-<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
-<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge6" class="edge">
-<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M156.49,-166.43C144.86,-163.27 132.29,-159.41 121,-155 104.57,-148.59 87.05,-139.73 72.83,-131.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="74.44,-128.87 64,-127.08 71.05,-134.99 74.44,-128.87"/>
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m -->
+<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge3" class="edge">
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~synchronization_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M368.04,-83.82C346.84,-69.89 310.14,-47.19 276,-33 270.91,-30.89 265.55,-28.92 260.12,-27.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="260.9,-23.68 250.31,-24.01 258.79,-30.36 260.9,-23.68"/>
 </g>
 <!-- module~team_type_m -->
 <g id="module~~caffeinate_decaffeinate_s~~UsesGraph_node7" class="node">
 <title>module~team_type_m</title>
 <g id="a_module~~caffeinate_decaffeinate_s~~UsesGraph_node7"><a xlink:href=".././module/team_type_m.html" xlink:title="team_type_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="85,-24 0,-24 0,0 85,0 85,-24"/>
-<text text-anchor="middle" x="42.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="85,-188 0,-188 0,-164 85,-164 85,-188"/>
+<text text-anchor="middle" x="42.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
 </a>
 </g>
 </g>
 <!-- module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m -->
-<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge7" class="edge">
+<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge6" class="edge">
 <title>module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#cc00ff" stroke-dasharray="5,2" d="M120.95,-12C112.25,-12 103.53,-12 95.26,-12"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="95.04,-8.5 85.04,-12 95.04,-15.5 95.04,-8.5"/>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M120.95,-176C112.25,-176 103.53,-176 95.26,-176"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="95.04,-172.5 85.04,-176 95.04,-179.5 95.04,-172.5"/>
+</g>
+<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
+<g id="module~~caffeinate_decaffeinate_s~~UsesGraph_edge7" class="edge">
+<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#0066ff" stroke-dasharray="5,2" d="M156.23,-64.72C137.25,-69.65 114.55,-75.54 94.51,-80.75"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="93.41,-77.42 84.62,-83.32 95.17,-84.19 93.41,-77.42"/>
 </g>
 </g>
 </svg>
@@ -407,7 +407,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeine_assert_m.html b/module/caffeine_assert_m.html
index 18d5791a..79ef1759 100644
--- a/module/caffeine_assert_m.html
+++ b/module/caffeine_assert_m.html
@@ -188,35 +188,35 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M166.23,-126.03C159.24,-123.13 151.84,-120.01 145,-117 126.62,-108.91 106.34,-99.44 89.74,-91.54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="90.96,-88.24 80.43,-87.09 87.94,-94.56 90.96,-88.24"/>
 </g>
-<!-- module~caffeine_assert_s -->
+<!-- module~co_max_s -->
 <g id="module~~caffeine_assert_m~~UsedByGraph_node3" class="node">
-<title>module~caffeine_assert_s</title>
-<g id="a_module~~caffeine_assert_m~~UsedByGraph_node3"><a xlink:href=".././module/caffeine_assert_s.html" xlink:title="caffeine_assert_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="249,-108 145,-108 145,-84 249,-84 249,-108"/>
-<text text-anchor="middle" x="197" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_s</text>
+<title>module~co_max_s</title>
+<g id="a_module~~caffeine_assert_m~~UsedByGraph_node3"><a xlink:href=".././module/co_max_s.html" xlink:title="co_max_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="229,-108 165,-108 165,-84 229,-84 229,-108"/>
+<text text-anchor="middle" x="197" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m -->
-<g id="module~~caffeine_assert_m~~UsedByGraph_edge4" class="edge">
-<title>module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#ff0000" d="M144.88,-88.36C136.53,-87.11 127.8,-85.81 119.19,-84.52"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="119.59,-81.04 109.18,-83.02 118.56,-87.96 119.59,-81.04"/>
+<!-- module~co_max_s&#45;&gt;module~caffeine_assert_m -->
+<g id="module~~caffeine_assert_m~~UsedByGraph_edge2" class="edge">
+<title>module~co_max_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M164.82,-91.34C151.42,-89.34 135.25,-86.92 119.49,-84.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="119.64,-81.05 109.24,-83.03 118.61,-87.97 119.64,-81.05"/>
 </g>
-<!-- module~co_max_s -->
+<!-- module~caffeine_assert_s -->
 <g id="module~~caffeine_assert_m~~UsedByGraph_node4" class="node">
-<title>module~co_max_s</title>
-<g id="a_module~~caffeine_assert_m~~UsedByGraph_node4"><a xlink:href=".././module/co_max_s.html" xlink:title="co_max_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="229,-66 165,-66 165,-42 229,-42 229,-66"/>
-<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
+<title>module~caffeine_assert_s</title>
+<g id="a_module~~caffeine_assert_m~~UsedByGraph_node4"><a xlink:href=".././module/caffeine_assert_s.html" xlink:title="caffeine_assert_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="249,-66 145,-66 145,-42 249,-42 249,-66"/>
+<text text-anchor="middle" x="197" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_max_s&#45;&gt;module~caffeine_assert_m -->
-<g id="module~~caffeine_assert_m~~UsedByGraph_edge2" class="edge">
-<title>module~co_max_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M164.82,-58.66C151.42,-60.66 135.25,-63.08 119.49,-65.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="118.61,-62.03 109.24,-66.97 119.64,-68.95 118.61,-62.03"/>
+<!-- module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m -->
+<g id="module~~caffeine_assert_m~~UsedByGraph_edge4" class="edge">
+<title>module~caffeine_assert_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#ff0000" d="M144.88,-61.64C136.53,-62.89 127.8,-64.19 119.19,-65.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="118.56,-62.04 109.18,-66.98 119.59,-68.96 118.56,-62.04"/>
 </g>
 <!-- module~co_reduce_s -->
 <g id="module~~caffeine_assert_m~~UsedByGraph_node5" class="node">
@@ -400,7 +400,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeine_assert_s.html b/module/caffeine_assert_s.html
index 6b2512ec..138906df 100644
--- a/module/caffeine_assert_s.html
+++ b/module/caffeine_assert_s.html
@@ -317,7 +317,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeine_characterizable_m.html b/module/caffeine_characterizable_m.html
index b8cf0347..6017d893 100644
--- a/module/caffeine_characterizable_m.html
+++ b/module/caffeine_characterizable_m.html
@@ -351,7 +351,7 @@ <h2>Derived Types</h2>
      <h4>Type-Bound Procedures</h4>
       <table class="table table-striped varlist">
       <tbody>
-       <tr><td>procedure(as_character_i), public :: <strong><a href='../type/characterizable_t.html#boundprocedure-as_character~2'>as_character</a></strong>  </td>
+       <tr><td>procedure(as_character_i), public :: <strong><a href='../type/characterizable_t.html#boundprocedure-as_character'>as_character</a></strong>  </td>
        <td></td></tr>
        </tbody>
        </table>
@@ -378,7 +378,7 @@ <h4>Type-Bound Procedures</h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeine_h_m.html b/module/caffeine_h_m.html
index 3ba3e764..86d4a6ad 100644
--- a/module/caffeine_h_m.html
+++ b/module/caffeine_h_m.html
@@ -286,124 +286,124 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M133.88,-377.98C128.88,-375.52 124.16,-372.56 120,-369 74.75,-330.2 54.62,-259.24 46.99,-223.23"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="50.39,-222.37 45.01,-213.25 43.52,-223.74 50.39,-222.37"/>
 </g>
-<!-- module~normal_termination_s -->
+<!-- module~co_broadcast_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node3" class="node">
-<title>module~normal_termination_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node3"><a xlink:href=".././module/normal_termination_s.html" xlink:title="normal_termination_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="259.5,-360 130.5,-360 130.5,-336 259.5,-336 259.5,-360"/>
-<text text-anchor="middle" x="195" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s</text>
+<title>module~co_broadcast_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node3"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="242,-360 148,-360 148,-336 242,-336 242,-360"/>
+<text text-anchor="middle" x="195" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
 </a>
 </g>
 </g>
-<!-- module~normal_termination_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~caffeine_h_m~~UsedByGraph_edge2" class="edge">
-<title>module~normal_termination_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M135.44,-335.96C129.94,-333.51 124.68,-330.55 120,-327 84.33,-299.92 61.49,-251.13 50.58,-222.87"/>
+<!-- module~co_broadcast_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~caffeine_h_m~~UsedByGraph_edge5" class="edge">
+<title>module~co_broadcast_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M147.68,-340.56C137.89,-337.48 128.08,-333.14 120,-327 84.33,-299.92 61.49,-251.13 50.58,-222.87"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="53.73,-221.29 46.97,-213.13 47.16,-223.72 53.73,-221.29"/>
 </g>
-<!-- module~co_sum_s -->
+<!-- module~sychronization_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node4" class="node">
-<title>module~co_sum_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node4"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="227,-318 163,-318 163,-294 227,-294 227,-318"/>
-<text text-anchor="middle" x="195" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
+<title>module~sychronization_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node4"><a xlink:href=".././module/sychronization_s.html" xlink:title="sychronization_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="245,-318 145,-318 145,-294 245,-294 245,-318"/>
+<text text-anchor="middle" x="195" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sychronization_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_sum_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~caffeine_h_m~~UsedByGraph_edge5" class="edge">
-<title>module~co_sum_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M162.91,-301.16C149.05,-298.03 132.96,-292.99 120,-285 93.54,-268.68 70.56,-240.75 56.75,-221.61"/>
+<!-- module~sychronization_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~caffeine_h_m~~UsedByGraph_edge2" class="edge">
+<title>module~sychronization_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M144.62,-296.11C136.05,-293.26 127.5,-289.63 120,-285 93.54,-268.68 70.56,-240.75 56.75,-221.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="59.5,-219.44 50.9,-213.26 53.77,-223.46 59.5,-219.44"/>
 </g>
-<!-- module~image_enumeration_s -->
+<!-- module~co_reduce_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node5" class="node">
-<title>module~image_enumeration_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node5"><a xlink:href=".././module/image_enumeration_s.html" xlink:title="image_enumeration_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="260.5,-276 129.5,-276 129.5,-252 260.5,-252 260.5,-276"/>
-<text text-anchor="middle" x="195" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s</text>
+<title>module~co_reduce_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node5"><a xlink:href=".././module/co_reduce_s.html" xlink:title="co_reduce_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="234,-276 156,-276 156,-252 234,-252 234,-276"/>
+<text text-anchor="middle" x="195" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s</text>
 </a>
 </g>
 </g>
-<!-- module~image_enumeration_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~caffeine_h_m~~UsedByGraph_edge3" class="edge">
-<title>module~image_enumeration_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M145.7,-251.98C137.03,-249.34 128.16,-246.33 120,-243 103.23,-236.15 85.42,-226.6 71.16,-218.33"/>
+<!-- module~co_reduce_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~caffeine_h_m~~UsedByGraph_edge4" class="edge">
+<title>module~co_reduce_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M155.8,-254.91C144.13,-251.67 131.37,-247.65 120,-243 103.23,-236.15 85.42,-226.6 71.16,-218.33"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="72.74,-215.2 62.35,-213.13 69.18,-221.23 72.74,-215.2"/>
 </g>
-<!-- module~caffeinate_decaffeinate_s -->
+<!-- module~co_min_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node6" class="node">
-<title>module~caffeinate_decaffeinate_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node6"><a xlink:href=".././module/caffeinate_decaffeinate_s.html" xlink:title="caffeinate_decaffeinate_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="270,-234 120,-234 120,-210 270,-210 270,-234"/>
-<text text-anchor="middle" x="195" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s</text>
+<title>module~co_min_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node6"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="225.5,-234 164.5,-234 164.5,-210 225.5,-210 225.5,-234"/>
+<text text-anchor="middle" x="195" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~caffeine_h_m~~UsedByGraph_edge4" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M119.83,-211.68C111.23,-210.49 102.6,-209.29 94.4,-208.15"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="94.66,-204.65 84.28,-206.74 93.7,-211.58 94.66,-204.65"/>
+<!-- module~co_min_s&#45;&gt;module~caffeine_h_m -->
+<g id="module~~caffeine_h_m~~UsedByGraph_edge3" class="edge">
+<title>module~co_min_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M164.17,-217.85C144.25,-215.08 117.55,-211.37 94.27,-208.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="94.59,-204.64 84.2,-206.73 93.62,-211.57 94.59,-204.64"/>
 </g>
-<!-- module~co_min_s -->
+<!-- module~image_enumeration_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node7" class="node">
-<title>module~co_min_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node7"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="225.5,-192 164.5,-192 164.5,-168 225.5,-168 225.5,-192"/>
-<text text-anchor="middle" x="195" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
+<title>module~image_enumeration_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node7"><a xlink:href=".././module/image_enumeration_s.html" xlink:title="image_enumeration_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="260.5,-192 129.5,-192 129.5,-168 260.5,-168 260.5,-192"/>
+<text text-anchor="middle" x="195" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~image_enumeration_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~caffeine_h_m~~UsedByGraph_edge6" class="edge">
-<title>module~co_min_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M164.17,-184.15C144.25,-186.92 117.55,-190.63 94.27,-193.87"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="93.62,-190.43 84.2,-195.27 94.59,-197.36 93.62,-190.43"/>
+<title>module~image_enumeration_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M129.09,-189.03C117.46,-190.64 105.49,-192.31 94.31,-193.86"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="93.72,-190.41 84.3,-195.26 94.69,-197.35 93.72,-190.41"/>
 </g>
-<!-- module~co_reduce_s -->
+<!-- module~caffeinate_decaffeinate_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node8" class="node">
-<title>module~co_reduce_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node8"><a xlink:href=".././module/co_reduce_s.html" xlink:title="co_reduce_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="234,-150 156,-150 156,-126 234,-126 234,-150"/>
-<text text-anchor="middle" x="195" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s</text>
+<title>module~caffeinate_decaffeinate_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node8"><a xlink:href=".././module/caffeinate_decaffeinate_s.html" xlink:title="caffeinate_decaffeinate_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="270,-150 120,-150 120,-126 270,-126 270,-150"/>
+<text text-anchor="middle" x="195" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_reduce_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~caffeine_h_m~~UsedByGraph_edge7" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M155.8,-147.09C144.13,-150.33 131.37,-154.35 120,-159 103.23,-165.85 85.42,-175.4 71.16,-183.67"/>
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M145.7,-150.02C137.03,-152.66 128.16,-155.67 120,-159 103.23,-165.85 85.42,-175.4 71.16,-183.67"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="69.18,-180.77 62.35,-188.87 72.74,-186.8 69.18,-180.77"/>
 </g>
-<!-- module~sychronization_s -->
+<!-- module~normal_termination_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node9" class="node">
-<title>module~sychronization_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node9"><a xlink:href=".././module/sychronization_s.html" xlink:title="sychronization_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="245,-108 145,-108 145,-84 245,-84 245,-108"/>
-<text text-anchor="middle" x="195" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">sychronization_s</text>
+<title>module~normal_termination_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node9"><a xlink:href=".././module/normal_termination_s.html" xlink:title="normal_termination_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="259.5,-108 130.5,-108 130.5,-84 259.5,-84 259.5,-108"/>
+<text text-anchor="middle" x="195" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s</text>
 </a>
 </g>
 </g>
-<!-- module~sychronization_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~normal_termination_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~caffeine_h_m~~UsedByGraph_edge8" class="edge">
-<title>module~sychronization_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M144.62,-105.89C136.05,-108.74 127.5,-112.37 120,-117 93.54,-133.32 70.56,-161.25 56.75,-180.39"/>
+<title>module~normal_termination_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M138.41,-108.1C131.97,-110.56 125.68,-113.49 120,-117 93.54,-133.32 70.56,-161.25 56.75,-180.39"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="53.77,-178.54 50.9,-188.74 59.5,-182.56 53.77,-178.54"/>
 </g>
-<!-- module~co_broadcast_s -->
+<!-- module~co_sum_s -->
 <g id="module~~caffeine_h_m~~UsedByGraph_node10" class="node">
-<title>module~co_broadcast_s</title>
-<g id="a_module~~caffeine_h_m~~UsedByGraph_node10"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="242,-66 148,-66 148,-42 242,-42 242,-66"/>
-<text text-anchor="middle" x="195" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
+<title>module~co_sum_s</title>
+<g id="a_module~~caffeine_h_m~~UsedByGraph_node10"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="227,-66 163,-66 163,-42 227,-42 227,-66"/>
+<text text-anchor="middle" x="195" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_broadcast_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~co_sum_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~caffeine_h_m~~UsedByGraph_edge9" class="edge">
-<title>module~co_broadcast_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M147.68,-61.44C137.89,-64.52 128.08,-68.86 120,-75 84.33,-102.08 61.49,-150.87 50.58,-179.13"/>
+<title>module~co_sum_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M162.88,-57.57C148.69,-60.44 132.34,-65.63 120,-75 84.33,-102.08 61.49,-150.87 50.58,-179.13"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="47.16,-178.28 46.97,-188.87 53.73,-180.71 47.16,-178.28"/>
 </g>
 <!-- module~co_max_s -->
@@ -975,7 +975,7 @@ <h4>Return Value <small>integer(kind=c_int)</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeine_intrinsic_array_m.html b/module/caffeine_intrinsic_array_m.html
index f320c9f0..571fef74 100644
--- a/module/caffeine_intrinsic_array_m.html
+++ b/module/caffeine_intrinsic_array_m.html
@@ -562,7 +562,7 @@ <h4>Constructor</h4>
      <h4>Type-Bound Procedures</h4>
       <table class="table table-striped varlist">
       <tbody>
-       <tr><td>procedure, public :: <strong><a href='../type/intrinsic_array_t.html#boundprocedure-as_character'>as_character</a></strong>  </td>
+       <tr><td>procedure, public :: <strong><a href='../type/intrinsic_array_t.html#boundprocedure-as_character~2'>as_character</a></strong>  </td>
        <td></td></tr>
        </tbody>
        </table>
@@ -589,7 +589,7 @@ <h4>Type-Bound Procedures</h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeine_intrinsic_array_s.html b/module/caffeine_intrinsic_array_s.html
index d7927d8f..72efcd18 100644
--- a/module/caffeine_intrinsic_array_s.html
+++ b/module/caffeine_intrinsic_array_s.html
@@ -352,7 +352,7 @@ <h4>Arguments</h4>      <em>None</em>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/caffeine_m.html b/module/caffeine_m.html
index 21b57bdd..423529c5 100644
--- a/module/caffeine_m.html
+++ b/module/caffeine_m.html
@@ -128,10 +128,10 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
-    <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
+    <li><a href='../module/team_type_m.html'>team_type_m</a></li>
     <li><a href='../module/synchronization_m.html'>synchronization_m</a></li>
+    <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
     <li><a href='../module/caffeinate_decaffeinate_m.html'>caffeinate_decaffeinate_m</a></li>
-    <li><a href='../module/team_type_m.html'>team_type_m</a></li>
     <li><a href='../module/image_enumeration_m.html'>image_enumeration_m</a></li>
     <li><a href='../module/collective_subroutines_m.html'>collective_subroutines_m</a></li>
   </ul>
@@ -143,133 +143,133 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: module~~caffeine_m~~UsesGraph Pages: 1 -->
-<svg id="modulecaffeine_mUsesGraph" width="392pt" height="238pt"
- viewBox="0.00 0.00 392.00 238.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~caffeine_m~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 234)">
+<svg id="modulecaffeine_mUsesGraph" width="392pt" height="225pt"
+ viewBox="0.00 0.00 392.00 224.65" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~caffeine_m~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 220.65)">
 <title>module~~caffeine_m~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-234 388,-234 388,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-220.65 388,-220.65 388,4 -4,4"/>
 <!-- module~caffeine_m -->
 <g id="module~~caffeine_m~~UsesGraph_node1" class="node">
 <title>module~caffeine_m</title>
-<polygon fill="none" stroke="black" points="384,-125 312,-125 312,-101 384,-101 384,-125"/>
-<text text-anchor="middle" x="348" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50">caffeine_m</text>
+<polygon fill="none" stroke="black" points="384,-129 312,-129 312,-105 384,-105 384,-129"/>
+<text text-anchor="middle" x="348" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">caffeine_m</text>
 </g>
-<!-- module~program_termination_m -->
+<!-- module~team_type_m -->
 <g id="module~~caffeine_m~~UsesGraph_node2" class="node">
-<title>module~program_termination_m</title>
-<g id="a_module~~caffeine_m~~UsesGraph_node2"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="269.5,-230 127.5,-230 127.5,-206 269.5,-206 269.5,-230"/>
-<text text-anchor="middle" x="198.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<title>module~team_type_m</title>
+<g id="a_module~~caffeine_m~~UsesGraph_node2"><a xlink:href=".././module/team_type_m.html" xlink:title="team_type_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="85,-192 0,-192 0,-168 85,-168 85,-192"/>
+<text text-anchor="middle" x="42.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~program_termination_m -->
+<!-- module~caffeine_m&#45;&gt;module~team_type_m -->
 <g id="module~~caffeine_m~~UsesGraph_edge1" class="edge">
-<title>module~caffeine_m&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M340.16,-125.01C329.08,-143.35 305.45,-178.19 276,-197 273.21,-198.78 270.28,-200.41 267.25,-201.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="265.67,-198.77 257.91,-205.99 268.47,-205.19 265.67,-198.77"/>
+<title>module~caffeine_m&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M341.2,-129.05C331.1,-148.48 308.22,-186.05 276,-201 213.54,-229.99 131.57,-211.25 83.5,-195.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="84.37,-191.96 73.78,-192.03 82.11,-198.58 84.37,-191.96"/>
 </g>
-<!-- module~synchronization_m -->
+<!-- module~collective_subroutines_m -->
 <g id="module~~caffeine_m~~UsesGraph_node3" class="node">
-<title>module~synchronization_m</title>
-<g id="a_module~~caffeine_m~~UsesGraph_node3"><a xlink:href=".././module/synchronization_m.html" xlink:title="synchronization_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="254.5,-188 142.5,-188 142.5,-164 254.5,-164 254.5,-188"/>
-<text text-anchor="middle" x="198.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m</text>
+<title>module~collective_subroutines_m</title>
+<g id="a_module~~caffeine_m~~UsesGraph_node3"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="271.5,-24 125.5,-24 125.5,0 271.5,0 271.5,-24"/>
+<text text-anchor="middle" x="198.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~synchronization_m -->
-<g id="module~~caffeine_m~~UsesGraph_edge2" class="edge">
-<title>module~caffeine_m&#45;&gt;module~synchronization_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.6,-125.08C315.64,-134.32 295.25,-146.84 276,-155 271.01,-157.12 265.74,-159.08 260.4,-160.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="259.22,-157.59 250.76,-163.97 261.35,-164.26 259.22,-157.59"/>
+<!-- module~caffeine_m&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~caffeine_m~~UsesGraph_edge3" class="edge">
+<title>module~caffeine_m&#45;&gt;module~collective_subroutines_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M340.16,-104.99C329.08,-86.65 305.45,-51.81 276,-33 273.21,-31.22 270.28,-29.59 267.25,-28.1"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="268.47,-24.81 257.91,-24.01 265.67,-31.23 268.47,-24.81"/>
 </g>
-<!-- module~collective_subroutines_m -->
+<!-- module~caffeinate_decaffeinate_m -->
 <g id="module~~caffeine_m~~UsesGraph_node4" class="node">
-<title>module~collective_subroutines_m</title>
-<g id="a_module~~caffeine_m~~UsesGraph_node4"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="271.5,-146 125.5,-146 125.5,-122 271.5,-122 271.5,-146"/>
-<text text-anchor="middle" x="198.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
+<title>module~caffeinate_decaffeinate_m</title>
+<g id="a_module~~caffeine_m~~UsesGraph_node4"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="276,-192 121,-192 121,-168 276,-168 276,-192"/>
+<text text-anchor="middle" x="198.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~caffeine_m~~UsesGraph_edge3" class="edge">
-<title>module~caffeine_m&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M311.67,-118.03C302.5,-119.34 292.23,-120.8 281.72,-122.29"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="281.02,-118.86 271.61,-123.73 282,-125.79 281.02,-118.86"/>
+<!-- module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m -->
+<g id="module~~caffeine_m~~UsesGraph_edge2" class="edge">
+<title>module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.6,-129.08C315.64,-138.32 295.25,-150.84 276,-159 271.01,-161.12 265.74,-163.08 260.4,-164.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="259.22,-161.59 250.76,-167.97 261.35,-168.26 259.22,-161.59"/>
 </g>
-<!-- module~image_enumeration_m -->
+<!-- module~synchronization_m -->
 <g id="module~~caffeine_m~~UsesGraph_node5" class="node">
-<title>module~image_enumeration_m</title>
-<g id="a_module~~caffeine_m~~UsesGraph_node5"><a xlink:href=".././module/image_enumeration_m.html" xlink:title="image_enumeration_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="266.5,-104 130.5,-104 130.5,-80 266.5,-80 266.5,-104"/>
-<text text-anchor="middle" x="198.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m</text>
+<title>module~synchronization_m</title>
+<g id="a_module~~caffeine_m~~UsesGraph_node5"><a xlink:href=".././module/synchronization_m.html" xlink:title="synchronization_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="254.5,-108 142.5,-108 142.5,-84 254.5,-84 254.5,-108"/>
+<text text-anchor="middle" x="198.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~image_enumeration_m -->
-<g id="module~~caffeine_m~~UsesGraph_edge4" class="edge">
-<title>module~caffeine_m&#45;&gt;module~image_enumeration_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M311.67,-107.97C301.08,-106.46 289.03,-104.75 276.85,-103.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="277.01,-99.5 266.61,-101.55 276.02,-106.43 277.01,-99.5"/>
+<!-- module~caffeine_m&#45;&gt;module~synchronization_m -->
+<g id="module~~caffeine_m~~UsesGraph_edge5" class="edge">
+<title>module~caffeine_m&#45;&gt;module~synchronization_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M311.67,-111.97C297.55,-109.96 280.83,-107.58 264.67,-105.28"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="265.1,-101.8 254.71,-103.86 264.11,-108.73 265.1,-101.8"/>
 </g>
-<!-- module~team_type_m -->
+<!-- module~program_termination_m -->
 <g id="module~~caffeine_m~~UsesGraph_node6" class="node">
-<title>module~team_type_m</title>
-<g id="a_module~~caffeine_m~~UsesGraph_node6"><a xlink:href=".././module/team_type_m.html" xlink:title="team_type_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="85,-64 0,-64 0,-40 85,-40 85,-64"/>
-<text text-anchor="middle" x="42.5" y="-49.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
+<title>module~program_termination_m</title>
+<g id="a_module~~caffeine_m~~UsesGraph_node6"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="269.5,-66 127.5,-66 127.5,-42 269.5,-42 269.5,-66"/>
+<text text-anchor="middle" x="198.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~team_type_m -->
-<g id="module~~caffeine_m~~UsesGraph_edge5" class="edge">
-<title>module~caffeine_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M331.37,-100.91C317.61,-90.99 296.61,-77.55 276,-71 216.13,-51.96 143.45,-49.02 95.47,-49.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="95.25,-46.16 85.32,-49.85 95.38,-53.16 95.25,-46.16"/>
+<!-- module~caffeine_m&#45;&gt;module~program_termination_m -->
+<g id="module~~caffeine_m~~UsesGraph_edge4" class="edge">
+<title>module~caffeine_m&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.6,-104.92C315.64,-95.68 295.25,-83.16 276,-75 271.01,-72.88 265.74,-70.92 260.4,-69.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="261.35,-65.74 250.76,-66.03 259.22,-72.41 261.35,-65.74"/>
 </g>
-<!-- module~caffeinate_decaffeinate_m -->
+<!-- module~image_enumeration_m -->
 <g id="module~~caffeine_m~~UsesGraph_node7" class="node">
-<title>module~caffeinate_decaffeinate_m</title>
-<g id="a_module~~caffeine_m~~UsesGraph_node7"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="276,-24 121,-24 121,0 276,0 276,-24"/>
-<text text-anchor="middle" x="198.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
+<title>module~image_enumeration_m</title>
+<g id="a_module~~caffeine_m~~UsesGraph_node7"><a xlink:href=".././module/image_enumeration_m.html" xlink:title="image_enumeration_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="266.5,-150 130.5,-150 130.5,-126 266.5,-126 266.5,-150"/>
+<text text-anchor="middle" x="198.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m -->
+<!-- module~caffeine_m&#45;&gt;module~image_enumeration_m -->
 <g id="module~~caffeine_m~~UsesGraph_edge6" class="edge">
-<title>module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M338.52,-100.88C326.43,-84.43 302.72,-55.13 276,-38 269.91,-34.1 263.17,-30.71 256.29,-27.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="257.46,-24.49 246.87,-24.1 254.9,-31 257.46,-24.49"/>
+<title>module~caffeine_m&#45;&gt;module~image_enumeration_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M311.67,-122.03C301.08,-123.54 289.03,-125.25 276.85,-126.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="276.02,-123.57 266.61,-128.45 277.01,-130.5 276.02,-123.57"/>
 </g>
 <!-- iso_c_binding -->
 <g id="module~~caffeine_m~~UsesGraph_node8" class="node">
 <title>iso_c_binding</title>
 <g id="a_module~~caffeine_m~~UsesGraph_node8"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84.5,-146 0.5,-146 0.5,-122 84.5,-122 84.5,-146"/>
-<text text-anchor="middle" x="42.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="84.5,-24 0.5,-24 0.5,0 84.5,0 84.5,-24"/>
+<text text-anchor="middle" x="42.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
 <!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
 <g id="module~~caffeine_m~~UsesGraph_edge7" class="edge">
 <title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M125.46,-134C115.23,-134 104.88,-134 95.14,-134"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="94.84,-130.5 84.84,-134 94.84,-137.5 94.84,-130.5"/>
+<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M125.46,-12C115.23,-12 104.88,-12 95.14,-12"/>
+<polygon fill="#ffff00" stroke="#ffff00" points="94.84,-8.5 84.84,-12 94.84,-15.5 94.84,-8.5"/>
 </g>
-<!-- module~image_enumeration_m&#45;&gt;module~team_type_m -->
+<!-- module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m -->
 <g id="module~~caffeine_m~~UsesGraph_edge8" class="edge">
-<title>module~image_enumeration_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M151.29,-80C133.58,-75.4 113.26,-70.12 95.07,-65.39"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="95.77,-61.96 85.21,-62.83 94.01,-68.74 95.77,-61.96"/>
+<title>module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M120.95,-180C112.25,-180 103.53,-180 95.26,-180"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="95.04,-176.5 85.04,-180 95.04,-183.5 95.04,-176.5"/>
 </g>
-<!-- module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m -->
+<!-- module~image_enumeration_m&#45;&gt;module~team_type_m -->
 <g id="module~~caffeine_m~~UsesGraph_edge9" class="edge">
-<title>module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#ff00ff" stroke-dasharray="5,2" d="M151.29,-24C133.58,-28.6 113.26,-33.88 95.07,-38.61"/>
-<polygon fill="#ff00ff" stroke="#ff00ff" points="94.01,-35.26 85.21,-41.17 95.77,-42.04 94.01,-35.26"/>
+<title>module~image_enumeration_m&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#ff00ff" stroke-dasharray="5,2" d="M153.37,-150.04C135.13,-155.01 113.86,-160.81 94.92,-165.98"/>
+<polygon fill="#ff00ff" stroke="#ff00ff" points="93.98,-162.6 85.25,-168.61 95.82,-169.36 93.98,-162.6"/>
 </g>
 </g>
 </svg>
@@ -369,7 +369,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/co_broadcast_s.html b/module/co_broadcast_s.html
index 915b4a61..e7aa9f5f 100644
--- a/module/co_broadcast_s.html
+++ b/module/co_broadcast_s.html
@@ -135,9 +135,9 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
+    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
     <li><a href='../module/utilities_m.html'>utilities_m</a></li>
     <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
   </ul>
       </li>
       <li class="list-group-item">
@@ -153,94 +153,94 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: module~~co_broadcast_s~~UsesGraph Pages: 1 -->
-<svg id="moduleco_broadcast_sUsesGraph" width="404pt" height="154pt"
- viewBox="0.00 0.00 404.00 154.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~co_broadcast_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 150)">
+<svg id="moduleco_broadcast_sUsesGraph" width="404pt" height="137pt"
+ viewBox="0.00 0.00 404.00 136.77" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~co_broadcast_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 132.77)">
 <title>module~~co_broadcast_s~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-150 400,-150 400,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-132.77 400,-132.77 400,4 -4,4"/>
 <!-- module~co_broadcast_s -->
 <g id="module~~co_broadcast_s~~UsesGraph_node1" class="node">
 <title>module~co_broadcast_s</title>
-<polygon fill="none" stroke="black" points="396,-86 302,-86 302,-62 396,-62 396,-86"/>
-<text text-anchor="middle" x="349" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_broadcast_s</text>
-</g>
-<!-- module~utilities_m -->
-<g id="module~~co_broadcast_s~~UsesGraph_node2" class="node">
-<title>module~utilities_m</title>
-<g id="a_module~~co_broadcast_s~~UsesGraph_node2"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-146 159.5,-146 159.5,-122 226.5,-122 226.5,-146"/>
-<text text-anchor="middle" x="193" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
-</a>
-</g>
-</g>
-<!-- module~co_broadcast_s&#45;&gt;module~utilities_m -->
-<g id="module~~co_broadcast_s~~UsesGraph_edge1" class="edge">
-<title>module~co_broadcast_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M319.67,-86.13C303.93,-92.77 283.96,-101.04 266,-108 256.43,-111.71 246.08,-115.55 236.29,-119.1"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.96,-115.86 226.74,-122.54 237.33,-122.45 234.96,-115.86"/>
+<polygon fill="none" stroke="black" points="396,-87 302,-87 302,-63 396,-63 396,-87"/>
+<text text-anchor="middle" x="349" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_broadcast_s</text>
 </g>
 <!-- iso_c_binding -->
-<g id="module~~co_broadcast_s~~UsesGraph_node3" class="node">
+<g id="module~~co_broadcast_s~~UsesGraph_node2" class="node">
 <title>iso_c_binding</title>
-<g id="a_module~~co_broadcast_s~~UsesGraph_node3"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84,-86 0,-86 0,-62 84,-62 84,-86"/>
-<text text-anchor="middle" x="42" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<g id="a_module~~co_broadcast_s~~UsesGraph_node2"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="84,-87 0,-87 0,-63 84,-63 84,-87"/>
+<text text-anchor="middle" x="42" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
 <!-- module~co_broadcast_s&#45;&gt;iso_c_binding -->
-<g id="module~~co_broadcast_s~~UsesGraph_edge2" class="edge">
+<g id="module~~co_broadcast_s~~UsesGraph_edge1" class="edge">
 <title>module~co_broadcast_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.6,-74.66C289.98,-74.8 277.53,-74.93 266,-75 201.11,-75.4 184.89,-75.42 120,-75 111.73,-74.95 102.96,-74.86 94.42,-74.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="94.2,-71.26 84.16,-74.63 94.11,-78.26 94.2,-71.26"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M330.41,-87.14C314.43,-97.38 289.79,-111.26 266,-117 202.92,-132.21 182.88,-133.03 120,-117 101.3,-112.23 82.25,-101.9 67.78,-92.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="69.67,-89.73 59.4,-87.13 65.81,-95.57 69.67,-89.73"/>
 </g>
 <!-- module~caffeine_h_m -->
-<g id="module~~co_broadcast_s~~UsesGraph_node4" class="node">
+<g id="module~~co_broadcast_s~~UsesGraph_node3" class="node">
 <title>module~caffeine_h_m</title>
-<g id="a_module~~co_broadcast_s~~UsesGraph_node4"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="235,-66 151,-66 151,-42 235,-42 235,-66"/>
-<text text-anchor="middle" x="193" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<g id="a_module~~co_broadcast_s~~UsesGraph_node3"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="235,-108 151,-108 151,-84 235,-84 235,-108"/>
+<text text-anchor="middle" x="193" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_broadcast_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~co_broadcast_s~~UsesGraph_edge3" class="edge">
+<g id="module~~co_broadcast_s~~UsesGraph_edge2" class="edge">
 <title>module~co_broadcast_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.79,-68C284.01,-65.69 263.6,-63.04 245.36,-60.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="245.57,-57.17 235.2,-59.35 244.66,-64.11 245.57,-57.17"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.79,-81.3C283.93,-83.74 263.41,-86.53 245.11,-89.03"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="244.63,-85.56 235.2,-90.38 245.58,-92.5 244.63,-85.56"/>
 </g>
 <!-- module~collective_subroutines_m -->
-<g id="module~~co_broadcast_s~~UsesGraph_node5" class="node">
+<g id="module~~co_broadcast_s~~UsesGraph_node4" class="node">
 <title>module~collective_subroutines_m</title>
-<g id="a_module~~co_broadcast_s~~UsesGraph_node5"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="266,-24 120,-24 120,0 266,0 266,-24"/>
-<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
+<g id="a_module~~co_broadcast_s~~UsesGraph_node4"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="266,-66 120,-66 120,-42 266,-42 266,-66"/>
+<text text-anchor="middle" x="193" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_broadcast_s&#45;&gt;module~collective_subroutines_m -->
 <g id="module~~co_broadcast_s~~UsesGraph_edge4" class="edge">
 <title>module~co_broadcast_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" d="M326.56,-61.94C310.29,-53.13 287.19,-41.31 266,-33 260.85,-30.98 255.42,-29.05 249.96,-27.24"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="250.71,-23.81 240.12,-24.11 248.59,-30.48 250.71,-23.81"/>
+<path fill="none" stroke="#ff0000" d="M301.79,-68.7C293.62,-67.58 284.89,-66.39 276.07,-65.19"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="276.48,-61.72 266.1,-63.83 275.54,-68.65 276.48,-61.72"/>
+</g>
+<!-- module~utilities_m -->
+<g id="module~~co_broadcast_s~~UsesGraph_node5" class="node">
+<title>module~utilities_m</title>
+<g id="a_module~~co_broadcast_s~~UsesGraph_node5"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-24 159.5,-24 159.5,0 226.5,0 226.5,-24"/>
+<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
+</a>
 </g>
-<!-- module~utilities_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_broadcast_s~~UsesGraph_edge5" class="edge">
-<title>module~utilities_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M159.2,-122.7C146.84,-118.3 132.71,-113.09 120,-108 106.38,-102.54 91.6,-96.13 78.66,-90.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="79.74,-87.01 69.18,-86.1 76.87,-93.39 79.74,-87.01"/>
+</g>
+<!-- module~co_broadcast_s&#45;&gt;module~utilities_m -->
+<g id="module~~co_broadcast_s~~UsesGraph_edge3" class="edge">
+<title>module~co_broadcast_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M327.27,-62.99C311,-53.91 287.55,-41.57 266,-33 256.56,-29.25 246.19,-25.83 236.33,-22.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="237.28,-19.52 226.7,-20.13 235.34,-26.25 237.28,-19.52"/>
 </g>
 <!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_broadcast_s~~UsesGraph_edge6" class="edge">
+<g id="module~~co_broadcast_s~~UsesGraph_edge5" class="edge">
 <title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M150.89,-59.52C133.37,-61.87 112.75,-64.64 94.26,-67.12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-63.67 84.23,-68.47 94.61,-70.6 93.68,-63.67"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M150.89,-90.21C133.37,-87.74 112.75,-84.83 94.26,-82.22"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="94.62,-78.74 84.23,-80.81 93.65,-85.67 94.62,-78.74"/>
 </g>
 <!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_broadcast_s~~UsesGraph_edge7" class="edge">
+<g id="module~~co_broadcast_s~~UsesGraph_edge6" class="edge">
 <title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M145.43,-24.06C136.86,-26.71 128.08,-29.71 120,-33 103.54,-39.7 86,-48.87 71.82,-56.83"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="69.98,-53.86 63.04,-61.86 73.46,-59.93 69.98,-53.86"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M119.68,-64.19C111.13,-65.4 102.54,-66.61 94.37,-67.76"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-64.32 84.27,-69.18 94.66,-71.25 93.68,-64.32"/>
+</g>
+<!-- module~utilities_m&#45;&gt;iso_c_binding -->
+<g id="module~~co_broadcast_s~~UsesGraph_edge7" class="edge">
+<title>module~utilities_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M159.23,-19.95C146.75,-23.4 132.52,-27.83 120,-33 103.26,-39.91 85.45,-49.47 71.18,-57.72"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="69.21,-54.82 62.36,-62.91 72.76,-60.85 69.21,-54.82"/>
 </g>
 </g>
 </svg>
@@ -393,7 +393,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/co_max_s.html b/module/co_max_s.html
index 24918a99..921eed2f 100644
--- a/module/co_max_s.html
+++ b/module/co_max_s.html
@@ -135,10 +135,10 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
+    <li><a href='../module/caffeine_assert_m.html'>caffeine_assert_m</a></li>
     <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
     <li><a href='../module/utilities_m.html'>utilities_m</a></li>
     <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href='../module/caffeine_assert_m.html'>caffeine_assert_m</a></li>
     <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
   </ul>
       </li>
@@ -163,116 +163,116 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~co_max_s -->
 <g id="module~~co_max_s~~UsesGraph_node1" class="node">
 <title>module~co_max_s</title>
-<polygon fill="none" stroke="black" points="366,-125 302,-125 302,-101 366,-101 366,-125"/>
-<text text-anchor="middle" x="334" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_max_s</text>
+<polygon fill="none" stroke="black" points="366,-129 302,-129 302,-105 366,-105 366,-129"/>
+<text text-anchor="middle" x="334" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_max_s</text>
 </g>
-<!-- module~program_termination_m -->
+<!-- module~caffeine_assert_m -->
 <g id="module~~co_max_s~~UsesGraph_node2" class="node">
-<title>module~program_termination_m</title>
-<g id="a_module~~co_max_s~~UsesGraph_node2"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="264,-230 122,-230 122,-206 264,-206 264,-230"/>
-<text text-anchor="middle" x="193" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<title>module~caffeine_assert_m</title>
+<g id="a_module~~co_max_s~~UsesGraph_node2"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="247.5,-230 138.5,-230 138.5,-206 247.5,-206 247.5,-230"/>
+<text text-anchor="middle" x="193" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_max_s&#45;&gt;module~program_termination_m -->
+<!-- module~co_max_s&#45;&gt;module~caffeine_assert_m -->
 <g id="module~~co_max_s~~UsesGraph_edge1" class="edge">
-<title>module~co_max_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M326.51,-125.26C316.17,-143.61 294.2,-178.09 266,-197 263.43,-198.72 260.72,-200.3 257.92,-201.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="256.33,-198.63 248.7,-205.98 259.25,-205 256.33,-198.63"/>
+<title>module~co_max_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M325.11,-129.08C313.83,-145.47 291.61,-174.7 266,-192 260.38,-195.8 254.13,-199.12 247.74,-201.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="246.21,-198.84 238.32,-205.9 248.9,-205.3 246.21,-198.84"/>
 </g>
-<!-- module~caffeine_h_m -->
+<!-- iso_c_binding -->
 <g id="module~~co_max_s~~UsesGraph_node3" class="node">
-<title>module~caffeine_h_m</title>
-<g id="a_module~~co_max_s~~UsesGraph_node3"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="235,-188 151,-188 151,-164 235,-164 235,-188"/>
-<text text-anchor="middle" x="193" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<title>iso_c_binding</title>
+<g id="a_module~~co_max_s~~UsesGraph_node3"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="84,-129 0,-129 0,-105 84,-105 84,-129"/>
+<text text-anchor="middle" x="42" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
-<!-- module~co_max_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~co_max_s&#45;&gt;iso_c_binding -->
 <g id="module~~co_max_s~~UsesGraph_edge2" class="edge">
-<title>module~co_max_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M316.65,-125.05C303.51,-134.29 284.29,-146.79 266,-155 259.3,-158.01 252.06,-160.71 244.85,-163.09"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="243.57,-159.82 235.07,-166.14 245.66,-166.5 243.57,-159.82"/>
+<title>module~co_max_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M318.74,-129.31C305.91,-139.51 286.05,-153.23 266,-159 203.64,-176.93 182.88,-175.03 120,-159 101.3,-154.23 82.25,-143.9 67.78,-134.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="69.67,-131.73 59.4,-129.13 65.81,-137.57 69.67,-131.73"/>
 </g>
 <!-- module~utilities_m -->
 <g id="module~~co_max_s~~UsesGraph_node4" class="node">
 <title>module~utilities_m</title>
 <g id="a_module~~co_max_s~~UsesGraph_node4"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-146 159.5,-146 159.5,-122 226.5,-122 226.5,-146"/>
-<text text-anchor="middle" x="193" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-150 159.5,-150 159.5,-126 226.5,-126 226.5,-150"/>
+<text text-anchor="middle" x="193" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_max_s&#45;&gt;module~utilities_m -->
 <g id="module~~co_max_s~~UsesGraph_edge3" class="edge">
 <title>module~co_max_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.81,-117.71C282.55,-120.62 257.58,-124.39 236.52,-127.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="235.9,-124.13 226.54,-129.08 236.95,-131.05 235.9,-124.13"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.81,-121.71C282.55,-124.62 257.58,-128.39 236.52,-131.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="235.9,-128.13 226.54,-133.08 236.95,-135.05 235.9,-128.13"/>
 </g>
 <!-- module~collective_subroutines_m -->
 <g id="module~~co_max_s~~UsesGraph_node5" class="node">
 <title>module~collective_subroutines_m</title>
 <g id="a_module~~co_max_s~~UsesGraph_node5"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="266,-104 120,-104 120,-80 266,-80 266,-104"/>
-<text text-anchor="middle" x="193" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="266,-108 120,-108 120,-84 266,-84 266,-108"/>
+<text text-anchor="middle" x="193" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_max_s&#45;&gt;module~collective_subroutines_m -->
 <g id="module~~co_max_s~~UsesGraph_edge6" class="edge">
 <title>module~co_max_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" d="M301.81,-108.29C293.99,-107.11 285.23,-105.78 276.17,-104.41"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="276.67,-100.95 266.26,-102.92 275.63,-107.87 276.67,-100.95"/>
+<path fill="none" stroke="#ff0000" d="M301.81,-112.29C293.99,-111.11 285.23,-109.78 276.17,-108.41"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="276.67,-104.95 266.26,-106.92 275.63,-111.87 276.67,-104.95"/>
 </g>
-<!-- iso_c_binding -->
+<!-- module~caffeine_h_m -->
 <g id="module~~co_max_s~~UsesGraph_node6" class="node">
-<title>iso_c_binding</title>
-<g id="a_module~~co_max_s~~UsesGraph_node6"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84,-125 0,-125 0,-101 84,-101 84,-125"/>
-<text text-anchor="middle" x="42" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<title>module~caffeine_h_m</title>
+<g id="a_module~~co_max_s~~UsesGraph_node6"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="235,-66 151,-66 151,-42 235,-42 235,-66"/>
+<text text-anchor="middle" x="193" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_max_s&#45;&gt;iso_c_binding -->
+<!-- module~co_max_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~co_max_s~~UsesGraph_edge4" class="edge">
-<title>module~co_max_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M318.74,-100.69C305.91,-90.49 286.05,-76.77 266,-71 203.64,-53.07 182.88,-54.97 120,-71 101.3,-75.77 82.25,-86.1 67.78,-95.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="65.81,-92.43 59.4,-100.87 69.67,-98.27 65.81,-92.43"/>
+<title>module~co_max_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M316.65,-104.95C303.51,-95.71 284.29,-83.21 266,-75 259.3,-71.99 252.06,-69.29 244.85,-66.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="245.66,-63.5 235.07,-63.86 243.57,-70.18 245.66,-63.5"/>
 </g>
-<!-- module~caffeine_assert_m -->
+<!-- module~program_termination_m -->
 <g id="module~~co_max_s~~UsesGraph_node7" class="node">
-<title>module~caffeine_assert_m</title>
-<g id="a_module~~co_max_s~~UsesGraph_node7"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="247.5,-24 138.5,-24 138.5,0 247.5,0 247.5,-24"/>
-<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
+<title>module~program_termination_m</title>
+<g id="a_module~~co_max_s~~UsesGraph_node7"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="264,-24 122,-24 122,0 264,0 264,-24"/>
+<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_max_s&#45;&gt;module~caffeine_assert_m -->
+<!-- module~co_max_s&#45;&gt;module~program_termination_m -->
 <g id="module~~co_max_s~~UsesGraph_edge5" class="edge">
-<title>module~co_max_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M325.11,-100.92C313.83,-84.53 291.61,-55.3 266,-38 260.38,-34.2 254.13,-30.88 247.74,-28.01"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="248.9,-24.7 238.32,-24.1 246.21,-31.16 248.9,-24.7"/>
-</g>
-<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_max_s~~UsesGraph_edge7" class="edge">
-<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M150.73,-165.62C140.54,-162.61 129.75,-159.03 120,-155 103.26,-148.09 85.45,-138.53 71.18,-130.28"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="72.76,-127.15 62.36,-125.09 69.21,-133.18 72.76,-127.15"/>
+<title>module~co_max_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M326.51,-104.74C316.17,-86.39 294.2,-51.91 266,-33 263.43,-31.28 260.72,-29.7 257.92,-28.24"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="259.25,-25 248.7,-24.02 256.33,-31.37 259.25,-25"/>
 </g>
 <!-- module~utilities_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_max_s~~UsesGraph_edge8" class="edge">
+<g id="module~~co_max_s~~UsesGraph_edge7" class="edge">
 <title>module~utilities_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M159.3,-129.39C140.22,-126.7 115.73,-123.25 94.15,-120.21"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="94.54,-116.73 84.15,-118.8 93.56,-123.66 94.54,-116.73"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M159.3,-133.39C140.22,-130.7 115.73,-127.25 94.15,-124.21"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="94.54,-120.73 84.15,-122.8 93.56,-127.66 94.54,-120.73"/>
 </g>
 <!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_max_s~~UsesGraph_edge9" class="edge">
+<g id="module~~co_max_s~~UsesGraph_edge8" class="edge">
 <title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M119.68,-102.19C111.13,-103.4 102.54,-104.61 94.37,-105.76"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-102.32 84.27,-107.18 94.66,-109.25 93.68,-102.32"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M119.68,-106.19C111.13,-107.4 102.54,-108.61 94.37,-109.76"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-106.32 84.27,-111.18 94.66,-113.25 93.68,-106.32"/>
+</g>
+<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
+<g id="module~~co_max_s~~UsesGraph_edge9" class="edge">
+<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M150.73,-64.38C140.54,-67.39 129.75,-70.97 120,-75 103.26,-81.91 85.45,-91.47 71.18,-99.72"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="69.21,-96.82 62.36,-104.91 72.76,-102.85 69.21,-96.82"/>
 </g>
 </g>
 </svg>
@@ -425,7 +425,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/co_min_s.html b/module/co_min_s.html
index 23efe032..1df3832d 100644
--- a/module/co_min_s.html
+++ b/module/co_min_s.html
@@ -135,10 +135,10 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
+    <li><a href='../module/caffeine_assert_m.html'>caffeine_assert_m</a></li>
     <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
     <li><a href='../module/utilities_m.html'>utilities_m</a></li>
     <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href='../module/caffeine_assert_m.html'>caffeine_assert_m</a></li>
     <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
   </ul>
       </li>
@@ -163,116 +163,116 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~co_min_s -->
 <g id="module~~co_min_s~~UsesGraph_node1" class="node">
 <title>module~co_min_s</title>
-<polygon fill="none" stroke="black" points="363,-125 302,-125 302,-101 363,-101 363,-125"/>
-<text text-anchor="middle" x="332.5" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_min_s</text>
+<polygon fill="none" stroke="black" points="363,-129 302,-129 302,-105 363,-105 363,-129"/>
+<text text-anchor="middle" x="332.5" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_min_s</text>
 </g>
-<!-- module~program_termination_m -->
+<!-- module~caffeine_assert_m -->
 <g id="module~~co_min_s~~UsesGraph_node2" class="node">
-<title>module~program_termination_m</title>
-<g id="a_module~~co_min_s~~UsesGraph_node2"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="264,-230 122,-230 122,-206 264,-206 264,-230"/>
-<text text-anchor="middle" x="193" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<title>module~caffeine_assert_m</title>
+<g id="a_module~~co_min_s~~UsesGraph_node2"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="247.5,-230 138.5,-230 138.5,-206 247.5,-206 247.5,-230"/>
+<text text-anchor="middle" x="193" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;module~program_termination_m -->
+<!-- module~co_min_s&#45;&gt;module~caffeine_assert_m -->
 <g id="module~~co_min_s~~UsesGraph_edge1" class="edge">
-<title>module~co_min_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M325.23,-125.26C315.21,-143.62 293.85,-178.1 266,-197 263.58,-198.64 261.02,-200.16 258.38,-201.56"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="256.69,-198.49 249.11,-205.89 259.65,-204.83 256.69,-198.49"/>
+<title>module~co_min_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M323.85,-129.08C312.9,-145.49 291.26,-174.73 266,-192 260.4,-195.83 254.17,-199.17 247.78,-202.05"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="246.25,-198.9 238.36,-205.97 248.94,-205.36 246.25,-198.9"/>
 </g>
-<!-- module~caffeine_h_m -->
+<!-- iso_c_binding -->
 <g id="module~~co_min_s~~UsesGraph_node3" class="node">
-<title>module~caffeine_h_m</title>
-<g id="a_module~~co_min_s~~UsesGraph_node3"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="235,-188 151,-188 151,-164 235,-164 235,-188"/>
-<text text-anchor="middle" x="193" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<title>iso_c_binding</title>
+<g id="a_module~~co_min_s~~UsesGraph_node3"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="84,-129 0,-129 0,-105 84,-105 84,-129"/>
+<text text-anchor="middle" x="42" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~co_min_s&#45;&gt;iso_c_binding -->
 <g id="module~~co_min_s~~UsesGraph_edge2" class="edge">
-<title>module~co_min_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M315.56,-125.08C302.73,-134.32 283.95,-146.83 266,-155 259.32,-158.04 252.09,-160.76 244.87,-163.15"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="243.6,-159.88 235.1,-166.21 245.69,-166.56 243.6,-159.88"/>
+<title>module~co_min_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M317.61,-129.3C305.1,-139.5 285.7,-153.23 266,-159 203.73,-177.25 182.88,-175.03 120,-159 101.3,-154.23 82.25,-143.9 67.78,-134.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="69.67,-131.73 59.4,-129.13 65.81,-137.57 69.67,-131.73"/>
 </g>
 <!-- module~utilities_m -->
 <g id="module~~co_min_s~~UsesGraph_node4" class="node">
 <title>module~utilities_m</title>
 <g id="a_module~~co_min_s~~UsesGraph_node4"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-146 159.5,-146 159.5,-122 226.5,-122 226.5,-146"/>
-<text text-anchor="middle" x="193" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-150 159.5,-150 159.5,-126 226.5,-126 226.5,-150"/>
+<text text-anchor="middle" x="193" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_min_s&#45;&gt;module~utilities_m -->
 <g id="module~~co_min_s~~UsesGraph_edge3" class="edge">
 <title>module~co_min_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.66,-117.56C282.66,-120.46 257.74,-124.27 236.66,-127.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.02,-124.04 226.66,-129.01 237.08,-130.96 236.02,-124.04"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.66,-121.56C282.66,-124.46 257.74,-128.27 236.66,-131.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="236.02,-128.04 226.66,-133.01 237.08,-134.96 236.02,-128.04"/>
 </g>
 <!-- module~collective_subroutines_m -->
 <g id="module~~co_min_s~~UsesGraph_node5" class="node">
 <title>module~collective_subroutines_m</title>
 <g id="a_module~~co_min_s~~UsesGraph_node5"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="266,-104 120,-104 120,-80 266,-80 266,-104"/>
-<text text-anchor="middle" x="193" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="266,-108 120,-108 120,-84 266,-84 266,-108"/>
+<text text-anchor="middle" x="193" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_min_s&#45;&gt;module~collective_subroutines_m -->
 <g id="module~~co_min_s~~UsesGraph_edge6" class="edge">
 <title>module~co_min_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" d="M301.66,-108.44C293.89,-107.26 285.13,-105.92 276.05,-104.53"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="276.51,-101.06 266.09,-103.01 275.45,-107.98 276.51,-101.06"/>
+<path fill="none" stroke="#ff0000" d="M301.66,-112.44C293.89,-111.26 285.13,-109.92 276.05,-108.53"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="276.51,-105.06 266.09,-107.01 275.45,-111.98 276.51,-105.06"/>
 </g>
-<!-- iso_c_binding -->
+<!-- module~caffeine_h_m -->
 <g id="module~~co_min_s~~UsesGraph_node6" class="node">
-<title>iso_c_binding</title>
-<g id="a_module~~co_min_s~~UsesGraph_node6"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84,-125 0,-125 0,-101 84,-101 84,-125"/>
-<text text-anchor="middle" x="42" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<title>module~caffeine_h_m</title>
+<g id="a_module~~co_min_s~~UsesGraph_node6"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="235,-66 151,-66 151,-42 235,-42 235,-66"/>
+<text text-anchor="middle" x="193" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;iso_c_binding -->
+<!-- module~co_min_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~co_min_s~~UsesGraph_edge4" class="edge">
-<title>module~co_min_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M317.61,-100.7C305.1,-90.5 285.7,-76.77 266,-71 203.73,-52.75 182.88,-54.97 120,-71 101.3,-75.77 82.25,-86.1 67.78,-95.33"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="65.81,-92.43 59.4,-100.87 69.67,-98.27 65.81,-92.43"/>
+<title>module~co_min_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M315.56,-104.92C302.73,-95.68 283.95,-83.17 266,-75 259.32,-71.96 252.09,-69.24 244.87,-66.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="245.69,-63.44 235.1,-63.79 243.6,-70.12 245.69,-63.44"/>
 </g>
-<!-- module~caffeine_assert_m -->
+<!-- module~program_termination_m -->
 <g id="module~~co_min_s~~UsesGraph_node7" class="node">
-<title>module~caffeine_assert_m</title>
-<g id="a_module~~co_min_s~~UsesGraph_node7"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="247.5,-24 138.5,-24 138.5,0 247.5,0 247.5,-24"/>
-<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
+<title>module~program_termination_m</title>
+<g id="a_module~~co_min_s~~UsesGraph_node7"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="264,-24 122,-24 122,0 264,0 264,-24"/>
+<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;module~caffeine_assert_m -->
+<!-- module~co_min_s&#45;&gt;module~program_termination_m -->
 <g id="module~~co_min_s~~UsesGraph_edge5" class="edge">
-<title>module~co_min_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M323.85,-100.92C312.9,-84.51 291.26,-55.27 266,-38 260.4,-34.17 254.17,-30.83 247.78,-27.95"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="248.94,-24.64 238.36,-24.03 246.25,-31.1 248.94,-24.64"/>
-</g>
-<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_min_s~~UsesGraph_edge7" class="edge">
-<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ffff00" stroke-dasharray="5,2" d="M150.73,-165.62C140.54,-162.61 129.75,-159.03 120,-155 103.26,-148.09 85.45,-138.53 71.18,-130.28"/>
-<polygon fill="#ffff00" stroke="#ffff00" points="72.76,-127.15 62.36,-125.09 69.21,-133.18 72.76,-127.15"/>
+<title>module~co_min_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M325.23,-104.74C315.21,-86.38 293.85,-51.9 266,-33 263.58,-31.36 261.02,-29.84 258.38,-28.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="259.65,-25.17 249.11,-24.11 256.69,-31.51 259.65,-25.17"/>
 </g>
 <!-- module~utilities_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_min_s~~UsesGraph_edge8" class="edge">
+<g id="module~~co_min_s~~UsesGraph_edge7" class="edge">
 <title>module~utilities_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M159.3,-129.39C140.22,-126.7 115.73,-123.25 94.15,-120.21"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="94.54,-116.73 84.15,-118.8 93.56,-123.66 94.54,-116.73"/>
+<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M159.3,-133.39C140.22,-130.7 115.73,-127.25 94.15,-124.21"/>
+<polygon fill="#00ff00" stroke="#00ff00" points="94.54,-120.73 84.15,-122.8 93.56,-127.66 94.54,-120.73"/>
 </g>
 <!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_min_s~~UsesGraph_edge9" class="edge">
+<g id="module~~co_min_s~~UsesGraph_edge8" class="edge">
 <title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M119.68,-102.19C111.13,-103.4 102.54,-104.61 94.37,-105.76"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-102.32 84.27,-107.18 94.66,-109.25 93.68,-102.32"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M119.68,-106.19C111.13,-107.4 102.54,-108.61 94.37,-109.76"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-106.32 84.27,-111.18 94.66,-113.25 93.68,-106.32"/>
+</g>
+<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
+<g id="module~~co_min_s~~UsesGraph_edge9" class="edge">
+<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M150.73,-64.38C140.54,-67.39 129.75,-70.97 120,-75 103.26,-81.91 85.45,-91.47 71.18,-99.72"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="69.21,-96.82 62.36,-104.91 72.76,-102.85 69.21,-96.82"/>
 </g>
 </g>
 </svg>
@@ -425,7 +425,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/co_reduce_s.html b/module/co_reduce_s.html
index ed374b2f..3fd3234c 100644
--- a/module/co_reduce_s.html
+++ b/module/co_reduce_s.html
@@ -143,12 +143,12 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
+    <li><a href='../module/caffeine_assert_m.html'>caffeine_assert_m</a></li>
     <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
+    <li><a href='../module/caffeine_intrinsic_array_m.html'>caffeine_intrinsic_array_m</a></li>
     <li><a href='../module/utilities_m.html'>utilities_m</a></li>
     <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href='../module/caffeine_assert_m.html'>caffeine_assert_m</a></li>
     <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
-    <li><a href='../module/caffeine_intrinsic_array_m.html'>caffeine_intrinsic_array_m</a></li>
   </ul>
       </li>
       <li class="list-group-item">
@@ -172,146 +172,146 @@ <h3 class="panel-title">Uses</h3>
 <!-- module~co_reduce_s -->
 <g id="module~~co_reduce_s~~UsesGraph_node1" class="node">
 <title>module~co_reduce_s</title>
-<polygon fill="none" stroke="black" points="463,-146 385,-146 385,-122 463,-122 463,-146"/>
-<text text-anchor="middle" x="424" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_reduce_s</text>
+<polygon fill="none" stroke="black" points="463,-150 385,-150 385,-126 463,-126 463,-150"/>
+<text text-anchor="middle" x="424" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_reduce_s</text>
 </g>
-<!-- module~program_termination_m -->
+<!-- module~caffeine_assert_m -->
 <g id="module~~co_reduce_s~~UsesGraph_node2" class="node">
-<title>module~program_termination_m</title>
-<g id="a_module~~co_reduce_s~~UsesGraph_node2"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="343.5,-272 201.5,-272 201.5,-248 343.5,-248 343.5,-272"/>
-<text text-anchor="middle" x="272.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<title>module~caffeine_assert_m</title>
+<g id="a_module~~co_reduce_s~~UsesGraph_node2"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="327,-272 218,-272 218,-248 327,-248 327,-272"/>
+<text text-anchor="middle" x="272.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_reduce_s&#45;&gt;module~program_termination_m -->
+<!-- module~co_reduce_s&#45;&gt;module~caffeine_assert_m -->
 <g id="module~~co_reduce_s~~UsesGraph_edge1" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M417.84,-146.12C407.87,-168.09 383.81,-214.46 349,-239 346.73,-240.6 344.35,-242.08 341.88,-243.44"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="340.11,-240.41 332.62,-247.91 343.15,-246.71 340.11,-240.41"/>
+<title>module~co_reduce_s&#45;&gt;module~caffeine_assert_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M416.74,-150.16C405.71,-170.4 380.96,-211.04 349,-234 343.75,-237.77 337.92,-241.03 331.88,-243.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="330.13,-240.77 322.27,-247.89 332.85,-247.22 330.13,-240.77"/>
 </g>
-<!-- module~caffeine_intrinsic_array_m -->
+<!-- iso_c_binding -->
 <g id="module~~co_reduce_s~~UsesGraph_node3" class="node">
-<title>module~caffeine_intrinsic_array_m</title>
-<g id="a_module~~co_reduce_s~~UsesGraph_node3"><a xlink:href=".././module/caffeine_intrinsic_array_m.html" xlink:title="caffeine_intrinsic_array_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="349,-230 196,-230 196,-206 349,-206 349,-230"/>
-<text text-anchor="middle" x="272.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_m</text>
+<title>iso_c_binding</title>
+<g id="a_module~~co_reduce_s~~UsesGraph_node3"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="122,-171 38,-171 38,-147 122,-147 122,-171"/>
+<text text-anchor="middle" x="80" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
-<!-- module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m -->
+<!-- module~co_reduce_s&#45;&gt;iso_c_binding -->
 <g id="module~~co_reduce_s~~UsesGraph_edge4" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M411.65,-146.5C398.08,-160.73 374.03,-183.7 349,-197 345.28,-198.97 341.36,-200.78 337.34,-202.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="335.96,-199.2 327.82,-205.98 338.41,-205.76 335.96,-199.2"/>
+<title>module~co_reduce_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M413.57,-150.13C400.84,-165.4 376.55,-190.86 349,-201 268.86,-230.49 167.8,-197.14 115.66,-175.17"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="116.77,-171.84 106.21,-171.08 114,-178.26 116.77,-171.84"/>
 </g>
-<!-- module~caffeine_h_m -->
+<!-- module~caffeine_intrinsic_array_m -->
 <g id="module~~co_reduce_s~~UsesGraph_node4" class="node">
-<title>module~caffeine_h_m</title>
-<g id="a_module~~co_reduce_s~~UsesGraph_node4"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="314.5,-188 230.5,-188 230.5,-164 314.5,-164 314.5,-188"/>
-<text text-anchor="middle" x="272.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<title>module~caffeine_intrinsic_array_m</title>
+<g id="a_module~~co_reduce_s~~UsesGraph_node4"><a xlink:href=".././module/caffeine_intrinsic_array_m.html" xlink:title="caffeine_intrinsic_array_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="349,-66 196,-66 196,-42 349,-42 349,-66"/>
+<text text-anchor="middle" x="272.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_reduce_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m -->
 <g id="module~~co_reduce_s~~UsesGraph_edge2" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M384.98,-144.83C373.43,-148.11 360.7,-151.71 349,-155 341.08,-157.22 332.7,-159.57 324.51,-161.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="323.35,-158.54 314.65,-164.6 325.23,-165.28 323.35,-158.54"/>
+<title>module~co_reduce_s&#45;&gt;module~caffeine_intrinsic_array_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M411.65,-125.5C398.08,-111.27 374.03,-88.3 349,-75 345.28,-73.03 341.36,-71.22 337.34,-69.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="338.41,-66.24 327.82,-66.02 335.96,-72.8 338.41,-66.24"/>
 </g>
 <!-- module~utilities_m -->
 <g id="module~~co_reduce_s~~UsesGraph_node5" class="node">
 <title>module~utilities_m</title>
 <g id="a_module~~co_reduce_s~~UsesGraph_node5"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="306,-146 239,-146 239,-122 306,-122 306,-146"/>
-<text text-anchor="middle" x="272.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="306,-192 239,-192 239,-168 306,-168 306,-192"/>
+<text text-anchor="middle" x="272.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_reduce_s&#45;&gt;module~utilities_m -->
 <g id="module~~co_reduce_s~~UsesGraph_edge3" class="edge">
 <title>module~co_reduce_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M384.89,-134C364.07,-134 338.22,-134 316.66,-134"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="316.46,-130.5 306.46,-134 316.46,-137.5 316.46,-130.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M384.98,-148.83C373.43,-152.11 360.7,-155.71 349,-159 338.27,-162.01 326.68,-165.25 315.87,-168.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="314.91,-164.89 306.21,-170.94 316.79,-171.64 314.91,-164.89"/>
 </g>
 <!-- module~collective_subroutines_m -->
 <g id="module~~co_reduce_s~~UsesGraph_node6" class="node">
 <title>module~collective_subroutines_m</title>
 <g id="a_module~~co_reduce_s~~UsesGraph_node6"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="345.5,-104 199.5,-104 199.5,-80 345.5,-80 345.5,-104"/>
-<text text-anchor="middle" x="272.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="345.5,-150 199.5,-150 199.5,-126 345.5,-126 345.5,-150"/>
+<text text-anchor="middle" x="272.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_reduce_s&#45;&gt;module~collective_subroutines_m -->
 <g id="module~~co_reduce_s~~UsesGraph_edge7" class="edge">
 <title>module~co_reduce_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" d="M384.98,-123.17C373.43,-119.89 360.7,-116.29 349,-113 341.81,-110.98 334.22,-108.86 326.75,-106.77"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="327.6,-103.38 317.03,-104.07 325.72,-110.12 327.6,-103.38"/>
+<path fill="none" stroke="#ff0000" d="M384.89,-138C375.87,-138 365.91,-138 355.75,-138"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="355.57,-134.5 345.57,-138 355.57,-141.5 355.57,-134.5"/>
 </g>
-<!-- iso_c_binding -->
+<!-- module~caffeine_h_m -->
 <g id="module~~co_reduce_s~~UsesGraph_node7" class="node">
-<title>iso_c_binding</title>
-<g id="a_module~~co_reduce_s~~UsesGraph_node7"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="122,-125 38,-125 38,-101 122,-101 122,-125"/>
-<text text-anchor="middle" x="80" y="-110.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<title>module~caffeine_h_m</title>
+<g id="a_module~~co_reduce_s~~UsesGraph_node7"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="314.5,-108 230.5,-108 230.5,-84 314.5,-84 314.5,-108"/>
+<text text-anchor="middle" x="272.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_reduce_s&#45;&gt;iso_c_binding -->
+<!-- module~co_reduce_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~co_reduce_s~~UsesGraph_edge5" class="edge">
-<title>module~co_reduce_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M413.57,-121.87C400.84,-106.6 376.55,-81.14 349,-71 268.86,-41.51 167.8,-74.86 115.66,-96.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114,-93.74 106.21,-100.92 116.77,-100.16 114,-93.74"/>
+<title>module~co_reduce_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M384.98,-127.17C373.43,-123.89 360.7,-120.29 349,-117 341.08,-114.78 332.7,-112.43 324.51,-110.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="325.23,-106.72 314.65,-107.4 323.35,-113.46 325.23,-106.72"/>
 </g>
-<!-- module~caffeine_assert_m -->
+<!-- module~program_termination_m -->
 <g id="module~~co_reduce_s~~UsesGraph_node8" class="node">
-<title>module~caffeine_assert_m</title>
-<g id="a_module~~co_reduce_s~~UsesGraph_node8"><a xlink:href=".././module/caffeine_assert_m.html" xlink:title="caffeine_assert_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="327,-24 218,-24 218,0 327,0 327,-24"/>
-<text text-anchor="middle" x="272.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_assert_m</text>
+<title>module~program_termination_m</title>
+<g id="a_module~~co_reduce_s~~UsesGraph_node8"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="343.5,-24 201.5,-24 201.5,0 343.5,0 343.5,-24"/>
+<text text-anchor="middle" x="272.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_reduce_s&#45;&gt;module~caffeine_assert_m -->
+<!-- module~co_reduce_s&#45;&gt;module~program_termination_m -->
 <g id="module~~co_reduce_s~~UsesGraph_edge6" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~caffeine_assert_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M416.74,-121.84C405.71,-101.6 380.96,-60.96 349,-38 343.75,-34.23 337.92,-30.97 331.88,-28.17"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="332.85,-24.78 322.27,-24.11 330.13,-31.23 332.85,-24.78"/>
+<title>module~co_reduce_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M417.84,-125.88C407.87,-103.91 383.81,-57.54 349,-33 346.73,-31.4 344.35,-29.92 341.88,-28.56"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="343.15,-25.29 332.62,-24.09 340.11,-31.59 343.15,-25.29"/>
 </g>
 <!-- module~caffeine_characterizable_m -->
 <g id="module~~co_reduce_s~~UsesGraph_node9" class="node">
 <title>module~caffeine_characterizable_m</title>
 <g id="a_module~~co_reduce_s~~UsesGraph_node9"><a xlink:href=".././module/caffeine_characterizable_m.html" xlink:title="caffeine_characterizable_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="160,-230 0,-230 0,-206 160,-206 160,-230"/>
-<text text-anchor="middle" x="80" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_characterizable_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="160,-66 0,-66 0,-42 160,-42 160,-66"/>
+<text text-anchor="middle" x="80" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_characterizable_m</text>
 </a>
 </g>
 </g>
 <!-- module~caffeine_intrinsic_array_m&#45;&gt;module~caffeine_characterizable_m -->
 <g id="module~~co_reduce_s~~UsesGraph_edge8" class="edge">
 <title>module~caffeine_intrinsic_array_m&#45;&gt;module~caffeine_characterizable_m</title>
-<path fill="none" stroke="#ffda00" stroke-dasharray="5,2" d="M195.94,-218C187.5,-218 178.85,-218 170.26,-218"/>
-<polygon fill="#ffda00" stroke="#ffda00" points="170.23,-214.5 160.23,-218 170.23,-221.5 170.23,-214.5"/>
-</g>
-<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_reduce_s~~UsesGraph_edge9" class="edge">
-<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M230.18,-165.14C219.03,-162.04 207.01,-158.54 196,-155 171.08,-147 143.53,-136.98 121.64,-128.73"/>
-<polygon fill="#48ff00" stroke="#48ff00" points="122.6,-125.35 112.01,-125.08 120.12,-131.9 122.6,-125.35"/>
+<path fill="none" stroke="#48ff00" stroke-dasharray="5,2" d="M195.94,-54C187.5,-54 178.85,-54 170.26,-54"/>
+<polygon fill="#48ff00" stroke="#48ff00" points="170.23,-50.5 160.23,-54 170.23,-57.5 170.23,-50.5"/>
 </g>
 <!-- module~utilities_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_reduce_s~~UsesGraph_edge10" class="edge">
+<g id="module~~co_reduce_s~~UsesGraph_edge9" class="edge">
 <title>module~utilities_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ff91" stroke-dasharray="5,2" d="M238.75,-130.39C209.54,-127.17 166.29,-122.4 132.46,-118.67"/>
-<polygon fill="#00ff91" stroke="#00ff91" points="132.61,-115.17 122.29,-117.55 131.84,-122.13 132.61,-115.17"/>
+<path fill="none" stroke="#00ff91" stroke-dasharray="5,2" d="M238.75,-176.39C209.54,-173.17 166.29,-168.4 132.46,-164.67"/>
+<polygon fill="#00ff91" stroke="#00ff91" points="132.61,-161.17 122.29,-163.55 131.84,-168.13 132.61,-161.17"/>
 </g>
 <!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_reduce_s~~UsesGraph_edge11" class="edge">
+<g id="module~~co_reduce_s~~UsesGraph_edge10" class="edge">
 <title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#0091ff" stroke-dasharray="5,2" d="M199.48,-99.94C177.13,-102.4 152.96,-105.07 132.31,-107.34"/>
-<polygon fill="#0091ff" stroke="#0091ff" points="131.73,-103.89 122.17,-108.46 132.5,-110.84 131.73,-103.89"/>
+<path fill="none" stroke="#0091ff" stroke-dasharray="5,2" d="M199.48,-145.94C177.13,-148.4 152.96,-151.07 132.31,-153.34"/>
+<polygon fill="#0091ff" stroke="#0091ff" points="131.73,-149.89 122.17,-154.46 132.5,-156.84 131.73,-149.89"/>
+</g>
+<!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
+<g id="module~~co_reduce_s~~UsesGraph_edge11" class="edge">
+<title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#4800ff" stroke-dasharray="5,2" d="M230.18,-106.86C219.03,-109.96 207.01,-113.46 196,-117 171.08,-125 143.53,-135.02 121.64,-143.27"/>
+<polygon fill="#4800ff" stroke="#4800ff" points="120.12,-140.1 112.01,-146.92 122.6,-146.65 120.12,-140.1"/>
 </g>
 </g>
 </svg>
@@ -493,7 +493,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/co_sum_s.html b/module/co_sum_s.html
index 0382222d..49fb5baa 100644
--- a/module/co_sum_s.html
+++ b/module/co_sum_s.html
@@ -135,9 +135,9 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
+    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
     <li><a href='../module/utilities_m.html'>utilities_m</a></li>
     <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
   </ul>
       </li>
       <li class="list-group-item">
@@ -153,94 +153,94 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: module~~co_sum_s~~UsesGraph Pages: 1 -->
-<svg id="moduleco_sum_sUsesGraph" width="374pt" height="154pt"
- viewBox="0.00 0.00 374.00 154.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~co_sum_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 150)">
+<svg id="moduleco_sum_sUsesGraph" width="374pt" height="138pt"
+ viewBox="0.00 0.00 374.00 137.85" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~co_sum_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 133.85)">
 <title>module~~co_sum_s~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-150 370,-150 370,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-133.85 370,-133.85 370,4 -4,4"/>
 <!-- module~co_sum_s -->
 <g id="module~~co_sum_s~~UsesGraph_node1" class="node">
 <title>module~co_sum_s</title>
-<polygon fill="none" stroke="black" points="366,-86 302,-86 302,-62 366,-62 366,-86"/>
-<text text-anchor="middle" x="334" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_sum_s</text>
-</g>
-<!-- module~utilities_m -->
-<g id="module~~co_sum_s~~UsesGraph_node2" class="node">
-<title>module~utilities_m</title>
-<g id="a_module~~co_sum_s~~UsesGraph_node2"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-146 159.5,-146 159.5,-122 226.5,-122 226.5,-146"/>
-<text text-anchor="middle" x="193" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
-</a>
-</g>
-</g>
-<!-- module~co_sum_s&#45;&gt;module~utilities_m -->
-<g id="module~~co_sum_s~~UsesGraph_edge1" class="edge">
-<title>module~co_sum_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M310.99,-86.03C298.08,-92.87 281.33,-101.37 266,-108 256.48,-112.11 246.08,-116.13 236.22,-119.74"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="234.82,-116.52 226.59,-123.19 237.18,-123.11 234.82,-116.52"/>
+<polygon fill="none" stroke="black" points="366,-87 302,-87 302,-63 366,-63 366,-87"/>
+<text text-anchor="middle" x="334" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">co_sum_s</text>
 </g>
 <!-- iso_c_binding -->
-<g id="module~~co_sum_s~~UsesGraph_node3" class="node">
+<g id="module~~co_sum_s~~UsesGraph_node2" class="node">
 <title>iso_c_binding</title>
-<g id="a_module~~co_sum_s~~UsesGraph_node3"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84,-86 0,-86 0,-62 84,-62 84,-86"/>
-<text text-anchor="middle" x="42" y="-71.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<g id="a_module~~co_sum_s~~UsesGraph_node2"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="84,-87 0,-87 0,-63 84,-63 84,-87"/>
+<text text-anchor="middle" x="42" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
 <!-- module~co_sum_s&#45;&gt;iso_c_binding -->
-<g id="module~~co_sum_s~~UsesGraph_edge2" class="edge">
+<g id="module~~co_sum_s~~UsesGraph_edge1" class="edge">
 <title>module~co_sum_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.98,-74.56C290.66,-74.74 277.75,-74.91 266,-75 201.11,-75.48 184.89,-75.42 120,-75 111.73,-74.95 102.96,-74.86 94.42,-74.76"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="94.2,-71.26 84.16,-74.63 94.11,-78.26 94.2,-71.26"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M318.74,-87.31C305.91,-97.51 286.05,-111.23 266,-117 203.64,-134.93 182.88,-133.03 120,-117 101.3,-112.23 82.25,-101.9 67.78,-92.67"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="69.67,-89.73 59.4,-87.13 65.81,-95.57 69.67,-89.73"/>
 </g>
 <!-- module~caffeine_h_m -->
-<g id="module~~co_sum_s~~UsesGraph_node4" class="node">
+<g id="module~~co_sum_s~~UsesGraph_node3" class="node">
 <title>module~caffeine_h_m</title>
-<g id="a_module~~co_sum_s~~UsesGraph_node4"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="235,-66 151,-66 151,-42 235,-42 235,-66"/>
-<text text-anchor="middle" x="193" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<g id="a_module~~co_sum_s~~UsesGraph_node3"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="235,-108 151,-108 151,-84 235,-84 235,-108"/>
+<text text-anchor="middle" x="193" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_sum_s&#45;&gt;module~caffeine_h_m -->
-<g id="module~~co_sum_s~~UsesGraph_edge3" class="edge">
+<g id="module~~co_sum_s~~UsesGraph_edge2" class="edge">
 <title>module~co_sum_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.81,-69.51C285.11,-67.11 264.14,-64.09 245.13,-61.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="245.51,-57.88 235.12,-59.92 244.52,-64.8 245.51,-57.88"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M301.81,-79.71C285.11,-82.23 264.14,-85.4 245.13,-88.27"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="244.48,-84.83 235.12,-89.79 245.53,-91.76 244.48,-84.83"/>
 </g>
 <!-- module~collective_subroutines_m -->
-<g id="module~~co_sum_s~~UsesGraph_node5" class="node">
+<g id="module~~co_sum_s~~UsesGraph_node4" class="node">
 <title>module~collective_subroutines_m</title>
-<g id="a_module~~co_sum_s~~UsesGraph_node5"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="266,-24 120,-24 120,0 266,0 266,-24"/>
-<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
+<g id="a_module~~co_sum_s~~UsesGraph_node4"><a xlink:href=".././module/collective_subroutines_m.html" xlink:title="collective_subroutines_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="266,-66 120,-66 120,-42 266,-42 266,-66"/>
+<text text-anchor="middle" x="193" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m</text>
 </a>
 </g>
 </g>
 <!-- module~co_sum_s&#45;&gt;module~collective_subroutines_m -->
 <g id="module~~co_sum_s~~UsesGraph_edge4" class="edge">
 <title>module~co_sum_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" d="M316.06,-61.89C302.91,-52.92 283.96,-40.94 266,-33 261.36,-30.95 256.46,-29.03 251.49,-27.26"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="252.48,-23.9 241.89,-24.03 250.25,-30.54 252.48,-23.9"/>
+<path fill="none" stroke="#ff0000" d="M301.81,-70.29C293.99,-69.11 285.23,-67.78 276.17,-66.41"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="276.67,-62.95 266.26,-64.92 275.63,-69.87 276.67,-62.95"/>
+</g>
+<!-- module~utilities_m -->
+<g id="module~~co_sum_s~~UsesGraph_node5" class="node">
+<title>module~utilities_m</title>
+<g id="a_module~~co_sum_s~~UsesGraph_node5"><a xlink:href=".././module/utilities_m.html" xlink:title="utilities_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="226.5,-24 159.5,-24 159.5,0 226.5,0 226.5,-24"/>
+<text text-anchor="middle" x="193" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">utilities_m</text>
+</a>
 </g>
-<!-- module~utilities_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_sum_s~~UsesGraph_edge5" class="edge">
-<title>module~utilities_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M159.2,-122.7C146.84,-118.3 132.71,-113.09 120,-108 106.38,-102.54 91.6,-96.13 78.66,-90.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="79.74,-87.01 69.18,-86.1 76.87,-93.39 79.74,-87.01"/>
+</g>
+<!-- module~co_sum_s&#45;&gt;module~utilities_m -->
+<g id="module~~co_sum_s~~UsesGraph_edge3" class="edge">
+<title>module~co_sum_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M316.65,-62.95C303.51,-53.71 284.29,-41.21 266,-33 256.65,-28.8 246.23,-25.2 236.3,-22.22"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="237.16,-18.83 226.58,-19.46 235.24,-25.56 237.16,-18.83"/>
 </g>
 <!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_sum_s~~UsesGraph_edge6" class="edge">
+<g id="module~~co_sum_s~~UsesGraph_edge5" class="edge">
 <title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M150.89,-59.52C133.37,-61.87 112.75,-64.64 94.26,-67.12"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-63.67 84.23,-68.47 94.61,-70.6 93.68,-63.67"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M150.89,-90.21C133.37,-87.74 112.75,-84.83 94.26,-82.22"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="94.62,-78.74 84.23,-80.81 93.65,-85.67 94.62,-78.74"/>
 </g>
 <!-- module~collective_subroutines_m&#45;&gt;iso_c_binding -->
-<g id="module~~co_sum_s~~UsesGraph_edge7" class="edge">
+<g id="module~~co_sum_s~~UsesGraph_edge6" class="edge">
 <title>module~collective_subroutines_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M145.43,-24.06C136.86,-26.71 128.08,-29.71 120,-33 103.54,-39.7 86,-48.87 71.82,-56.83"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="69.98,-53.86 63.04,-61.86 73.46,-59.93 69.98,-53.86"/>
+<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M119.68,-64.19C111.13,-65.4 102.54,-66.61 94.37,-67.76"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="93.68,-64.32 84.27,-69.18 94.66,-71.25 93.68,-64.32"/>
+</g>
+<!-- module~utilities_m&#45;&gt;iso_c_binding -->
+<g id="module~~co_sum_s~~UsesGraph_edge7" class="edge">
+<title>module~utilities_m&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M159.23,-19.95C146.75,-23.4 132.52,-27.83 120,-33 103.26,-39.91 85.45,-49.47 71.18,-57.72"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="69.21,-54.82 62.36,-62.91 72.76,-60.85 69.21,-54.82"/>
 </g>
 </g>
 </svg>
@@ -393,7 +393,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/collective_subroutines_m.html b/module/collective_subroutines_m.html
index 94dd1631..717b4b73 100644
--- a/module/collective_subroutines_m.html
+++ b/module/collective_subroutines_m.html
@@ -287,33 +287,33 @@ <h3 class="panel-title">Used by</h3>
 <polygon fill="none" stroke="black" points="146,-129 0,-129 0,-105 146,-105 146,-129"/>
 <text text-anchor="middle" x="73" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">collective_subroutines_m</text>
 </g>
-<!-- module~co_min_s -->
+<!-- module~caffeine_m -->
 <g id="module~~collective_subroutines_m~~UsedByGraph_node2" class="node">
-<title>module~co_min_s</title>
-<g id="a_module~~collective_subroutines_m~~UsedByGraph_node2"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="259.5,-234 198.5,-234 198.5,-210 259.5,-210 259.5,-234"/>
-<text text-anchor="middle" x="229" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
+<title>module~caffeine_m</title>
+<g id="a_module~~collective_subroutines_m~~UsedByGraph_node2"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="265,-234 193,-234 193,-210 265,-210 265,-234"/>
+<text text-anchor="middle" x="229" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~collective_subroutines_m~~UsedByGraph_edge3" class="edge">
-<title>module~co_min_s&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" d="M198.76,-209.89C193.08,-207.2 187.26,-204.18 182,-201 149.89,-181.55 116.27,-154.11 95.24,-135.95"/>
+<!-- module~caffeine_m&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~collective_subroutines_m~~UsedByGraph_edge1" class="edge">
+<title>module~caffeine_m&#45;&gt;module~collective_subroutines_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M198.76,-209.89C193.08,-207.2 187.26,-204.18 182,-201 149.89,-181.55 116.27,-154.11 95.24,-135.95"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="97.4,-133.19 87.56,-129.25 92.8,-138.46 97.4,-133.19"/>
 </g>
-<!-- module~co_sum_s -->
+<!-- module~co_broadcast_s -->
 <g id="module~~collective_subroutines_m~~UsedByGraph_node3" class="node">
-<title>module~co_sum_s</title>
-<g id="a_module~~collective_subroutines_m~~UsedByGraph_node3"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="261,-192 197,-192 197,-168 261,-168 261,-192"/>
-<text text-anchor="middle" x="229" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
+<title>module~co_broadcast_s</title>
+<g id="a_module~~collective_subroutines_m~~UsedByGraph_node3"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="276,-192 182,-192 182,-168 276,-168 276,-192"/>
+<text text-anchor="middle" x="229" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_sum_s&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~collective_subroutines_m~~UsedByGraph_edge2" class="edge">
-<title>module~co_sum_s&#45;&gt;module~collective_subroutines_m</title>
+<!-- module~co_broadcast_s&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~collective_subroutines_m~~UsedByGraph_edge3" class="edge">
+<title>module~co_broadcast_s&#45;&gt;module~collective_subroutines_m</title>
 <path fill="none" stroke="#ff0000" d="M198.31,-167.85C173.94,-157.89 139.26,-143.7 112.72,-132.84"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="113.92,-129.55 103.34,-129 111.27,-136.03 113.92,-129.55"/>
 </g>
@@ -332,48 +332,48 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#ff0000" d="M189.93,-132.81C179.56,-131.4 167.92,-129.81 156.11,-128.2"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="156.56,-124.73 146.18,-126.84 155.61,-131.66 156.56,-124.73"/>
 </g>
-<!-- module~caffeine_m -->
+<!-- module~co_min_s -->
 <g id="module~~collective_subroutines_m~~UsedByGraph_node5" class="node">
-<title>module~caffeine_m</title>
-<g id="a_module~~collective_subroutines_m~~UsedByGraph_node5"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="265,-108 193,-108 193,-84 265,-84 265,-108"/>
-<text text-anchor="middle" x="229" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
+<title>module~co_min_s</title>
+<g id="a_module~~collective_subroutines_m~~UsedByGraph_node5"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="259.5,-108 198.5,-108 198.5,-84 259.5,-84 259.5,-108"/>
+<text text-anchor="middle" x="229" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~collective_subroutines_m -->
-<g id="module~~collective_subroutines_m~~UsedByGraph_edge1" class="edge">
-<title>module~caffeine_m&#45;&gt;module~collective_subroutines_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M192.67,-100.82C181.74,-102.31 169.2,-104.02 156.47,-105.75"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="155.68,-102.33 146.24,-107.15 156.62,-109.27 155.68,-102.33"/>
+<!-- module~co_min_s&#45;&gt;module~collective_subroutines_m -->
+<g id="module~~collective_subroutines_m~~UsedByGraph_edge2" class="edge">
+<title>module~co_min_s&#45;&gt;module~collective_subroutines_m</title>
+<path fill="none" stroke="#ff0000" d="M198.31,-100.05C186.05,-101.72 171.17,-103.75 156.04,-105.81"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="155.52,-102.35 146.08,-107.17 156.46,-109.29 155.52,-102.35"/>
 </g>
-<!-- module~co_broadcast_s -->
+<!-- module~co_max_s -->
 <g id="module~~collective_subroutines_m~~UsedByGraph_node6" class="node">
-<title>module~co_broadcast_s</title>
-<g id="a_module~~collective_subroutines_m~~UsedByGraph_node6"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="276,-66 182,-66 182,-42 276,-42 276,-66"/>
-<text text-anchor="middle" x="229" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
+<title>module~co_max_s</title>
+<g id="a_module~~collective_subroutines_m~~UsedByGraph_node6"><a xlink:href=".././module/co_max_s.html" xlink:title="co_max_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="261,-66 197,-66 197,-42 261,-42 261,-66"/>
+<text text-anchor="middle" x="229" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_broadcast_s&#45;&gt;module~collective_subroutines_m -->
+<!-- module~co_max_s&#45;&gt;module~collective_subroutines_m -->
 <g id="module~~collective_subroutines_m~~UsedByGraph_edge5" class="edge">
-<title>module~co_broadcast_s&#45;&gt;module~collective_subroutines_m</title>
+<title>module~co_max_s&#45;&gt;module~collective_subroutines_m</title>
 <path fill="none" stroke="#ff0000" d="M198.31,-66.15C173.94,-76.11 139.26,-90.3 112.72,-101.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="111.27,-97.97 103.34,-105 113.92,-104.45 111.27,-97.97"/>
 </g>
-<!-- module~co_max_s -->
+<!-- module~co_sum_s -->
 <g id="module~~collective_subroutines_m~~UsedByGraph_node7" class="node">
-<title>module~co_max_s</title>
-<g id="a_module~~collective_subroutines_m~~UsedByGraph_node7"><a xlink:href=".././module/co_max_s.html" xlink:title="co_max_s">
+<title>module~co_sum_s</title>
+<g id="a_module~~collective_subroutines_m~~UsedByGraph_node7"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="261,-24 197,-24 197,0 261,0 261,-24"/>
-<text text-anchor="middle" x="229" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
+<text text-anchor="middle" x="229" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_max_s&#45;&gt;module~collective_subroutines_m -->
+<!-- module~co_sum_s&#45;&gt;module~collective_subroutines_m -->
 <g id="module~~collective_subroutines_m~~UsedByGraph_edge6" class="edge">
-<title>module~co_max_s&#45;&gt;module~collective_subroutines_m</title>
+<title>module~co_sum_s&#45;&gt;module~collective_subroutines_m</title>
 <path fill="none" stroke="#ff0000" d="M198.76,-24.11C193.08,-26.8 187.26,-29.82 182,-33 149.89,-52.45 116.27,-79.89 95.24,-98.05"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="92.8,-95.54 87.56,-104.75 97.4,-100.81 92.8,-95.54"/>
 </g>
@@ -959,7 +959,7 @@ <h4>Return Value <small>integer(kind=c_int64_t)</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/image_enumeration_m.html b/module/image_enumeration_m.html
index dfff8e3f..512df92e 100644
--- a/module/image_enumeration_m.html
+++ b/module/image_enumeration_m.html
@@ -280,35 +280,35 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M210.33,-89.44C188.02,-83.84 155.16,-75.6 126.73,-68.48"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="127.44,-65.04 116.89,-66.01 125.74,-71.83 127.44,-65.04"/>
 </g>
-<!-- module~image_enumeration_s -->
+<!-- module~caffeine_m -->
 <g id="module~~image_enumeration_m~~UsedByGraph_node3" class="node">
-<title>module~image_enumeration_s</title>
-<g id="a_module~~image_enumeration_m~~UsedByGraph_node3"><a xlink:href=".././module/image_enumeration_s.html" xlink:title="image_enumeration_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="303,-66 172,-66 172,-42 303,-42 303,-66"/>
-<text text-anchor="middle" x="237.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s</text>
+<title>module~caffeine_m</title>
+<g id="a_module~~image_enumeration_m~~UsedByGraph_node3"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="273.5,-66 201.5,-66 201.5,-42 273.5,-42 273.5,-66"/>
+<text text-anchor="middle" x="237.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
 </a>
 </g>
 </g>
-<!-- module~image_enumeration_s&#45;&gt;module~image_enumeration_m -->
-<g id="module~~image_enumeration_m~~UsedByGraph_edge3" class="edge">
-<title>module~image_enumeration_s&#45;&gt;module~image_enumeration_m</title>
-<path fill="none" stroke="#ff0000" d="M171.74,-54C163.34,-54 154.66,-54 146.09,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="146.08,-50.5 136.08,-54 146.08,-57.5 146.08,-50.5"/>
+<!-- module~caffeine_m&#45;&gt;module~image_enumeration_m -->
+<g id="module~~image_enumeration_m~~UsedByGraph_edge2" class="edge">
+<title>module~caffeine_m&#45;&gt;module~image_enumeration_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.39,-54C185.29,-54 165.53,-54 146.24,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="146.21,-50.5 136.21,-54 146.21,-57.5 146.21,-50.5"/>
 </g>
-<!-- module~caffeine_m -->
+<!-- module~image_enumeration_s -->
 <g id="module~~image_enumeration_m~~UsedByGraph_node4" class="node">
-<title>module~caffeine_m</title>
-<g id="a_module~~image_enumeration_m~~UsedByGraph_node4"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="273.5,-24 201.5,-24 201.5,0 273.5,0 273.5,-24"/>
-<text text-anchor="middle" x="237.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
+<title>module~image_enumeration_s</title>
+<g id="a_module~~image_enumeration_m~~UsedByGraph_node4"><a xlink:href=".././module/image_enumeration_s.html" xlink:title="image_enumeration_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="303,-24 172,-24 172,0 303,0 303,-24"/>
+<text text-anchor="middle" x="237.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~image_enumeration_m -->
-<g id="module~~image_enumeration_m~~UsedByGraph_edge2" class="edge">
-<title>module~caffeine_m&#45;&gt;module~image_enumeration_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.39,-20.8C179.89,-26.2 151.84,-33.23 127.1,-39.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="125.94,-36.11 117.09,-41.94 127.64,-42.9 125.94,-36.11"/>
+<!-- module~image_enumeration_s&#45;&gt;module~image_enumeration_m -->
+<g id="module~~image_enumeration_m~~UsedByGraph_edge3" class="edge">
+<title>module~image_enumeration_s&#45;&gt;module~image_enumeration_m</title>
+<path fill="none" stroke="#ff0000" d="M188.5,-24.04C169.31,-28.85 147.05,-34.43 126.97,-39.46"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="125.85,-36.14 117.01,-41.96 127.56,-42.93 125.85,-36.14"/>
 </g>
 </g>
 </svg>
@@ -534,7 +534,7 @@ <h4>Return Value <small>integer</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/image_enumeration_s.html b/module/image_enumeration_s.html
index f5a78862..a9796573 100644
--- a/module/image_enumeration_s.html
+++ b/module/image_enumeration_s.html
@@ -387,7 +387,7 @@ <h4>Arguments</h4>      <em>None</em>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/normal_termination_m.html b/module/normal_termination_m.html
index 0ead510f..079fb63f 100644
--- a/module/normal_termination_m.html
+++ b/module/normal_termination_m.html
@@ -117,7 +117,7 @@ <h3>Contents</h3>
   <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#inters-0">Interfaces</a></h3></div>
   <div id="inters-0" class="panel-collapse collapse">
     <div class="list-group">
-      <a class="list-group-item" href="../module/normal_termination_m.html#interface-caf_stop~2">caf_stop</a>
+      <a class="list-group-item" href="../module/normal_termination_m.html#interface-caf_stop">caf_stop</a>
     </div>
   </div>
 </div>
@@ -246,7 +246,7 @@ <h3>Contents</h3>
   <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#inters-1">Interfaces</a></h3></div>
   <div id="inters-1" class="panel-collapse collapse">
     <div class="list-group">
-      <a class="list-group-item" href="../module/normal_termination_m.html#interface-caf_stop~2">caf_stop</a>
+      <a class="list-group-item" href="../module/normal_termination_m.html#interface-caf_stop">caf_stop</a>
     </div>
   </div>
 </div>
@@ -260,7 +260,7 @@ <h3>Contents</h3>
     <section>
    <h2>Interfaces</h2>
      <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-caf_stop~2"></span><h3>public interface <a href='../interface/caf_stop~2.html'>caf_stop</a>  </h3></div>
+  <div class="panel-heading codesum"><span class="anchor" id="interface-caf_stop"></span><h3>public interface <a href='../interface/caf_stop.html'>caf_stop</a>  </h3></div>
   <ul class="list-group">
     <li class="list-group-item">
     <h3>private module subroutine caf_stop_character(stop_code)</h3><p>synchronize, stop the executing image, and provide the stop_code as the process exit status</p>
@@ -321,7 +321,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/normal_termination_s.html b/module/normal_termination_s.html
index 1afcde44..88c515ae 100644
--- a/module/normal_termination_s.html
+++ b/module/normal_termination_s.html
@@ -136,9 +136,9 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
-    <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html">iso_fortran_env</a></li>
     <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
+    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html">iso_fortran_env</a></li>
+    <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
   </ul>
       </li>
       <li class="list-group-item">
@@ -154,82 +154,82 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: module~~normal_termination_s~~UsesGraph Pages: 1 -->
-<svg id="modulenormal_termination_sUsesGraph" width="427pt" height="154pt"
- viewBox="0.00 0.00 427.00 154.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~normal_termination_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 150)">
+<svg id="modulenormal_termination_sUsesGraph" width="427pt" height="136pt"
+ viewBox="0.00 0.00 427.00 136.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~normal_termination_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 132)">
 <title>module~~normal_termination_s~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-150 423,-150 423,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-132 423,-132 423,4 -4,4"/>
 <!-- module~normal_termination_s -->
 <g id="module~~normal_termination_s~~UsesGraph_node1" class="node">
 <title>module~normal_termination_s</title>
-<polygon fill="none" stroke="black" points="419,-84 290,-84 290,-60 419,-60 419,-84"/>
-<text text-anchor="middle" x="354.5" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">normal_termination_s</text>
+<polygon fill="none" stroke="black" points="419,-87 290,-87 290,-63 419,-63 419,-87"/>
+<text text-anchor="middle" x="354.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">normal_termination_s</text>
 </g>
-<!-- module~caffeine_h_m -->
+<!-- iso_c_binding -->
 <g id="module~~normal_termination_s~~UsesGraph_node2" class="node">
-<title>module~caffeine_h_m</title>
-<g id="a_module~~normal_termination_s~~UsesGraph_node2"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="229,-146 145,-146 145,-122 229,-122 229,-146"/>
-<text text-anchor="middle" x="187" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<title>iso_c_binding</title>
+<g id="a_module~~normal_termination_s~~UsesGraph_node2"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="84,-128 0,-128 0,-104 84,-104 84,-128"/>
+<text text-anchor="middle" x="42" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
-<!-- module~normal_termination_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~normal_termination_s&#45;&gt;iso_c_binding -->
 <g id="module~~normal_termination_s~~UsesGraph_edge1" class="edge">
-<title>module~normal_termination_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M325.86,-84.11C306.03,-92.62 278.58,-104.04 254,-113 248.57,-114.98 242.86,-116.95 237.15,-118.86"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="236.03,-115.54 227.62,-121.98 238.21,-122.19 236.03,-115.54"/>
+<title>module~normal_termination_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M331.79,-87.16C312.17,-97.42 282.12,-111.31 254,-117 200.32,-127.87 137.37,-125.7 94.29,-122.02"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="94.6,-118.53 84.32,-121.11 93.97,-125.5 94.6,-118.53"/>
 </g>
-<!-- iso_fortran_env -->
+<!-- module~caffeine_h_m -->
 <g id="module~~normal_termination_s~~UsesGraph_node3" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~normal_termination_s~~UsesGraph_node3"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="234,-104 140,-104 140,-80 234,-80 234,-104"/>
-<text text-anchor="middle" x="187" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<title>module~caffeine_h_m</title>
+<g id="a_module~~normal_termination_s~~UsesGraph_node3"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="229,-108 145,-108 145,-84 229,-84 229,-108"/>
+<text text-anchor="middle" x="187" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
-<!-- module~normal_termination_s&#45;&gt;iso_fortran_env -->
+<!-- module~normal_termination_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~normal_termination_s~~UsesGraph_edge2" class="edge">
-<title>module~normal_termination_s&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M289.99,-79.68C274.88,-81.5 258.86,-83.44 244.11,-85.22"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="243.64,-81.75 234.13,-86.43 244.48,-88.7 243.64,-81.75"/>
+<title>module~normal_termination_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M289.99,-83.06C273.24,-85.18 255.37,-87.45 239.35,-89.48"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="238.6,-86.05 229.12,-90.78 239.48,-93 238.6,-86.05"/>
 </g>
-<!-- iso_c_binding -->
+<!-- module~normal_termination_m -->
 <g id="module~~normal_termination_s~~UsesGraph_node4" class="node">
-<title>iso_c_binding</title>
-<g id="a_module~~normal_termination_s~~UsesGraph_node4"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84,-105 0,-105 0,-81 84,-81 84,-105"/>
-<text text-anchor="middle" x="42" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<title>module~normal_termination_m</title>
+<g id="a_module~~normal_termination_s~~UsesGraph_node4"><a xlink:href=".././module/normal_termination_m.html" xlink:title="normal_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="254,-66 120,-66 120,-42 254,-42 254,-66"/>
+<text text-anchor="middle" x="187" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_m</text>
 </a>
 </g>
 </g>
-<!-- module~normal_termination_s&#45;&gt;iso_c_binding -->
-<g id="module~~normal_termination_s~~UsesGraph_edge3" class="edge">
-<title>module~normal_termination_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M289.74,-66.83C242.62,-64.2 177.01,-63.02 120,-71 109.25,-72.51 97.9,-75.14 87.31,-78.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="86.06,-74.79 77.44,-80.95 88.02,-81.51 86.06,-74.79"/>
+<!-- module~normal_termination_s&#45;&gt;module~normal_termination_m -->
+<g id="module~~normal_termination_s~~UsesGraph_edge4" class="edge">
+<title>module~normal_termination_s&#45;&gt;module~normal_termination_m</title>
+<path fill="none" stroke="#ff0000" d="M289.99,-66.94C281.53,-65.87 272.8,-64.76 264.16,-63.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="264.45,-60.17 254.09,-62.39 263.57,-67.12 264.45,-60.17"/>
 </g>
-<!-- module~normal_termination_m -->
+<!-- iso_fortran_env -->
 <g id="module~~normal_termination_s~~UsesGraph_node5" class="node">
-<title>module~normal_termination_m</title>
-<g id="a_module~~normal_termination_s~~UsesGraph_node5"><a xlink:href=".././module/normal_termination_m.html" xlink:title="normal_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="254,-24 120,-24 120,0 254,0 254,-24"/>
-<text text-anchor="middle" x="187" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_m</text>
+<title>iso_fortran_env</title>
+<g id="a_module~~normal_termination_s~~UsesGraph_node5"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="234,-24 140,-24 140,0 234,0 234,-24"/>
+<text text-anchor="middle" x="187" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
-<!-- module~normal_termination_s&#45;&gt;module~normal_termination_m -->
-<g id="module~~normal_termination_s~~UsesGraph_edge4" class="edge">
-<title>module~normal_termination_s&#45;&gt;module~normal_termination_m</title>
-<path fill="none" stroke="#ff0000" d="M320.01,-59.86C294.24,-50.52 258.45,-37.54 230.63,-27.46"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="231.75,-24.14 221.16,-24.02 229.37,-30.72 231.75,-24.14"/>
+<!-- module~normal_termination_s&#45;&gt;iso_fortran_env -->
+<g id="module~~normal_termination_s~~UsesGraph_edge3" class="edge">
+<title>module~normal_termination_s&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M326.74,-62.92C306.86,-54.14 278.98,-42.22 254,-33 248.78,-31.07 243.3,-29.16 237.81,-27.31"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="238.58,-23.88 227.99,-24.08 236.39,-30.53 238.58,-23.88"/>
 </g>
 <!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
 <g id="module~~normal_termination_s~~UsesGraph_edge5" class="edge">
 <title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M144.64,-122.14C128.93,-117.64 110.84,-112.45 94.32,-107.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="94.85,-104.22 84.27,-104.83 92.92,-110.95 94.85,-104.22"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M144.64,-101.78C128.93,-103.98 110.84,-106.51 94.32,-108.82"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="93.69,-105.38 84.27,-110.23 94.66,-112.31 93.69,-105.38"/>
 </g>
 </g>
 </svg>
@@ -362,7 +362,7 @@ <h4>Arguments</h4>      <em>None</em>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/program_termination_m.html b/module/program_termination_m.html
index a2ddc852..2274e85c 100644
--- a/module/program_termination_m.html
+++ b/module/program_termination_m.html
@@ -118,7 +118,7 @@ <h3>Contents</h3>
   <div id="inters-0" class="panel-collapse collapse">
     <div class="list-group">
       <a class="list-group-item" href="../module/program_termination_m.html#interface-caf_error_stop">caf_error_stop</a>
-      <a class="list-group-item" href="../module/program_termination_m.html#interface-caf_stop">caf_stop</a>
+      <a class="list-group-item" href="../module/program_termination_m.html#interface-caf_stop~2">caf_stop</a>
     </div>
   </div>
 </div>
@@ -159,34 +159,34 @@ <h3 class="panel-title">Used by</h3>
 <polygon fill="none" stroke="black" points="142,-171 0,-171 0,-147 142,-147 142,-171"/>
 <text text-anchor="middle" x="71" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">program_termination_m</text>
 </g>
-<!-- proc~assert -->
+<!-- module~caffeine_m -->
 <g id="module~~program_termination_m~~UsedByGraph_node2" class="node">
-<title>proc~assert</title>
-<g id="a_module~~program_termination_m~~UsedByGraph_node2"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="280,-318 226,-318 226,-294 280,-294 280,-318"/>
-<text text-anchor="middle" x="253" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>module~caffeine_m</title>
+<g id="a_module~~program_termination_m~~UsedByGraph_node2"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="289,-318 217,-318 217,-294 289,-294 289,-318"/>
+<text text-anchor="middle" x="253" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
 </a>
 </g>
 </g>
-<!-- proc~assert&#45;&gt;module~program_termination_m -->
+<!-- module~caffeine_m&#45;&gt;module~program_termination_m -->
 <g id="module~~program_termination_m~~UsedByGraph_edge1" class="edge">
-<title>proc~assert&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M225.77,-302.46C210.85,-299.53 192.35,-294.28 178,-285 135.51,-257.53 101.11,-207.82 83.92,-179.75"/>
+<title>module~caffeine_m&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M216.68,-300.47C203.79,-297.33 189.55,-292.47 178,-285 135.51,-257.53 101.11,-207.82 83.92,-179.75"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="86.9,-177.91 78.76,-171.12 80.89,-181.5 86.9,-177.91"/>
 </g>
-<!-- module~caffeine_intrinsic_array_s -->
+<!-- module~co_reduce_s -->
 <g id="module~~program_termination_m~~UsedByGraph_node3" class="node">
-<title>module~caffeine_intrinsic_array_s</title>
-<g id="a_module~~program_termination_m~~UsedByGraph_node3"><a xlink:href=".././module/caffeine_intrinsic_array_s.html" xlink:title="caffeine_intrinsic_array_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-276 179,-276 179,-252 327,-252 327,-276"/>
-<text text-anchor="middle" x="253" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_s</text>
+<title>module~co_reduce_s</title>
+<g id="a_module~~program_termination_m~~UsedByGraph_node3"><a xlink:href=".././module/co_reduce_s.html" xlink:title="co_reduce_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="292,-276 214,-276 214,-252 292,-252 292,-276"/>
+<text text-anchor="middle" x="253" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m -->
-<g id="module~~program_termination_m~~UsedByGraph_edge2" class="edge">
-<title>module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M199.65,-251.95C192.2,-249.44 184.78,-246.47 178,-243 144.42,-225.8 111.24,-197.1 91.18,-178.11"/>
+<!-- module~co_reduce_s&#45;&gt;module~program_termination_m -->
+<g id="module~~program_termination_m~~UsedByGraph_edge3" class="edge">
+<title>module~co_reduce_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M213.65,-256.19C201.84,-252.98 189.05,-248.66 178,-243 144.42,-225.8 111.24,-197.1 91.18,-178.11"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="93.55,-175.53 83.92,-171.12 88.69,-180.57 93.55,-175.53"/>
 </g>
 <!-- module~co_min_s -->
@@ -199,69 +199,69 @@ <h3 class="panel-title">Used by</h3>
 </g>
 </g>
 <!-- module~co_min_s&#45;&gt;module~program_termination_m -->
-<g id="module~~program_termination_m~~UsedByGraph_edge3" class="edge">
+<g id="module~~program_termination_m~~UsedByGraph_edge2" class="edge">
 <title>module~co_min_s&#45;&gt;module~program_termination_m</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M222.26,-214.3C208.67,-210.59 192.42,-205.89 178,-201 154.96,-193.19 129.62,-183.2 109.49,-174.92"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="110.63,-171.61 100.06,-171.01 107.95,-178.08 110.63,-171.61"/>
 </g>
-<!-- module~co_reduce_s -->
+<!-- module~caffeine_intrinsic_array_s -->
 <g id="module~~program_termination_m~~UsedByGraph_node5" class="node">
-<title>module~co_reduce_s</title>
-<g id="a_module~~program_termination_m~~UsedByGraph_node5"><a xlink:href=".././module/co_reduce_s.html" xlink:title="co_reduce_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="292,-192 214,-192 214,-168 292,-168 292,-192"/>
-<text text-anchor="middle" x="253" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s</text>
-</a>
-</g>
-</g>
-<!-- module~co_reduce_s&#45;&gt;module~program_termination_m -->
-<g id="module~~program_termination_m~~UsedByGraph_edge5" class="edge">
-<title>module~co_reduce_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M213.83,-175.55C195.83,-173.45 173.64,-170.86 152.2,-168.36"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="152.43,-164.86 142.09,-167.18 151.62,-171.81 152.43,-164.86"/>
-</g>
-<!-- module~caffeinate_decaffeinate_s -->
-<g id="module~~program_termination_m~~UsedByGraph_node6" class="node">
-<title>module~caffeinate_decaffeinate_s</title>
-<g id="a_module~~program_termination_m~~UsedByGraph_node6"><a xlink:href=".././module/caffeinate_decaffeinate_s.html" xlink:title="caffeinate_decaffeinate_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="328,-150 178,-150 178,-126 328,-126 328,-150"/>
-<text text-anchor="middle" x="253" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s</text>
+<title>module~caffeine_intrinsic_array_s</title>
+<g id="a_module~~program_termination_m~~UsedByGraph_node5"><a xlink:href=".././module/caffeine_intrinsic_array_s.html" xlink:title="caffeine_intrinsic_array_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="327,-192 179,-192 179,-168 327,-168 327,-192"/>
+<text text-anchor="middle" x="253" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_intrinsic_array_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m -->
+<!-- module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m -->
 <g id="module~~program_termination_m~~UsedByGraph_edge4" class="edge">
-<title>module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M177.75,-146.66C169.26,-147.65 160.57,-148.67 152.01,-149.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="151.56,-146.19 142.03,-150.83 152.37,-153.15 151.56,-146.19"/>
+<title>module~caffeine_intrinsic_array_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M178.79,-171.46C170.11,-170.45 161.22,-169.41 152.45,-168.39"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="152.58,-164.88 142.24,-167.19 151.76,-171.83 152.58,-164.88"/>
 </g>
 <!-- module~program_termination_s -->
-<g id="module~~program_termination_m~~UsedByGraph_node7" class="node">
+<g id="module~~program_termination_m~~UsedByGraph_node6" class="node">
 <title>module~program_termination_s</title>
-<g id="a_module~~program_termination_m~~UsedByGraph_node7"><a xlink:href=".././module/program_termination_s.html" xlink:title="program_termination_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-108 185,-108 185,-84 321,-84 321,-108"/>
-<text text-anchor="middle" x="253" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s</text>
+<g id="a_module~~program_termination_m~~UsedByGraph_node6"><a xlink:href=".././module/program_termination_s.html" xlink:title="program_termination_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="321,-150 185,-150 185,-126 321,-126 321,-150"/>
+<text text-anchor="middle" x="253" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s</text>
 </a>
 </g>
 </g>
 <!-- module~program_termination_s&#45;&gt;module~program_termination_m -->
 <g id="module~~program_termination_m~~UsedByGraph_edge8" class="edge">
 <title>module~program_termination_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" d="M206.77,-108.05C197.22,-110.82 187.23,-113.87 178,-117 154.96,-124.81 129.62,-134.8 109.49,-143.08"/>
+<path fill="none" stroke="#ff0000" d="M184.97,-145.82C174.26,-147.07 163.08,-148.37 152.1,-149.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="151.62,-146.19 142.09,-150.82 152.43,-153.14 151.62,-146.19"/>
+</g>
+<!-- proc~assert -->
+<g id="module~~program_termination_m~~UsedByGraph_node7" class="node">
+<title>proc~assert</title>
+<g id="a_module~~program_termination_m~~UsedByGraph_node7"><a xlink:href=".././proc/assert.html" xlink:title="assert">
+<polygon fill="#d9534f" stroke="#d9534f" points="280,-108 226,-108 226,-84 280,-84 280,-108"/>
+<text text-anchor="middle" x="253" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+</a>
+</g>
+</g>
+<!-- proc~assert&#45;&gt;module~program_termination_m -->
+<g id="module~~program_termination_m~~UsedByGraph_edge5" class="edge">
+<title>proc~assert&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M225.77,-102.75C211.53,-106.59 193.68,-111.68 178,-117 154.96,-124.81 129.62,-134.8 109.49,-143.08"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="107.95,-139.92 100.06,-146.99 110.63,-146.39 107.95,-139.92"/>
 </g>
-<!-- module~caffeine_m -->
+<!-- module~caffeinate_decaffeinate_s -->
 <g id="module~~program_termination_m~~UsedByGraph_node8" class="node">
-<title>module~caffeine_m</title>
-<g id="a_module~~program_termination_m~~UsedByGraph_node8"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="289,-66 217,-66 217,-42 289,-42 289,-66"/>
-<text text-anchor="middle" x="253" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
+<title>module~caffeinate_decaffeinate_s</title>
+<g id="a_module~~program_termination_m~~UsedByGraph_node8"><a xlink:href=".././module/caffeinate_decaffeinate_s.html" xlink:title="caffeinate_decaffeinate_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="328,-66 178,-66 178,-42 328,-42 328,-66"/>
+<text text-anchor="middle" x="253" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s</text>
 </a>
 </g>
 </g>
-<!-- module~caffeine_m&#45;&gt;module~program_termination_m -->
+<!-- module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m -->
 <g id="module~~program_termination_m~~UsedByGraph_edge6" class="edge">
-<title>module~caffeine_m&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M216.67,-61.01C204.06,-64.29 190.01,-68.85 178,-75 144.42,-92.2 111.24,-120.9 91.18,-139.89"/>
+<title>module~caffeinate_decaffeinate_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M199.65,-66.05C192.2,-68.56 184.78,-71.53 178,-75 144.42,-92.2 111.24,-120.9 91.18,-139.89"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="88.69,-137.43 83.92,-146.88 93.55,-142.47 88.69,-137.43"/>
 </g>
 <!-- module~co_max_s -->
@@ -353,7 +353,7 @@ <h3>Contents</h3>
   <div id="inters-1" class="panel-collapse collapse">
     <div class="list-group">
       <a class="list-group-item" href="../module/program_termination_m.html#interface-caf_error_stop">caf_error_stop</a>
-      <a class="list-group-item" href="../module/program_termination_m.html#interface-caf_stop">caf_stop</a>
+      <a class="list-group-item" href="../module/program_termination_m.html#interface-caf_stop~2">caf_stop</a>
     </div>
   </div>
 </div>
@@ -407,7 +407,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
 </div>
 
      <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="interface-caf_stop"></span><h3>public interface <a href='../interface/caf_stop.html'>caf_stop</a>  </h3></div>
+  <div class="panel-heading codesum"><span class="anchor" id="interface-caf_stop~2"></span><h3>public interface <a href='../interface/caf_stop~2.html'>caf_stop</a>  </h3></div>
   <ul class="list-group">
     <li class="list-group-item">
     <h3>private module subroutine caf_stop_character(stop_code)</h3><p>synchronize, stop the executing image, and provide the stop_code as the process exit status</p>
@@ -468,7 +468,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/program_termination_s.html b/module/program_termination_s.html
index f229e354..e28ea7ff 100644
--- a/module/program_termination_s.html
+++ b/module/program_termination_s.html
@@ -156,9 +156,9 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
-    <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
-    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html">iso_fortran_env</a></li>
     <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING">iso_c_binding</a></li>
+    <li><a href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html">iso_fortran_env</a></li>
+    <li><a href='../module/caffeine_h_m.html'>caffeine_h_m</a></li>
   </ul>
       </li>
       <li class="list-group-item">
@@ -174,82 +174,82 @@ <h3 class="panel-title">Uses</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: module~~program_termination_s~~UsesGraph Pages: 1 -->
-<svg id="moduleprogram_termination_sUsesGraph" width="442pt" height="154pt"
- viewBox="0.00 0.00 442.00 154.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="module~~program_termination_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 150)">
+<svg id="moduleprogram_termination_sUsesGraph" width="442pt" height="136pt"
+ viewBox="0.00 0.00 442.00 136.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="module~~program_termination_s~~UsesGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 132)">
 <title>module~~program_termination_s~~UsesGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-150 438,-150 438,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-132 438,-132 438,4 -4,4"/>
 <!-- module~program_termination_s -->
 <g id="module~~program_termination_s~~UsesGraph_node1" class="node">
 <title>module~program_termination_s</title>
-<polygon fill="none" stroke="black" points="434,-84 298,-84 298,-60 434,-60 434,-84"/>
-<text text-anchor="middle" x="366" y="-69.6" font-family="Helvetica,sans-Serif" font-size="10.50">program_termination_s</text>
+<polygon fill="none" stroke="black" points="434,-87 298,-87 298,-63 434,-63 434,-87"/>
+<text text-anchor="middle" x="366" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">program_termination_s</text>
 </g>
-<!-- module~caffeine_h_m -->
+<!-- iso_c_binding -->
 <g id="module~~program_termination_s~~UsesGraph_node2" class="node">
-<title>module~caffeine_h_m</title>
-<g id="a_module~~program_termination_s~~UsesGraph_node2"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="233,-146 149,-146 149,-122 233,-122 233,-146"/>
-<text text-anchor="middle" x="191" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
+<title>iso_c_binding</title>
+<g id="a_module~~program_termination_s~~UsesGraph_node2"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
+<polygon fill="#337ab7" stroke="#337ab7" points="84,-128 0,-128 0,-104 84,-104 84,-128"/>
+<text text-anchor="middle" x="42" y="-113.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
 </a>
 </g>
 </g>
-<!-- module~program_termination_s&#45;&gt;module~caffeine_h_m -->
+<!-- module~program_termination_s&#45;&gt;iso_c_binding -->
 <g id="module~~program_termination_s~~UsesGraph_edge1" class="edge">
-<title>module~program_termination_s&#45;&gt;module~caffeine_h_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M336.39,-84.17C315.86,-92.71 287.45,-104.14 262,-113 255.95,-115.11 249.55,-117.2 243.19,-119.21"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="241.8,-115.97 233.28,-122.27 243.87,-122.66 241.8,-115.97"/>
+<title>module~program_termination_s&#45;&gt;iso_c_binding</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M342.48,-87.17C322.12,-97.42 290.99,-111.32 262,-117 205.41,-128.1 138.99,-125.69 94.26,-121.89"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="94.5,-118.4 84.22,-120.98 93.86,-125.37 94.5,-118.4"/>
 </g>
-<!-- iso_fortran_env -->
+<!-- module~caffeine_h_m -->
 <g id="module~~program_termination_s~~UsesGraph_node3" class="node">
-<title>iso_fortran_env</title>
-<g id="a_module~~program_termination_s~~UsesGraph_node3"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html" xlink:title="iso_fortran_env">
-<polygon fill="#337ab7" stroke="#337ab7" points="238,-104 144,-104 144,-80 238,-80 238,-104"/>
-<text text-anchor="middle" x="191" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
+<title>module~caffeine_h_m</title>
+<g id="a_module~~program_termination_s~~UsesGraph_node3"><a xlink:href=".././module/caffeine_h_m.html" xlink:title="caffeine_h_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="233,-108 149,-108 149,-84 233,-84 233,-108"/>
+<text text-anchor="middle" x="191" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_h_m</text>
 </a>
 </g>
 </g>
-<!-- module~program_termination_s&#45;&gt;iso_fortran_env -->
+<!-- module~program_termination_s&#45;&gt;module~caffeine_h_m -->
 <g id="module~~program_termination_s~~UsesGraph_edge2" class="edge">
-<title>module~program_termination_s&#45;&gt;iso_fortran_env</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M297.62,-79.79C281.27,-81.68 263.97,-83.68 248.21,-85.5"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="247.63,-82.05 238.09,-86.67 248.43,-89 247.63,-82.05"/>
+<title>module~program_termination_s&#45;&gt;module~caffeine_h_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M297.62,-83.18C279.63,-85.36 260.47,-87.69 243.49,-89.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="242.73,-86.32 233.22,-91 243.57,-93.27 242.73,-86.32"/>
 </g>
-<!-- iso_c_binding -->
+<!-- module~program_termination_m -->
 <g id="module~~program_termination_s~~UsesGraph_node4" class="node">
-<title>iso_c_binding</title>
-<g id="a_module~~program_termination_s~~UsesGraph_node4"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fC_005fBINDING.html#ISO_005fC_005fBINDING" xlink:title="iso_c_binding">
-<polygon fill="#337ab7" stroke="#337ab7" points="84,-105 0,-105 0,-81 84,-81 84,-105"/>
-<text text-anchor="middle" x="42" y="-90.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_c_binding</text>
+<title>module~program_termination_m</title>
+<g id="a_module~~program_termination_s~~UsesGraph_node4"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="262,-66 120,-66 120,-42 262,-42 262,-66"/>
+<text text-anchor="middle" x="191" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
 </a>
 </g>
 </g>
-<!-- module~program_termination_s&#45;&gt;iso_c_binding -->
-<g id="module~~program_termination_s~~UsesGraph_edge3" class="edge">
-<title>module~program_termination_s&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M297.84,-66.58C248.41,-63.84 179.71,-62.64 120,-71 109.25,-72.51 97.9,-75.14 87.31,-78.07"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="86.06,-74.79 77.44,-80.95 88.02,-81.51 86.06,-74.79"/>
+<!-- module~program_termination_s&#45;&gt;module~program_termination_m -->
+<g id="module~~program_termination_s~~UsesGraph_edge4" class="edge">
+<title>module~program_termination_s&#45;&gt;module~program_termination_m</title>
+<path fill="none" stroke="#ff0000" d="M297.62,-66.82C289.23,-65.8 280.59,-64.75 272.04,-63.72"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="272.4,-60.23 262.05,-62.5 271.56,-67.18 272.4,-60.23"/>
 </g>
-<!-- module~program_termination_m -->
+<!-- iso_fortran_env -->
 <g id="module~~program_termination_s~~UsesGraph_node5" class="node">
-<title>module~program_termination_m</title>
-<g id="a_module~~program_termination_s~~UsesGraph_node5"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="262,-24 120,-24 120,0 262,0 262,-24"/>
-<text text-anchor="middle" x="191" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<title>iso_fortran_env</title>
+<g id="a_module~~program_termination_s~~UsesGraph_node5"><a xlink:href="https://gcc.gnu.org/onlinedocs/gfortran/ISO_005fFORTRAN_005fENV.html" xlink:title="iso_fortran_env">
+<polygon fill="#337ab7" stroke="#337ab7" points="238,-24 144,-24 144,0 238,0 238,-24"/>
+<text text-anchor="middle" x="191" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">iso_fortran_env</text>
 </a>
 </g>
 </g>
-<!-- module~program_termination_s&#45;&gt;module~program_termination_m -->
-<g id="module~~program_termination_s~~UsesGraph_edge4" class="edge">
-<title>module~program_termination_s&#45;&gt;module~program_termination_m</title>
-<path fill="none" stroke="#ff0000" d="M329.99,-59.86C302.94,-50.47 265.31,-37.43 236.19,-27.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="237.26,-23.99 226.66,-24.02 234.96,-30.6 237.26,-23.99"/>
+<!-- module~program_termination_s&#45;&gt;iso_fortran_env -->
+<g id="module~~program_termination_s~~UsesGraph_edge3" class="edge">
+<title>module~program_termination_s&#45;&gt;iso_fortran_env</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M337.3,-62.86C316.72,-54.05 287.86,-42.13 262,-33 256.33,-31 250.36,-29.02 244.39,-27.12"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="245,-23.64 234.41,-24.01 242.92,-30.33 245,-23.64"/>
 </g>
 <!-- module~caffeine_h_m&#45;&gt;iso_c_binding -->
 <g id="module~~program_termination_s~~UsesGraph_edge5" class="edge">
 <title>module~caffeine_h_m&#45;&gt;iso_c_binding</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M148.66,-122.47C131.61,-117.71 111.68,-112.16 93.75,-107.16"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="94.6,-103.76 84.03,-104.44 92.72,-110.5 94.6,-103.76"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M148.66,-101.62C131.77,-103.92 112.05,-106.61 94.25,-109.03"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="93.47,-105.6 84.03,-110.42 94.41,-112.54 93.47,-105.6"/>
 </g>
 </g>
 </svg>
@@ -523,7 +523,7 @@ <h4>Arguments</h4>      <em>None</em>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/sychronization_s.html b/module/sychronization_s.html
index d617ddbd..acc745ef 100644
--- a/module/sychronization_s.html
+++ b/module/sychronization_s.html
@@ -329,7 +329,7 @@ <h4>Arguments</h4>      <em>None</em>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/synchronization_m.html b/module/synchronization_m.html
index 08cec39c..1b8ed653 100644
--- a/module/synchronization_m.html
+++ b/module/synchronization_m.html
@@ -323,7 +323,7 @@ <h4>Arguments</h4>      <em>None</em>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/team_type_m.html b/module/team_type_m.html
index 9491b04d..bf83f876 100644
--- a/module/team_type_m.html
+++ b/module/team_type_m.html
@@ -191,47 +191,17 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M130.4,-63.71C118.61,-65.25 106.5,-66.82 95.21,-68.28"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="94.57,-64.84 85.11,-69.6 95.48,-71.78 94.57,-64.84"/>
 </g>
-<!-- module~team_type_s -->
-<g id="module~~team_type_m~~UsedByGraph_node3" class="node">
-<title>module~team_type_s</title>
-<g id="a_module~~team_type_m~~UsedByGraph_node3"><a xlink:href=".././module/team_type_s.html" xlink:title="team_type_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="238,-25 159,-25 159,-1 238,-1 238,-25"/>
-<text text-anchor="middle" x="198.5" y="-10.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_s</text>
-</a>
-</g>
-</g>
-<!-- module~team_type_s&#45;&gt;module~team_type_m -->
-<g id="module~~team_type_m~~UsedByGraph_edge4" class="edge">
-<title>module~team_type_s&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#ff0000" d="M158.83,-21.86C146.55,-25.13 133.04,-29.23 121,-34 104.28,-40.62 86.49,-49.86 72.18,-57.9"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="70.27,-54.96 63.32,-62.96 73.74,-61.04 70.27,-54.96"/>
-</g>
-<!-- module~caffeinate_decaffeinate_m -->
-<g id="module~~team_type_m~~UsedByGraph_node4" class="node">
-<title>module~caffeinate_decaffeinate_m</title>
-<g id="a_module~~team_type_m~~UsedByGraph_node4"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="276,-147 121,-147 121,-123 276,-123 276,-147"/>
-<text text-anchor="middle" x="198.5" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
-</a>
-</g>
-</g>
-<!-- module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m -->
-<g id="module~~team_type_m~~UsedByGraph_edge2" class="edge">
-<title>module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M159.91,-122.94C147.45,-118.75 133.55,-113.88 121,-109 107,-103.56 91.83,-97.05 78.65,-91.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="80.01,-87.96 69.45,-87.05 77.14,-94.34 80.01,-87.96"/>
-</g>
 <!-- module~caffeine_m -->
-<g id="module~~team_type_m~~UsedByGraph_node5" class="node">
+<g id="module~~team_type_m~~UsedByGraph_node3" class="node">
 <title>module~caffeine_m</title>
-<g id="a_module~~team_type_m~~UsedByGraph_node5"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
+<g id="a_module~~team_type_m~~UsedByGraph_node3"><a xlink:href=".././module/caffeine_m.html" xlink:title="caffeine_m">
 <polygon fill="#337ab7" stroke="#337ab7" points="423,-108 351,-108 351,-84 423,-84 423,-108"/>
 <text text-anchor="middle" x="387" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_m</text>
 </a>
 </g>
 </g>
 <!-- module~caffeine_m&#45;&gt;module~team_type_m -->
-<g id="module~~team_type_m~~UsedByGraph_edge3" class="edge">
+<g id="module~~team_type_m~~UsedByGraph_edge2" class="edge">
 <title>module~caffeine_m&#45;&gt;module~team_type_m</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M350.96,-93.85C290.34,-90.13 165.67,-82.49 95.12,-78.16"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="95.31,-74.67 85.12,-77.55 94.88,-81.66 95.31,-74.67"/>
@@ -242,11 +212,41 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M350.92,-88.29C326.57,-82.93 293.4,-75.64 264.32,-69.25"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="264.74,-65.76 254.22,-67.03 263.24,-72.6 264.74,-65.76"/>
 </g>
+<!-- module~caffeinate_decaffeinate_m -->
+<g id="module~~team_type_m~~UsedByGraph_node5" class="node">
+<title>module~caffeinate_decaffeinate_m</title>
+<g id="a_module~~team_type_m~~UsedByGraph_node5"><a xlink:href=".././module/caffeinate_decaffeinate_m.html" xlink:title="caffeinate_decaffeinate_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="276,-147 121,-147 121,-123 276,-123 276,-147"/>
+<text text-anchor="middle" x="198.5" y="-132.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_m</text>
+</a>
+</g>
+</g>
 <!-- module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m -->
 <g id="module~~team_type_m~~UsedByGraph_edge8" class="edge">
 <title>module~caffeine_m&#45;&gt;module~caffeinate_decaffeinate_m</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M350.92,-103.34C327.32,-108.27 295.45,-114.93 267.04,-120.88"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="266.22,-117.47 257.15,-122.94 267.65,-124.32 266.22,-117.47"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M350.92,-103.34C327.32,-108.27 295.45,-114.93 267.04,-120.88"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="266.22,-117.47 257.15,-122.94 267.65,-124.32 266.22,-117.47"/>
+</g>
+<!-- module~team_type_s -->
+<g id="module~~team_type_m~~UsedByGraph_node4" class="node">
+<title>module~team_type_s</title>
+<g id="a_module~~team_type_m~~UsedByGraph_node4"><a xlink:href=".././module/team_type_s.html" xlink:title="team_type_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="238,-25 159,-25 159,-1 238,-1 238,-25"/>
+<text text-anchor="middle" x="198.5" y="-10.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_s</text>
+</a>
+</g>
+</g>
+<!-- module~team_type_s&#45;&gt;module~team_type_m -->
+<g id="module~~team_type_m~~UsedByGraph_edge4" class="edge">
+<title>module~team_type_s&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#ff0000" d="M158.83,-21.86C146.55,-25.13 133.04,-29.23 121,-34 104.28,-40.62 86.49,-49.86 72.18,-57.9"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="70.27,-54.96 63.32,-62.96 73.74,-61.04 70.27,-54.96"/>
+</g>
+<!-- module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m -->
+<g id="module~~team_type_m~~UsedByGraph_edge3" class="edge">
+<title>module~caffeinate_decaffeinate_m&#45;&gt;module~team_type_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M159.91,-122.94C147.45,-118.75 133.55,-113.88 121,-109 107,-103.56 91.83,-97.05 78.65,-91.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="80.01,-87.96 69.45,-87.05 77.14,-94.34 80.01,-87.96"/>
 </g>
 <!-- proc~assert -->
 <g id="module~~team_type_m~~UsedByGraph_node6" class="node">
@@ -290,8 +290,8 @@ <h3 class="panel-title">Used by</h3>
 <!-- module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m -->
 <g id="module~~team_type_m~~UsedByGraph_edge9" class="edge">
 <title>module~caffeinate_decaffeinate_s&#45;&gt;module~caffeinate_decaffeinate_m</title>
-<path fill="none" stroke="#00ffff" d="M311.75,-136.81C303.45,-136.67 294.93,-136.54 286.49,-136.4"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="286.29,-132.9 276.24,-136.23 286.18,-139.89 286.29,-132.9"/>
+<path fill="none" stroke="#7f00ff" d="M311.75,-136.81C303.45,-136.67 294.93,-136.54 286.49,-136.4"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="286.29,-132.9 276.24,-136.23 286.18,-139.89 286.29,-132.9"/>
 </g>
 </g>
 </svg>
@@ -527,7 +527,7 @@ <h2>Derived Types</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/team_type_s.html b/module/team_type_s.html
index b7099837..fbd91596 100644
--- a/module/team_type_s.html
+++ b/module/team_type_s.html
@@ -364,7 +364,7 @@ <h4>Arguments</h4>      <table class="table table-striped varlist">
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/module/utilities_m.html b/module/utilities_m.html
index 114ca9c4..515838ff 100644
--- a/module/utilities_m.html
+++ b/module/utilities_m.html
@@ -260,35 +260,35 @@ <h3 class="panel-title">Used by</h3>
 <polygon fill="none" stroke="black" points="67,-108 0,-108 0,-84 67,-84 67,-108"/>
 <text text-anchor="middle" x="33.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">utilities_m</text>
 </g>
-<!-- module~co_sum_s -->
+<!-- module~co_min_s -->
 <g id="module~~utilities_m~~UsedByGraph_node2" class="node">
-<title>module~co_sum_s</title>
-<g id="a_module~~utilities_m~~UsedByGraph_node2"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="182,-192 118,-192 118,-168 182,-168 182,-192"/>
-<text text-anchor="middle" x="150" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
+<title>module~co_min_s</title>
+<g id="a_module~~utilities_m~~UsedByGraph_node2"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="180.5,-192 119.5,-192 119.5,-168 180.5,-168 180.5,-192"/>
+<text text-anchor="middle" x="150" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_sum_s&#45;&gt;module~utilities_m -->
+<!-- module~co_min_s&#45;&gt;module~utilities_m -->
 <g id="module~~utilities_m~~UsedByGraph_edge1" class="edge">
-<title>module~co_sum_s&#45;&gt;module~utilities_m</title>
+<title>module~co_min_s&#45;&gt;module~utilities_m</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M119.06,-168C113.55,-165.33 107.97,-162.3 103,-159 84.32,-146.6 65.76,-129.13 52.69,-115.74"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="55.1,-113.2 45.66,-108.39 50.04,-118.03 55.1,-113.2"/>
 </g>
-<!-- module~co_min_s -->
+<!-- module~co_broadcast_s -->
 <g id="module~~utilities_m~~UsedByGraph_node3" class="node">
-<title>module~co_min_s</title>
-<g id="a_module~~utilities_m~~UsedByGraph_node3"><a xlink:href=".././module/co_min_s.html" xlink:title="co_min_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="180.5,-150 119.5,-150 119.5,-126 180.5,-126 180.5,-150"/>
-<text text-anchor="middle" x="150" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s</text>
+<title>module~co_broadcast_s</title>
+<g id="a_module~~utilities_m~~UsedByGraph_node3"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="197,-150 103,-150 103,-126 197,-126 197,-150"/>
+<text text-anchor="middle" x="150" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_min_s&#45;&gt;module~utilities_m -->
+<!-- module~co_broadcast_s&#45;&gt;module~utilities_m -->
 <g id="module~~utilities_m~~UsedByGraph_edge2" class="edge">
-<title>module~co_min_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M119.22,-127.07C106.29,-122.34 90.93,-116.7 76.85,-111.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="77.95,-108.21 67.36,-108.05 75.54,-114.78 77.95,-108.21"/>
+<title>module~co_broadcast_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M116.19,-125.96C103.97,-121.48 89.93,-116.33 76.97,-111.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="77.91,-108.2 67.32,-108.04 75.5,-114.77 77.91,-108.2"/>
 </g>
 <!-- module~co_reduce_s -->
 <g id="module~~utilities_m~~UsedByGraph_node4" class="node">
@@ -305,33 +305,33 @@ <h3 class="panel-title">Used by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M110.87,-96C100.13,-96 88.36,-96 77.36,-96"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="77.1,-92.5 67.1,-96 77.1,-99.5 77.1,-92.5"/>
 </g>
-<!-- module~co_broadcast_s -->
+<!-- module~co_max_s -->
 <g id="module~~utilities_m~~UsedByGraph_node5" class="node">
-<title>module~co_broadcast_s</title>
-<g id="a_module~~utilities_m~~UsedByGraph_node5"><a xlink:href=".././module/co_broadcast_s.html" xlink:title="co_broadcast_s">
-<polygon fill="#5bc0de" stroke="#5bc0de" points="197,-66 103,-66 103,-42 197,-42 197,-66"/>
-<text text-anchor="middle" x="150" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s</text>
+<title>module~co_max_s</title>
+<g id="a_module~~utilities_m~~UsedByGraph_node5"><a xlink:href=".././module/co_max_s.html" xlink:title="co_max_s">
+<polygon fill="#5bc0de" stroke="#5bc0de" points="182,-66 118,-66 118,-42 182,-42 182,-66"/>
+<text text-anchor="middle" x="150" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_broadcast_s&#45;&gt;module~utilities_m -->
+<!-- module~co_max_s&#45;&gt;module~utilities_m -->
 <g id="module~~utilities_m~~UsedByGraph_edge4" class="edge">
-<title>module~co_broadcast_s&#45;&gt;module~utilities_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M116.19,-66.04C103.97,-70.52 89.93,-75.67 76.97,-80.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="75.5,-77.23 67.32,-83.96 77.91,-83.8 75.5,-77.23"/>
+<title>module~co_max_s&#45;&gt;module~utilities_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M117.71,-65.48C105.14,-70.09 90.44,-75.48 76.93,-80.44"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="75.53,-77.22 67.35,-83.95 77.94,-83.79 75.53,-77.22"/>
 </g>
-<!-- module~co_max_s -->
+<!-- module~co_sum_s -->
 <g id="module~~utilities_m~~UsedByGraph_node6" class="node">
-<title>module~co_max_s</title>
-<g id="a_module~~utilities_m~~UsedByGraph_node6"><a xlink:href=".././module/co_max_s.html" xlink:title="co_max_s">
+<title>module~co_sum_s</title>
+<g id="a_module~~utilities_m~~UsedByGraph_node6"><a xlink:href=".././module/co_sum_s.html" xlink:title="co_sum_s">
 <polygon fill="#5bc0de" stroke="#5bc0de" points="182,-24 118,-24 118,0 182,0 182,-24"/>
-<text text-anchor="middle" x="150" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s</text>
+<text text-anchor="middle" x="150" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s</text>
 </a>
 </g>
 </g>
-<!-- module~co_max_s&#45;&gt;module~utilities_m -->
+<!-- module~co_sum_s&#45;&gt;module~utilities_m -->
 <g id="module~~utilities_m~~UsedByGraph_edge5" class="edge">
-<title>module~co_max_s&#45;&gt;module~utilities_m</title>
+<title>module~co_sum_s&#45;&gt;module~utilities_m</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M119.06,-24C113.55,-26.67 107.97,-29.7 103,-33 84.32,-45.4 65.76,-62.87 52.69,-76.26"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="50.04,-73.97 45.66,-83.61 55.1,-78.8 50.04,-73.97"/>
 </g>
@@ -509,7 +509,7 @@ <h4>Return Value <small>integer(kind=c_int)</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/as_character.html b/proc/as_character.html
index e144d2c8..4bae2dee 100644
--- a/proc/as_character.html
+++ b/proc/as_character.html
@@ -377,7 +377,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/assert.html b/proc/assert.html
index 34ed811f..8329f539 100644
--- a/proc/assert.html
+++ b/proc/assert.html
@@ -130,9 +130,9 @@ <h3 class="panel-title">Uses</h3>
       <ul class="list-group">
       <li class="list-group-item">
   <ul class="list-inline">
+    <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
     <li><a href='../module/caffeine_characterizable_m.html'>caffeine_characterizable_m</a></li>
     <li><a href='../module/image_enumeration_m.html'>image_enumeration_m</a></li>
-    <li><a href='../module/program_termination_m.html'>program_termination_m</a></li>
   </ul>
       </li>
       <li class="list-group-item">
@@ -153,48 +153,48 @@ <h3 class="panel-title">Uses</h3>
 <polygon fill="none" stroke="black" points="371,-66 317,-66 317,-42 371,-42 371,-66"/>
 <text text-anchor="middle" x="344" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50">assert</text>
 </g>
-<!-- module~caffeine_characterizable_m -->
+<!-- module~program_termination_m -->
 <g id="proc~~assert~~UsesGraph_node2" class="node">
-<title>module~caffeine_characterizable_m</title>
-<g id="a_proc~~assert~~UsesGraph_node2"><a xlink:href=".././module/caffeine_characterizable_m.html" xlink:title="caffeine_characterizable_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="281,-108 121,-108 121,-84 281,-84 281,-108"/>
-<text text-anchor="middle" x="201" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_characterizable_m</text>
+<title>module~program_termination_m</title>
+<g id="a_proc~~assert~~UsesGraph_node2"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="272,-108 130,-108 130,-84 272,-84 272,-108"/>
+<text text-anchor="middle" x="201" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
 </a>
 </g>
 </g>
-<!-- proc~assert&#45;&gt;module~caffeine_characterizable_m -->
+<!-- proc~assert&#45;&gt;module~program_termination_m -->
 <g id="proc~~assert~~UsesGraph_edge1" class="edge">
-<title>proc~assert&#45;&gt;module~caffeine_characterizable_m</title>
+<title>proc~assert&#45;&gt;module~program_termination_m</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M316.88,-63.28C305.86,-67.08 292.86,-71.42 281,-75 273.99,-77.11 266.61,-79.23 259.27,-81.26"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="258.08,-77.96 249.35,-83.96 259.92,-84.71 258.08,-77.96"/>
 </g>
-<!-- module~image_enumeration_m -->
+<!-- module~caffeine_characterizable_m -->
 <g id="proc~~assert~~UsesGraph_node3" class="node">
-<title>module~image_enumeration_m</title>
-<g id="a_proc~~assert~~UsesGraph_node3"><a xlink:href=".././module/image_enumeration_m.html" xlink:title="image_enumeration_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="269,-66 133,-66 133,-42 269,-42 269,-66"/>
-<text text-anchor="middle" x="201" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m</text>
+<title>module~caffeine_characterizable_m</title>
+<g id="a_proc~~assert~~UsesGraph_node3"><a xlink:href=".././module/caffeine_characterizable_m.html" xlink:title="caffeine_characterizable_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="281,-66 121,-66 121,-42 281,-42 281,-66"/>
+<text text-anchor="middle" x="201" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeine_characterizable_m</text>
 </a>
 </g>
 </g>
-<!-- proc~assert&#45;&gt;module~image_enumeration_m -->
-<g id="proc~~assert~~UsesGraph_edge2" class="edge">
-<title>proc~assert&#45;&gt;module~image_enumeration_m</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M316.81,-54C306.02,-54 292.9,-54 279.45,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="279.12,-50.5 269.12,-54 279.12,-57.5 279.12,-50.5"/>
+<!-- proc~assert&#45;&gt;module~caffeine_characterizable_m -->
+<g id="proc~~assert~~UsesGraph_edge3" class="edge">
+<title>proc~assert&#45;&gt;module~caffeine_characterizable_m</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M316.81,-54C309.21,-54 300.45,-54 291.23,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="291.07,-50.5 281.07,-54 291.07,-57.5 291.07,-50.5"/>
 </g>
-<!-- module~program_termination_m -->
+<!-- module~image_enumeration_m -->
 <g id="proc~~assert~~UsesGraph_node4" class="node">
-<title>module~program_termination_m</title>
-<g id="a_proc~~assert~~UsesGraph_node4"><a xlink:href=".././module/program_termination_m.html" xlink:title="program_termination_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="272,-24 130,-24 130,0 272,0 272,-24"/>
-<text text-anchor="middle" x="201" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m</text>
+<title>module~image_enumeration_m</title>
+<g id="a_proc~~assert~~UsesGraph_node4"><a xlink:href=".././module/image_enumeration_m.html" xlink:title="image_enumeration_m">
+<polygon fill="#337ab7" stroke="#337ab7" points="269,-24 133,-24 133,0 269,0 269,-24"/>
+<text text-anchor="middle" x="201" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_m</text>
 </a>
 </g>
 </g>
-<!-- proc~assert&#45;&gt;module~program_termination_m -->
-<g id="proc~~assert~~UsesGraph_edge3" class="edge">
-<title>proc~assert&#45;&gt;module~program_termination_m</title>
+<!-- proc~assert&#45;&gt;module~image_enumeration_m -->
+<g id="proc~~assert~~UsesGraph_edge2" class="edge">
+<title>proc~assert&#45;&gt;module~image_enumeration_m</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M316.88,-44.72C305.86,-40.92 292.86,-36.58 281,-33 273.99,-30.89 266.61,-28.77 259.27,-26.74"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="259.92,-23.29 249.35,-24.04 258.08,-30.04 259.92,-23.29"/>
 </g>
@@ -202,16 +202,16 @@ <h3 class="panel-title">Uses</h3>
 <g id="proc~~assert~~UsesGraph_node5" class="node">
 <title>module~team_type_m</title>
 <g id="a_proc~~assert~~UsesGraph_node5"><a xlink:href=".././module/team_type_m.html" xlink:title="team_type_m">
-<polygon fill="#337ab7" stroke="#337ab7" points="85,-66 0,-66 0,-42 85,-42 85,-66"/>
-<text text-anchor="middle" x="42.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
+<polygon fill="#337ab7" stroke="#337ab7" points="85,-24 0,-24 0,0 85,0 85,-24"/>
+<text text-anchor="middle" x="42.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">team_type_m</text>
 </a>
 </g>
 </g>
 <!-- module~image_enumeration_m&#45;&gt;module~team_type_m -->
 <g id="proc~~assert~~UsesGraph_edge4" class="edge">
 <title>module~image_enumeration_m&#45;&gt;module~team_type_m</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M132.72,-54C120.29,-54 107.48,-54 95.59,-54"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="95.4,-50.5 85.4,-54 95.4,-57.5 95.4,-50.5"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M132.72,-12C120.29,-12 107.48,-12 95.59,-12"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="95.4,-8.5 85.4,-12 95.4,-15.5 95.4,-8.5"/>
 </g>
 </g>
 </svg>
@@ -630,7 +630,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/c_f_string.html b/proc/c_f_string.html
index 0789c889..fea6d401 100644
--- a/proc/c_f_string.html
+++ b/proc/c_f_string.html
@@ -282,7 +282,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_caffeinate.html b/proc/caf_caffeinate.html
index f0afb497..815b6e5f 100644
--- a/proc/caf_caffeinate.html
+++ b/proc/caf_caffeinate.html
@@ -412,7 +412,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_change_team.html b/proc/caf_change_team.html
index 071de9b0..2d41304a 100644
--- a/proc/caf_change_team.html
+++ b/proc/caf_change_team.html
@@ -275,7 +275,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_co_broadcast.html b/proc/caf_co_broadcast.html
index 3c28d1d2..ccb3c632 100644
--- a/proc/caf_co_broadcast.html
+++ b/proc/caf_co_broadcast.html
@@ -131,25 +131,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~10"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-source_image~2"></span>integer,</td>
+  <td><span class="anchor" id="variable-source_image"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td></td><td>::</td>
   <td><strong>source_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~4"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~3"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -408,7 +408,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_co_max.html b/proc/caf_co_max.html
index 1e41c799..03bcc486 100644
--- a/proc/caf_co_max.html
+++ b/proc/caf_co_max.html
@@ -131,25 +131,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~11"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~2"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~5"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~5"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~2"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~4"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~2"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -169,262 +169,262 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~caf_co_max~~CallsGraph Pages: 1 -->
-<svg id="proccaf_co_maxCallsGraph" width="641pt" height="388pt"
- viewBox="0.00 0.00 641.00 387.74" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~caf_co_max~~CallsGraph" class="graph" transform="scale(1.15 1.15) rotate(0) translate(4 440)">
+<svg id="proccaf_co_maxCallsGraph" width="641pt" height="412pt"
+ viewBox="0.00 0.00 641.00 412.20" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~caf_co_max~~CallsGraph" class="graph" transform="scale(1.15 1.15) rotate(0) translate(4 468)">
 <title>proc~~caf_co_max~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-440 730,-440 730,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-468 730,-468 730,4 -4,4"/>
 <!-- proc~caf_co_max -->
 <g id="proc~~caf_co_max~~CallsGraph_node1" class="node">
 <title>proc~caf_co_max</title>
-<polygon fill="none" stroke="black" points="76,-259 0,-259 0,-235 76,-235 76,-259"/>
-<text text-anchor="middle" x="38" y="-244.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_max</text>
+<polygon fill="none" stroke="black" points="76,-329 0,-329 0,-305 76,-305 76,-329"/>
+<text text-anchor="middle" x="38" y="-314.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_max</text>
 </g>
-<!-- interface~caf_c_numeric_type -->
+<!-- interface~caf_c_co_max -->
 <g id="proc~~caf_co_max~~CallsGraph_node2" class="node">
-<title>interface~caf_c_numeric_type</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node2"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="230,-436 112,-436 112,-412 230,-412 230,-436"/>
-<text text-anchor="middle" x="171" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
+<title>interface~caf_c_co_max</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node2"><a xlink:href=".././interface/caf_c_co_max.html" xlink:title="caf_c_co_max">
+<polygon fill="#a7506f" stroke="#a7506f" points="214.5,-464 127.5,-464 127.5,-440 214.5,-440 214.5,-464"/>
+<text text-anchor="middle" x="171" y="-449.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_max</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_co_max -->
 <g id="proc~~caf_co_max~~CallsGraph_edge1" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type</title>
-<path fill="none" stroke="#ff0000" d="M41.85,-259.27C48.96,-287.39 70.02,-357.22 112,-398 115.48,-401.38 119.47,-404.36 123.7,-406.99"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="122.17,-410.14 132.62,-411.89 125.54,-404.01 122.17,-410.14"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_co_max</title>
+<path fill="none" stroke="#ff0000" d="M44.3,-329.09C54.48,-351.08 78.76,-397.94 112,-426 116.16,-429.51 120.88,-432.64 125.78,-435.4"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="124.22,-438.53 134.71,-439.96 127.4,-432.3 124.22,-438.53"/>
 </g>
-<!-- proc~get_c_ptr -->
+<!-- interface~caf_c_is_f_string -->
 <g id="proc~~caf_co_max~~CallsGraph_node3" class="node">
-<title>proc~get_c_ptr</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node3"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="482,-356 421,-356 421,-332 482,-332 482,-356"/>
-<text text-anchor="middle" x="451.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
+<title>interface~caf_c_is_f_string</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node3"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
+<polygon fill="#a7506f" stroke="#a7506f" points="500.5,-436 402.5,-436 402.5,-412 500.5,-412 500.5,-436"/>
+<text text-anchor="middle" x="451.5" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string -->
 <g id="proc~~caf_co_max~~CallsGraph_edge2" class="edge">
-<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M62.81,-259.06C76.84,-265.74 95.09,-273.74 112,-279 217.55,-311.82 347.02,-331.12 410.93,-339.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="410.62,-342.81 420.98,-340.59 411.5,-335.86 410.62,-342.81"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M54.62,-329.02C68.81,-339.35 90.74,-353.83 112,-362 206.16,-398.17 323.35,-413.6 392.24,-419.91"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="392.19,-423.42 402.46,-420.81 392.8,-416.45 392.19,-423.42"/>
 </g>
 <!-- proc~optional_value -->
 <g id="proc~~caf_co_max~~CallsGraph_node4" class="node">
 <title>proc~optional_value</title>
 <g id="a_proc~~caf_co_max~~CallsGraph_node4"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="497,-314 406,-314 406,-290 497,-290 497,-314"/>
-<text text-anchor="middle" x="451.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="497,-394 406,-394 406,-370 497,-370 497,-394"/>
+<text text-anchor="middle" x="451.5" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;proc~optional_value -->
-<g id="proc~~caf_co_max~~CallsGraph_edge3" class="edge">
+<g id="proc~~caf_co_max~~CallsGraph_edge4" class="edge">
 <title>proc~caf_co_max&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M76.24,-251.98C149.15,-261.72 310.99,-283.35 395.98,-294.71"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="395.57,-298.19 405.95,-296.05 396.5,-291.25 395.57,-298.19"/>
+<path fill="none" stroke="#ff0000" d="M74.71,-329.06C86.48,-332.68 99.7,-336.38 112,-339 210.73,-359.99 327.98,-372.09 395.37,-377.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="395.49,-381.36 405.75,-378.7 396.07,-374.38 395.49,-381.36"/>
 </g>
-<!-- interface~caf_error_stop -->
+<!-- proc~get_c_ptr -->
 <g id="proc~~caf_co_max~~CallsGraph_node5" class="node">
-<title>interface~caf_error_stop</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node5"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="726,-274 638,-274 638,-250 726,-250 726,-274"/>
-<text text-anchor="middle" x="682" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
+<title>proc~get_c_ptr</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node5"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="482,-352 421,-352 421,-328 482,-328 482,-352"/>
+<text text-anchor="middle" x="451.5" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_error_stop -->
+<!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr -->
 <g id="proc~~caf_co_max~~CallsGraph_edge5" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M50.91,-259.4C64.6,-273.06 88.23,-294.96 112,-309 192.85,-356.75 215.61,-384 309.5,-384 309.5,-384 309.5,-384 452.5,-384 538.63,-384 623.77,-315.72 661.2,-281.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="663.96,-283.54 668.86,-274.14 659.17,-278.43 663.96,-283.54"/>
+<title>proc~caf_co_max&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M76.13,-319.65C87.63,-320.45 100.33,-321.29 112,-322 219.73,-328.55 346.82,-334.95 410.25,-338.06"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="410.45,-341.57 420.61,-338.56 410.79,-334.58 410.45,-341.57"/>
 </g>
-<!-- interface~caf_co_reduce -->
+<!-- interface~caf_c_numeric_type -->
 <g id="proc~~caf_co_max~~CallsGraph_node6" class="node">
-<title>interface~caf_co_reduce</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node6"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="215.5,-239 126.5,-239 126.5,-215 215.5,-215 215.5,-239"/>
-<text text-anchor="middle" x="171" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<title>interface~caf_c_numeric_type</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node6"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="230,-24 112,-24 112,0 230,0 230,-24"/>
+<text text-anchor="middle" x="171" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
-<g id="proc~~caf_co_max~~CallsGraph_edge4" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M76.19,-241.32C88.61,-239.43 102.7,-237.27 116.13,-235.22"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="116.87,-238.65 126.23,-233.68 115.81,-231.73 116.87,-238.65"/>
+<!-- proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type -->
+<g id="proc~~caf_co_max~~CallsGraph_edge3" class="edge">
+<title>proc~caf_co_max&#45;&gt;interface~caf_c_numeric_type</title>
+<path fill="none" stroke="#ff0000" d="M38.67,-304.74C38.19,-262.41 42.11,-120.53 112,-38 114.77,-34.73 118.03,-31.86 121.57,-29.33"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="123.52,-32.24 130.25,-24.05 119.88,-26.26 123.52,-32.24"/>
 </g>
 <!-- proc~get_c_ptr_character -->
 <g id="proc~~caf_co_max~~CallsGraph_node7" class="node">
 <title>proc~get_c_ptr_character</title>
 <g id="a_proc~~caf_co_max~~CallsGraph_node7"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="510.5,-66 392.5,-66 392.5,-42 510.5,-42 510.5,-66"/>
-<text text-anchor="middle" x="451.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="510.5,-310 392.5,-310 392.5,-286 510.5,-286 510.5,-310"/>
+<text text-anchor="middle" x="451.5" y="-295.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr_character -->
 <g id="proc~~caf_co_max~~CallsGraph_edge6" class="edge">
 <title>proc~caf_co_max&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M56.82,-234.86C71.15,-225.65 92.09,-213.34 112,-206 215.28,-167.9 269.28,-227.07 355,-158 386.31,-132.77 361.59,-102.42 391,-75 392.29,-73.79 393.66,-72.65 395.09,-71.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.2,-74.39 403.81,-66.12 393.48,-68.46 397.2,-74.39"/>
+<path fill="none" stroke="#ff0000" d="M76.24,-315.28C145.42,-312.09 294.66,-305.2 382.34,-301.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="382.63,-304.64 392.46,-300.68 382.31,-297.64 382.63,-304.64"/>
 </g>
-<!-- interface~caf_c_co_max -->
+<!-- interface~caf_co_reduce -->
 <g id="proc~~caf_co_max~~CallsGraph_node8" class="node">
-<title>interface~caf_c_co_max</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node8"><a xlink:href=".././interface/caf_c_co_max.html" xlink:title="caf_c_co_max">
-<polygon fill="#a7506f" stroke="#a7506f" points="214.5,-116 127.5,-116 127.5,-92 214.5,-92 214.5,-116"/>
-<text text-anchor="middle" x="171" y="-101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_max</text>
+<title>interface~caf_co_reduce</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node8"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="215.5,-270 126.5,-270 126.5,-246 215.5,-246 215.5,-270"/>
+<text text-anchor="middle" x="171" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_co_max -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~caf_co_max~~CallsGraph_edge7" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_co_max</title>
-<path fill="none" stroke="#ff0000" d="M43.76,-234.75C53.37,-211.45 77.18,-160.37 112,-130 115.95,-126.55 120.44,-123.49 125.12,-120.79"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="127.02,-123.74 134.28,-116.02 123.79,-117.53 127.02,-123.74"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
+<path fill="none" stroke="#ff0000" d="M65.69,-304.91C79.51,-298.66 96.65,-290.91 112,-284 118.99,-280.85 126.45,-277.5 133.62,-274.29"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="135.44,-277.31 143.14,-270.02 132.58,-270.92 135.44,-277.31"/>
 </g>
-<!-- interface~caf_c_is_f_string -->
+<!-- interface~caf_error_stop -->
 <g id="proc~~caf_co_max~~CallsGraph_node9" class="node">
-<title>interface~caf_c_is_f_string</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node9"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
-<polygon fill="#a7506f" stroke="#a7506f" points="500.5,-24 402.5,-24 402.5,0 500.5,0 500.5,-24"/>
-<text text-anchor="middle" x="451.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
+<title>interface~caf_error_stop</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node9"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="726,-230 638,-230 638,-206 726,-206 726,-230"/>
+<text text-anchor="middle" x="682" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_max&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_max~~CallsGraph_edge8" class="edge">
-<title>proc~caf_co_max&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M52.4,-234.87C66.61,-222.33 89.99,-202.58 112,-188 161.56,-155.17 177.96,-153.75 230,-125 302.14,-85.14 316.06,-67.3 391,-33 395.03,-31.16 399.27,-29.37 403.56,-27.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="404.85,-30.92 412.96,-24.09 402.36,-24.38 404.85,-30.92"/>
+<title>proc~caf_co_max&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M44.02,-304.92C66.45,-253.08 162.89,-52 309.5,-52 309.5,-52 309.5,-52 452.5,-52 550.44,-52 634.65,-153.05 666.93,-197.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="664.2,-199.67 672.85,-205.79 669.91,-195.62 664.2,-199.67"/>
 </g>
 <!-- proc~caf_co_reduce -->
 <g id="proc~~caf_co_max~~CallsGraph_node10" class="node">
 <title>proc~caf_co_reduce</title>
 <g id="a_proc~~caf_co_max~~CallsGraph_node10"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="355,-234 266,-234 266,-210 355,-210 355,-234"/>
-<text text-anchor="middle" x="310.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="355,-270 266,-270 266,-246 355,-246 355,-270"/>
+<text text-anchor="middle" x="310.5" y="-255.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
 <g id="proc~~caf_co_max~~CallsGraph_edge9" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M215.51,-225.42C228.3,-224.95 242.44,-224.44 255.79,-223.95"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="255.94,-227.45 265.81,-223.59 255.68,-220.45 255.94,-227.45"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M215.51,-258C228.3,-258 242.44,-258 255.79,-258"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="255.81,-261.5 265.81,-258 255.81,-254.5 255.81,-261.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~caf_co_max~~CallsGraph_edge10" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M317.94,-234.09C329.72,-255.09 356.71,-298.44 391,-323 397.06,-327.34 404.11,-330.86 411.18,-333.68"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="410.17,-337.04 420.76,-337.12 412.53,-330.45 410.17,-337.04"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="proc~~caf_co_max~~CallsGraph_edge12" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M314.84,-270.03C323.09,-297.56 347.02,-365.64 391,-403 392.57,-404.33 394.22,-405.58 395.94,-406.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="394.62,-410.02 405.03,-411.98 398.11,-403.96 394.62,-410.02"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
-<g id="proc~~caf_co_max~~CallsGraph_edge11" class="edge">
+<g id="proc~~caf_co_max~~CallsGraph_edge14" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M327.38,-234.08C343.05,-245.68 367.92,-263.26 391,-276 397.17,-279.4 403.87,-282.69 410.48,-285.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="409.46,-289.1 420.02,-289.96 412.3,-282.7 409.46,-289.1"/>
+<path fill="none" stroke="#ff0000" d="M317.88,-270.33C329.56,-291.76 356.41,-335.97 391,-361 393.1,-362.52 395.31,-363.93 397.61,-365.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="396.27,-368.5 406.78,-369.89 399.43,-362.25 396.27,-368.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
-<g id="proc~~caf_co_max~~CallsGraph_edge14" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M351.21,-234.1C363.82,-237.5 377.9,-240.86 391,-243 472.97,-256.38 569.43,-260.41 627.86,-261.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="627.9,-265.08 637.96,-261.76 628.02,-258.08 627.9,-265.08"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<g id="proc~~caf_co_max~~CallsGraph_edge16" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M324.66,-270.21C339.72,-283.67 365.61,-305.23 391,-319 397.42,-322.48 404.54,-325.58 411.54,-328.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="410.37,-331.54 420.96,-331.62 412.73,-324.95 410.37,-331.54"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
-<g id="proc~~caf_co_max~~CallsGraph_edge16" class="edge">
+<g id="proc~~caf_co_max~~CallsGraph_edge17" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M338.79,-209.91C344.81,-206.18 350.68,-201.56 355,-196 389.43,-151.7 352.33,-115.66 391,-75 392.06,-73.88 393.19,-72.83 394.36,-71.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="396.56,-74.57 402.79,-66 392.58,-68.81 396.56,-74.57"/>
+<path fill="none" stroke="#ff0000" d="M353.2,-270C367.51,-274.12 383.69,-278.77 398.69,-283.09"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="397.77,-286.47 408.34,-285.87 399.7,-279.74 397.77,-286.47"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_max~~CallsGraph_edge18" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M321.41,-209.96C331.16,-197.6 345.87,-177.46 355,-158 379.56,-105.66 351.34,-75.07 391,-33 392.03,-31.9 393.13,-30.87 394.27,-29.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="396.29,-32.74 402.47,-24.14 392.27,-27.01 396.29,-32.74"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M355.11,-257.78C412.2,-256.9 515.22,-253.23 602,-239 611.67,-237.41 621.86,-235.16 631.6,-232.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="632.76,-236.02 641.54,-230.1 630.98,-229.25 632.76,-236.02"/>
 </g>
-<!-- interface~caf_c_same_cfi_type -->
+<!-- interface~assert -->
 <g id="proc~~caf_co_max~~CallsGraph_node11" class="node">
-<title>interface~caf_c_same_cfi_type</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node11"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="512,-192 391,-192 391,-168 512,-168 512,-192"/>
-<text text-anchor="middle" x="451.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
+<title>interface~assert</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node11"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="478.5,-230 424.5,-230 424.5,-206 478.5,-206 478.5,-230"/>
+<text text-anchor="middle" x="451.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
-<g id="proc~~caf_co_max~~CallsGraph_edge12" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
-<path fill="none" stroke="#ff0000" d="M351.33,-209.96C366.74,-205.31 384.55,-199.93 400.79,-195.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="402.1,-198.28 410.66,-192.04 400.08,-191.58 402.1,-198.28"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<g id="proc~~caf_co_max~~CallsGraph_edge10" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M353.2,-246C372.73,-240.38 395.75,-233.75 414.5,-228.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="415.51,-231.71 424.15,-225.58 413.57,-224.98 415.51,-231.71"/>
 </g>
-<!-- interface~assert -->
+<!-- interface~caf_c_elem_len -->
 <g id="proc~~caf_co_max~~CallsGraph_node12" class="node">
-<title>interface~assert</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node12"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="478.5,-234 424.5,-234 424.5,-210 478.5,-210 478.5,-234"/>
-<text text-anchor="middle" x="451.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>interface~caf_c_elem_len</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node12"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
+<polygon fill="#a7506f" stroke="#a7506f" points="498.5,-188 404.5,-188 404.5,-164 498.5,-164 498.5,-188"/>
+<text text-anchor="middle" x="451.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
-<g id="proc~~caf_co_max~~CallsGraph_edge15" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#ff0000" d="M355.1,-222C374.13,-222 396.19,-222 414.3,-222"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="414.46,-225.5 424.46,-222 414.46,-218.5 414.46,-225.5"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<g id="proc~~caf_co_max~~CallsGraph_edge13" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
+<path fill="none" stroke="#ff0000" d="M324.66,-245.79C339.72,-232.33 365.61,-210.77 391,-197 394.27,-195.22 397.73,-193.55 401.26,-191.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="402.79,-195.13 410.7,-188.08 400.12,-188.66 402.79,-195.13"/>
 </g>
 <!-- interface~caf_c_co_reduce -->
 <g id="proc~~caf_co_max~~CallsGraph_node13" class="node">
 <title>interface~caf_c_co_reduce</title>
 <g id="a_proc~~caf_co_max~~CallsGraph_node13"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="501.5,-150 401.5,-150 401.5,-126 501.5,-126 501.5,-150"/>
-<text text-anchor="middle" x="451.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="501.5,-146 401.5,-146 401.5,-122 501.5,-122 501.5,-146"/>
+<text text-anchor="middle" x="451.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
-<g id="proc~~caf_co_max~~CallsGraph_edge17" class="edge">
+<g id="proc~~caf_co_max~~CallsGraph_edge11" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M334.37,-209.84C341.25,-205.79 348.65,-201.02 355,-196 373,-181.77 371.67,-171.37 391,-159 393.59,-157.34 396.33,-155.79 399.16,-154.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="400.76,-157.47 408.38,-150.11 397.84,-151.11 400.76,-157.47"/>
+<path fill="none" stroke="#ff0000" d="M317.88,-245.67C329.56,-224.24 356.41,-180.03 391,-155 393.1,-153.48 395.31,-152.07 397.61,-150.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="399.43,-153.75 406.78,-146.11 396.27,-147.5 399.43,-153.75"/>
 </g>
-<!-- interface~caf_c_elem_len -->
+<!-- interface~caf_c_same_cfi_type -->
 <g id="proc~~caf_co_max~~CallsGraph_node14" class="node">
-<title>interface~caf_c_elem_len</title>
-<g id="a_proc~~caf_co_max~~CallsGraph_node14"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
-<polygon fill="#a7506f" stroke="#a7506f" points="498.5,-108 404.5,-108 404.5,-84 498.5,-84 498.5,-108"/>
-<text text-anchor="middle" x="451.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
+<title>interface~caf_c_same_cfi_type</title>
+<g id="a_proc~~caf_co_max~~CallsGraph_node14"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="512,-104 391,-104 391,-80 512,-80 512,-104"/>
+<text text-anchor="middle" x="451.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
-<g id="proc~~caf_co_max~~CallsGraph_edge13" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
-<path fill="none" stroke="#ff0000" d="M337.8,-209.75C344,-205.98 350.19,-201.38 355,-196 380.73,-167.24 362.54,-143.05 391,-117 392.48,-115.64 394.06,-114.37 395.71,-113.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.73,-116.05 404.47,-107.88 394.1,-110.06 397.73,-116.05"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
+<g id="proc~~caf_co_max~~CallsGraph_edge15" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
+<path fill="none" stroke="#ff0000" d="M314.84,-245.97C323.09,-218.44 347.02,-150.36 391,-113 392.57,-111.67 394.22,-110.42 395.94,-109.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="398.11,-112.04 405.03,-104.02 394.62,-105.98 398.11,-112.04"/>
 </g>
 <!-- proc~assert -->
 <g id="proc~~caf_co_max~~CallsGraph_node15" class="node">
 <title>proc~assert</title>
 <g id="a_proc~~caf_co_max~~CallsGraph_node15"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="602,-234 548,-234 548,-210 602,-210 602,-234"/>
-<text text-anchor="middle" x="575" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="602,-230 548,-230 548,-206 602,-206 602,-230"/>
+<text text-anchor="middle" x="575" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
 <!-- interface~assert&#45;&gt;proc~assert -->
 <g id="proc~~caf_co_max~~CallsGraph_edge19" class="edge">
 <title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M478.56,-222C495.86,-222 518.8,-222 537.85,-222"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="537.98,-225.5 547.98,-222 537.98,-218.5 537.98,-225.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M478.56,-218C495.86,-218 518.8,-218 537.85,-218"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="537.98,-221.5 547.98,-218 537.98,-214.5 537.98,-221.5"/>
 </g>
 <!-- proc~assert&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_max~~CallsGraph_edge20" class="edge">
 <title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M602.23,-231.99C613.55,-236.31 627.08,-241.46 639.7,-246.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="638.53,-249.57 649.12,-249.85 641.02,-243.02 638.53,-249.57"/>
+<path fill="none" stroke="#ff0000" d="M602.23,-218C610.08,-218 618.99,-218 627.93,-218"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="627.97,-221.5 637.97,-218 627.97,-214.5 627.97,-221.5"/>
 </g>
 </g>
 </svg>
@@ -624,7 +624,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_co_min.html b/proc/caf_co_min.html
index 52e27ca8..742044a2 100644
--- a/proc/caf_co_min.html
+++ b/proc/caf_co_min.html
@@ -131,25 +131,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~12"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~3"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~6"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image~2"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~6"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~3"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~5"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~3"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -169,262 +169,262 @@ <h3 class="panel-title">Calls</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~caf_co_min~~CallsGraph Pages: 1 -->
-<svg id="proccaf_co_minCallsGraph" width="641pt" height="389pt"
- viewBox="0.00 0.00 641.00 389.34" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~caf_co_min~~CallsGraph" class="graph" transform="scale(1.14 1.14) rotate(0) translate(4 440)">
+<svg id="proccaf_co_minCallsGraph" width="641pt" height="426pt"
+ viewBox="0.00 0.00 641.00 426.16" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~caf_co_min~~CallsGraph" class="graph" transform="scale(1.14 1.14) rotate(0) translate(4 482)">
 <title>proc~~caf_co_min~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-440 727,-440 727,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-482 727,-482 727,4 -4,4"/>
 <!-- proc~caf_co_min -->
 <g id="proc~~caf_co_min~~CallsGraph_node1" class="node">
 <title>proc~caf_co_min</title>
-<polygon fill="none" stroke="black" points="73,-259 0,-259 0,-235 73,-235 73,-259"/>
-<text text-anchor="middle" x="36.5" y="-244.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_min</text>
+<polygon fill="none" stroke="black" points="73,-332 0,-332 0,-308 73,-308 73,-332"/>
+<text text-anchor="middle" x="36.5" y="-317.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_min</text>
 </g>
-<!-- interface~caf_c_numeric_type -->
+<!-- interface~caf_c_is_f_string -->
 <g id="proc~~caf_co_min~~CallsGraph_node2" class="node">
-<title>interface~caf_c_numeric_type</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node2"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="227,-436 109,-436 109,-412 227,-412 227,-436"/>
-<text text-anchor="middle" x="168" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
+<title>interface~caf_c_is_f_string</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node2"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
+<polygon fill="#a7506f" stroke="#a7506f" points="497.5,-478 399.5,-478 399.5,-454 497.5,-454 497.5,-478"/>
+<text text-anchor="middle" x="448.5" y="-463.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string -->
 <g id="proc~~caf_co_min~~CallsGraph_edge1" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type</title>
-<path fill="none" stroke="#ff0000" d="M40.22,-259.27C47.03,-287.38 67.35,-357.21 109,-398 112.46,-401.39 116.45,-404.39 120.67,-407.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="119.13,-410.17 129.58,-411.93 122.51,-404.04 119.13,-410.17"/>
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M45.87,-332.23C57.85,-348.74 81.51,-377.83 109,-393 198.68,-442.47 318.92,-458.43 389.32,-463.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="389.12,-467.06 399.34,-464.25 389.6,-460.08 389.12,-467.06"/>
 </g>
-<!-- proc~get_c_ptr -->
+<!-- proc~optional_value -->
 <g id="proc~~caf_co_min~~CallsGraph_node3" class="node">
-<title>proc~get_c_ptr</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node3"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="479,-356 418,-356 418,-332 479,-332 479,-356"/>
-<text text-anchor="middle" x="448.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
+<title>proc~optional_value</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node3"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="494,-436 403,-436 403,-412 494,-412 494,-436"/>
+<text text-anchor="middle" x="448.5" y="-421.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~caf_co_min~~CallsGraph_edge2" class="edge">
-<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M60.8,-259.08C74.52,-265.77 92.4,-273.77 109,-279 214.43,-312.22 343.95,-331.34 407.9,-339.41"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="407.6,-342.9 417.96,-340.66 408.46,-335.96 407.6,-342.9"/>
+<!-- proc~caf_co_min&#45;&gt;proc~optional_value -->
+<g id="proc~~caf_co_min~~CallsGraph_edge3" class="edge">
+<title>proc~caf_co_min&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M53.66,-332.08C67.61,-341.9 88.66,-355.35 109,-363 204.95,-399.1 324.45,-414.22 392.76,-420.26"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="392.6,-423.76 402.86,-421.12 393.2,-416.78 392.6,-423.76"/>
 </g>
-<!-- proc~optional_value -->
+<!-- interface~caf_c_co_min -->
 <g id="proc~~caf_co_min~~CallsGraph_node4" class="node">
-<title>proc~optional_value</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node4"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="494,-314 403,-314 403,-290 494,-290 494,-314"/>
-<text text-anchor="middle" x="448.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<title>interface~caf_c_co_min</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node4"><a xlink:href=".././interface/caf_c_co_min.html" xlink:title="caf_c_co_min">
+<polygon fill="#a7506f" stroke="#a7506f" points="210,-66 126,-66 126,-42 210,-42 210,-66"/>
+<text text-anchor="middle" x="168" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_min</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;proc~optional_value -->
-<g id="proc~~caf_co_min~~CallsGraph_edge3" class="edge">
-<title>proc~caf_co_min&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M73.17,-251.78C144.96,-261.42 307.33,-283.2 392.7,-294.65"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="392.34,-298.13 402.72,-295.99 393.27,-291.19 392.34,-298.13"/>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_co_min -->
+<g id="proc~~caf_co_min~~CallsGraph_edge4" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_co_min</title>
+<path fill="none" stroke="#ff0000" d="M37.71,-307.86C39,-269.55 47.98,-149.65 109,-80 111.86,-76.73 115.22,-73.85 118.84,-71.32"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="120.91,-74.17 127.7,-66.03 117.32,-68.16 120.91,-74.17"/>
 </g>
-<!-- interface~caf_error_stop -->
+<!-- proc~get_c_ptr -->
 <g id="proc~~caf_co_min~~CallsGraph_node5" class="node">
-<title>interface~caf_error_stop</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node5"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="723,-274 635,-274 635,-250 723,-250 723,-274"/>
-<text text-anchor="middle" x="679" y="-259.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
+<title>proc~get_c_ptr</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node5"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="479,-394 418,-394 418,-370 479,-370 479,-394"/>
+<text text-anchor="middle" x="448.5" y="-379.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_error_stop -->
+<!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr -->
 <g id="proc~~caf_co_min~~CallsGraph_edge5" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M49.12,-259.41C62.47,-273.09 85.59,-295.01 109,-309 189.6,-357.16 212.61,-384 306.5,-384 306.5,-384 306.5,-384 449.5,-384 535.63,-384 620.77,-315.72 658.2,-281.32"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="660.96,-283.54 665.86,-274.14 656.17,-278.43 660.96,-283.54"/>
+<title>proc~caf_co_min&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M73.25,-331.13C84.6,-334.36 97.25,-337.64 109,-340 215.97,-361.47 344.3,-373.79 407.84,-379.01"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="407.58,-382.5 417.83,-379.82 408.14,-375.52 407.58,-382.5"/>
 </g>
-<!-- interface~caf_co_reduce -->
+<!-- interface~caf_c_numeric_type -->
 <g id="proc~~caf_co_min~~CallsGraph_node6" class="node">
-<title>interface~caf_co_reduce</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node6"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="212.5,-239 123.5,-239 123.5,-215 212.5,-215 212.5,-239"/>
-<text text-anchor="middle" x="168" y="-224.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<title>interface~caf_c_numeric_type</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node6"><a xlink:href=".././interface/caf_c_numeric_type.html" xlink:title="caf_c_numeric_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="227,-24 109,-24 109,0 227,0 227,-24"/>
+<text text-anchor="middle" x="168" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_numeric_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
-<g id="proc~~caf_co_min~~CallsGraph_edge4" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M73.23,-241.48C85.52,-239.58 99.57,-237.41 112.98,-235.34"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="113.73,-238.77 123.08,-233.78 112.66,-231.85 113.73,-238.77"/>
+<!-- proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type -->
+<g id="proc~~caf_co_min~~CallsGraph_edge2" class="edge">
+<title>proc~caf_co_min&#45;&gt;interface~caf_c_numeric_type</title>
+<path fill="none" stroke="#ff0000" d="M39.01,-307.74C45.32,-258.41 71,-75.14 109,-33 109.89,-32.02 110.82,-31.08 111.8,-30.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.04,-32.88 120.04,-24.15 109.91,-27.24 114.04,-32.88"/>
 </g>
 <!-- proc~get_c_ptr_character -->
 <g id="proc~~caf_co_min~~CallsGraph_node7" class="node">
 <title>proc~get_c_ptr_character</title>
 <g id="a_proc~~caf_co_min~~CallsGraph_node7"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="507.5,-66 389.5,-66 389.5,-42 507.5,-42 507.5,-66"/>
-<text text-anchor="middle" x="448.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<polygon fill="#d94e8f" stroke="#d94e8f" points="507.5,-352 389.5,-352 389.5,-328 507.5,-328 507.5,-352"/>
+<text text-anchor="middle" x="448.5" y="-337.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr_character -->
 <g id="proc~~caf_co_min~~CallsGraph_edge6" class="edge">
 <title>proc~caf_co_min&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M54.92,-234.85C68.93,-225.62 89.43,-213.32 109,-206 212.11,-167.44 266.28,-227.07 352,-158 383.31,-132.77 358.59,-102.42 388,-75 389.29,-73.79 390.66,-72.65 392.09,-71.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="394.2,-74.39 400.81,-66.12 390.48,-68.46 394.2,-74.39"/>
+<path fill="none" stroke="#ff0000" d="M73.17,-321.74C141.29,-325.06 290.95,-332.36 379.01,-336.66"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="379.01,-340.16 389.17,-337.15 379.35,-333.17 379.01,-340.16"/>
 </g>
-<!-- interface~caf_c_co_min -->
+<!-- interface~caf_co_reduce -->
 <g id="proc~~caf_co_min~~CallsGraph_node8" class="node">
-<title>interface~caf_c_co_min</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node8"><a xlink:href=".././interface/caf_c_co_min.html" xlink:title="caf_c_co_min">
-<polygon fill="#a7506f" stroke="#a7506f" points="210,-116 126,-116 126,-92 210,-92 210,-116"/>
-<text text-anchor="middle" x="168" y="-101.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_min</text>
+<title>interface~caf_co_reduce</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node8"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="212.5,-312 123.5,-312 123.5,-288 212.5,-288 212.5,-312"/>
+<text text-anchor="middle" x="168" y="-297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_co_min -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~caf_co_min~~CallsGraph_edge7" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_co_min</title>
-<path fill="none" stroke="#ff0000" d="M42.09,-234.75C51.39,-211.44 74.51,-160.36 109,-130 112.89,-126.58 117.3,-123.54 121.91,-120.85"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="123.7,-123.86 130.94,-116.12 120.46,-117.66 123.7,-123.86"/>
+<title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
+<path fill="none" stroke="#ff0000" d="M73.23,-314.48C85.52,-312.58 99.57,-310.41 112.98,-308.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="113.73,-311.77 123.08,-306.78 112.66,-304.85 113.73,-311.77"/>
 </g>
-<!-- interface~caf_c_is_f_string -->
+<!-- interface~caf_error_stop -->
 <g id="proc~~caf_co_min~~CallsGraph_node9" class="node">
-<title>interface~caf_c_is_f_string</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node9"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
-<polygon fill="#a7506f" stroke="#a7506f" points="497.5,-24 399.5,-24 399.5,0 497.5,0 497.5,-24"/>
-<text text-anchor="middle" x="448.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
+<title>interface~caf_error_stop</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node9"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="723,-272 635,-272 635,-248 723,-248 723,-272"/>
+<text text-anchor="middle" x="679" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_min&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_min~~CallsGraph_edge8" class="edge">
-<title>proc~caf_co_min&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M50.58,-234.85C64.46,-222.28 87.34,-202.51 109,-188 158.4,-154.92 174.96,-153.75 227,-125 299.14,-85.14 313.06,-67.3 388,-33 392.03,-31.16 396.27,-29.37 400.56,-27.67"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="401.85,-30.92 409.96,-24.09 399.36,-24.38 401.85,-30.92"/>
+<title>proc~caf_co_min&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M44,-307.85C70.1,-260.91 172.31,-94 306.5,-94 306.5,-94 306.5,-94 449.5,-94 547.44,-94 631.65,-195.05 663.93,-239.47"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="661.2,-241.67 669.85,-247.79 666.91,-237.62 661.2,-241.67"/>
 </g>
 <!-- proc~caf_co_reduce -->
 <g id="proc~~caf_co_min~~CallsGraph_node10" class="node">
 <title>proc~caf_co_reduce</title>
 <g id="a_proc~~caf_co_min~~CallsGraph_node10"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="352,-234 263,-234 263,-210 352,-210 352,-234"/>
-<text text-anchor="middle" x="307.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="352,-312 263,-312 263,-288 352,-288 352,-312"/>
+<text text-anchor="middle" x="307.5" y="-297.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
 <g id="proc~~caf_co_min~~CallsGraph_edge9" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M212.51,-225.42C225.3,-224.95 239.44,-224.44 252.79,-223.95"/>
-<polygon fill="#00ffff" stroke="#00ffff" points="252.94,-227.45 262.81,-223.59 252.68,-220.45 252.94,-227.45"/>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M212.51,-300C225.3,-300 239.44,-300 252.79,-300"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="252.81,-303.5 262.81,-300 252.81,-296.5 252.81,-303.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~caf_co_min~~CallsGraph_edge10" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M314.94,-234.09C326.72,-255.09 353.71,-298.44 388,-323 394.06,-327.34 401.11,-330.86 408.18,-333.68"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="407.17,-337.04 417.76,-337.12 409.53,-330.45 407.17,-337.04"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="proc~~caf_co_min~~CallsGraph_edge12" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M311.84,-312.03C320.09,-339.56 344.02,-407.64 388,-445 389.57,-446.33 391.22,-447.58 392.94,-448.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="391.62,-452.02 402.03,-453.98 395.11,-445.96 391.62,-452.02"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
-<g id="proc~~caf_co_min~~CallsGraph_edge11" class="edge">
+<g id="proc~~caf_co_min~~CallsGraph_edge14" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M324.38,-234.08C340.05,-245.68 364.92,-263.26 388,-276 394.17,-279.4 400.87,-282.69 407.48,-285.73"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="406.46,-289.1 417.02,-289.96 409.3,-282.7 406.46,-289.1"/>
+<path fill="none" stroke="#ff0000" d="M314.88,-312.33C326.56,-333.76 353.41,-377.97 388,-403 390.1,-404.52 392.31,-405.93 394.61,-407.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="393.27,-410.5 403.78,-411.89 396.43,-404.25 393.27,-410.5"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
-<g id="proc~~caf_co_min~~CallsGraph_edge14" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M348.21,-234.1C360.82,-237.5 374.9,-240.86 388,-243 469.97,-256.38 566.43,-260.41 624.86,-261.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="624.9,-265.08 634.96,-261.76 625.02,-258.08 624.9,-265.08"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<g id="proc~~caf_co_min~~CallsGraph_edge16" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M321.66,-312.21C336.72,-325.67 362.61,-347.23 388,-361 394.42,-364.48 401.54,-367.58 408.54,-370.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="407.37,-373.54 417.96,-373.62 409.73,-366.95 407.37,-373.54"/>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
-<g id="proc~~caf_co_min~~CallsGraph_edge16" class="edge">
+<g id="proc~~caf_co_min~~CallsGraph_edge17" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M335.79,-209.91C341.81,-206.18 347.68,-201.56 352,-196 386.43,-151.7 349.33,-115.66 388,-75 389.06,-73.88 390.19,-72.83 391.36,-71.83"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="393.56,-74.57 399.79,-66 389.58,-68.81 393.56,-74.57"/>
+<path fill="none" stroke="#ff0000" d="M350.2,-312C364.51,-316.12 380.69,-320.77 395.69,-325.09"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="394.77,-328.47 405.34,-327.87 396.7,-321.74 394.77,-328.47"/>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_min~~CallsGraph_edge18" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M318.41,-209.96C328.16,-197.6 342.87,-177.46 352,-158 376.56,-105.66 348.34,-75.07 388,-33 389.03,-31.9 390.13,-30.87 391.27,-29.88"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="393.29,-32.74 399.47,-24.14 389.27,-27.01 393.29,-32.74"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M352.11,-299.78C409.2,-298.9 512.22,-295.23 599,-281 608.67,-279.41 618.86,-277.16 628.6,-274.71"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="629.76,-278.02 638.54,-272.1 627.98,-271.25 629.76,-278.02"/>
 </g>
-<!-- interface~caf_c_same_cfi_type -->
+<!-- interface~assert -->
 <g id="proc~~caf_co_min~~CallsGraph_node11" class="node">
-<title>interface~caf_c_same_cfi_type</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node11"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="509,-192 388,-192 388,-168 509,-168 509,-192"/>
-<text text-anchor="middle" x="448.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
+<title>interface~assert</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node11"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="475.5,-272 421.5,-272 421.5,-248 475.5,-248 475.5,-272"/>
+<text text-anchor="middle" x="448.5" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
-<g id="proc~~caf_co_min~~CallsGraph_edge12" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
-<path fill="none" stroke="#ff0000" d="M348.33,-209.96C363.74,-205.31 381.55,-199.93 397.79,-195.02"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="399.1,-198.28 407.66,-192.04 397.08,-191.58 399.1,-198.28"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<g id="proc~~caf_co_min~~CallsGraph_edge10" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M350.2,-288C369.73,-282.38 392.75,-275.75 411.5,-270.36"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="412.51,-273.71 421.15,-267.58 410.57,-266.98 412.51,-273.71"/>
 </g>
-<!-- interface~assert -->
+<!-- interface~caf_c_elem_len -->
 <g id="proc~~caf_co_min~~CallsGraph_node12" class="node">
-<title>interface~assert</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node12"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="475.5,-234 421.5,-234 421.5,-210 475.5,-210 475.5,-234"/>
-<text text-anchor="middle" x="448.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>interface~caf_c_elem_len</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node12"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
+<polygon fill="#a7506f" stroke="#a7506f" points="495.5,-230 401.5,-230 401.5,-206 495.5,-206 495.5,-230"/>
+<text text-anchor="middle" x="448.5" y="-215.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
-<g id="proc~~caf_co_min~~CallsGraph_edge15" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#ff0000" d="M352.1,-222C371.13,-222 393.19,-222 411.3,-222"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="411.46,-225.5 421.46,-222 411.46,-218.5 411.46,-225.5"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<g id="proc~~caf_co_min~~CallsGraph_edge13" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
+<path fill="none" stroke="#ff0000" d="M321.66,-287.79C336.72,-274.33 362.61,-252.77 388,-239 391.27,-237.22 394.73,-235.55 398.26,-233.98"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="399.79,-237.13 407.7,-230.08 397.12,-230.66 399.79,-237.13"/>
 </g>
 <!-- interface~caf_c_co_reduce -->
 <g id="proc~~caf_co_min~~CallsGraph_node13" class="node">
 <title>interface~caf_c_co_reduce</title>
 <g id="a_proc~~caf_co_min~~CallsGraph_node13"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="498.5,-150 398.5,-150 398.5,-126 498.5,-126 498.5,-150"/>
-<text text-anchor="middle" x="448.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
+<polygon fill="#a7506f" stroke="#a7506f" points="498.5,-188 398.5,-188 398.5,-164 498.5,-164 498.5,-188"/>
+<text text-anchor="middle" x="448.5" y="-173.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
-<g id="proc~~caf_co_min~~CallsGraph_edge17" class="edge">
+<g id="proc~~caf_co_min~~CallsGraph_edge11" class="edge">
 <title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M331.37,-209.84C338.25,-205.79 345.65,-201.02 352,-196 370,-181.77 368.67,-171.37 388,-159 390.59,-157.34 393.33,-155.79 396.16,-154.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="397.76,-157.47 405.38,-150.11 394.84,-151.11 397.76,-157.47"/>
+<path fill="none" stroke="#ff0000" d="M314.88,-287.67C326.56,-266.24 353.41,-222.03 388,-197 390.1,-195.48 392.31,-194.07 394.61,-192.75"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="396.43,-195.75 403.78,-188.11 393.27,-189.5 396.43,-195.75"/>
 </g>
-<!-- interface~caf_c_elem_len -->
+<!-- interface~caf_c_same_cfi_type -->
 <g id="proc~~caf_co_min~~CallsGraph_node14" class="node">
-<title>interface~caf_c_elem_len</title>
-<g id="a_proc~~caf_co_min~~CallsGraph_node14"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
-<polygon fill="#a7506f" stroke="#a7506f" points="495.5,-108 401.5,-108 401.5,-84 495.5,-84 495.5,-108"/>
-<text text-anchor="middle" x="448.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
+<title>interface~caf_c_same_cfi_type</title>
+<g id="a_proc~~caf_co_min~~CallsGraph_node14"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="509,-146 388,-146 388,-122 509,-122 509,-146"/>
+<text text-anchor="middle" x="448.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
-<g id="proc~~caf_co_min~~CallsGraph_edge13" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
-<path fill="none" stroke="#ff0000" d="M334.8,-209.75C341,-205.98 347.19,-201.38 352,-196 377.73,-167.24 359.54,-143.05 388,-117 389.48,-115.64 391.06,-114.37 392.71,-113.18"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="394.73,-116.05 401.47,-107.88 391.1,-110.06 394.73,-116.05"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
+<g id="proc~~caf_co_min~~CallsGraph_edge15" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
+<path fill="none" stroke="#ff0000" d="M311.84,-287.97C320.09,-260.44 344.02,-192.36 388,-155 389.57,-153.67 391.22,-152.42 392.94,-151.25"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="395.11,-154.04 402.03,-146.02 391.62,-147.98 395.11,-154.04"/>
 </g>
 <!-- proc~assert -->
 <g id="proc~~caf_co_min~~CallsGraph_node15" class="node">
 <title>proc~assert</title>
 <g id="a_proc~~caf_co_min~~CallsGraph_node15"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="599,-234 545,-234 545,-210 599,-210 599,-234"/>
-<text text-anchor="middle" x="572" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="599,-272 545,-272 545,-248 599,-248 599,-272"/>
+<text text-anchor="middle" x="572" y="-257.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
 <!-- interface~assert&#45;&gt;proc~assert -->
 <g id="proc~~caf_co_min~~CallsGraph_edge19" class="edge">
 <title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M475.56,-222C492.86,-222 515.8,-222 534.85,-222"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="534.98,-225.5 544.98,-222 534.98,-218.5 534.98,-225.5"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M475.56,-260C492.86,-260 515.8,-260 534.85,-260"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="534.98,-263.5 544.98,-260 534.98,-256.5 534.98,-263.5"/>
 </g>
 <!-- proc~assert&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_min~~CallsGraph_edge20" class="edge">
 <title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M599.23,-231.99C610.55,-236.31 624.08,-241.46 636.7,-246.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="635.53,-249.57 646.12,-249.85 638.02,-243.02 635.53,-249.57"/>
+<path fill="none" stroke="#ff0000" d="M599.23,-260C607.08,-260 615.99,-260 624.93,-260"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="624.97,-263.5 634.97,-260 624.97,-256.5 624.97,-263.5"/>
 </g>
 </g>
 </svg>
@@ -624,7 +624,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_co_reduce.html b/proc/caf_co_reduce.html
index f68a8dd4..e6fd1bd7 100644
--- a/proc/caf_co_reduce.html
+++ b/proc/caf_co_reduce.html
@@ -131,7 +131,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~13"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~4"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
@@ -143,19 +143,19 @@ <h3>Arguments</h3>
   <td><strong>operation</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~7"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image~3"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~7"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~4"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~6"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~4"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -176,171 +176,171 @@ <h3 class="panel-title">Calls</h3>
  -->
 <!-- Title: proc~~caf_co_reduce~~CallsGraph Pages: 1 -->
 <svg id="proccaf_co_reduceCallsGraph" width="468pt" height="364pt"
- viewBox="0.00 0.00 468.00 364.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~caf_co_reduce~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 360)">
+ viewBox="0.00 0.00 468.00 364.13" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~caf_co_reduce~~CallsGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 360.13)">
 <title>proc~~caf_co_reduce~~CallsGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-360 464,-360 464,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-360.13 464,-360.13 464,4 -4,4"/>
 <!-- proc~caf_co_reduce -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node1" class="node">
 <title>proc~caf_co_reduce</title>
-<polygon fill="none" stroke="black" points="89,-192 0,-192 0,-168 89,-168 89,-192"/>
-<text text-anchor="middle" x="44.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_reduce</text>
+<polygon fill="none" stroke="black" points="89,-188.13 0,-188.13 0,-164.13 89,-164.13 89,-188.13"/>
+<text text-anchor="middle" x="44.5" y="-173.73" font-family="Helvetica,sans-Serif" font-size="10.50">caf_co_reduce</text>
 </g>
-<!-- proc~get_c_ptr -->
+<!-- interface~assert -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node2" class="node">
-<title>proc~get_c_ptr</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node2"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="216,-356 155,-356 155,-332 216,-332 216,-356"/>
-<text text-anchor="middle" x="185.5" y="-341.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
+<title>interface~assert</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node2"><a xlink:href=".././interface/assert.html" xlink:title="assert">
+<polygon fill="#a7506f" stroke="#a7506f" points="212.5,-356.13 158.5,-356.13 158.5,-332.13 212.5,-332.13 212.5,-356.13"/>
+<text text-anchor="middle" x="185.5" y="-341.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
 <g id="proc~~caf_co_reduce~~CallsGraph_edge1" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M49.02,-192.27C57.49,-219.68 81.6,-286.34 125,-323 130.81,-327.91 137.85,-331.7 145.02,-334.62"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="144.18,-338.03 154.77,-338.08 146.52,-331.44 144.18,-338.03"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
+<path fill="none" stroke="#ff0000" d="M48.79,-188.32C56.94,-216.23 80.67,-285.24 125,-323.13 131.76,-328.91 140.22,-333.14 148.62,-336.21"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="147.76,-339.61 158.35,-339.32 149.89,-332.94 147.76,-339.61"/>
 </g>
-<!-- proc~optional_value -->
+<!-- interface~caf_c_is_f_string -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node3" class="node">
-<title>proc~optional_value</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node3"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="231,-314 140,-314 140,-290 231,-290 231,-314"/>
-<text text-anchor="middle" x="185.5" y="-299.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<title>interface~caf_c_is_f_string</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node3"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
+<polygon fill="#a7506f" stroke="#a7506f" points="234.5,-314.13 136.5,-314.13 136.5,-290.13 234.5,-290.13 234.5,-314.13"/>
+<text text-anchor="middle" x="185.5" y="-299.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
-<g id="proc~~caf_co_reduce~~CallsGraph_edge2" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M52.87,-192.18C65.45,-212.08 92.85,-251.78 125,-276 129.67,-279.52 134.9,-282.68 140.25,-285.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="138.8,-288.67 149.33,-289.86 141.84,-282.36 138.8,-288.67"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<g id="proc~~caf_co_reduce~~CallsGraph_edge3" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
+<path fill="none" stroke="#ff0000" d="M51.63,-188.36C63.12,-210.08 89.92,-255.5 125,-281.13 127.09,-282.66 129.3,-284.08 131.59,-285.41"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="130.25,-288.65 140.75,-290.06 133.42,-282.41 130.25,-288.65"/>
 </g>
-<!-- interface~caf_error_stop -->
+<!-- interface~caf_c_co_reduce -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node4" class="node">
-<title>interface~caf_error_stop</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node4"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
-<polygon fill="#a7506f" stroke="#a7506f" points="460,-212 372,-212 372,-188 460,-188 460,-212"/>
-<text text-anchor="middle" x="416" y="-197.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
+<title>interface~caf_c_co_reduce</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node4"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="235.5,-272.13 135.5,-272.13 135.5,-248.13 235.5,-248.13 235.5,-272.13"/>
+<text text-anchor="middle" x="185.5" y="-257.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
-<g id="proc~~caf_co_reduce~~CallsGraph_edge5" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M55.84,-192.15C69.73,-207.44 96.06,-232.92 125,-243 212.97,-273.63 323.37,-238.49 379.17,-215.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="380.71,-219.11 388.62,-212.06 378.04,-212.64 380.71,-219.11"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
+<g id="proc~~caf_co_reduce~~CallsGraph_edge2" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
+<path fill="none" stroke="#ff0000" d="M58.04,-188.27C72.96,-202.16 99.1,-224.82 125,-239.13 128.21,-240.9 131.6,-242.57 135.06,-244.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="133.76,-247.38 144.34,-248.01 136.46,-240.92 133.76,-247.38"/>
 </g>
-<!-- interface~caf_c_same_cfi_type -->
+<!-- interface~caf_c_elem_len -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node5" class="node">
-<title>interface~caf_c_same_cfi_type</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node5"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
-<polygon fill="#a7506f" stroke="#a7506f" points="246,-234 125,-234 125,-210 246,-210 246,-234"/>
-<text text-anchor="middle" x="185.5" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
+<title>interface~caf_c_elem_len</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node5"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
+<polygon fill="#a7506f" stroke="#a7506f" points="232.5,-230.13 138.5,-230.13 138.5,-206.13 232.5,-206.13 232.5,-230.13"/>
+<text text-anchor="middle" x="185.5" y="-215.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
-<g id="proc~~caf_co_reduce~~CallsGraph_edge3" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
-<path fill="none" stroke="#ff0000" d="M85.33,-192.04C100.74,-196.69 118.55,-202.07 134.79,-206.98"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="134.08,-210.42 144.66,-209.96 136.1,-203.72 134.08,-210.42"/>
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
+<g id="proc~~caf_co_reduce~~CallsGraph_edge4" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
+<path fill="none" stroke="#ff0000" d="M85.33,-188.17C100.74,-192.82 118.55,-198.2 134.79,-203.11"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="134.08,-206.55 144.66,-206.09 136.1,-199.85 134.08,-206.55"/>
 </g>
-<!-- interface~caf_c_elem_len -->
+<!-- proc~optional_value -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node6" class="node">
-<title>interface~caf_c_elem_len</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node6"><a xlink:href=".././interface/caf_c_elem_len.html" xlink:title="caf_c_elem_len">
-<polygon fill="#a7506f" stroke="#a7506f" points="232.5,-192 138.5,-192 138.5,-168 232.5,-168 232.5,-192"/>
-<text text-anchor="middle" x="185.5" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_elem_len</text>
+<title>proc~optional_value</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node6"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="231,-188.13 140,-188.13 140,-164.13 231,-164.13 231,-188.13"/>
+<text text-anchor="middle" x="185.5" y="-173.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len -->
-<g id="proc~~caf_co_reduce~~CallsGraph_edge4" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_elem_len</title>
-<path fill="none" stroke="#ff0000" d="M89.1,-180C101.41,-180 114.99,-180 127.95,-180"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="128.17,-183.5 138.17,-180 128.17,-176.5 128.17,-183.5"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
+<g id="proc~~caf_co_reduce~~CallsGraph_edge5" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M89.1,-176.13C101.92,-176.13 116.1,-176.13 129.53,-176.13"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="129.62,-179.63 139.62,-176.13 129.62,-172.63 129.62,-179.63"/>
 </g>
-<!-- interface~assert -->
+<!-- interface~caf_c_same_cfi_type -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node7" class="node">
-<title>interface~assert</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node7"><a xlink:href=".././interface/assert.html" xlink:title="assert">
-<polygon fill="#a7506f" stroke="#a7506f" points="212.5,-150 158.5,-150 158.5,-126 212.5,-126 212.5,-150"/>
-<text text-anchor="middle" x="185.5" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<title>interface~caf_c_same_cfi_type</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node7"><a xlink:href=".././interface/caf_c_same_cfi_type.html" xlink:title="caf_c_same_cfi_type">
+<polygon fill="#a7506f" stroke="#a7506f" points="246,-146.13 125,-146.13 125,-122.13 246,-122.13 246,-146.13"/>
+<text text-anchor="middle" x="185.5" y="-131.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_same_cfi_type</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~assert -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type -->
 <g id="proc~~caf_co_reduce~~CallsGraph_edge6" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~assert</title>
-<path fill="none" stroke="#ff0000" d="M85.33,-167.96C105.28,-161.94 129.24,-154.7 148.61,-148.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="149.72,-152.17 158.28,-145.92 147.7,-145.46 149.72,-152.17"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_same_cfi_type</title>
+<path fill="none" stroke="#ff0000" d="M85.33,-164.1C100.74,-159.44 118.55,-154.06 134.79,-149.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="136.1,-152.41 144.66,-146.17 134.08,-145.71 136.1,-152.41"/>
 </g>
-<!-- proc~get_c_ptr_character -->
+<!-- proc~get_c_ptr -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node8" class="node">
-<title>proc~get_c_ptr_character</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node8"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="244.5,-108 126.5,-108 126.5,-84 244.5,-84 244.5,-108"/>
-<text text-anchor="middle" x="185.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<title>proc~get_c_ptr</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node8"><a xlink:href=".././proc/get_c_ptr.html" xlink:title="get_c_ptr">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="216,-104.13 155,-104.13 155,-80.13 216,-80.13 216,-104.13"/>
+<text text-anchor="middle" x="185.5" y="-89.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
 <g id="proc~~caf_co_reduce~~CallsGraph_edge7" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M58.04,-167.86C72.96,-153.97 99.1,-131.31 125,-117 128.21,-115.23 131.6,-113.56 135.06,-112"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="136.46,-115.21 144.34,-108.12 133.76,-108.75 136.46,-115.21"/>
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M58.04,-163.99C72.96,-150.1 99.1,-127.44 125,-113.13 131.39,-109.6 138.49,-106.48 145.5,-103.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="146.69,-107.1 154.92,-100.42 144.32,-100.51 146.69,-107.1"/>
 </g>
-<!-- interface~caf_c_co_reduce -->
+<!-- proc~get_c_ptr_character -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node9" class="node">
-<title>interface~caf_c_co_reduce</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node9"><a xlink:href=".././interface/caf_c_co_reduce.html" xlink:title="caf_c_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="235.5,-66 135.5,-66 135.5,-42 235.5,-42 235.5,-66"/>
-<text text-anchor="middle" x="185.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_reduce</text>
+<title>proc~get_c_ptr_character</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node9"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="244.5,-62.13 126.5,-62.13 126.5,-38.13 244.5,-38.13 244.5,-62.13"/>
+<text text-anchor="middle" x="185.5" y="-47.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce -->
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
 <g id="proc~~caf_co_reduce~~CallsGraph_edge8" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_co_reduce</title>
-<path fill="none" stroke="#ff0000" d="M51.63,-167.77C63.12,-146.05 89.92,-100.63 125,-75 127.09,-73.47 129.3,-72.05 131.59,-70.72"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="133.42,-73.72 140.75,-66.07 130.25,-67.48 133.42,-73.72"/>
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0000" d="M51.63,-163.9C63.12,-142.18 89.92,-96.76 125,-71.13 127.09,-69.6 129.3,-68.18 131.59,-66.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="133.42,-69.85 140.75,-62.2 130.25,-63.61 133.42,-69.85"/>
 </g>
-<!-- interface~caf_c_is_f_string -->
+<!-- interface~caf_error_stop -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node10" class="node">
-<title>interface~caf_c_is_f_string</title>
-<g id="a_proc~~caf_co_reduce~~CallsGraph_node10"><a xlink:href=".././interface/caf_c_is_f_string.html" xlink:title="caf_c_is_f_string">
-<polygon fill="#a7506f" stroke="#a7506f" points="234.5,-24 136.5,-24 136.5,0 234.5,0 234.5,-24"/>
-<text text-anchor="middle" x="185.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_is_f_string</text>
+<title>interface~caf_error_stop</title>
+<g id="a_proc~~caf_co_reduce~~CallsGraph_node10"><a xlink:href=".././interface/caf_error_stop.html" xlink:title="caf_error_stop">
+<polygon fill="#a7506f" stroke="#a7506f" points="460,-42.13 372,-42.13 372,-18.13 460,-18.13 460,-42.13"/>
+<text text-anchor="middle" x="416" y="-27.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_error_stop</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string -->
+<!-- proc~caf_co_reduce&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_reduce~~CallsGraph_edge9" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;interface~caf_c_is_f_string</title>
-<path fill="none" stroke="#ff0000" d="M48.79,-167.81C56.94,-139.9 80.67,-70.89 125,-33 126.53,-31.69 128.15,-30.46 129.83,-29.31"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="131.82,-32.2 138.71,-24.15 128.31,-26.15 131.82,-32.2"/>
+<title>proc~caf_co_reduce&#45;&gt;interface~caf_error_stop</title>
+<path fill="none" stroke="#ff0000" d="M47.81,-163.72C54.06,-134.05 74.41,-59.29 125,-29.13 199.36,15.19 304.64,-0.47 365.77,-15.54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="365,-18.95 375.56,-18.04 366.74,-12.17 365,-18.95"/>
 </g>
 <!-- proc~assert -->
 <g id="proc~~caf_co_reduce~~CallsGraph_node11" class="node">
 <title>proc~assert</title>
 <g id="a_proc~~caf_co_reduce~~CallsGraph_node11"><a xlink:href=".././proc/assert.html" xlink:title="assert">
-<polygon fill="#d9534f" stroke="#d9534f" points="336,-192 282,-192 282,-168 336,-168 336,-192"/>
-<text text-anchor="middle" x="309" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
+<polygon fill="#d9534f" stroke="#d9534f" points="336,-209.13 282,-209.13 282,-185.13 336,-185.13 336,-209.13"/>
+<text text-anchor="middle" x="309" y="-194.73" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert</text>
 </a>
 </g>
 </g>
 <!-- interface~assert&#45;&gt;proc~assert -->
 <g id="proc~~caf_co_reduce~~CallsGraph_edge10" class="edge">
 <title>interface~assert&#45;&gt;proc~assert</title>
-<path fill="none" stroke="#00a9ff" stroke-dasharray="5,2" d="M212.56,-147.01C230.02,-153.04 253.23,-161.07 272.38,-167.69"/>
-<polygon fill="#00a9ff" stroke="#00a9ff" points="271.38,-171.05 281.98,-171 273.67,-164.43 271.38,-171.05"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M212.79,-339.49C224.07,-336.41 236.75,-331.35 246,-323.13 277.54,-295.11 294.77,-247.41 302.62,-219.43"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="306.09,-219.98 305.27,-209.42 299.33,-218.19 306.09,-219.98"/>
 </g>
 <!-- proc~assert&#45;&gt;interface~caf_error_stop -->
 <g id="proc~~caf_co_reduce~~CallsGraph_edge11" class="edge">
 <title>proc~assert&#45;&gt;interface~caf_error_stop</title>
-<path fill="none" stroke="#ff0000" d="M336.23,-185C344.08,-186.49 352.99,-188.19 361.93,-189.89"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="361.49,-193.37 371.97,-191.8 362.8,-186.49 361.49,-193.37"/>
+<path fill="none" stroke="#ff0000" d="M317.55,-185.12C335.25,-156.97 379.59,-86.46 401.83,-51.07"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="404.87,-52.81 407.23,-42.48 398.95,-49.09 404.87,-52.81"/>
 </g>
 </g>
 </svg>
@@ -600,7 +600,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_co_sum.html b/proc/caf_co_sum.html
index 953ae58a..c8ff89c9 100644
--- a/proc/caf_co_sum.html
+++ b/proc/caf_co_sum.html
@@ -131,25 +131,25 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-a~14"></span>type(*),</td>
+  <td><span class="anchor" id="variable-a~5"></span>type(*),</td>
 <td>intent(inout),</td>
   <td></td>  <td>contiguous, target</td><td>::</td>
   <td><strong>a</strong>(..)</td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-result_image~8"></span>integer,</td>
+  <td><span class="anchor" id="variable-result_image~4"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>result_image</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~8"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~5"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~7"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~5"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -195,48 +195,48 @@ <h3 class="panel-title">Calls</h3>
 <path fill="none" stroke="#ff0000" d="M57.09,-87C71.45,-95.97 92.01,-108.15 111,-117 116.92,-119.76 123.32,-122.4 129.63,-124.82"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="128.79,-128.24 139.38,-128.42 131.21,-121.67 128.79,-128.24"/>
 </g>
-<!-- interface~caf_c_co_sum -->
+<!-- proc~optional_value -->
 <g id="proc~~caf_co_sum~~CallsGraph_node3" class="node">
-<title>interface~caf_c_co_sum</title>
-<g id="a_proc~~caf_co_sum~~CallsGraph_node3"><a xlink:href=".././interface/caf_c_co_sum.html" xlink:title="caf_c_co_sum">
-<polygon fill="#a7506f" stroke="#a7506f" points="213,-108 127,-108 127,-84 213,-84 213,-108"/>
-<text text-anchor="middle" x="170" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_sum</text>
+<title>proc~optional_value</title>
+<g id="a_proc~~caf_co_sum~~CallsGraph_node3"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="215.5,-108 124.5,-108 124.5,-84 215.5,-84 215.5,-108"/>
+<text text-anchor="middle" x="170" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum -->
+<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
 <g id="proc~~caf_co_sum~~CallsGraph_edge2" class="edge">
-<title>proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum</title>
-<path fill="none" stroke="#ff0000" d="M75.2,-80.91C88.06,-82.98 102.76,-85.34 116.65,-87.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="116.16,-91.04 126.59,-89.18 117.27,-84.13 116.16,-91.04"/>
+<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M75.2,-80.91C87.33,-82.86 101.11,-85.08 114.3,-87.2"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="113.8,-90.66 124.23,-88.8 114.91,-83.75 113.8,-90.66"/>
 </g>
-<!-- proc~optional_value -->
+<!-- proc~get_c_ptr_character -->
 <g id="proc~~caf_co_sum~~CallsGraph_node4" class="node">
-<title>proc~optional_value</title>
-<g id="a_proc~~caf_co_sum~~CallsGraph_node4"><a xlink:href=".././proc/optional_value.html" xlink:title="optional_value">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="215.5,-66 124.5,-66 124.5,-42 215.5,-42 215.5,-66"/>
-<text text-anchor="middle" x="170" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">optional_value</text>
+<title>proc~get_c_ptr_character</title>
+<g id="a_proc~~caf_co_sum~~CallsGraph_node4"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
+<polygon fill="#d94e8f" stroke="#d94e8f" points="229,-66 111,-66 111,-42 229,-42 229,-66"/>
+<text text-anchor="middle" x="170" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
+<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
 <g id="proc~~caf_co_sum~~CallsGraph_edge3" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M75.2,-69.09C87.33,-67.14 101.11,-64.92 114.3,-62.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.91,-66.25 124.23,-61.2 113.8,-59.34 114.91,-66.25"/>
+<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0000" d="M75.2,-69.09C83.2,-67.81 91.91,-66.41 100.69,-64.99"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="101.29,-68.44 110.6,-63.4 100.18,-61.53 101.29,-68.44"/>
 </g>
-<!-- proc~get_c_ptr_character -->
+<!-- interface~caf_c_co_sum -->
 <g id="proc~~caf_co_sum~~CallsGraph_node5" class="node">
-<title>proc~get_c_ptr_character</title>
-<g id="a_proc~~caf_co_sum~~CallsGraph_node5"><a xlink:href=".././proc/get_c_ptr_character.html" xlink:title="get_c_ptr_character">
-<polygon fill="#d94e8f" stroke="#d94e8f" points="229,-24 111,-24 111,0 229,0 229,-24"/>
-<text text-anchor="middle" x="170" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">get_c_ptr_character</text>
+<title>interface~caf_c_co_sum</title>
+<g id="a_proc~~caf_co_sum~~CallsGraph_node5"><a xlink:href=".././interface/caf_c_co_sum.html" xlink:title="caf_c_co_sum">
+<polygon fill="#a7506f" stroke="#a7506f" points="213,-24 127,-24 127,0 213,0 213,-24"/>
+<text text-anchor="middle" x="170" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_c_co_sum</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
+<!-- proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum -->
 <g id="proc~~caf_co_sum~~CallsGraph_edge4" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
+<title>proc~caf_co_sum&#45;&gt;interface~caf_c_co_sum</title>
 <path fill="none" stroke="#ff0000" d="M57.09,-63C71.45,-54.03 92.01,-41.85 111,-33 114.88,-31.19 118.95,-29.44 123.08,-27.76"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="124.66,-30.91 132.71,-24.02 122.12,-24.38 124.66,-30.91"/>
 </g>
@@ -438,7 +438,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_decaffeinate.html b/proc/caf_decaffeinate.html
index 092451bb..ef1fc84b 100644
--- a/proc/caf_decaffeinate.html
+++ b/proc/caf_decaffeinate.html
@@ -375,7 +375,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_end_team.html b/proc/caf_end_team.html
index 29b4da33..cd98395b 100644
--- a/proc/caf_end_team.html
+++ b/proc/caf_end_team.html
@@ -265,7 +265,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_error_stop_character.html b/proc/caf_error_stop_character.html
index aff03a93..2e65f50a 100644
--- a/proc/caf_error_stop_character.html
+++ b/proc/caf_error_stop_character.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_error_stop_integer.html b/proc/caf_error_stop_integer.html
index e2cecc77..96c3a2b5 100644
--- a/proc/caf_error_stop_integer.html
+++ b/proc/caf_error_stop_integer.html
@@ -163,7 +163,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_form_team.html b/proc/caf_form_team.html
index d567b7b5..9df43989 100644
--- a/proc/caf_form_team.html
+++ b/proc/caf_form_team.html
@@ -149,13 +149,13 @@ <h3>Arguments</h3>
   <td><strong>new_index</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-stat~3"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~6"></span>integer,</td>
 <td>intent(out),</td>
   <td>optional</td>  <td></td><td>::</td>
   <td><strong>stat</strong></td><td></td>
 </tr>
 <tr>
-  <td><span class="anchor" id="variable-errmsg~2"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~6"></span>character(len=*),</td>
 <td>intent(inout),</td>
   <td>optional</td>  <td></td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -299,7 +299,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_stop_character.html b/proc/caf_stop_character.html
index 9cf60f98..885f570a 100644
--- a/proc/caf_stop_character.html
+++ b/proc/caf_stop_character.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_stop_character~2.html b/proc/caf_stop_character~2.html
index 2c3e4140..944e08e3 100644
--- a/proc/caf_stop_character~2.html
+++ b/proc/caf_stop_character~2.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_stop_integer.html b/proc/caf_stop_integer.html
index ec3f5dfc..6ec8e03a 100644
--- a/proc/caf_stop_integer.html
+++ b/proc/caf_stop_integer.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_stop_integer~2.html b/proc/caf_stop_integer~2.html
index 57f83ed4..d6704e2b 100644
--- a/proc/caf_stop_integer~2.html
+++ b/proc/caf_stop_integer~2.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/caf_sync_all.html b/proc/caf_sync_all.html
index fb1dc1e8..b2484860 100644
--- a/proc/caf_sync_all.html
+++ b/proc/caf_sync_all.html
@@ -395,7 +395,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/construct.html b/proc/construct.html
index 7468fa92..5a387b7a 100644
--- a/proc/construct.html
+++ b/proc/construct.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/f_c_string.html b/proc/f_c_string.html
index 8a3b76d2..48cfcd56 100644
--- a/proc/f_c_string.html
+++ b/proc/f_c_string.html
@@ -276,7 +276,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/get_c_ptr.html b/proc/get_c_ptr.html
index 5e68d0de..ab6af60d 100644
--- a/proc/get_c_ptr.html
+++ b/proc/get_c_ptr.html
@@ -130,7 +130,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-stat"></span>integer,</td>
+  <td><span class="anchor" id="variable-stat~7"></span>integer,</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>stat</strong></td><td></td>
@@ -152,178 +152,178 @@ <h3 class="panel-title">Called by</h3>
 <!-- Generated by graphviz version 2.43.0 (0)
  -->
 <!-- Title: proc~~get_c_ptr~~CalledByGraph Pages: 1 -->
-<svg id="procget_c_ptrCalledByGraph" width="575pt" height="190pt"
- viewBox="0.00 0.00 575.00 189.63" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
-<g id="proc~~get_c_ptr~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 185.63)">
+<svg id="procget_c_ptrCalledByGraph" width="575pt" height="192pt"
+ viewBox="0.00 0.00 575.00 192.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+<g id="proc~~get_c_ptr~~CalledByGraph" class="graph" transform="scale(1 1) rotate(0) translate(4 188)">
 <title>proc~~get_c_ptr~~CalledByGraph</title>
-<polygon fill="white" stroke="transparent" points="-4,4 -4,-185.63 571,-185.63 571,4 -4,4"/>
+<polygon fill="white" stroke="transparent" points="-4,4 -4,-188 571,-188 571,4 -4,4"/>
 <!-- proc~get_c_ptr -->
 <g id="proc~~get_c_ptr~~CalledByGraph_node1" class="node">
 <title>proc~get_c_ptr</title>
-<polygon fill="none" stroke="black" points="567,-106 506,-106 506,-82 567,-82 567,-106"/>
-<text text-anchor="middle" x="536.5" y="-91.6" font-family="Helvetica,sans-Serif" font-size="10.50">get_c_ptr</text>
+<polygon fill="none" stroke="black" points="567,-104 506,-104 506,-80 567,-80 567,-104"/>
+<text text-anchor="middle" x="536.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50">get_c_ptr</text>
 </g>
-<!-- proc~caf_co_max -->
+<!-- proc~caf_co_broadcast -->
 <g id="proc~~get_c_ptr~~CalledByGraph_node2" class="node">
+<title>proc~caf_co_broadcast</title>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node2"><a xlink:href=".././proc/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
+<polygon fill="#d9534f" stroke="#d9534f" points="470,-184 365,-184 365,-160 470,-160 470,-184"/>
+<text text-anchor="middle" x="417.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
+</a>
+</g>
+</g>
+<!-- proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr -->
+<g id="proc~~get_c_ptr~~CalledByGraph_edge1" class="edge">
+<title>proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M445.06,-160C453.27,-155.92 462.2,-151.09 470,-146 485.99,-135.56 502.58,-121.85 515.06,-110.85"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="517.51,-113.36 522.62,-104.08 512.84,-108.15 517.51,-113.36"/>
+</g>
+<!-- proc~caf_co_reduce -->
+<g id="proc~~get_c_ptr~~CalledByGraph_node3" class="node">
+<title>proc~caf_co_reduce</title>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#d9534f" stroke="#d9534f" points="462,-104 373,-104 373,-80 462,-80 462,-104"/>
+<text text-anchor="middle" x="417.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+</a>
+</g>
+</g>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
+<g id="proc~~get_c_ptr~~CalledByGraph_edge2" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M462.07,-92C473.1,-92 484.88,-92 495.71,-92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="495.75,-95.5 505.75,-92 495.75,-88.5 495.75,-95.5"/>
+</g>
+<!-- proc~caf_co_max -->
+<g id="proc~~get_c_ptr~~CalledByGraph_node4" class="node">
 <title>proc~caf_co_max</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node2"><a xlink:href=".././proc/caf_co_max.html" xlink:title="caf_co_max">
-<polygon fill="#d9534f" stroke="#d9534f" points="188,-115 112,-115 112,-91 188,-91 188,-115"/>
-<text text-anchor="middle" x="150" y="-100.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node4"><a xlink:href=".././proc/caf_co_max.html" xlink:title="caf_co_max">
+<polygon fill="#d9534f" stroke="#d9534f" points="188,-134 112,-134 112,-110 188,-110 188,-134"/>
+<text text-anchor="middle" x="150" y="-119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge1" class="edge">
+<g id="proc~~get_c_ptr~~CalledByGraph_edge3" class="edge">
 <title>proc~caf_co_max&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M188.22,-102.13C260.79,-100.43 420.63,-96.69 495.43,-94.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="495.91,-98.43 505.83,-94.69 495.75,-91.43 495.91,-98.43"/>
+<path fill="none" stroke="#ff0000" d="M188.17,-124.31C248.02,-127.29 369.24,-130.22 470,-113 478.63,-111.53 487.69,-109.17 496.22,-106.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="497.5,-109.83 505.94,-103.43 495.35,-103.17 497.5,-109.83"/>
 </g>
 <!-- interface~caf_co_reduce -->
-<g id="proc~~get_c_ptr~~CalledByGraph_node11" class="node">
+<g id="proc~~get_c_ptr~~CalledByGraph_node9" class="node">
 <title>interface~caf_co_reduce</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node11"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#a7506f" stroke="#a7506f" points="321,-146 232,-146 232,-122 321,-122 321,-146"/>
-<text text-anchor="middle" x="276.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node9"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#a7506f" stroke="#a7506f" points="321,-104 232,-104 232,-80 321,-80 321,-104"/>
+<text text-anchor="middle" x="276.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~get_c_ptr~~CalledByGraph_edge11" class="edge">
 <title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#cc00ff" d="M188.02,-112.22C198.66,-114.87 210.49,-117.81 221.92,-120.66"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="221.28,-124.11 231.82,-123.13 222.97,-117.31 221.28,-124.11"/>
-</g>
-<!-- proc~caf_co_sum -->
-<g id="proc~~get_c_ptr~~CalledByGraph_node3" class="node">
-<title>proc~caf_co_sum</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#d9534f" stroke="#d9534f" points="455,-66 380,-66 380,-42 455,-42 455,-66"/>
-<text text-anchor="middle" x="417.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
-</a>
-</g>
-</g>
-<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge5" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M453.6,-66C467.04,-70.59 482.44,-75.86 496.24,-80.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="495.35,-83.97 505.95,-83.9 497.62,-77.35 495.35,-83.97"/>
+<path fill="none" stroke="#00ff66" d="M188.02,-113.08C198.66,-110.52 210.49,-107.66 221.92,-104.91"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="222.92,-108.27 231.82,-102.52 221.28,-101.46 222.92,-108.27"/>
 </g>
 <!-- proc~caf_co_min -->
-<g id="proc~~get_c_ptr~~CalledByGraph_node4" class="node">
+<g id="proc~~get_c_ptr~~CalledByGraph_node5" class="node">
 <title>proc~caf_co_min</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node4"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
-<polygon fill="#d9534f" stroke="#d9534f" points="186.5,-176 113.5,-176 113.5,-152 186.5,-152 186.5,-176"/>
-<text text-anchor="middle" x="150" y="-161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node5"><a xlink:href=".././proc/caf_co_min.html" xlink:title="caf_co_min">
+<polygon fill="#d9534f" stroke="#d9534f" points="186.5,-73 113.5,-73 113.5,-49 186.5,-49 186.5,-73"/>
+<text text-anchor="middle" x="150" y="-58.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
 <!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge3" class="edge">
+<g id="proc~~get_c_ptr~~CalledByGraph_edge4" class="edge">
 <title>proc~caf_co_min&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M186.65,-170.87C247.44,-180.91 373.88,-194.4 470,-155 490.67,-146.53 508.79,-128.33 520.69,-114"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="523.48,-116.12 526.96,-106.12 518,-111.77 523.48,-116.12"/>
+<path fill="none" stroke="#ff0000" d="M186.73,-58.9C246.06,-56.14 368.44,-53.48 470,-71 478.63,-72.49 487.69,-74.85 496.22,-77.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="495.35,-80.85 505.94,-80.59 497.5,-74.19 495.35,-80.85"/>
 </g>
 <!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~get_c_ptr~~CalledByGraph_edge12" class="edge">
 <title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#cc00ff" d="M186.68,-155.4C197.68,-152.75 210.05,-149.77 221.98,-146.9"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="222.95,-150.26 231.85,-144.52 221.31,-143.46 222.95,-150.26"/>
-</g>
-<!-- proc~caf_co_reduce -->
-<g id="proc~~get_c_ptr~~CalledByGraph_node5" class="node">
-<title>proc~caf_co_reduce</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node5"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="462,-146 373,-146 373,-122 462,-122 462,-146"/>
-<text text-anchor="middle" x="417.5" y="-131.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
-</a>
-</g>
-</g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge4" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M453.6,-122C467.04,-117.41 482.44,-112.14 496.24,-107.42"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="497.62,-110.65 505.95,-104.1 495.35,-104.03 497.62,-110.65"/>
+<path fill="none" stroke="#00ff66" d="M186.68,-69.88C197.68,-72.62 210.05,-75.7 221.98,-78.67"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="221.31,-82.11 231.85,-81.13 223,-75.32 221.31,-82.11"/>
 </g>
-<!-- proc~caf_co_broadcast -->
+<!-- proc~caf_co_sum -->
 <g id="proc~~get_c_ptr~~CalledByGraph_node6" class="node">
-<title>proc~caf_co_broadcast</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node6"><a xlink:href=".././proc/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
-<polygon fill="#d9534f" stroke="#d9534f" points="470,-24 365,-24 365,0 470,0 470,-24"/>
-<text text-anchor="middle" x="417.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
+<title>proc~caf_co_sum</title>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node6"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#d9534f" stroke="#d9534f" points="455,-24 380,-24 380,0 455,0 455,-24"/>
+<text text-anchor="middle" x="417.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge2" class="edge">
-<title>proc~caf_co_broadcast&#45;&gt;proc~get_c_ptr</title>
-<path fill="none" stroke="#ff0000" d="M453.17,-24.1C458.97,-26.7 464.79,-29.67 470,-33 488,-44.5 505.56,-61.24 517.95,-74.27"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="515.6,-76.88 524.97,-81.83 520.73,-72.12 515.6,-76.88"/>
+<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr -->
+<g id="proc~~get_c_ptr~~CalledByGraph_edge5" class="edge">
+<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr</title>
+<path fill="none" stroke="#ff0000" d="M445.06,-24C453.27,-28.08 462.2,-32.91 470,-38 485.99,-48.44 502.58,-62.15 515.06,-73.15"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="512.84,-75.85 522.62,-79.92 517.51,-70.64 512.84,-75.85"/>
 </g>
-<!-- interface~caf_co_max -->
+<!-- interface~caf_co_broadcast -->
 <g id="proc~~get_c_ptr~~CalledByGraph_node7" class="node">
-<title>interface~caf_co_max</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node7"><a xlink:href=".././interface/caf_co_max.html" xlink:title="caf_co_max">
-<polygon fill="#a7506f" stroke="#a7506f" points="76,-115 0,-115 0,-91 76,-91 76,-115"/>
-<text text-anchor="middle" x="38" y="-100.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
+<title>interface~caf_co_broadcast</title>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node7"><a xlink:href=".././interface/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
+<polygon fill="#a7506f" stroke="#a7506f" points="329,-184 224,-184 224,-160 329,-160 329,-184"/>
+<text text-anchor="middle" x="276.5" y="-169.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_max&#45;&gt;proc~caf_co_max -->
+<!-- interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast -->
 <g id="proc~~get_c_ptr~~CalledByGraph_edge6" class="edge">
-<title>interface~caf_co_max&#45;&gt;proc~caf_co_max</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M76.24,-103C84.39,-103 93.13,-103 101.62,-103"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="101.8,-106.5 111.8,-103 101.8,-99.5 101.8,-106.5"/>
+<title>interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M329.26,-172C337.49,-172 346.08,-172 354.51,-172"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="354.7,-175.5 364.7,-172 354.7,-168.5 354.7,-175.5"/>
 </g>
-<!-- interface~caf_co_broadcast -->
+<!-- interface~caf_co_min -->
 <g id="proc~~get_c_ptr~~CalledByGraph_node8" class="node">
-<title>interface~caf_co_broadcast</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node8"><a xlink:href=".././interface/caf_co_broadcast.html" xlink:title="caf_co_broadcast">
-<polygon fill="#a7506f" stroke="#a7506f" points="329,-24 224,-24 224,0 329,0 329,-24"/>
-<text text-anchor="middle" x="276.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_broadcast</text>
+<title>interface~caf_co_min</title>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node8"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
+<polygon fill="#a7506f" stroke="#a7506f" points="74.5,-73 1.5,-73 1.5,-49 74.5,-49 74.5,-73"/>
+<text text-anchor="middle" x="38" y="-58.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge10" class="edge">
-<title>interface~caf_co_broadcast&#45;&gt;proc~caf_co_broadcast</title>
-<path fill="none" stroke="#cc00ff" stroke-dasharray="5,2" d="M329.26,-12C337.49,-12 346.08,-12 354.51,-12"/>
-<polygon fill="#cc00ff" stroke="#cc00ff" points="354.7,-15.5 364.7,-12 354.7,-8.5 354.7,-15.5"/>
+<!-- interface~caf_co_min&#45;&gt;proc~caf_co_min -->
+<g id="proc~~get_c_ptr~~CalledByGraph_edge9" class="edge">
+<title>interface~caf_co_min&#45;&gt;proc~caf_co_min</title>
+<path fill="none" stroke="#0066ff" stroke-dasharray="5,2" d="M74.71,-61C83.84,-61 93.77,-61 103.31,-61"/>
+<polygon fill="#0066ff" stroke="#0066ff" points="103.47,-64.5 113.47,-61 103.47,-57.5 103.47,-64.5"/>
+</g>
+<!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
+<g id="proc~~get_c_ptr~~CalledByGraph_edge7" class="edge">
+<title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
+<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M321.1,-92C334.17,-92 348.66,-92 362.33,-92"/>
+<polygon fill="#cbff00" stroke="#cbff00" points="362.58,-95.5 372.58,-92 362.58,-88.5 362.58,-95.5"/>
 </g>
 <!-- interface~caf_co_sum -->
-<g id="proc~~get_c_ptr~~CalledByGraph_node9" class="node">
+<g id="proc~~get_c_ptr~~CalledByGraph_node10" class="node">
 <title>interface~caf_co_sum</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node9"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#a7506f" stroke="#a7506f" points="314,-66 239,-66 239,-42 314,-42 314,-66"/>
-<text text-anchor="middle" x="276.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node10"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#a7506f" stroke="#a7506f" points="314,-24 239,-24 239,0 314,0 314,-24"/>
+<text text-anchor="middle" x="276.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
 </a>
 </g>
 </g>
 <!-- interface~caf_co_sum&#45;&gt;proc~caf_co_sum -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge7" class="edge">
+<g id="proc~~get_c_ptr~~CalledByGraph_edge10" class="edge">
 <title>interface~caf_co_sum&#45;&gt;proc~caf_co_sum</title>
-<path fill="none" stroke="#cbff00" stroke-dasharray="5,2" d="M314.02,-54C331.04,-54 351.5,-54 369.65,-54"/>
-<polygon fill="#cbff00" stroke="#cbff00" points="369.74,-57.5 379.74,-54 369.74,-50.5 369.74,-57.5"/>
+<path fill="none" stroke="#cc00ff" stroke-dasharray="5,2" d="M314.02,-12C331.04,-12 351.5,-12 369.65,-12"/>
+<polygon fill="#cc00ff" stroke="#cc00ff" points="369.74,-15.5 379.74,-12 369.74,-8.5 369.74,-15.5"/>
 </g>
-<!-- interface~caf_co_min -->
-<g id="proc~~get_c_ptr~~CalledByGraph_node10" class="node">
-<title>interface~caf_co_min</title>
-<g id="a_proc~~get_c_ptr~~CalledByGraph_node10"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
-<polygon fill="#a7506f" stroke="#a7506f" points="74.5,-176 1.5,-176 1.5,-152 74.5,-152 74.5,-176"/>
-<text text-anchor="middle" x="38" y="-161.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
+<!-- interface~caf_co_max -->
+<g id="proc~~get_c_ptr~~CalledByGraph_node11" class="node">
+<title>interface~caf_co_max</title>
+<g id="a_proc~~get_c_ptr~~CalledByGraph_node11"><a xlink:href=".././interface/caf_co_max.html" xlink:title="caf_co_max">
+<polygon fill="#a7506f" stroke="#a7506f" points="76,-134 0,-134 0,-110 76,-110 76,-134"/>
+<text text-anchor="middle" x="38" y="-119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_max</text>
 </a>
 </g>
 </g>
-<!-- interface~caf_co_min&#45;&gt;proc~caf_co_min -->
+<!-- interface~caf_co_max&#45;&gt;proc~caf_co_max -->
 <g id="proc~~get_c_ptr~~CalledByGraph_edge8" class="edge">
-<title>interface~caf_co_min&#45;&gt;proc~caf_co_min</title>
-<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M74.71,-164C83.84,-164 93.77,-164 103.31,-164"/>
-<polygon fill="#00ff66" stroke="#00ff66" points="103.47,-167.5 113.47,-164 103.47,-160.5 103.47,-167.5"/>
-</g>
-<!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
-<g id="proc~~get_c_ptr~~CalledByGraph_edge9" class="edge">
-<title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#0066ff" stroke-dasharray="5,2" d="M321.1,-134C334.17,-134 348.66,-134 362.33,-134"/>
-<polygon fill="#0066ff" stroke="#0066ff" points="362.58,-137.5 372.58,-134 362.58,-130.5 362.58,-137.5"/>
+<title>interface~caf_co_max&#45;&gt;proc~caf_co_max</title>
+<path fill="none" stroke="#00ff66" stroke-dasharray="5,2" d="M76.24,-122C84.39,-122 93.13,-122 101.62,-122"/>
+<polygon fill="#00ff66" stroke="#00ff66" points="101.8,-125.5 111.8,-122 101.8,-118.5 101.8,-125.5"/>
 </g>
 </g>
 </svg>
@@ -423,7 +423,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/get_c_ptr_character.html b/proc/get_c_ptr_character.html
index 17112b0b..6acb61e3 100644
--- a/proc/get_c_ptr_character.html
+++ b/proc/get_c_ptr_character.html
@@ -130,7 +130,7 @@ <h3>Arguments</h3>
 <thead><tr><th>Type</th><th>Intent</th><th>Optional</th><th>Attributes</th><th></th><th>Name</th><th></th></thead>
 <tbody>
 <tr>
-  <td><span class="anchor" id="variable-errmsg"></span>character(len=*),</td>
+  <td><span class="anchor" id="variable-errmsg~7"></span>character(len=*),</td>
 <td>intent(in),</td>
   <td>optional</td>  <td>target</td><td>::</td>
   <td><strong>errmsg</strong></td><td></td>
@@ -179,9 +179,9 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="#ff0000" stroke="#ff0000" points="463.84,-73.53 473.94,-70.32 464.04,-66.54 463.84,-73.53"/>
 </g>
 <!-- interface~caf_co_reduce -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_node9" class="node">
+<g id="proc~~get_c_ptr_character~~CalledByGraph_node8" class="node">
 <title>interface~caf_co_reduce</title>
-<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node9"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node8"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
 <polygon fill="#a7506f" stroke="#a7506f" points="313,-104 224,-104 224,-80 313,-80 313,-104"/>
 <text text-anchor="middle" x="268.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
@@ -190,23 +190,23 @@ <h3 class="panel-title">Called by</h3>
 <!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~get_c_ptr_character~~CalledByGraph_edge9" class="edge">
 <title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#7f00ff" d="M188.18,-70.89C196.41,-73.08 205.28,-75.44 214.01,-77.77"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="213.2,-81.17 223.76,-80.36 215,-74.41 213.2,-81.17"/>
+<path fill="none" stroke="#00ffff" d="M188.18,-70.89C196.41,-73.08 205.28,-75.44 214.01,-77.77"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="213.2,-81.17 223.76,-80.36 215,-74.41 213.2,-81.17"/>
 </g>
-<!-- proc~caf_co_sum -->
+<!-- proc~caf_co_reduce -->
 <g id="proc~~get_c_ptr_character~~CalledByGraph_node3" class="node">
-<title>proc~caf_co_sum</title>
-<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#d9534f" stroke="#d9534f" points="431,-24 356,-24 356,0 431,0 431,-24"/>
-<text text-anchor="middle" x="393.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
+<title>proc~caf_co_reduce</title>
+<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#d9534f" stroke="#d9534f" points="438,-104 349,-104 349,-80 438,-80 438,-104"/>
+<text text-anchor="middle" x="393.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_edge4" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M422.33,-24.14C443.2,-33.25 471.99,-45.81 494.83,-55.78"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="493.65,-59.08 504.22,-59.88 496.45,-52.67 493.65,-59.08"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
+<g id="proc~~get_c_ptr_character~~CalledByGraph_edge2" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0000" d="M438.01,-85.67C446.15,-84.49 454.84,-83.22 463.53,-81.96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="464.3,-85.38 473.69,-80.48 463.29,-78.46 464.3,-85.38"/>
 </g>
 <!-- proc~caf_co_min -->
 <g id="proc~~get_c_ptr_character~~CalledByGraph_node4" class="node">
@@ -218,7 +218,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~caf_co_min&#45;&gt;proc~get_c_ptr_character -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_edge2" class="edge">
+<g id="proc~~get_c_ptr_character~~CalledByGraph_edge3" class="edge">
 <title>proc~caf_co_min&#45;&gt;proc~get_c_ptr_character</title>
 <path fill="none" stroke="#ff0000" d="M186.89,-125.17C241.77,-129.06 349.48,-132.92 438,-113 460.13,-108.02 483.52,-97.84 501.43,-88.87"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="503.48,-91.75 510.77,-84.06 500.28,-85.53 503.48,-91.75"/>
@@ -226,23 +226,23 @@ <h3 class="panel-title">Called by</h3>
 <!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~get_c_ptr_character~~CalledByGraph_edge10" class="edge">
 <title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#7f00ff" d="M186.59,-112.84C195.24,-110.61 204.67,-108.18 213.95,-105.79"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="215.1,-109.11 223.91,-103.22 213.36,-102.33 215.1,-109.11"/>
+<path fill="none" stroke="#00ffff" d="M186.59,-112.84C195.24,-110.61 204.67,-108.18 213.95,-105.79"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="215.1,-109.11 223.91,-103.22 213.36,-102.33 215.1,-109.11"/>
 </g>
-<!-- proc~caf_co_reduce -->
+<!-- proc~caf_co_sum -->
 <g id="proc~~get_c_ptr_character~~CalledByGraph_node5" class="node">
-<title>proc~caf_co_reduce</title>
-<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node5"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="438,-104 349,-104 349,-80 438,-80 438,-104"/>
-<text text-anchor="middle" x="393.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<title>proc~caf_co_sum</title>
+<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node5"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#d9534f" stroke="#d9534f" points="431,-24 356,-24 356,0 431,0 431,-24"/>
+<text text-anchor="middle" x="393.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_edge3" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~get_c_ptr_character</title>
-<path fill="none" stroke="#ff0000" d="M438.01,-85.67C446.15,-84.49 454.84,-83.22 463.53,-81.96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="464.3,-85.38 473.69,-80.48 463.29,-78.46 464.3,-85.38"/>
+<!-- proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character -->
+<g id="proc~~get_c_ptr_character~~CalledByGraph_edge4" class="edge">
+<title>proc~caf_co_sum&#45;&gt;proc~get_c_ptr_character</title>
+<path fill="none" stroke="#ff0000" d="M422.33,-24.14C443.2,-33.25 471.99,-45.81 494.83,-55.78"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="493.65,-59.08 504.22,-59.88 496.45,-52.67 493.65,-59.08"/>
 </g>
 <!-- interface~caf_co_max -->
 <g id="proc~~get_c_ptr_character~~CalledByGraph_node6" class="node">
@@ -259,25 +259,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M76.24,-61C84.39,-61 93.13,-61 101.62,-61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="101.8,-64.5 111.8,-61 101.8,-57.5 101.8,-64.5"/>
 </g>
-<!-- interface~caf_co_sum -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_node7" class="node">
-<title>interface~caf_co_sum</title>
-<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node7"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#a7506f" stroke="#a7506f" points="306,-24 231,-24 231,0 306,0 306,-24"/>
-<text text-anchor="middle" x="268.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
-</a>
-</g>
-</g>
-<!-- interface~caf_co_sum&#45;&gt;proc~caf_co_sum -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_edge6" class="edge">
-<title>interface~caf_co_sum&#45;&gt;proc~caf_co_sum</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M306.07,-12C318.48,-12 332.51,-12 345.61,-12"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="345.86,-15.5 355.86,-12 345.86,-8.5 345.86,-15.5"/>
-</g>
 <!-- interface~caf_co_min -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_node8" class="node">
+<g id="proc~~get_c_ptr_character~~CalledByGraph_node7" class="node">
 <title>interface~caf_co_min</title>
-<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node8"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
+<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node7"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
 <polygon fill="#a7506f" stroke="#a7506f" points="74.5,-134 1.5,-134 1.5,-110 74.5,-110 74.5,-134"/>
 <text text-anchor="middle" x="38" y="-119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
@@ -290,10 +275,25 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="#00ffff" stroke="#00ffff" points="103.47,-125.5 113.47,-122 103.47,-118.5 103.47,-125.5"/>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
-<g id="proc~~get_c_ptr_character~~CalledByGraph_edge8" class="edge">
+<g id="proc~~get_c_ptr_character~~CalledByGraph_edge6" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M313.21,-92C321.46,-92 330.17,-92 338.69,-92"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="338.93,-95.5 348.93,-92 338.93,-88.5 338.93,-95.5"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M313.21,-92C321.46,-92 330.17,-92 338.69,-92"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="338.93,-95.5 348.93,-92 338.93,-88.5 338.93,-95.5"/>
+</g>
+<!-- interface~caf_co_sum -->
+<g id="proc~~get_c_ptr_character~~CalledByGraph_node9" class="node">
+<title>interface~caf_co_sum</title>
+<g id="a_proc~~get_c_ptr_character~~CalledByGraph_node9"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#a7506f" stroke="#a7506f" points="306,-24 231,-24 231,0 306,0 306,-24"/>
+<text text-anchor="middle" x="268.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
+</a>
+</g>
+</g>
+<!-- interface~caf_co_sum&#45;&gt;proc~caf_co_sum -->
+<g id="proc~~get_c_ptr_character~~CalledByGraph_edge8" class="edge">
+<title>interface~caf_co_sum&#45;&gt;proc~caf_co_sum</title>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M306.07,-12C318.48,-12 332.51,-12 345.61,-12"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="345.86,-15.5 355.86,-12 345.86,-8.5 345.86,-15.5"/>
 </g>
 </g>
 </svg>
@@ -393,7 +393,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/inner_caf_error_stop_character.html b/proc/inner_caf_error_stop_character.html
index baebaa6d..0344f4a2 100644
--- a/proc/inner_caf_error_stop_character.html
+++ b/proc/inner_caf_error_stop_character.html
@@ -280,7 +280,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/inner_caf_error_stop_integer.html b/proc/inner_caf_error_stop_integer.html
index a516f096..1d5c1b68 100644
--- a/proc/inner_caf_error_stop_integer.html
+++ b/proc/inner_caf_error_stop_integer.html
@@ -274,7 +274,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/num_images_team.html b/proc/num_images_team.html
index f19b36cd..14a1927a 100644
--- a/proc/num_images_team.html
+++ b/proc/num_images_team.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/num_images_team_number.html b/proc/num_images_team_number.html
index ab73f531..18cb913d 100644
--- a/proc/num_images_team_number.html
+++ b/proc/num_images_team_number.html
@@ -163,7 +163,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/optional_value.html b/proc/optional_value.html
index ce1e199d..c93446d0 100644
--- a/proc/optional_value.html
+++ b/proc/optional_value.html
@@ -179,9 +179,9 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="#ff0000" stroke="#ff0000" points="463.65,-73.86 473.75,-70.66 463.86,-66.86 463.65,-73.86"/>
 </g>
 <!-- interface~caf_co_reduce -->
-<g id="proc~~optional_value~~CalledByGraph_node9" class="node">
+<g id="proc~~optional_value~~CalledByGraph_node8" class="node">
 <title>interface~caf_co_reduce</title>
-<g id="a_proc~~optional_value~~CalledByGraph_node9"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<g id="a_proc~~optional_value~~CalledByGraph_node8"><a xlink:href=".././interface/caf_co_reduce.html" xlink:title="caf_co_reduce">
 <polygon fill="#a7506f" stroke="#a7506f" points="313,-104 224,-104 224,-80 313,-80 313,-104"/>
 <text text-anchor="middle" x="268.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
@@ -190,23 +190,23 @@ <h3 class="panel-title">Called by</h3>
 <!-- proc~caf_co_max&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~optional_value~~CalledByGraph_edge9" class="edge">
 <title>proc~caf_co_max&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#7f00ff" d="M188.18,-70.89C196.41,-73.08 205.28,-75.44 214.01,-77.77"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="213.2,-81.17 223.76,-80.36 215,-74.41 213.2,-81.17"/>
+<path fill="none" stroke="#00ffff" d="M188.18,-70.89C196.41,-73.08 205.28,-75.44 214.01,-77.77"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="213.2,-81.17 223.76,-80.36 215,-74.41 213.2,-81.17"/>
 </g>
-<!-- proc~caf_co_sum -->
+<!-- proc~caf_co_reduce -->
 <g id="proc~~optional_value~~CalledByGraph_node3" class="node">
-<title>proc~caf_co_sum</title>
-<g id="a_proc~~optional_value~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#d9534f" stroke="#d9534f" points="431,-24 356,-24 356,0 431,0 431,-24"/>
-<text text-anchor="middle" x="393.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
+<title>proc~caf_co_reduce</title>
+<g id="a_proc~~optional_value~~CalledByGraph_node3"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
+<polygon fill="#d9534f" stroke="#d9534f" points="438,-104 349,-104 349,-80 438,-80 438,-104"/>
+<text text-anchor="middle" x="393.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
-<g id="proc~~optional_value~~CalledByGraph_edge4" class="edge">
-<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M419.59,-24.14C438.25,-33.17 463.92,-45.59 484.43,-55.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="482.92,-58.67 493.44,-59.88 485.97,-52.37 482.92,-58.67"/>
+<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
+<g id="proc~~optional_value~~CalledByGraph_edge2" class="edge">
+<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M438.22,-84.95C446.54,-83.61 455.34,-82.19 463.95,-80.8"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="464.61,-84.24 473.92,-79.19 463.49,-77.33 464.61,-84.24"/>
 </g>
 <!-- proc~caf_co_min -->
 <g id="proc~~optional_value~~CalledByGraph_node4" class="node">
@@ -218,7 +218,7 @@ <h3 class="panel-title">Called by</h3>
 </g>
 </g>
 <!-- proc~caf_co_min&#45;&gt;proc~optional_value -->
-<g id="proc~~optional_value~~CalledByGraph_edge2" class="edge">
+<g id="proc~~optional_value~~CalledByGraph_edge3" class="edge">
 <title>proc~caf_co_min&#45;&gt;proc~optional_value</title>
 <path fill="none" stroke="#ff0000" d="M186.6,-125.79C241.54,-130.56 349.88,-135.62 438,-113 457,-108.12 476.64,-98.23 491.77,-89.38"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="493.82,-92.24 500.56,-84.06 490.19,-86.25 493.82,-92.24"/>
@@ -226,23 +226,23 @@ <h3 class="panel-title">Called by</h3>
 <!-- proc~caf_co_min&#45;&gt;interface~caf_co_reduce -->
 <g id="proc~~optional_value~~CalledByGraph_edge10" class="edge">
 <title>proc~caf_co_min&#45;&gt;interface~caf_co_reduce</title>
-<path fill="none" stroke="#7f00ff" d="M186.59,-112.84C195.24,-110.61 204.67,-108.18 213.95,-105.79"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="215.1,-109.11 223.91,-103.22 213.36,-102.33 215.1,-109.11"/>
+<path fill="none" stroke="#00ffff" d="M186.59,-112.84C195.24,-110.61 204.67,-108.18 213.95,-105.79"/>
+<polygon fill="#00ffff" stroke="#00ffff" points="215.1,-109.11 223.91,-103.22 213.36,-102.33 215.1,-109.11"/>
 </g>
-<!-- proc~caf_co_reduce -->
+<!-- proc~caf_co_sum -->
 <g id="proc~~optional_value~~CalledByGraph_node5" class="node">
-<title>proc~caf_co_reduce</title>
-<g id="a_proc~~optional_value~~CalledByGraph_node5"><a xlink:href=".././proc/caf_co_reduce.html" xlink:title="caf_co_reduce">
-<polygon fill="#d9534f" stroke="#d9534f" points="438,-104 349,-104 349,-80 438,-80 438,-104"/>
-<text text-anchor="middle" x="393.5" y="-89.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_reduce</text>
+<title>proc~caf_co_sum</title>
+<g id="a_proc~~optional_value~~CalledByGraph_node5"><a xlink:href=".././proc/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#d9534f" stroke="#d9534f" points="431,-24 356,-24 356,0 431,0 431,-24"/>
+<text text-anchor="middle" x="393.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
 </a>
 </g>
 </g>
-<!-- proc~caf_co_reduce&#45;&gt;proc~optional_value -->
-<g id="proc~~optional_value~~CalledByGraph_edge3" class="edge">
-<title>proc~caf_co_reduce&#45;&gt;proc~optional_value</title>
-<path fill="none" stroke="#ff0000" d="M438.22,-84.95C446.54,-83.61 455.34,-82.19 463.95,-80.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="464.61,-84.24 473.92,-79.19 463.49,-77.33 464.61,-84.24"/>
+<!-- proc~caf_co_sum&#45;&gt;proc~optional_value -->
+<g id="proc~~optional_value~~CalledByGraph_edge4" class="edge">
+<title>proc~caf_co_sum&#45;&gt;proc~optional_value</title>
+<path fill="none" stroke="#ff0000" d="M419.59,-24.14C438.25,-33.17 463.92,-45.59 484.43,-55.51"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="482.92,-58.67 493.44,-59.88 485.97,-52.37 482.92,-58.67"/>
 </g>
 <!-- interface~caf_co_max -->
 <g id="proc~~optional_value~~CalledByGraph_node6" class="node">
@@ -259,25 +259,10 @@ <h3 class="panel-title">Called by</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M76.24,-61C84.39,-61 93.13,-61 101.62,-61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="101.8,-64.5 111.8,-61 101.8,-57.5 101.8,-64.5"/>
 </g>
-<!-- interface~caf_co_sum -->
-<g id="proc~~optional_value~~CalledByGraph_node7" class="node">
-<title>interface~caf_co_sum</title>
-<g id="a_proc~~optional_value~~CalledByGraph_node7"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
-<polygon fill="#a7506f" stroke="#a7506f" points="306,-24 231,-24 231,0 306,0 306,-24"/>
-<text text-anchor="middle" x="268.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
-</a>
-</g>
-</g>
-<!-- interface~caf_co_sum&#45;&gt;proc~caf_co_sum -->
-<g id="proc~~optional_value~~CalledByGraph_edge6" class="edge">
-<title>interface~caf_co_sum&#45;&gt;proc~caf_co_sum</title>
-<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M306.07,-12C318.48,-12 332.51,-12 345.61,-12"/>
-<polygon fill="#7fff00" stroke="#7fff00" points="345.86,-15.5 355.86,-12 345.86,-8.5 345.86,-15.5"/>
-</g>
 <!-- interface~caf_co_min -->
-<g id="proc~~optional_value~~CalledByGraph_node8" class="node">
+<g id="proc~~optional_value~~CalledByGraph_node7" class="node">
 <title>interface~caf_co_min</title>
-<g id="a_proc~~optional_value~~CalledByGraph_node8"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
+<g id="a_proc~~optional_value~~CalledByGraph_node7"><a xlink:href=".././interface/caf_co_min.html" xlink:title="caf_co_min">
 <polygon fill="#a7506f" stroke="#a7506f" points="74.5,-134 1.5,-134 1.5,-110 74.5,-110 74.5,-134"/>
 <text text-anchor="middle" x="38" y="-119.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_min</text>
 </a>
@@ -290,10 +275,25 @@ <h3 class="panel-title">Called by</h3>
 <polygon fill="#00ffff" stroke="#00ffff" points="103.47,-125.5 113.47,-122 103.47,-118.5 103.47,-125.5"/>
 </g>
 <!-- interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce -->
-<g id="proc~~optional_value~~CalledByGraph_edge8" class="edge">
+<g id="proc~~optional_value~~CalledByGraph_edge6" class="edge">
 <title>interface~caf_co_reduce&#45;&gt;proc~caf_co_reduce</title>
-<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M313.21,-92C321.46,-92 330.17,-92 338.69,-92"/>
-<polygon fill="#7f00ff" stroke="#7f00ff" points="338.93,-95.5 348.93,-92 338.93,-88.5 338.93,-95.5"/>
+<path fill="none" stroke="#7fff00" stroke-dasharray="5,2" d="M313.21,-92C321.46,-92 330.17,-92 338.69,-92"/>
+<polygon fill="#7fff00" stroke="#7fff00" points="338.93,-95.5 348.93,-92 338.93,-88.5 338.93,-95.5"/>
+</g>
+<!-- interface~caf_co_sum -->
+<g id="proc~~optional_value~~CalledByGraph_node9" class="node">
+<title>interface~caf_co_sum</title>
+<g id="a_proc~~optional_value~~CalledByGraph_node9"><a xlink:href=".././interface/caf_co_sum.html" xlink:title="caf_co_sum">
+<polygon fill="#a7506f" stroke="#a7506f" points="306,-24 231,-24 231,0 306,0 306,-24"/>
+<text text-anchor="middle" x="268.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caf_co_sum</text>
+</a>
+</g>
+</g>
+<!-- interface~caf_co_sum&#45;&gt;proc~caf_co_sum -->
+<g id="proc~~optional_value~~CalledByGraph_edge8" class="edge">
+<title>interface~caf_co_sum&#45;&gt;proc~caf_co_sum</title>
+<path fill="none" stroke="#7f00ff" stroke-dasharray="5,2" d="M306.07,-12C318.48,-12 332.51,-12 345.61,-12"/>
+<polygon fill="#7f00ff" stroke="#7f00ff" points="345.86,-15.5 355.86,-12 345.86,-8.5 345.86,-15.5"/>
 </g>
 </g>
 </svg>
@@ -393,7 +393,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/this_image_coarray_dim_team.html b/proc/this_image_coarray_dim_team.html
index 0af73b1f..eb4aa93f 100644
--- a/proc/this_image_coarray_dim_team.html
+++ b/proc/this_image_coarray_dim_team.html
@@ -163,7 +163,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/this_image_coarray_team.html b/proc/this_image_coarray_team.html
index 1ee997f0..36f02755 100644
--- a/proc/this_image_coarray_team.html
+++ b/proc/this_image_coarray_team.html
@@ -163,7 +163,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/proc/this_image_team.html b/proc/this_image_team.html
index 7bd9f7f6..a3a78139 100644
--- a/proc/this_image_team.html
+++ b/proc/this_image_team.html
@@ -264,7 +264,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/search.html b/search.html
index 1d7d9e55..70beea70 100644
--- a/search.html
+++ b/search.html
@@ -114,7 +114,7 @@ <h1>Search Results</h1>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/assert_m.f90.html b/sourcefile/assert_m.f90.html
index b1e6665a..1459ec13 100644
--- a/sourcefile/assert_m.f90.html
+++ b/sourcefile/assert_m.f90.html
@@ -154,63 +154,63 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="83,-87 0,-87 0,-63 83,-63 83,-87"/>
 <text text-anchor="middle" x="41.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50">assert_m.F90</text>
 </g>
-<!-- sourcefile~assert_s.f90 -->
+<!-- sourcefile~co_min_s.f90 -->
 <g id="sourcefile~~assert_m.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~assert_s.f90</title>
-<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="206,-150 130,-150 130,-126 206,-126 206,-150"/>
-<text text-anchor="middle" x="168" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
+<title>sourcefile~co_min_s.f90</title>
+<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="209,-150 127,-150 127,-126 209,-126 209,-150"/>
+<text text-anchor="middle" x="168" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~assert_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
+<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
 <g id="sourcefile~~assert_m.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~assert_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
+<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M138.38,-125.98C131.95,-123.14 125.2,-120.05 119,-117 103.28,-109.26 86.14,-99.94 72.09,-92.05"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="73.77,-88.98 63.34,-87.1 70.32,-95.07 73.77,-88.98"/>
 </g>
-<!-- sourcefile~co_max_s.f90 -->
+<!-- sourcefile~co_reduce_s.f90 -->
 <g id="sourcefile~~assert_m.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~co_max_s.f90</title>
-<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="210.5,-108 125.5,-108 125.5,-84 210.5,-84 210.5,-108"/>
-<text text-anchor="middle" x="168" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
+<title>sourcefile~co_reduce_s.f90</title>
+<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="217,-108 119,-108 119,-84 217,-84 217,-108"/>
+<text text-anchor="middle" x="168" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
-<g id="sourcefile~~assert_m.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M125.2,-88.95C114.92,-87.22 103.8,-85.34 93.16,-83.54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="93.58,-80.07 83.14,-81.85 92.42,-86.97 93.58,-80.07"/>
+<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
+<g id="sourcefile~~assert_m.f90~~AfferentGraph_edge3" class="edge">
+<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M118.87,-87.88C110.5,-86.47 101.77,-85 93.33,-83.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="93.67,-80.08 83.23,-81.87 92.51,-86.98 93.67,-80.08"/>
 </g>
-<!-- sourcefile~co_min_s.f90 -->
+<!-- sourcefile~assert_s.f90 -->
 <g id="sourcefile~~assert_m.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~co_min_s.f90</title>
-<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="209,-66 127,-66 127,-42 209,-42 209,-66"/>
-<text text-anchor="middle" x="168" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
+<title>sourcefile~assert_s.f90</title>
+<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="206,-66 130,-66 130,-42 206,-42 206,-66"/>
+<text text-anchor="middle" x="168" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
-<g id="sourcefile~~assert_m.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M126.92,-60.76C116.25,-62.56 104.59,-64.53 93.43,-66.41"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="92.64,-62.99 83.36,-68.11 93.8,-69.9 92.64,-62.99"/>
+<!-- sourcefile~assert_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
+<g id="sourcefile~~assert_m.f90~~AfferentGraph_edge2" class="edge">
+<title>sourcefile~assert_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M129.98,-60.24C118.45,-62.19 105.52,-64.37 93.22,-66.45"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="92.35,-63.04 83.07,-68.16 93.51,-69.94 92.35,-63.04"/>
 </g>
-<!-- sourcefile~co_reduce_s.f90 -->
+<!-- sourcefile~co_max_s.f90 -->
 <g id="sourcefile~~assert_m.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~co_reduce_s.f90</title>
-<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="217,-24 119,-24 119,0 217,0 217,-24"/>
-<text text-anchor="middle" x="168" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+<title>sourcefile~co_max_s.f90</title>
+<g id="a_sourcefile~~assert_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="210.5,-24 125.5,-24 125.5,0 210.5,0 210.5,-24"/>
+<text text-anchor="middle" x="168" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
+<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
 <g id="sourcefile~~assert_m.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
+<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M138.38,-24.02C131.95,-26.86 125.2,-29.95 119,-33 103.28,-40.74 86.14,-50.06 72.09,-57.95"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="70.32,-54.93 63.34,-62.9 73.77,-61.02 70.32,-54.93"/>
 </g>
@@ -341,7 +341,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/assert_s.f90.html b/sourcefile/assert_s.f90.html
index 03274379..f2f2801c 100644
--- a/sourcefile/assert_s.f90.html
+++ b/sourcefile/assert_s.f90.html
@@ -398,7 +398,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/caffeinate_decaffeinate_m.f90.html b/sourcefile/caffeinate_decaffeinate_m.f90.html
index bc8ea140..2d26a388 100644
--- a/sourcefile/caffeinate_decaffeinate_m.f90.html
+++ b/sourcefile/caffeinate_decaffeinate_m.f90.html
@@ -365,7 +365,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/caffeinate_decaffeinate_s.f90.html b/sourcefile/caffeinate_decaffeinate_s.f90.html
index af9b973f..67ba653a 100644
--- a/sourcefile/caffeinate_decaffeinate_s.f90.html
+++ b/sourcefile/caffeinate_decaffeinate_s.f90.html
@@ -361,7 +361,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/caffeine_h_m.f90.html b/sourcefile/caffeine_h_m.f90.html
index 40e5e34d..fc75d08b 100644
--- a/sourcefile/caffeine_h_m.f90.html
+++ b/sourcefile/caffeine_h_m.f90.html
@@ -154,139 +154,139 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="104,-213 0,-213 0,-189 104,-189 104,-213"/>
 <text text-anchor="middle" x="52" y="-198.6" font-family="Helvetica,sans-Serif" font-size="10.50">caffeine_h_m.f90</text>
 </g>
-<!-- sourcefile~image_enumeration_s.f90 -->
+<!-- sourcefile~normal_termination_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~image_enumeration_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/image_enumeration_s.f90.html" xlink:title="image_enumeration_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="301.5,-402 150.5,-402 150.5,-378 301.5,-378 301.5,-402"/>
-<text text-anchor="middle" x="226" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s.f90</text>
+<title>sourcefile~normal_termination_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/normal_termination_s.f90.html" xlink:title="normal_termination_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="300.5,-402 151.5,-402 151.5,-378 300.5,-378 300.5,-402"/>
+<text text-anchor="middle" x="226" y="-387.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<!-- sourcefile~normal_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<title>sourcefile~normal_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M154.51,-377.83C149.33,-375.4 144.42,-372.48 140,-369 92.08,-331.22 67.89,-259.8 58.23,-223.46"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="61.53,-222.22 55.69,-213.38 54.74,-223.94 61.53,-222.22"/>
 </g>
-<!-- sourcefile~co_broadcast_s.f90 -->
+<!-- sourcefile~co_min_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~co_broadcast_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283,-360 169,-360 169,-336 283,-336 283,-360"/>
-<text text-anchor="middle" x="226" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
+<title>sourcefile~co_min_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="267,-360 185,-360 185,-336 267,-336 267,-360"/>
+<text text-anchor="middle" x="226" y="-345.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
-<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M168.57,-340.16C158.49,-337.11 148.51,-332.87 140,-327 101.62,-300.5 74.98,-251.14 62.02,-222.7"/>
+<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge3" class="edge">
+<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M184.88,-344.17C169.79,-341.23 153.13,-336.07 140,-327 101.62,-300.5 74.98,-251.14 62.02,-222.7"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="65.09,-221 57.87,-213.25 58.69,-223.81 65.09,-221"/>
 </g>
-<!-- sourcefile~co_reduce_s.f90 -->
+<!-- sourcefile~co_broadcast_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~co_reduce_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-318 177,-318 177,-294 275,-294 275,-318"/>
-<text text-anchor="middle" x="226" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+<title>sourcefile~co_broadcast_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="283,-318 169,-318 169,-294 283,-294 283,-318"/>
+<text text-anchor="middle" x="226" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
-<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M176.58,-298.67C164.17,-295.56 151.17,-291.18 140,-285 110.71,-268.81 84.16,-240.21 68.3,-220.93"/>
+<!-- sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge5" class="edge">
+<title>sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M168.99,-296.62C158.98,-293.71 148.91,-289.93 140,-285 110.71,-268.81 84.16,-240.21 68.3,-220.93"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="70.97,-218.67 61.99,-213.06 65.51,-223.05 70.97,-218.67"/>
 </g>
-<!-- sourcefile~caffeinate_decaffeinate_s.f90 -->
+<!-- sourcefile~co_reduce_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~caffeinate_decaffeinate_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="312,-276 140,-276 140,-252 312,-252 312,-276"/>
-<text text-anchor="middle" x="226" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s.F90</text>
+<title>sourcefile~co_reduce_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="275,-276 177,-276 177,-252 275,-252 275,-276"/>
+<text text-anchor="middle" x="226" y="-261.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
-<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M169.18,-251.97C159.35,-249.35 149.29,-246.35 140,-243 120.88,-236.11 100.36,-226.32 84.05,-217.94"/>
+<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge4" class="edge">
+<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M176.83,-253.94C164.66,-250.9 151.73,-247.23 140,-243 120.88,-236.11 100.36,-226.32 84.05,-217.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="85.46,-214.72 74.98,-213.19 82.22,-220.93 85.46,-214.72"/>
 </g>
-<!-- sourcefile~program_termination_s.f90 -->
+<!-- sourcefile~synchronization_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node6" class="node">
-<title>sourcefile~program_termination_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/program_termination_s.f90.html" xlink:title="program_termination_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="304.5,-234 147.5,-234 147.5,-210 304.5,-210 304.5,-234"/>
-<text text-anchor="middle" x="226" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s.f90</text>
+<title>sourcefile~synchronization_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/synchronization_s.f90.html" xlink:title="synchronization_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="289.5,-234 162.5,-234 162.5,-210 289.5,-210 289.5,-234"/>
+<text text-anchor="middle" x="226" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~program_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
-<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~program_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M147.3,-212.51C136.24,-211.16 124.99,-209.79 114.3,-208.48"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="114.59,-204.99 104.24,-207.26 113.74,-211.94 114.59,-204.99"/>
+<!-- sourcefile~synchronization_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge2" class="edge">
+<title>sourcefile~synchronization_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M162.42,-214.36C146.74,-212.44 129.93,-210.39 114.32,-208.49"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="114.6,-204.99 104.25,-207.26 113.75,-211.94 114.6,-204.99"/>
 </g>
-<!-- sourcefile~synchronization_s.f90 -->
+<!-- sourcefile~program_termination_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~synchronization_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/synchronization_s.f90.html" xlink:title="synchronization_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="289.5,-192 162.5,-192 162.5,-168 289.5,-168 289.5,-192"/>
-<text text-anchor="middle" x="226" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_s.f90</text>
+<title>sourcefile~program_termination_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/program_termination_s.f90.html" xlink:title="program_termination_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="304.5,-192 147.5,-192 147.5,-168 304.5,-168 304.5,-192"/>
+<text text-anchor="middle" x="226" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~synchronization_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<!-- sourcefile~program_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~synchronization_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M162.42,-187.64C146.74,-189.56 129.93,-191.61 114.32,-193.51"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="113.75,-190.06 104.25,-194.74 114.6,-197.01 113.75,-190.06"/>
+<title>sourcefile~program_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M147.3,-189.49C136.24,-190.84 124.99,-192.21 114.3,-193.52"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="113.74,-190.06 104.24,-194.74 114.59,-197.01 113.74,-190.06"/>
 </g>
-<!-- sourcefile~normal_termination_s.f90 -->
+<!-- sourcefile~image_enumeration_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~normal_termination_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/normal_termination_s.f90.html" xlink:title="normal_termination_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="300.5,-150 151.5,-150 151.5,-126 300.5,-126 300.5,-150"/>
-<text text-anchor="middle" x="226" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">normal_termination_s.f90</text>
+<title>sourcefile~image_enumeration_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/image_enumeration_s.f90.html" xlink:title="image_enumeration_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="301.5,-150 150.5,-150 150.5,-126 301.5,-126 301.5,-150"/>
+<text text-anchor="middle" x="226" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~normal_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<!-- sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~normal_termination_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<title>sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M169.18,-150.03C159.35,-152.65 149.29,-155.65 140,-159 120.88,-165.89 100.36,-175.68 84.05,-184.06"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="82.22,-181.07 74.98,-188.81 85.46,-187.28 82.22,-181.07"/>
 </g>
-<!-- sourcefile~co_sum_s.f90 -->
+<!-- sourcefile~caffeinate_decaffeinate_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~co_sum_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/co_sum_s.f90.html" xlink:title="co_sum_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="268,-108 184,-108 184,-84 268,-84 268,-108"/>
-<text text-anchor="middle" x="226" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s.f90</text>
+<title>sourcefile~caffeinate_decaffeinate_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="312,-108 140,-108 140,-84 312,-84 312,-108"/>
+<text text-anchor="middle" x="226" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_sum_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<!-- sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~co_sum_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M183.6,-101.7C169.18,-104.83 153.3,-109.65 140,-117 110.71,-133.19 84.16,-161.79 68.3,-181.07"/>
+<title>sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M160.49,-108.07C153.36,-110.53 146.39,-113.47 140,-117 110.71,-133.19 84.16,-161.79 68.3,-181.07"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="65.51,-178.95 61.99,-188.94 70.97,-183.33 65.51,-178.95"/>
 </g>
-<!-- sourcefile~co_min_s.f90 -->
+<!-- sourcefile~co_sum_s.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_node10" class="node">
-<title>sourcefile~co_min_s.f90</title>
-<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="267,-66 185,-66 185,-42 267,-42 267,-66"/>
-<text text-anchor="middle" x="226" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
+<title>sourcefile~co_sum_s.f90</title>
+<g id="a_sourcefile~~caffeine_h_m.f90~~AfferentGraph_node10"><a xlink:href=".././sourcefile/co_sum_s.f90.html" xlink:title="co_sum_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="268,-66 184,-66 184,-42 268,-42 268,-66"/>
+<text text-anchor="middle" x="226" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
+<!-- sourcefile~co_sum_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90 -->
 <g id="sourcefile~~caffeine_h_m.f90~~AfferentGraph_edge9" class="edge">
-<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M184.88,-57.83C169.79,-60.77 153.13,-65.93 140,-75 101.62,-101.5 74.98,-150.86 62.02,-179.3"/>
+<title>sourcefile~co_sum_s.f90&#45;&gt;sourcefile~caffeine_h_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M183.58,-58.09C168.84,-61.07 152.76,-66.19 140,-75 101.62,-101.5 74.98,-150.86 62.02,-179.3"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="58.69,-178.19 57.87,-188.75 65.09,-181 58.69,-178.19"/>
 </g>
 <!-- sourcefile~co_max_s.f90 -->
@@ -521,7 +521,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/caffeine_m.f90.html b/sourcefile/caffeine_m.f90.html
index 9a01ed0a..ecf6c9f6 100644
--- a/sourcefile/caffeine_m.f90.html
+++ b/sourcefile/caffeine_m.f90.html
@@ -347,7 +347,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/characterizable_m.f90.html b/sourcefile/characterizable_m.f90.html
index 5f9f88e9..8fcdaf41 100644
--- a/sourcefile/characterizable_m.f90.html
+++ b/sourcefile/characterizable_m.f90.html
@@ -184,35 +184,35 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M193.4,-16.77C178.28,-18.71 160.22,-21.03 142.54,-23.3"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="141.68,-19.88 132.21,-24.62 142.57,-26.82 141.68,-19.88"/>
 </g>
-<!-- sourcefile~intrinsic_array_s.f90 -->
+<!-- sourcefile~co_reduce_s.f90 -->
 <g id="sourcefile~~characterizable_m.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~intrinsic_array_s.f90</title>
-<g id="a_sourcefile~~characterizable_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452,-87 331,-87 331,-63 452,-63 452,-87"/>
-<text text-anchor="middle" x="391.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
+<title>sourcefile~co_reduce_s.f90</title>
+<g id="a_sourcefile~~characterizable_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="440.5,-87 342.5,-87 342.5,-63 440.5,-63 440.5,-87"/>
+<text text-anchor="middle" x="391.5" y="-72.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
+<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
 <g id="sourcefile~~characterizable_m.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M330.77,-67.06C322.41,-65.95 313.75,-64.8 305.19,-63.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="305.59,-60.18 295.21,-62.34 304.67,-67.12 305.59,-60.18"/>
+<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M342.24,-68.59C330.49,-67.02 317.67,-65.32 305.08,-63.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="305.42,-60.16 295.05,-62.31 304.5,-67.1 305.42,-60.16"/>
 </g>
-<!-- sourcefile~co_reduce_s.f90 -->
+<!-- sourcefile~intrinsic_array_s.f90 -->
 <g id="sourcefile~~characterizable_m.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~co_reduce_s.f90</title>
-<g id="a_sourcefile~~characterizable_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="440.5,-45 342.5,-45 342.5,-21 440.5,-21 440.5,-45"/>
-<text text-anchor="middle" x="391.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+<title>sourcefile~intrinsic_array_s.f90</title>
+<g id="a_sourcefile~~characterizable_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="452,-45 331,-45 331,-21 452,-21 452,-45"/>
+<text text-anchor="middle" x="391.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
+<!-- sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
 <g id="sourcefile~~characterizable_m.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M342.24,-39.41C330.49,-40.98 317.67,-42.68 305.08,-44.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="304.5,-40.9 295.05,-45.69 305.42,-47.84 304.5,-40.9"/>
+<title>sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M330.77,-40.94C322.41,-42.05 313.75,-43.2 305.19,-44.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="304.67,-40.88 295.21,-45.66 305.59,-47.82 304.67,-40.88"/>
 </g>
 </g>
 </svg>
@@ -318,7 +318,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/co_broadcast_s.f90.html b/sourcefile/co_broadcast_s.f90.html
index 63d553d2..c106d4c6 100644
--- a/sourcefile/co_broadcast_s.f90.html
+++ b/sourcefile/co_broadcast_s.f90.html
@@ -298,7 +298,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/co_max_s.f90.html b/sourcefile/co_max_s.f90.html
index 90a0cf3b..7cbaebab 100644
--- a/sourcefile/co_max_s.f90.html
+++ b/sourcefile/co_max_s.f90.html
@@ -169,35 +169,35 @@ <h3 class="panel-title">This file depends on</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M232.05,-108.06C217.86,-122.31 192.33,-145.74 166,-159 156.85,-163.61 146.59,-167.27 136.52,-170.15"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.33,-166.84 126.55,-172.78 137.11,-173.61 135.33,-166.84"/>
 </g>
-<!-- sourcefile~program_termination_m.f90 -->
+<!-- sourcefile~assert_m.f90 -->
 <g id="sourcefile~~co_max_s.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~program_termination_m.f90</title>
-<g id="a_sourcefile~~co_max_s.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/program_termination_m.f90.html" xlink:title="program_termination_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164,-150 2,-150 2,-126 164,-126 164,-150"/>
-<text text-anchor="middle" x="83" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m.f90</text>
+<title>sourcefile~assert_m.f90</title>
+<g id="a_sourcefile~~co_max_s.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-150 41.5,-150 41.5,-126 124.5,-126 124.5,-150"/>
+<text text-anchor="middle" x="83" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
-<g id="sourcefile~~co_max_s.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.7,-107.44C190.14,-110.57 177.59,-113.95 166,-117 158.12,-119.08 149.81,-121.24 141.62,-123.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="140.54,-120.02 131.73,-125.9 142.28,-126.79 140.54,-120.02"/>
+<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
+<g id="sourcefile~~co_max_s.f90~~EfferentGraph_edge3" class="edge">
+<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.7,-107.44C190.14,-110.57 177.59,-113.95 166,-117 155.88,-119.67 145.04,-122.48 134.67,-125.14"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="133.72,-121.77 124.9,-127.64 135.46,-128.55 133.72,-121.77"/>
 </g>
-<!-- sourcefile~assert_m.f90 -->
+<!-- sourcefile~program_termination_m.f90 -->
 <g id="sourcefile~~co_max_s.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~assert_m.f90</title>
-<g id="a_sourcefile~~co_max_s.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-108 41.5,-108 41.5,-84 124.5,-84 124.5,-108"/>
-<text text-anchor="middle" x="83" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
+<title>sourcefile~program_termination_m.f90</title>
+<g id="a_sourcefile~~co_max_s.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/program_termination_m.f90.html" xlink:title="program_termination_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164,-108 2,-108 2,-84 164,-84 164,-108"/>
+<text text-anchor="middle" x="83" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
-<g id="sourcefile~~co_max_s.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.59,-96C181.13,-96 156.34,-96 134.8,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="134.53,-92.5 124.53,-96 134.53,-99.5 134.53,-92.5"/>
+<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
+<g id="sourcefile~~co_max_s.f90~~EfferentGraph_edge2" class="edge">
+<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.59,-96C193.12,-96 183.91,-96 174.49,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="174.21,-92.5 164.21,-96 174.21,-99.5 174.21,-92.5"/>
 </g>
 <!-- sourcefile~collective_subroutines_m.f90 -->
 <g id="sourcefile~~co_max_s.f90~~EfferentGraph_node5" class="node">
@@ -209,7 +209,7 @@ <h3 class="panel-title">This file depends on</h3>
 </g>
 </g>
 <!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
-<g id="sourcefile~~co_max_s.f90~~EfferentGraph_edge3" class="edge">
+<g id="sourcefile~~co_max_s.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.7,-84.56C190.14,-81.43 177.59,-78.05 166,-75 158.12,-72.92 149.81,-70.76 141.62,-68.65"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="142.28,-65.21 131.73,-66.1 140.54,-71.98 142.28,-65.21"/>
@@ -355,7 +355,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/co_min_s.f90.html b/sourcefile/co_min_s.f90.html
index 79beb2e2..ff865f0a 100644
--- a/sourcefile/co_min_s.f90.html
+++ b/sourcefile/co_min_s.f90.html
@@ -169,35 +169,35 @@ <h3 class="panel-title">This file depends on</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M230.82,-108.07C216.95,-122.33 191.96,-145.77 166,-159 156.87,-163.66 146.62,-167.33 136.55,-170.22"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="135.36,-166.91 126.59,-172.85 137.15,-173.68 135.36,-166.91"/>
 </g>
-<!-- sourcefile~program_termination_m.f90 -->
+<!-- sourcefile~assert_m.f90 -->
 <g id="sourcefile~~co_min_s.f90~~EfferentGraph_node3" class="node">
-<title>sourcefile~program_termination_m.f90</title>
-<g id="a_sourcefile~~co_min_s.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/program_termination_m.f90.html" xlink:title="program_termination_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164,-150 2,-150 2,-126 164,-126 164,-150"/>
-<text text-anchor="middle" x="83" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m.f90</text>
+<title>sourcefile~assert_m.f90</title>
+<g id="a_sourcefile~~co_min_s.f90~~EfferentGraph_node3"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-150 41.5,-150 41.5,-126 124.5,-126 124.5,-150"/>
+<text text-anchor="middle" x="83" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
-<g id="sourcefile~~co_min_s.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.81,-107.26C190.26,-110.45 177.64,-113.9 166,-117 158.13,-119.1 149.81,-121.27 141.63,-123.39"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="140.55,-120.05 131.74,-125.94 142.29,-126.83 140.55,-120.05"/>
+<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
+<g id="sourcefile~~co_min_s.f90~~EfferentGraph_edge3" class="edge">
+<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.81,-107.26C190.26,-110.45 177.64,-113.9 166,-117 155.88,-119.69 145.05,-122.51 134.68,-125.18"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="133.73,-121.81 124.91,-127.68 135.47,-128.59 133.73,-121.81"/>
 </g>
-<!-- sourcefile~assert_m.f90 -->
+<!-- sourcefile~program_termination_m.f90 -->
 <g id="sourcefile~~co_min_s.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~assert_m.f90</title>
-<g id="a_sourcefile~~co_min_s.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="124.5,-108 41.5,-108 41.5,-84 124.5,-84 124.5,-108"/>
-<text text-anchor="middle" x="83" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
+<title>sourcefile~program_termination_m.f90</title>
+<g id="a_sourcefile~~co_min_s.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/program_termination_m.f90.html" xlink:title="program_termination_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="164,-108 2,-108 2,-84 164,-84 164,-108"/>
+<text text-anchor="middle" x="83" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">program_termination_m.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
-<g id="sourcefile~~co_min_s.f90~~EfferentGraph_edge4" class="edge">
-<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.72,-96C181.36,-96 156.43,-96 134.77,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="134.75,-92.5 124.75,-96 134.75,-99.5 134.75,-92.5"/>
+<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
+<g id="sourcefile~~co_min_s.f90~~EfferentGraph_edge2" class="edge">
+<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.72,-96C193.17,-96 183.82,-96 174.24,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="174.2,-92.5 164.2,-96 174.2,-99.5 174.2,-92.5"/>
 </g>
 <!-- sourcefile~collective_subroutines_m.f90 -->
 <g id="sourcefile~~co_min_s.f90~~EfferentGraph_node5" class="node">
@@ -209,7 +209,7 @@ <h3 class="panel-title">This file depends on</h3>
 </g>
 </g>
 <!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
-<g id="sourcefile~~co_min_s.f90~~EfferentGraph_edge3" class="edge">
+<g id="sourcefile~~co_min_s.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M201.81,-84.74C190.26,-81.55 177.64,-78.1 166,-75 158.13,-72.9 149.81,-70.73 141.63,-68.61"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="142.29,-65.17 131.74,-66.06 140.55,-71.95 142.29,-65.17"/>
@@ -355,7 +355,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/co_reduce_s.f90.html b/sourcefile/co_reduce_s.f90.html
index 3cf372e9..0ec61894 100644
--- a/sourcefile/co_reduce_s.f90.html
+++ b/sourcefile/co_reduce_s.f90.html
@@ -184,48 +184,48 @@ <h3 class="panel-title">This file depends on</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M396.81,-129.18C380.16,-138.36 356.15,-150.73 334,-159 328.13,-161.19 321.93,-163.24 315.69,-165.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="314.52,-161.82 305.88,-167.95 316.46,-168.54 314.52,-161.82"/>
 </g>
-<!-- sourcefile~intrinsic_array_m.f90 -->
-<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_node4" class="node">
-<title>sourcefile~intrinsic_array_m.f90</title>
-<g id="a_sourcefile~~co_reduce_s.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/intrinsic_array_m.f90.html" xlink:title="intrinsic_array_m.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="314.5,-150 187.5,-150 187.5,-126 314.5,-126 314.5,-150"/>
-<text text-anchor="middle" x="251" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_m.F90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
-<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_edge2" class="edge">
-<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M369.99,-123.07C355.85,-124.86 340.05,-126.86 324.73,-128.8"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="324.23,-125.33 314.75,-130.06 325.11,-132.28 324.23,-125.33"/>
-</g>
 <!-- sourcefile~assert_m.f90 -->
-<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_node5" class="node">
+<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_node4" class="node">
 <title>sourcefile~assert_m.f90</title>
-<g id="a_sourcefile~~co_reduce_s.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="292.5,-108 209.5,-108 209.5,-84 292.5,-84 292.5,-108"/>
-<text text-anchor="middle" x="251" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
+<g id="a_sourcefile~~co_reduce_s.f90~~EfferentGraph_node4"><a xlink:href=".././sourcefile/assert_m.f90.html" xlink:title="assert_m.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="292.5,-150 209.5,-150 209.5,-126 292.5,-126 292.5,-150"/>
+<text text-anchor="middle" x="251" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_m.F90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~assert_m.f90 -->
-<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_edge5" class="edge">
+<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_edge2" class="edge">
 <title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~assert_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M369.99,-110.93C348.92,-108.26 324.17,-105.13 302.8,-102.43"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="302.97,-98.92 292.61,-101.14 302.09,-105.86 302.97,-98.92"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M369.99,-123.07C348.92,-125.74 324.17,-128.87 302.8,-131.57"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="302.09,-128.14 292.61,-132.86 302.97,-135.08 302.09,-128.14"/>
 </g>
 <!-- sourcefile~collective_subroutines_m.f90 -->
-<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_node6" class="node">
+<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_node5" class="node">
 <title>sourcefile~collective_subroutines_m.f90</title>
-<g id="a_sourcefile~~co_reduce_s.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/collective_subroutines_m.f90.html" xlink:title="collective_subroutines_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="334,-66 168,-66 168,-42 334,-42 334,-66"/>
-<text text-anchor="middle" x="251" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m.f90</text>
+<g id="a_sourcefile~~co_reduce_s.f90~~EfferentGraph_node5"><a xlink:href=".././sourcefile/collective_subroutines_m.f90.html" xlink:title="collective_subroutines_m.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="334,-108 168,-108 168,-84 334,-84 334,-108"/>
+<text text-anchor="middle" x="251" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">collective_subroutines_m.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
 <g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_edge4" class="edge">
 <title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M369.99,-110.93C361.78,-109.89 353.01,-108.78 344.1,-107.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="344.36,-104.16 334,-106.37 343.48,-111.1 344.36,-104.16"/>
+</g>
+<!-- sourcefile~intrinsic_array_m.f90 -->
+<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_node6" class="node">
+<title>sourcefile~intrinsic_array_m.f90</title>
+<g id="a_sourcefile~~co_reduce_s.f90~~EfferentGraph_node6"><a xlink:href=".././sourcefile/intrinsic_array_m.f90.html" xlink:title="intrinsic_array_m.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="314.5,-66 187.5,-66 187.5,-42 314.5,-42 314.5,-66"/>
+<text text-anchor="middle" x="251" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_m.F90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
+<g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_edge5" class="edge">
+<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M396.81,-104.82C380.16,-95.64 356.15,-83.27 334,-75 328.13,-72.81 321.93,-70.76 315.69,-68.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="316.46,-65.46 305.88,-66.05 314.52,-72.18 316.46,-65.46"/>
 </g>
@@ -248,16 +248,16 @@ <h3 class="panel-title">This file depends on</h3>
 <g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_node8" class="node">
 <title>sourcefile~characterizable_m.f90</title>
 <g id="a_sourcefile~~co_reduce_s.f90~~EfferentGraph_node8"><a xlink:href=".././sourcefile/characterizable_m.f90.html" xlink:title="characterizable_m.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="132,-150 0,-150 0,-126 132,-126 132,-150"/>
-<text text-anchor="middle" x="66" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">characterizable_m.f90</text>
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="132,-66 0,-66 0,-42 132,-42 132,-66"/>
+<text text-anchor="middle" x="66" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">characterizable_m.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~characterizable_m.f90 -->
 <g id="sourcefile~~co_reduce_s.f90~~EfferentGraph_edge7" class="edge">
 <title>sourcefile~intrinsic_array_m.f90&#45;&gt;sourcefile~characterizable_m.f90</title>
-<path fill="none" stroke="#00ff00" stroke-dasharray="5,2" d="M187.28,-138C172.82,-138 157.29,-138 142.36,-138"/>
-<polygon fill="#00ff00" stroke="#00ff00" points="142.13,-134.5 132.13,-138 142.13,-141.5 142.13,-134.5"/>
+<path fill="none" stroke="#0000ff" stroke-dasharray="5,2" d="M187.28,-54C172.82,-54 157.29,-54 142.36,-54"/>
+<polygon fill="#0000ff" stroke="#0000ff" points="142.13,-50.5 132.13,-54 142.13,-57.5 142.13,-50.5"/>
 </g>
 </g>
 </svg>
@@ -576,7 +576,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/co_sum_s.f90.html b/sourcefile/co_sum_s.f90.html
index 3dc55d27..894e62e3 100644
--- a/sourcefile/co_sum_s.f90.html
+++ b/sourcefile/co_sum_s.f90.html
@@ -304,7 +304,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/collective_subroutines_m.f90.html b/sourcefile/collective_subroutines_m.f90.html
index 29451411..120c4c27 100644
--- a/sourcefile/collective_subroutines_m.f90.html
+++ b/sourcefile/collective_subroutines_m.f90.html
@@ -154,65 +154,65 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="166,-129 0,-129 0,-105 166,-105 166,-129"/>
 <text text-anchor="middle" x="83" y="-114.6" font-family="Helvetica,sans-Serif" font-size="10.50">collective_subroutines_m.f90</text>
 </g>
-<!-- sourcefile~co_broadcast_s.f90 -->
+<!-- sourcefile~co_min_s.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~co_broadcast_s.f90</title>
-<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="316,-234 202,-234 202,-210 316,-210 316,-234"/>
-<text text-anchor="middle" x="259" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
+<title>sourcefile~co_min_s.f90</title>
+<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="300,-234 218,-234 218,-210 300,-210 300,-234"/>
+<text text-anchor="middle" x="259" y="-219.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
+<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
+<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M221.54,-209.9C214.91,-207.26 208.14,-204.27 202,-201 166.56,-182.16 129.44,-154.16 106.52,-135.74"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="108.43,-132.79 98.46,-129.2 104.01,-138.22 108.43,-132.79"/>
 </g>
-<!-- sourcefile~co_reduce_s.f90 -->
+<!-- sourcefile~co_broadcast_s.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~co_reduce_s.f90</title>
-<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="308,-192 210,-192 210,-168 308,-168 308,-192"/>
-<text text-anchor="middle" x="259" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+<title>sourcefile~co_broadcast_s.f90</title>
+<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="316,-192 202,-192 202,-168 316,-168 316,-192"/>
+<text text-anchor="middle" x="259" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
-<g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
+<!-- sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
+<g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge3" class="edge">
+<title>sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M224.45,-167.85C196.56,-157.75 156.7,-143.32 126.57,-132.41"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="127.74,-129.12 117.15,-129 125.36,-135.7 127.74,-129.12"/>
 </g>
-<!-- sourcefile~co_min_s.f90 -->
+<!-- sourcefile~co_reduce_s.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~co_min_s.f90</title>
-<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="300,-150 218,-150 218,-126 300,-126 300,-150"/>
-<text text-anchor="middle" x="259" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
+<title>sourcefile~co_reduce_s.f90</title>
+<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="308,-150 210,-150 210,-126 308,-126 308,-150"/>
+<text text-anchor="middle" x="259" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
-<g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge4" class="edge">
-<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M217.64,-133.13C205.16,-131.62 190.87,-129.9 176.37,-128.15"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="176.67,-124.66 166.32,-126.93 175.83,-131.61 176.67,-124.66"/>
+<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
+<g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge2" class="edge">
+<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M209.99,-132.21C199.49,-130.94 188.03,-129.56 176.44,-128.16"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="176.59,-124.65 166.25,-126.93 175.75,-131.6 176.59,-124.65"/>
 </g>
-<!-- sourcefile~co_max_s.f90 -->
+<!-- sourcefile~co_sum_s.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node5" class="node">
-<title>sourcefile~co_max_s.f90</title>
-<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="301.5,-108 216.5,-108 216.5,-84 301.5,-84 301.5,-108"/>
-<text text-anchor="middle" x="259" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
+<title>sourcefile~co_sum_s.f90</title>
+<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node5"><a xlink:href=".././sourcefile/co_sum_s.f90.html" xlink:title="co_sum_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="301,-108 217,-108 217,-84 301,-84 301,-108"/>
+<text text-anchor="middle" x="259" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
+<!-- sourcefile~co_sum_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M216.32,-101.03C204.19,-102.49 190.42,-104.16 176.46,-105.84"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="175.8,-102.4 166.29,-107.07 176.64,-109.35 175.8,-102.4"/>
+<title>sourcefile~co_sum_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M216.76,-100.98C204.55,-102.45 190.66,-104.13 176.57,-105.83"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="175.81,-102.39 166.3,-107.07 176.65,-109.34 175.81,-102.39"/>
 </g>
 <!-- sourcefile~caffeine_m.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node6" class="node">
@@ -224,23 +224,23 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~caffeine_m.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
-<g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge3" class="edge">
+<g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge4" class="edge">
 <title>sourcefile~caffeine_m.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M224.45,-66.15C196.56,-76.25 156.7,-90.68 126.57,-101.59"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="125.36,-98.3 117.15,-105 127.74,-104.88 125.36,-98.3"/>
 </g>
-<!-- sourcefile~co_sum_s.f90 -->
+<!-- sourcefile~co_max_s.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~co_sum_s.f90</title>
-<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/co_sum_s.f90.html" xlink:title="co_sum_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="301,-24 217,-24 217,0 301,0 301,-24"/>
-<text text-anchor="middle" x="259" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_sum_s.f90</text>
+<title>sourcefile~co_max_s.f90</title>
+<g id="a_sourcefile~~collective_subroutines_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="301.5,-24 216.5,-24 216.5,0 301.5,0 301.5,-24"/>
+<text text-anchor="middle" x="259" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_sum_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
+<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90 -->
 <g id="sourcefile~~collective_subroutines_m.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~co_sum_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
+<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~collective_subroutines_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M221.54,-24.1C214.91,-26.74 208.14,-29.73 202,-33 166.56,-51.84 129.44,-79.84 106.52,-98.26"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="104.01,-95.78 98.46,-104.8 108.43,-101.21 104.01,-95.78"/>
 </g>
@@ -452,7 +452,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/image_enumeration_m.f90.html b/sourcefile/image_enumeration_m.f90.html
index ec545e40..a9514524 100644
--- a/sourcefile/image_enumeration_m.f90.html
+++ b/sourcefile/image_enumeration_m.f90.html
@@ -254,7 +254,7 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90 -->
-<g id="sourcefile~~image_enumeration_m.f90~~AfferentGraph_edge2" class="edge">
+<g id="sourcefile~~image_enumeration_m.f90~~AfferentGraph_edge3" class="edge">
 <title>sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M192.93,-54C184.45,-54 175.76,-54 167.14,-54"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="167.07,-50.5 157.07,-54 167.07,-57.5 167.07,-50.5"/>
@@ -269,7 +269,7 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~assert_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90 -->
-<g id="sourcefile~~image_enumeration_m.f90~~AfferentGraph_edge3" class="edge">
+<g id="sourcefile~~image_enumeration_m.f90~~AfferentGraph_edge2" class="edge">
 <title>sourcefile~assert_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M230.36,-20.3C205.56,-25.84 172.32,-33.26 143.35,-39.74"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="142.3,-36.38 133.3,-41.98 143.82,-43.22 142.3,-36.38"/>
@@ -406,7 +406,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/image_enumeration_s.f90.html b/sourcefile/image_enumeration_s.f90.html
index 3a697ddc..05dcc629 100644
--- a/sourcefile/image_enumeration_s.f90.html
+++ b/sourcefile/image_enumeration_s.f90.html
@@ -305,7 +305,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/intrinsic_array_m.f90.html b/sourcefile/intrinsic_array_m.f90.html
index 7cadf0f1..2e42d6db 100644
--- a/sourcefile/intrinsic_array_m.f90.html
+++ b/sourcefile/intrinsic_array_m.f90.html
@@ -229,35 +229,35 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="127,-45 0,-45 0,-21 127,-21 127,-45"/>
 <text text-anchor="middle" x="63.5" y="-30.6" font-family="Helvetica,sans-Serif" font-size="10.50">intrinsic_array_m.F90</text>
 </g>
-<!-- sourcefile~intrinsic_array_s.f90 -->
+<!-- sourcefile~co_reduce_s.f90 -->
 <g id="sourcefile~~intrinsic_array_m.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~intrinsic_array_s.f90</title>
-<g id="a_sourcefile~~intrinsic_array_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284,-66 163,-66 163,-42 284,-42 284,-66"/>
-<text text-anchor="middle" x="223.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
+<title>sourcefile~co_reduce_s.f90</title>
+<g id="a_sourcefile~~intrinsic_array_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272.5,-66 174.5,-66 174.5,-42 272.5,-42 272.5,-66"/>
+<text text-anchor="middle" x="223.5" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
+<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
 <g id="sourcefile~~intrinsic_array_m.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M162.77,-46.06C154.41,-44.95 145.75,-43.8 137.19,-42.66"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="137.59,-39.18 127.21,-41.34 136.67,-46.12 137.59,-39.18"/>
+<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M174.24,-47.59C162.49,-46.02 149.67,-44.32 137.08,-42.65"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="137.42,-39.16 127.05,-41.31 136.5,-46.1 137.42,-39.16"/>
 </g>
-<!-- sourcefile~co_reduce_s.f90 -->
+<!-- sourcefile~intrinsic_array_s.f90 -->
 <g id="sourcefile~~intrinsic_array_m.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~co_reduce_s.f90</title>
-<g id="a_sourcefile~~intrinsic_array_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="272.5,-24 174.5,-24 174.5,0 272.5,0 272.5,-24"/>
-<text text-anchor="middle" x="223.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+<title>sourcefile~intrinsic_array_s.f90</title>
+<g id="a_sourcefile~~intrinsic_array_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="284,-24 163,-24 163,0 284,0 284,-24"/>
+<text text-anchor="middle" x="223.5" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
+<!-- sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90 -->
 <g id="sourcefile~~intrinsic_array_m.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M174.24,-18.41C162.49,-19.98 149.67,-21.68 137.08,-23.35"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="136.5,-19.9 127.05,-24.69 137.42,-26.84 136.5,-19.9"/>
+<title>sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~intrinsic_array_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M162.77,-19.94C154.41,-21.05 145.75,-22.2 137.19,-23.34"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="136.67,-19.88 127.21,-24.66 137.59,-26.82 136.67,-19.88"/>
 </g>
 </g>
 </svg>
@@ -397,7 +397,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/intrinsic_array_s.f90.html b/sourcefile/intrinsic_array_s.f90.html
index f93222d8..aaaaeaa1 100644
--- a/sourcefile/intrinsic_array_s.f90.html
+++ b/sourcefile/intrinsic_array_s.f90.html
@@ -417,7 +417,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/normal_termination_m.f90.html b/sourcefile/normal_termination_m.f90.html
index 2919340b..b17cb618 100644
--- a/sourcefile/normal_termination_m.f90.html
+++ b/sourcefile/normal_termination_m.f90.html
@@ -271,7 +271,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/normal_termination_s.f90.html b/sourcefile/normal_termination_s.f90.html
index ba44b4a0..bf30f82c 100644
--- a/sourcefile/normal_termination_s.f90.html
+++ b/sourcefile/normal_termination_s.f90.html
@@ -300,7 +300,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/program_termination_m.f90.html b/sourcefile/program_termination_m.f90.html
index d0d5bcf6..1a3667c0 100644
--- a/sourcefile/program_termination_m.f90.html
+++ b/sourcefile/program_termination_m.f90.html
@@ -154,19 +154,19 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="162,-171 0,-171 0,-147 162,-147 162,-171"/>
 <text text-anchor="middle" x="81" y="-156.6" font-family="Helvetica,sans-Serif" font-size="10.50">program_termination_m.f90</text>
 </g>
-<!-- sourcefile~assert_s.f90 -->
+<!-- sourcefile~co_min_s.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~assert_s.f90</title>
-<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="322,-318 246,-318 246,-294 322,-294 322,-318"/>
-<text text-anchor="middle" x="284" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
+<title>sourcefile~co_min_s.f90</title>
+<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="325,-318 243,-318 243,-294 325,-294 325,-318"/>
+<text text-anchor="middle" x="284" y="-303.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~assert_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
+<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~assert_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M245.63,-301.61C230.11,-298.59 212.39,-293.52 198,-285 152.71,-258.19 114.6,-208.23 95.39,-179.94"/>
+<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M242.64,-301.01C227.86,-297.93 211.47,-292.98 198,-285 152.71,-258.19 114.6,-208.23 95.39,-179.94"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="98.06,-177.63 89.61,-171.24 92.23,-181.51 98.06,-177.63"/>
 </g>
 <!-- sourcefile~co_reduce_s.f90 -->
@@ -194,7 +194,7 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
-<g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge4" class="edge">
+<g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge5" class="edge">
 <title>sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M230.62,-209.98C219.78,-207.23 208.47,-204.18 198,-201 172.47,-193.25 144.32,-183.1 122.15,-174.71"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="123.31,-171.41 112.72,-171.12 120.82,-177.96 123.31,-171.41"/>
@@ -209,7 +209,7 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~program_termination_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
-<g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge5" class="edge">
+<g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge4" class="edge">
 <title>sourcefile~program_termination_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M205.29,-171.88C194.46,-170.75 183.26,-169.58 172.23,-168.43"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="172.47,-164.93 162.16,-167.38 171.74,-171.9 172.47,-164.93"/>
@@ -229,49 +229,49 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M237.89,-142.71C218.43,-144.75 194.94,-147.2 172.17,-149.58"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="171.71,-146.11 162.12,-150.63 172.43,-153.07 171.71,-146.11"/>
 </g>
-<!-- sourcefile~intrinsic_array_s.f90 -->
+<!-- sourcefile~co_max_s.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_node7" class="node">
-<title>sourcefile~intrinsic_array_s.f90</title>
-<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="344.5,-108 223.5,-108 223.5,-84 344.5,-84 344.5,-108"/>
-<text text-anchor="middle" x="284" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
+<title>sourcefile~co_max_s.f90</title>
+<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="326.5,-108 241.5,-108 241.5,-84 326.5,-84 326.5,-108"/>
+<text text-anchor="middle" x="284" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
+<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge6" class="edge">
-<title>sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M230.62,-108.02C219.78,-110.77 208.47,-113.82 198,-117 172.47,-124.75 144.32,-134.9 122.15,-143.29"/>
+<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M241.26,-105.39C227.41,-108.75 211.96,-112.76 198,-117 172.47,-124.75 144.32,-134.9 122.15,-143.29"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="120.82,-140.04 112.72,-146.88 123.31,-146.59 120.82,-140.04"/>
 </g>
-<!-- sourcefile~co_min_s.f90 -->
+<!-- sourcefile~assert_s.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~co_min_s.f90</title>
-<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="325,-66 243,-66 243,-42 325,-42 325,-66"/>
-<text text-anchor="middle" x="284" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
+<title>sourcefile~assert_s.f90</title>
+<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="322,-66 246,-66 246,-42 322,-42 322,-66"/>
+<text text-anchor="middle" x="284" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
+<!-- sourcefile~assert_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M243,-60.57C228.41,-63.81 212.06,-68.47 198,-75 161.6,-91.89 124.99,-120.87 102.91,-139.98"/>
+<title>sourcefile~assert_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M245.97,-59.92C230.67,-63.18 213.03,-68.03 198,-75 161.6,-91.89 124.99,-120.87 102.91,-139.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="100.38,-137.54 95.18,-146.78 105,-142.8 100.38,-137.54"/>
 </g>
-<!-- sourcefile~co_max_s.f90 -->
+<!-- sourcefile~intrinsic_array_s.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_node9" class="node">
-<title>sourcefile~co_max_s.f90</title>
-<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/co_max_s.f90.html" xlink:title="co_max_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="326.5,-24 241.5,-24 241.5,0 326.5,0 326.5,-24"/>
-<text text-anchor="middle" x="284" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_max_s.f90</text>
+<title>sourcefile~intrinsic_array_s.f90</title>
+<g id="a_sourcefile~~program_termination_m.f90~~AfferentGraph_node9"><a xlink:href=".././sourcefile/intrinsic_array_s.f90.html" xlink:title="intrinsic_array_s.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="344.5,-24 223.5,-24 223.5,0 344.5,0 344.5,-24"/>
+<text text-anchor="middle" x="284" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">intrinsic_array_s.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
+<!-- sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~program_termination_m.f90 -->
 <g id="sourcefile~~program_termination_m.f90~~AfferentGraph_edge8" class="edge">
-<title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M241.35,-17.26C226.91,-20.36 211.08,-25.26 198,-33 152.71,-59.81 114.6,-109.77 95.39,-138.06"/>
+<title>sourcefile~intrinsic_array_s.f90&#45;&gt;sourcefile~program_termination_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M223.17,-22.05C214.39,-24.85 205.72,-28.43 198,-33 152.71,-59.81 114.6,-109.77 95.39,-138.06"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="92.23,-136.49 89.61,-146.76 98.06,-140.37 92.23,-136.49"/>
 </g>
 </g>
@@ -391,7 +391,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/program_termination_s.f90.html b/sourcefile/program_termination_s.f90.html
index 27c89747..86a451d8 100644
--- a/sourcefile/program_termination_s.f90.html
+++ b/sourcefile/program_termination_s.f90.html
@@ -381,7 +381,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/synchronization_m.f90.html b/sourcefile/synchronization_m.f90.html
index d7a17c52..b3006cff 100644
--- a/sourcefile/synchronization_m.f90.html
+++ b/sourcefile/synchronization_m.f90.html
@@ -169,33 +169,33 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M207.97,-85.83C184.63,-80.56 155.72,-74.03 130.17,-68.27"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="130.72,-64.8 120.2,-66.01 129.18,-71.63 130.72,-64.8"/>
 </g>
-<!-- sourcefile~caffeinate_decaffeinate_s.f90 -->
+<!-- sourcefile~synchronization_s.f90 -->
 <g id="sourcefile~~synchronization_m.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~caffeinate_decaffeinate_s.f90</title>
-<g id="a_sourcefile~~synchronization_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="340,-66 168,-66 168,-42 340,-42 340,-66"/>
-<text text-anchor="middle" x="254" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s.F90</text>
+<title>sourcefile~synchronization_s.f90</title>
+<g id="a_sourcefile~~synchronization_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/synchronization_s.f90.html" xlink:title="synchronization_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="317.5,-66 190.5,-66 190.5,-42 317.5,-42 317.5,-66"/>
+<text text-anchor="middle" x="254" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~synchronization_m.f90 -->
+<!-- sourcefile~synchronization_s.f90&#45;&gt;sourcefile~synchronization_m.f90 -->
 <g id="sourcefile~~synchronization_m.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~synchronization_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M167.89,-54C159.32,-54 150.67,-54 142.21,-54"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="142.02,-50.5 132.02,-54 142.02,-57.5 142.02,-50.5"/>
+<title>sourcefile~synchronization_s.f90&#45;&gt;sourcefile~synchronization_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M190.29,-54C174.98,-54 158.43,-54 142.59,-54"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="142.3,-50.5 132.3,-54 142.3,-57.5 142.3,-50.5"/>
 </g>
-<!-- sourcefile~synchronization_s.f90 -->
+<!-- sourcefile~caffeinate_decaffeinate_s.f90 -->
 <g id="sourcefile~~synchronization_m.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~synchronization_s.f90</title>
-<g id="a_sourcefile~~synchronization_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/synchronization_s.f90.html" xlink:title="synchronization_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="317.5,-24 190.5,-24 190.5,0 317.5,0 317.5,-24"/>
-<text text-anchor="middle" x="254" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">synchronization_s.f90</text>
+<title>sourcefile~caffeinate_decaffeinate_s.f90</title>
+<g id="a_sourcefile~~synchronization_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="340,-24 168,-24 168,0 340,0 340,-24"/>
+<text text-anchor="middle" x="254" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s.F90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~synchronization_s.f90&#45;&gt;sourcefile~synchronization_m.f90 -->
+<!-- sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~synchronization_m.f90 -->
 <g id="sourcefile~~synchronization_m.f90~~AfferentGraph_edge3" class="edge">
-<title>sourcefile~synchronization_s.f90&#45;&gt;sourcefile~synchronization_m.f90</title>
+<title>sourcefile~caffeinate_decaffeinate_s.f90&#45;&gt;sourcefile~synchronization_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M199.7,-24.04C178.01,-28.93 152.76,-34.63 130.15,-39.74"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="129.29,-36.35 120.31,-41.96 130.83,-43.17 129.29,-36.35"/>
 </g>
@@ -294,7 +294,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/synchronization_s.f90.html b/sourcefile/synchronization_s.f90.html
index 5346c112..3d440bc8 100644
--- a/sourcefile/synchronization_s.f90.html
+++ b/sourcefile/synchronization_s.f90.html
@@ -279,7 +279,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/team_type_m.f90.html b/sourcefile/team_type_m.f90.html
index 06898be2..c8a6fb07 100644
--- a/sourcefile/team_type_m.f90.html
+++ b/sourcefile/team_type_m.f90.html
@@ -226,25 +226,40 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M391.98,-104.46C366.17,-109.31 333.13,-115.52 303.59,-121.07"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="302.91,-117.64 293.73,-122.93 304.2,-124.52 302.91,-117.64"/>
 </g>
-<!-- sourcefile~image_enumeration_s.f90 -->
+<!-- sourcefile~assert_s.f90 -->
 <g id="sourcefile~~team_type_m.f90~~AfferentGraph_node6" class="node">
+<title>sourcefile~assert_s.f90</title>
+<g id="a_sourcefile~~team_type_m.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="476,-66 400,-66 400,-42 476,-42 476,-66"/>
+<text text-anchor="middle" x="438" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
+</a>
+</g>
+</g>
+<!-- sourcefile~assert_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90 -->
+<g id="sourcefile~~team_type_m.f90~~AfferentGraph_edge6" class="edge">
+<title>sourcefile~assert_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M399.9,-54.18C376.86,-54.29 346.2,-54.44 317.25,-54.58"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="317.08,-51.08 307.1,-54.63 317.12,-58.08 317.08,-51.08"/>
+</g>
+<!-- sourcefile~image_enumeration_s.f90 -->
+<g id="sourcefile~~team_type_m.f90~~AfferentGraph_node7" class="node">
 <title>sourcefile~image_enumeration_s.f90</title>
-<g id="a_sourcefile~~team_type_m.f90~~AfferentGraph_node6"><a xlink:href=".././sourcefile/image_enumeration_s.f90.html" xlink:title="image_enumeration_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="513.5,-66 362.5,-66 362.5,-42 513.5,-42 513.5,-66"/>
-<text text-anchor="middle" x="438" y="-51.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s.f90</text>
+<g id="a_sourcefile~~team_type_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/image_enumeration_s.f90.html" xlink:title="image_enumeration_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="513.5,-24 362.5,-24 362.5,0 513.5,0 513.5,-24"/>
+<text text-anchor="middle" x="438" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">image_enumeration_s.f90</text>
 </a>
 </g>
 </g>
 <!-- sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90 -->
-<g id="sourcefile~~team_type_m.f90~~AfferentGraph_edge6" class="edge">
+<g id="sourcefile~~team_type_m.f90~~AfferentGraph_edge7" class="edge">
 <title>sourcefile~image_enumeration_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M362.38,-54.36C347.84,-54.43 332.47,-54.5 317.55,-54.58"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="317.29,-51.08 307.3,-54.63 317.32,-58.08 317.29,-51.08"/>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M378.92,-24.04C353.62,-29.28 323.79,-35.46 297.46,-40.92"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="296.64,-37.51 287.56,-42.97 298.06,-44.37 296.64,-37.51"/>
 </g>
 <!-- sourcefile~caffeinate_decaffeinate_s.f90 -->
-<g id="sourcefile~~team_type_m.f90~~AfferentGraph_node7" class="node">
+<g id="sourcefile~~team_type_m.f90~~AfferentGraph_node8" class="node">
 <title>sourcefile~caffeinate_decaffeinate_s.f90</title>
-<g id="a_sourcefile~~team_type_m.f90~~AfferentGraph_node7"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
+<g id="a_sourcefile~~team_type_m.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/caffeinate_decaffeinate_s.f90.html" xlink:title="caffeinate_decaffeinate_s.F90">
 <polygon fill="#f0ad4e" stroke="#f0ad4e" points="524,-150 352,-150 352,-126 524,-126 524,-150"/>
 <text text-anchor="middle" x="438" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">caffeinate_decaffeinate_s.F90</text>
 </a>
@@ -256,21 +271,6 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <path fill="none" stroke="#00ffff" stroke-dasharray="5,2" d="M351.7,-136.77C343.36,-136.65 334.85,-136.52 326.4,-136.4"/>
 <polygon fill="#00ffff" stroke="#00ffff" points="326.19,-132.9 316.14,-136.25 326.09,-139.9 326.19,-132.9"/>
 </g>
-<!-- sourcefile~assert_s.f90 -->
-<g id="sourcefile~~team_type_m.f90~~AfferentGraph_node8" class="node">
-<title>sourcefile~assert_s.f90</title>
-<g id="a_sourcefile~~team_type_m.f90~~AfferentGraph_node8"><a xlink:href=".././sourcefile/assert_s.f90.html" xlink:title="assert_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="476,-24 400,-24 400,0 476,0 476,-24"/>
-<text text-anchor="middle" x="438" y="-9.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">assert_s.f90</text>
-</a>
-</g>
-</g>
-<!-- sourcefile~assert_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90 -->
-<g id="sourcefile~~team_type_m.f90~~AfferentGraph_edge7" class="edge">
-<title>sourcefile~assert_s.f90&#45;&gt;sourcefile~image_enumeration_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M399.9,-19.69C371.47,-25.58 331.45,-33.87 297.34,-40.94"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="296.51,-37.54 287.43,-43 297.93,-44.39 296.51,-37.54"/>
-</g>
 </g>
 </svg>
 </div><div><a type="button" class="graph-help" data-toggle="modal" href="#graph-help-text">Help</a></div><div class="modal fade" id="graph-help-text" tabindex="-1" role="dialog"><div class="modal-dialog modal-lg" role="document"><div class="modal-content"><div class="modal-header"><button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span></button><h4 class="modal-title" id="-graph-help-label">Graph Key</h4></div><div class="modal-body">
@@ -384,7 +384,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/team_type_s.f90.html b/sourcefile/team_type_s.f90.html
index d21682e0..f3269b58 100644
--- a/sourcefile/team_type_s.f90.html
+++ b/sourcefile/team_type_s.f90.html
@@ -266,7 +266,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/sourcefile/utilities_m.f90.html b/sourcefile/utilities_m.f90.html
index 2023ac76..2639e734 100644
--- a/sourcefile/utilities_m.f90.html
+++ b/sourcefile/utilities_m.f90.html
@@ -154,50 +154,50 @@ <h3 class="panel-title">Files dependent on this one</h3>
 <polygon fill="none" stroke="black" points="87,-108 0,-108 0,-84 87,-84 87,-108"/>
 <text text-anchor="middle" x="43.5" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50">utilities_m.f90</text>
 </g>
-<!-- sourcefile~co_broadcast_s.f90 -->
+<!-- sourcefile~co_min_s.f90 -->
 <g id="sourcefile~~utilities_m.f90~~AfferentGraph_node2" class="node">
-<title>sourcefile~co_broadcast_s.f90</title>
-<g id="a_sourcefile~~utilities_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="237,-192 123,-192 123,-168 237,-168 237,-192"/>
-<text text-anchor="middle" x="180" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
+<title>sourcefile~co_min_s.f90</title>
+<g id="a_sourcefile~~utilities_m.f90~~AfferentGraph_node2"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="221,-192 139,-192 139,-168 221,-168 221,-192"/>
+<text text-anchor="middle" x="180" y="-177.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
+<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
 <g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge1" class="edge">
-<title>sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
+<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M141.79,-167.95C135.36,-165.34 128.87,-162.34 123,-159 101.47,-146.75 79.72,-128.75 64.59,-115.12"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="66.64,-112.25 56.91,-108.07 61.9,-117.41 66.64,-112.25"/>
 </g>
-<!-- sourcefile~co_reduce_s.f90 -->
+<!-- sourcefile~co_broadcast_s.f90 -->
 <g id="sourcefile~~utilities_m.f90~~AfferentGraph_node3" class="node">
-<title>sourcefile~co_reduce_s.f90</title>
-<g id="a_sourcefile~~utilities_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="229,-150 131,-150 131,-126 229,-126 229,-150"/>
-<text text-anchor="middle" x="180" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
+<title>sourcefile~co_broadcast_s.f90</title>
+<g id="a_sourcefile~~utilities_m.f90~~AfferentGraph_node3"><a xlink:href=".././sourcefile/co_broadcast_s.f90.html" xlink:title="co_broadcast_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="237,-150 123,-150 123,-126 237,-126 237,-150"/>
+<text text-anchor="middle" x="180" y="-135.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_broadcast_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
-<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge2" class="edge">
-<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
+<!-- sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
+<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge3" class="edge">
+<title>sourcefile~co_broadcast_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M140.46,-125.96C125.54,-121.31 108.31,-115.93 92.6,-111.02"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="93.64,-107.68 83.05,-108.04 91.55,-114.36 93.64,-107.68"/>
 </g>
-<!-- sourcefile~co_min_s.f90 -->
+<!-- sourcefile~co_reduce_s.f90 -->
 <g id="sourcefile~~utilities_m.f90~~AfferentGraph_node4" class="node">
-<title>sourcefile~co_min_s.f90</title>
-<g id="a_sourcefile~~utilities_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_min_s.f90.html" xlink:title="co_min_s.f90">
-<polygon fill="#f0ad4e" stroke="#f0ad4e" points="221,-108 139,-108 139,-84 221,-84 221,-108"/>
-<text text-anchor="middle" x="180" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_min_s.f90</text>
+<title>sourcefile~co_reduce_s.f90</title>
+<g id="a_sourcefile~~utilities_m.f90~~AfferentGraph_node4"><a xlink:href=".././sourcefile/co_reduce_s.f90.html" xlink:title="co_reduce_s.f90">
+<polygon fill="#f0ad4e" stroke="#f0ad4e" points="229,-108 131,-108 131,-84 229,-84 229,-108"/>
+<text text-anchor="middle" x="180" y="-93.6" font-family="Helvetica,sans-Serif" font-size="10.50" fill="white">co_reduce_s.f90</text>
 </a>
 </g>
 </g>
-<!-- sourcefile~co_min_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
-<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge5" class="edge">
-<title>sourcefile~co_min_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
-<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M138.65,-96C125.7,-96 111.16,-96 97.45,-96"/>
-<polygon fill="#ff0000" stroke="#ff0000" points="97.16,-92.5 87.16,-96 97.16,-99.5 97.16,-92.5"/>
+<!-- sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
+<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge2" class="edge">
+<title>sourcefile~co_reduce_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
+<path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M130.82,-96C120.08,-96 108.64,-96 97.71,-96"/>
+<polygon fill="#ff0000" stroke="#ff0000" points="97.43,-92.5 87.43,-96 97.43,-99.5 97.43,-92.5"/>
 </g>
 <!-- sourcefile~co_max_s.f90 -->
 <g id="sourcefile~~utilities_m.f90~~AfferentGraph_node5" class="node">
@@ -209,7 +209,7 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~co_max_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
-<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge4" class="edge">
+<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge5" class="edge">
 <title>sourcefile~co_max_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M140.46,-66.04C125.54,-70.69 108.31,-76.07 92.6,-80.98"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="91.55,-77.64 83.05,-83.96 93.64,-84.32 91.55,-77.64"/>
@@ -224,7 +224,7 @@ <h3 class="panel-title">Files dependent on this one</h3>
 </g>
 </g>
 <!-- sourcefile~co_sum_s.f90&#45;&gt;sourcefile~utilities_m.f90 -->
-<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge3" class="edge">
+<g id="sourcefile~~utilities_m.f90~~AfferentGraph_edge4" class="edge">
 <title>sourcefile~co_sum_s.f90&#45;&gt;sourcefile~utilities_m.f90</title>
 <path fill="none" stroke="#ff0000" stroke-dasharray="5,2" d="M141.79,-24.05C135.36,-26.66 128.87,-29.66 123,-33 101.47,-45.25 79.72,-63.25 64.59,-76.88"/>
 <polygon fill="#ff0000" stroke="#ff0000" points="61.9,-74.59 56.91,-83.93 66.64,-79.75 61.9,-74.59"/>
@@ -347,7 +347,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/tipuesearch/tipuesearch_content.js b/tipuesearch/tipuesearch_content.js
index 34397767..125d191b 100644
--- a/tipuesearch/tipuesearch_content.js
+++ b/tipuesearch/tipuesearch_content.js
@@ -1 +1 @@
-var tipuesearch = {"pages":[{"title":" Caffeine ","text":"Caffeine Documentation Philosophy and Motivations Organization Warning Caffeine is early-stage developmental software with evolving interfaces and functionality. Documentation Welcome to the Caffeine documentation. FORD generates this documentation from inline comments, static analysis, and Markdown files.\nThe target audience for Caffeine is Fortran compiler developers.\nWith a fully Caffeinated compiler, Fortran programmers can produce parallel executable files from standard Fortran with no need to directly reference Caffeine or any lower-level communication software. Philosophy and Motivations Write as much of Caffeine as possible in Fortran: Writing the runtime library in the language of the users increases the likelihood of community contributions. Writing the runtime library in Fortran obviates the need to directly manipulate compiler descriptors throughout much of Caffeine and allows Caffeine's underlying C layer to receive the Fortran-standard CFI_cdesc_t desriptor, which imwill make it easier to support multiple compilers. Writing most of Caffeine in Fortran offers the potential exploiting Fortran's rich array syntax, concurrent loop iterations ( do concurrent ), pure procedures and related features. Currently, these play a role only in one place: C callbacks to user-provided, pure functions that can be invoked inside a do concurrent block during the execution of co_reduce . Define an interface that remains agnostic about the back-end communication library: Once multiple back ends are supported, Fortran developers would not have to rewrite or even recompile their programs in order to change back ends. Switching from GASNet-EX to MPI, for example, could become a link-time decision. Organization The tree below depicts a skeletal overview of Caffeine's directory structure. build / - build directory created by running ./ install . sh |-- run - fpm . sh - shell script for rebuilding Caffeine or running examples or tests |-- * - temporary build files example / |-- hello . f90 - a Caffeinated \"Hello, world!\" program |-- support - test / - programs invoked by the test suite src / |-- caffeine_m . f90 - the Big Kahuna : one module that exports all Caffeine functionality |-- caffeine / |-- * _m . f90 - modules containing procedure interface bodies |-- * _s . f90 - submodules containing procedure definitions |-- *. c - thin C functions wrapping networking middleware |-- *. h - corresponding C header files |-- * _h_m . f90 - a Fortran translation of a C header file |-- collective_subroutines / |-- co_ * _s . f90 - submodules containing procedure definitions test / |-- main . f90 - test suite driver created by make_vegetable_driver |-- * _test . f90 - unit tests Developer Info Lawrence Berkeley National Laboratory A U.S. Department of Energy National Laboratory Managed by the University of California","tags":"home","loc":"index.html"},{"title":"team_type – Caffeine ","text":"type, public :: team_type Contents None","tags":"","loc":"type/team_type.html"},{"title":"intrinsic_array_t – Caffeine ","text":"type, public, extends( characterizable_t ) :: intrinsic_array_t Inherits type~~intrinsic_array_t~~InheritsGraph type~intrinsic_array_t intrinsic_array_t type~characterizable_t characterizable_t type~intrinsic_array_t->type~characterizable_t Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables complex_1d complex_2d complex_3d complex_double_1d complex_double_2d complex_double_3d double_precision_1d double_precision_2d double_precision_3d integer_1d integer_2d integer_3d logical_1d logical_2d logical_3d real_1d real_2d real_3d Constructor intrinsic_array_t Type-Bound Procedures as_character Components Type Visibility Attributes Name Initial complex, private, allocatable :: complex_1d (:) complex, private, allocatable :: complex_2d (:,:) complex, private, allocatable :: complex_3d (:,:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_1d (:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_2d (:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_3d (:,:,:) double precision, private, allocatable :: double_precision_1d (:) double precision, private, allocatable :: double_precision_2d (:,:) double precision, private, allocatable :: double_precision_3d (:,:,:) integer, private, allocatable :: integer_1d (:) integer, private, allocatable :: integer_2d (:,:) integer, private, allocatable :: integer_3d (:,:,:) logical, private, allocatable :: logical_1d (:) logical, private, allocatable :: logical_2d (:,:) logical, private, allocatable :: logical_3d (:,:,:) real, private, allocatable :: real_1d (:) real, private, allocatable :: real_2d (:,:) real, private, allocatable :: real_3d (:,:,:) Constructor public interface intrinsic_array_t private pure module function construct(array) result(intrinsic_array) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: array (..) Return Value type( intrinsic_array_t ) Type-Bound Procedures procedure, public :: as_character interface private pure module module function as_character(self) result(character_self) Implementation → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"type/intrinsic_array_t.html"},{"title":"characterizable_t – Caffeine ","text":"type, public, abstract :: characterizable_t Inherited by type~~characterizable_t~~InheritedByGraph type~characterizable_t characterizable_t type~intrinsic_array_t intrinsic_array_t type~intrinsic_array_t->type~characterizable_t Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Type-Bound Procedures as_character Type-Bound Procedures procedure( as_character_i ), public, deferred :: as_character pure function as_character_i(self) result(character_self) Prototype Arguments Type Intent Optional Attributes Name class( characterizable_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"type/characterizable_t.html"},{"title":"c_bool_operation – Caffeine","text":"abstract interface public pure function c_bool_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name logical(kind=c_bool), intent(in) :: lhs logical(kind=c_bool), intent(in) :: rhs Return Value logical(kind=c_bool)","tags":"","loc":"interface/c_bool_operation.html"},{"title":"c_char_operation – Caffeine","text":"abstract interface public pure function c_char_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=*), intent(in) :: lhs character(kind=c_char,len=*), intent(in) :: rhs Return Value character(kind=c_char,len=:),allocatable","tags":"","loc":"interface/c_char_operation.html"},{"title":"c_double_complex_operation – Caffeine","text":"abstract interface public pure function c_double_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_double), intent(in) :: lhs complex(kind=c_double), intent(in) :: rhs Return Value complex(kind=c_double)","tags":"","loc":"interface/c_double_complex_operation.html"},{"title":"c_double_operation – Caffeine","text":"abstract interface public pure function c_double_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_double), intent(in) :: lhs real(kind=c_double), intent(in) :: rhs Return Value real(kind=c_double)","tags":"","loc":"interface/c_double_operation.html"},{"title":"c_float_complex_operation – Caffeine","text":"abstract interface public pure function c_float_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_float), intent(in) :: lhs complex(kind=c_float), intent(in) :: rhs Return Value complex(kind=c_float)","tags":"","loc":"interface/c_float_complex_operation.html"},{"title":"c_float_operation – Caffeine","text":"abstract interface public pure function c_float_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_float), intent(in) :: lhs real(kind=c_float), intent(in) :: rhs Return Value real(kind=c_float)","tags":"","loc":"interface/c_float_operation.html"},{"title":"c_int32_t_operation – Caffeine","text":"abstract interface public pure function c_int32_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int32_t), intent(in) :: lhs integer(kind=c_int32_t), intent(in) :: rhs Return Value integer(kind=c_int32_t)","tags":"","loc":"interface/c_int32_t_operation.html"},{"title":"c_int64_t_operation – Caffeine","text":"abstract interface public pure function c_int64_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int64_t), intent(in) :: lhs integer(kind=c_int64_t), intent(in) :: rhs Return Value integer(kind=c_int64_t)","tags":"","loc":"interface/c_int64_t_operation.html"},{"title":"as_character_i – Caffeine","text":"abstract interface private pure function as_character_i(self) result(character_self) Arguments Type Intent Optional Attributes Name class( characterizable_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"interface/as_character_i.html"},{"title":"c_f_string – Caffeine","text":"pure function c_f_string(c_string, length) result(f_string) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: c_string (length) integer(kind=c_int), intent(in) :: length Return Value character(len=length) Called by proc~~c_f_string~~CalledByGraph proc~c_f_string c_f_string proc~inner_caf_error_stop_character inner_caf_error_stop_character proc~inner_caf_error_stop_character->proc~c_f_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/c_f_string.html"},{"title":"f_c_string – Caffeine","text":"pure function f_c_string(f_string) result(c_string) Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: f_string Return Value character(kind=c_char,len=1)(len(f_string)) Called by proc~~f_c_string~~CalledByGraph proc~f_c_string f_c_string proc~caf_error_stop_character caf_error_stop_character proc~caf_error_stop_character->proc~f_c_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/f_c_string.html"},{"title":"inner_caf_error_stop_character – Caffeine","text":"subroutine inner_caf_error_stop_character(stop_code, length) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: stop_code (length) integer(kind=c_int), intent(in) :: length Calls proc~~inner_caf_error_stop_character~~CallsGraph proc~inner_caf_error_stop_character inner_caf_error_stop_character proc~c_f_string c_f_string proc~inner_caf_error_stop_character->proc~c_f_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/inner_caf_error_stop_character.html"},{"title":"inner_caf_error_stop_integer – Caffeine","text":"subroutine inner_caf_error_stop_integer(stop_code) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code Calls proc~~inner_caf_error_stop_integer~~CallsGraph proc~inner_caf_error_stop_integer inner_caf_error_stop_integer interface~caf_c_decaffeinate caf_c_decaffeinate proc~inner_caf_error_stop_integer->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/inner_caf_error_stop_integer.html"},{"title":"get_c_ptr – Caffeine","text":"public pure function get_c_ptr(stat) result(ptr) Arguments Type Intent Optional Attributes Name integer, intent(in), optional target :: stat Return Value type(c_ptr) Called by proc~~get_c_ptr~~CalledByGraph proc~get_c_ptr get_c_ptr proc~caf_co_max caf_co_max proc~caf_co_max->proc~get_c_ptr interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_sum caf_co_sum proc~caf_co_sum->proc~get_c_ptr proc~caf_co_min caf_co_min proc~caf_co_min->proc~get_c_ptr proc~caf_co_min->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_broadcast caf_co_broadcast proc~caf_co_broadcast->proc~get_c_ptr interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/get_c_ptr.html"},{"title":"get_c_ptr_character – Caffeine","text":"public pure function get_c_ptr_character(errmsg) result(ptr) Arguments Type Intent Optional Attributes Name character(len=*), intent(in), optional target :: errmsg Return Value type(c_ptr) Called by proc~~get_c_ptr_character~~CalledByGraph proc~get_c_ptr_character get_c_ptr_character proc~caf_co_max caf_co_max proc~caf_co_max->proc~get_c_ptr_character interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_sum caf_co_sum proc~caf_co_sum->proc~get_c_ptr_character proc~caf_co_min caf_co_min proc~caf_co_min->proc~get_c_ptr_character proc~caf_co_min->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr_character interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/get_c_ptr_character.html"},{"title":"optional_value – Caffeine","text":"public pure function optional_value(var) result(c_val) Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: var Return Value integer(kind=c_int) Called by proc~~optional_value~~CalledByGraph proc~optional_value optional_value proc~caf_co_max caf_co_max proc~caf_co_max->proc~optional_value interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_sum caf_co_sum proc~caf_co_sum->proc~optional_value proc~caf_co_min caf_co_min proc~caf_co_min->proc~optional_value proc~caf_co_min->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->proc~optional_value interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/optional_value.html"},{"title":"caf_error_stop – Caffeine","text":"public interface caf_error_stop Called by interface~~caf_error_stop~~CalledByGraph interface~caf_error_stop caf_error_stop proc~assert assert proc~assert->interface~caf_error_stop proc~construct construct proc~construct->interface~caf_error_stop proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_error_stop interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_error_stop proc~caf_co_min->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_error_stop interface~assert assert proc~caf_co_reduce->interface~assert proc~as_character as_character proc~as_character->interface~caf_error_stop interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce interface~assert->proc~assert interface~as_character as_character interface~as_character->proc~as_character Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Subroutines caf_error_stop_character caf_error_stop_integer Subroutines private pure module subroutine caf_error_stop_character(stop_code) stop all images and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private pure module subroutine caf_error_stop_integer(stop_code) stop all images and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"interface/caf_error_stop.html"},{"title":"caf_stop – Caffeine","text":"public interface caf_stop Contents Subroutines caf_stop_character caf_stop_integer Subroutines private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"interface/caf_stop.html"},{"title":"caf_sync_all – Caffeine","text":"interface Calls interface~~caf_sync_all~~CallsGraph interface~caf_sync_all caf_sync_all proc~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by interface~~caf_sync_all~~CalledByGraph interface~caf_sync_all caf_sync_all proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_sync_all interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_sync_all() Implementation → Arguments None","tags":"","loc":"interface/caf_sync_all.html"},{"title":"caf_caffeinate – Caffeine","text":"interface Calls interface~~caf_caffeinate~~CallsGraph interface~caf_caffeinate caf_caffeinate proc~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate interface~caf_c_caffeinate caf_c_caffeinate proc~caf_caffeinate->interface~caf_c_caffeinate interface~caf_sync_all caf_sync_all proc~caf_caffeinate->interface~caf_sync_all proc~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module function caf_caffeinate() result(exit_code) Implementation → Arguments None Return Value integer","tags":"","loc":"interface/caf_caffeinate.html"},{"title":"caf_decaffeinate – Caffeine","text":"interface Calls interface~~caf_decaffeinate~~CallsGraph interface~caf_decaffeinate caf_decaffeinate proc~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate->proc~caf_decaffeinate interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_decaffeinate->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_decaffeinate(exit_code) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code","tags":"","loc":"interface/caf_decaffeinate.html"},{"title":"caf_stop – Caffeine","text":"public interface caf_stop Contents Subroutines caf_stop_character caf_stop_integer Subroutines private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"interface/caf_stop~2.html"},{"title":"caf_num_images – Caffeine","text":"public interface caf_num_images Contents Functions num_images_team num_images_team_number Functions private module function num_images_team(team) result(image_count) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer private module function num_images_team_number(team_number) result(image_count) Arguments Type Intent Optional Attributes Name integer, intent(in) :: team_number Return Value integer","tags":"","loc":"interface/caf_num_images.html"},{"title":"caf_this_image – Caffeine","text":"public interface caf_this_image Contents Functions this_image_coarray_dim_team this_image_coarray_team this_image_team Functions private module function this_image_coarray_dim_team(coarray, dim, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) integer, intent(in) :: dim type( team_type ), intent(in), optional :: team Return Value integer private module function this_image_coarray_team(coarray, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) type( team_type ), intent(in), optional :: team Return Value integer private pure module function this_image_team(team) result(image_number) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer","tags":"","loc":"interface/caf_this_image.html"},{"title":"caf_c_caffeinate – Caffeine","text":"interface Called by interface~~caf_c_caffeinate~~CalledByGraph interface~caf_c_caffeinate caf_c_caffeinate proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_c_caffeinate interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_caffeinate(argc, argv) bind(c) Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: argc type(c_ptr) :: argv (*) Description void c_caffeinate(int argc, char *argv[]);","tags":"","loc":"interface/caf_c_caffeinate.html"},{"title":"caf_c_co_broadcast – Caffeine","text":"interface Called by interface~~caf_c_co_broadcast~~CalledByGraph interface~caf_c_co_broadcast caf_c_co_broadcast proc~caf_co_broadcast caf_co_broadcast proc~caf_co_broadcast->interface~caf_c_co_broadcast interface~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_broadcast(a, source_image, stat, nelem) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: source_image type(c_ptr), value :: stat integer(kind=c_int), value :: nelem Description void c_co_broadcast(CFI_cdesc_t * a_desc, int source_image, int* stat, int num_elements);","tags":"","loc":"interface/caf_c_co_broadcast.html"},{"title":"caf_c_co_max – Caffeine","text":"interface Called by interface~~caf_c_co_max~~CalledByGraph interface~caf_c_co_max caf_c_co_max proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_c_co_max interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_max(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements Description void c_co_max(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements);","tags":"","loc":"interface/caf_c_co_max.html"},{"title":"caf_c_co_min – Caffeine","text":"interface Called by interface~~caf_c_co_min~~CalledByGraph interface~caf_c_co_min caf_c_co_min proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_c_co_min interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_min(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements Description void c_co_min(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements);","tags":"","loc":"interface/caf_c_co_min.html"},{"title":"caf_c_co_reduce – Caffeine","text":"interface Called by interface~~caf_c_co_reduce~~CalledByGraph interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_reduce(a, result_image, c_loc_stat, c_loc_errmsg, num_elements, coll_reducesub, client_data) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements type(c_funptr), value :: coll_reducesub type(c_ptr), value :: client_data Description void caf_c_co_reduce(CFI_cdesc_t a_desc, int result_image, int stat, char errmsg, int num_elements, gex_Coll_ReduceFn_t user_op, void* client_data)","tags":"","loc":"interface/caf_c_co_reduce.html"},{"title":"caf_c_co_sum – Caffeine","text":"interface Called by interface~~caf_c_co_sum~~CalledByGraph interface~caf_c_co_sum caf_c_co_sum proc~caf_co_sum caf_co_sum proc~caf_co_sum->interface~caf_c_co_sum interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_sum(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements Description void c_co_sum(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements);","tags":"","loc":"interface/caf_c_co_sum.html"},{"title":"caf_c_decaffeinate – Caffeine","text":"interface Called by interface~~caf_c_decaffeinate~~CalledByGraph interface~caf_c_decaffeinate caf_c_decaffeinate proc~inner_caf_error_stop_integer inner_caf_error_stop_integer proc~inner_caf_error_stop_integer->interface~caf_c_decaffeinate proc~caf_stop_character caf_stop_character proc~caf_stop_character->interface~caf_c_decaffeinate proc~caf_decaffeinate caf_decaffeinate proc~caf_decaffeinate->interface~caf_c_decaffeinate proc~caf_stop_integer caf_stop_integer proc~caf_stop_integer->interface~caf_c_decaffeinate proc~caf_stop_character~2 caf_stop_character proc~caf_stop_character~2->interface~caf_c_decaffeinate proc~caf_stop_integer~2 caf_stop_integer proc~caf_stop_integer~2->interface~caf_c_decaffeinate interface~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate->proc~caf_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_decaffeinate(exit_code) bind(c) Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: exit_code Description void c_decaffeinate();","tags":"","loc":"interface/caf_c_decaffeinate.html"},{"title":"caf_c_elem_len – Caffeine","text":"interface Called by interface~~caf_c_elem_len~~CalledByGraph interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_elem_len interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_elem_len(a) result(a_elem_len) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value integer(kind=c_size_t),target Description size_t caf_c_elem_len(CFI_cdesc_t* a_desc);","tags":"","loc":"interface/caf_c_elem_len.html"},{"title":"caf_c_is_f_string – Caffeine","text":"interface Called by interface~~caf_c_is_f_string~~CalledByGraph interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_c_is_f_string interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_c_is_f_string proc~caf_co_min->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_is_f_string interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_is_f_string(a) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) Description bool caf_c_is_f_string(CFI_cdesc_t* a_desc);","tags":"","loc":"interface/caf_c_is_f_string.html"},{"title":"caf_c_num_images – Caffeine","text":"interface Called by interface~~caf_c_num_images~~CalledByGraph interface~caf_c_num_images caf_c_num_images proc~num_images_team num_images_team proc~num_images_team->interface~caf_c_num_images Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_num_images() bind(c) Arguments None Return Value integer(kind=c_int) Description int caf_c_num_images();","tags":"","loc":"interface/caf_c_num_images.html"},{"title":"caf_c_numeric_type – Caffeine","text":"interface Called by interface~~caf_c_numeric_type~~CalledByGraph interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_c_numeric_type proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_c_numeric_type interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_numeric_type(a) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) Description bool caf_c_numeric_type(CFI_cdesc_t* a_desc);","tags":"","loc":"interface/caf_c_numeric_type.html"},{"title":"caf_c_same_cfi_type – Caffeine","text":"interface Called by interface~~caf_c_same_cfi_type~~CalledByGraph interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_same_cfi_type(a, b) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) type(*), intent(in) :: b (..) Return Value logical(kind=c_bool) Description bool caf_c_same_cfi_type(CFI_cdesc_t a_desc, CFI_cdesc_t a_desc);","tags":"","loc":"interface/caf_c_same_cfi_type.html"},{"title":"caf_c_sync_all – Caffeine","text":"interface Called by interface~~caf_c_sync_all~~CalledByGraph interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all caf_sync_all proc~caf_sync_all->interface~caf_c_sync_all interface~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_sync_all interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_sync_all() bind(c) Arguments None Description void caf_c_sync_all();","tags":"","loc":"interface/caf_c_sync_all.html"},{"title":"caf_c_this_image – Caffeine","text":"interface Called by interface~~caf_c_this_image~~CalledByGraph interface~caf_c_this_image caf_c_this_image proc~this_image_team this_image_team proc~this_image_team->interface~caf_c_this_image Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_this_image() bind(c) Arguments None Return Value integer(kind=c_int) Description int caf_c_this_image();","tags":"","loc":"interface/caf_c_this_image.html"},{"title":"caf_change_team – Caffeine","text":"interface Calls interface~~caf_change_team~~CallsGraph interface~caf_change_team caf_change_team proc~caf_change_team caf_change_team interface~caf_change_team->proc~caf_change_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_change_team(team) Implementation → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team","tags":"","loc":"interface/caf_change_team.html"},{"title":"caf_end_team – Caffeine","text":"interface Calls interface~~caf_end_team~~CallsGraph interface~caf_end_team caf_end_team proc~caf_end_team caf_end_team interface~caf_end_team->proc~caf_end_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_end_team() Implementation → Arguments None","tags":"","loc":"interface/caf_end_team.html"},{"title":"caf_form_team – Caffeine","text":"interface Calls interface~~caf_form_team~~CallsGraph interface~caf_form_team caf_form_team proc~caf_form_team caf_form_team interface~caf_form_team->proc~caf_form_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg","tags":"","loc":"interface/caf_form_team.html"},{"title":"caf_co_broadcast – Caffeine","text":"interface Calls interface~~caf_co_broadcast~~CallsGraph interface~caf_co_broadcast caf_co_broadcast proc~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast proc~get_c_ptr get_c_ptr proc~caf_co_broadcast->proc~get_c_ptr interface~caf_c_co_broadcast caf_c_co_broadcast proc~caf_co_broadcast->interface~caf_c_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_broadcast.html"},{"title":"caf_co_max – Caffeine","text":"interface Calls interface~~caf_co_max~~CallsGraph interface~caf_co_max caf_co_max proc~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_max->interface~caf_c_numeric_type proc~get_c_ptr get_c_ptr proc~caf_co_max->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_max->proc~optional_value interface~caf_error_stop caf_error_stop proc~caf_co_max->interface~caf_error_stop interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~get_c_ptr_character get_c_ptr_character proc~caf_co_max->proc~get_c_ptr_character interface~caf_c_co_max caf_c_co_max proc~caf_co_max->interface~caf_c_co_max interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_max->interface~caf_c_is_f_string proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->interface~caf_error_stop proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_c_is_f_string interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_max(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_max.html"},{"title":"caf_co_min – Caffeine","text":"interface Calls interface~~caf_co_min~~CallsGraph interface~caf_co_min caf_co_min proc~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_min->interface~caf_c_numeric_type proc~get_c_ptr get_c_ptr proc~caf_co_min->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_min->proc~optional_value interface~caf_error_stop caf_error_stop proc~caf_co_min->interface~caf_error_stop interface~caf_co_reduce caf_co_reduce proc~caf_co_min->interface~caf_co_reduce proc~get_c_ptr_character get_c_ptr_character proc~caf_co_min->proc~get_c_ptr_character interface~caf_c_co_min caf_c_co_min proc~caf_co_min->interface~caf_c_co_min interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_min->interface~caf_c_is_f_string proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->interface~caf_error_stop proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_c_is_f_string interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_min(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_min.html"},{"title":"caf_co_reduce – Caffeine","text":"interface Calls interface~~caf_co_reduce~~CallsGraph interface~caf_co_reduce caf_co_reduce proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~get_c_ptr get_c_ptr proc~caf_co_reduce->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_reduce->proc~optional_value interface~caf_error_stop caf_error_stop proc~caf_co_reduce->interface~caf_error_stop interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len interface~assert assert proc~caf_co_reduce->interface~assert proc~get_c_ptr_character get_c_ptr_character proc~caf_co_reduce->proc~get_c_ptr_character interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_reduce->interface~caf_c_is_f_string proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by interface~~caf_co_reduce~~CalledByGraph interface~caf_co_reduce caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_reduce.html"},{"title":"caf_co_sum – Caffeine","text":"interface Calls interface~~caf_co_sum~~CallsGraph interface~caf_co_sum caf_co_sum proc~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum proc~get_c_ptr get_c_ptr proc~caf_co_sum->proc~get_c_ptr interface~caf_c_co_sum caf_c_co_sum proc~caf_co_sum->interface~caf_c_co_sum proc~optional_value optional_value proc~caf_co_sum->proc~optional_value proc~get_c_ptr_character get_c_ptr_character proc~caf_co_sum->proc~get_c_ptr_character Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_sum(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_sum.html"},{"title":"assert – Caffeine","text":"interface Calls interface~~assert~~CallsGraph interface~assert assert proc~assert assert interface~assert->proc~assert interface~caf_error_stop caf_error_stop proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by interface~~assert~~CalledByGraph interface~assert assert proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~assert interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure module module subroutine assert(assertion, description, diagnostic_data) Implementation → Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t Description If assertion is .false., error-terminate with a character stop code that contains diagnostic_data if present","tags":"","loc":"interface/assert.html"},{"title":"intrinsic_array_t – Caffeine","text":"public interface intrinsic_array_t Contents Functions construct Functions private pure module function construct(array) result(intrinsic_array) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: array (..) Return Value type( intrinsic_array_t )","tags":"","loc":"interface/intrinsic_array_t.html"},{"title":"as_character – Caffeine","text":"interface Calls interface~~as_character~~CallsGraph interface~as_character as_character proc~as_character as_character interface~as_character->proc~as_character interface~caf_error_stop caf_error_stop proc~as_character->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. private pure module module function as_character(self) result(character_self) Implementation → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"interface/as_character.html"},{"title":"caf_error_stop_character – Caffeine","text":"module procedure caf_error_stop_character module procedure caf_error_stop_character() Arguments None Calls proc~~caf_error_stop_character~~CallsGraph proc~caf_error_stop_character caf_error_stop_character proc~f_c_string f_c_string proc~caf_error_stop_character->proc~f_c_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_error_stop_character.html"},{"title":"caf_error_stop_integer – Caffeine","text":"module procedure caf_error_stop_integer module procedure caf_error_stop_integer() Arguments None Contents None","tags":"","loc":"proc/caf_error_stop_integer.html"},{"title":"caf_stop_character – Caffeine","text":"module procedure caf_stop_character module procedure caf_stop_character() Arguments None Calls proc~~caf_stop_character~~CallsGraph proc~caf_stop_character caf_stop_character interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_character->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_character.html"},{"title":"caf_stop_integer – Caffeine","text":"module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None Calls proc~~caf_stop_integer~~CallsGraph proc~caf_stop_integer caf_stop_integer interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_integer->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_integer.html"},{"title":"caf_stop_character – Caffeine","text":"module procedure caf_stop_character module procedure caf_stop_character() Arguments None Calls proc~~caf_stop_character~2~~CallsGraph proc~caf_stop_character~2 caf_stop_character interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_character~2->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_character~2.html"},{"title":"caf_stop_integer – Caffeine","text":"module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None Calls proc~~caf_stop_integer~2~~CallsGraph proc~caf_stop_integer~2 caf_stop_integer interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_integer~2->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_integer~2.html"},{"title":"caf_change_team – Caffeine","text":"module procedure caf_change_team module module subroutine caf_change_team(team) Interface → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team Called by proc~~caf_change_team~~CalledByGraph proc~caf_change_team caf_change_team interface~caf_change_team caf_change_team interface~caf_change_team->proc~caf_change_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_change_team.html"},{"title":"caf_end_team – Caffeine","text":"module procedure caf_end_team module module subroutine caf_end_team() Interface → Arguments None Called by proc~~caf_end_team~~CalledByGraph proc~caf_end_team caf_end_team interface~caf_end_team caf_end_team interface~caf_end_team->proc~caf_end_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_end_team.html"},{"title":"caf_form_team – Caffeine","text":"module procedure caf_form_team module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg Called by proc~~caf_form_team~~CalledByGraph proc~caf_form_team caf_form_team interface~caf_form_team caf_form_team interface~caf_form_team->proc~caf_form_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_form_team.html"},{"title":"caf_sync_all – Caffeine","text":"module procedure caf_sync_all module module subroutine caf_sync_all() Interface → Arguments None Calls proc~~caf_sync_all~~CallsGraph proc~caf_sync_all caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_sync_all~~CalledByGraph proc~caf_sync_all caf_sync_all interface~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_sync_all interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_sync_all.html"},{"title":"caf_caffeinate – Caffeine","text":"module procedure caf_caffeinate module module function caf_caffeinate() result(exit_code) Interface → Arguments None Return Value integer Calls proc~~caf_caffeinate~~CallsGraph proc~caf_caffeinate caf_caffeinate interface~caf_c_caffeinate caf_c_caffeinate proc~caf_caffeinate->interface~caf_c_caffeinate interface~caf_sync_all caf_sync_all proc~caf_caffeinate->interface~caf_sync_all proc~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_caffeinate~~CalledByGraph proc~caf_caffeinate caf_caffeinate interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_caffeinate.html"},{"title":"caf_decaffeinate – Caffeine","text":"module procedure caf_decaffeinate module module subroutine caf_decaffeinate(exit_code) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code Calls proc~~caf_decaffeinate~~CallsGraph proc~caf_decaffeinate caf_decaffeinate interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_decaffeinate->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_decaffeinate~~CalledByGraph proc~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate->proc~caf_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_decaffeinate.html"},{"title":"num_images_team – Caffeine","text":"module procedure num_images_team module procedure num_images_team() Arguments None Calls proc~~num_images_team~~CallsGraph proc~num_images_team num_images_team interface~caf_c_num_images caf_c_num_images proc~num_images_team->interface~caf_c_num_images Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/num_images_team.html"},{"title":"num_images_team_number – Caffeine","text":"module procedure num_images_team_number module procedure num_images_team_number() Arguments None Contents None","tags":"","loc":"proc/num_images_team_number.html"},{"title":"this_image_coarray_dim_team – Caffeine","text":"module procedure this_image_coarray_dim_team module procedure this_image_coarray_dim_team() Arguments None Contents None","tags":"","loc":"proc/this_image_coarray_dim_team.html"},{"title":"this_image_coarray_team – Caffeine","text":"module procedure this_image_coarray_team module procedure this_image_coarray_team() Arguments None Contents None","tags":"","loc":"proc/this_image_coarray_team.html"},{"title":"this_image_team – Caffeine","text":"module procedure this_image_team module procedure this_image_team() Arguments None Calls proc~~this_image_team~~CallsGraph proc~this_image_team this_image_team interface~caf_c_this_image caf_c_this_image proc~this_image_team->interface~caf_c_this_image Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/this_image_team.html"},{"title":"as_character – Caffeine","text":"module procedure as_character pure module module function as_character(self) result(character_self) Interface → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable Calls proc~~as_character~~CallsGraph proc~as_character as_character interface~caf_error_stop caf_error_stop proc~as_character->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~as_character~~CalledByGraph proc~as_character as_character interface~as_character as_character interface~as_character->proc~as_character Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/as_character.html"},{"title":"construct – Caffeine","text":"module procedure construct module procedure construct() Arguments None Calls proc~~construct~~CallsGraph proc~construct construct interface~caf_error_stop caf_error_stop proc~construct->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/construct.html"},{"title":"assert – Caffeine","text":"module procedure assert pure module module subroutine assert(assertion, description, diagnostic_data) Interface → Uses caffeine_characterizable_m image_enumeration_m program_termination_m proc~~assert~~UsesGraph proc~assert assert module~caffeine_characterizable_m caffeine_characterizable_m proc~assert->module~caffeine_characterizable_m module~image_enumeration_m image_enumeration_m proc~assert->module~image_enumeration_m module~program_termination_m program_termination_m proc~assert->module~program_termination_m module~team_type_m team_type_m module~image_enumeration_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t Calls proc~~assert~~CallsGraph proc~assert assert interface~caf_error_stop caf_error_stop proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~assert~~CalledByGraph proc~assert assert interface~assert assert interface~assert->proc~assert proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~assert interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/assert.html"},{"title":"caf_co_sum – Caffeine","text":"module procedure caf_co_sum module module subroutine caf_co_sum(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_sum~~CallsGraph proc~caf_co_sum caf_co_sum proc~get_c_ptr get_c_ptr proc~caf_co_sum->proc~get_c_ptr interface~caf_c_co_sum caf_c_co_sum proc~caf_co_sum->interface~caf_c_co_sum proc~optional_value optional_value proc~caf_co_sum->proc~optional_value proc~get_c_ptr_character get_c_ptr_character proc~caf_co_sum->proc~get_c_ptr_character Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_sum~~CalledByGraph proc~caf_co_sum caf_co_sum interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_sum.html"},{"title":"caf_co_broadcast – Caffeine","text":"module procedure caf_co_broadcast module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_broadcast~~CallsGraph proc~caf_co_broadcast caf_co_broadcast proc~get_c_ptr get_c_ptr proc~caf_co_broadcast->proc~get_c_ptr interface~caf_c_co_broadcast caf_c_co_broadcast proc~caf_co_broadcast->interface~caf_c_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_broadcast~~CalledByGraph proc~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_broadcast.html"},{"title":"caf_co_min – Caffeine","text":"module procedure caf_co_min module module subroutine caf_co_min(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_min~~CallsGraph proc~caf_co_min caf_co_min interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_min->interface~caf_c_numeric_type proc~get_c_ptr get_c_ptr proc~caf_co_min->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_min->proc~optional_value interface~caf_error_stop caf_error_stop proc~caf_co_min->interface~caf_error_stop interface~caf_co_reduce caf_co_reduce proc~caf_co_min->interface~caf_co_reduce proc~get_c_ptr_character get_c_ptr_character proc~caf_co_min->proc~get_c_ptr_character interface~caf_c_co_min caf_c_co_min proc~caf_co_min->interface~caf_c_co_min interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_min->interface~caf_c_is_f_string proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->interface~caf_error_stop proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_c_is_f_string interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_min~~CalledByGraph proc~caf_co_min caf_co_min interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_min.html"},{"title":"caf_co_max – Caffeine","text":"module procedure caf_co_max module module subroutine caf_co_max(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_max~~CallsGraph proc~caf_co_max caf_co_max interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_max->interface~caf_c_numeric_type proc~get_c_ptr get_c_ptr proc~caf_co_max->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_max->proc~optional_value interface~caf_error_stop caf_error_stop proc~caf_co_max->interface~caf_error_stop interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~get_c_ptr_character get_c_ptr_character proc~caf_co_max->proc~get_c_ptr_character interface~caf_c_co_max caf_c_co_max proc~caf_co_max->interface~caf_c_co_max interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_max->interface~caf_c_is_f_string proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->interface~caf_error_stop proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_c_is_f_string interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_max~~CalledByGraph proc~caf_co_max caf_co_max interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_max.html"},{"title":"caf_co_reduce – Caffeine","text":"module procedure caf_co_reduce module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_reduce~~CallsGraph proc~caf_co_reduce caf_co_reduce proc~get_c_ptr get_c_ptr proc~caf_co_reduce->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_reduce->proc~optional_value interface~caf_error_stop caf_error_stop proc~caf_co_reduce->interface~caf_error_stop interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len interface~assert assert proc~caf_co_reduce->interface~assert proc~get_c_ptr_character get_c_ptr_character proc~caf_co_reduce->proc~get_c_ptr_character interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_reduce->interface~caf_c_is_f_string proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_reduce~~CalledByGraph proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_reduce.html"},{"title":"caffeine_m – Caffeine","text":"Uses program_termination_m synchronization_m caffeinate_decaffeinate_m team_type_m image_enumeration_m collective_subroutines_m module~~caffeine_m~~UsesGraph module~caffeine_m caffeine_m module~program_termination_m program_termination_m module~caffeine_m->module~program_termination_m module~synchronization_m synchronization_m module~caffeine_m->module~synchronization_m module~collective_subroutines_m collective_subroutines_m module~caffeine_m->module~collective_subroutines_m module~image_enumeration_m image_enumeration_m module~caffeine_m->module~image_enumeration_m module~team_type_m team_type_m module~caffeine_m->module~team_type_m module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeine_m->module~caffeinate_decaffeinate_m iso_c_binding iso_c_binding module~collective_subroutines_m->iso_c_binding module~image_enumeration_m->module~team_type_m module~caffeinate_decaffeinate_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"module/caffeine_m.html"},{"title":"utilities_m – Caffeine","text":"Uses iso_c_binding module~~utilities_m~~UsesGraph module~utilities_m utilities_m iso_c_binding iso_c_binding module~utilities_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by module~~utilities_m~~UsedByGraph module~utilities_m utilities_m module~co_sum_s co_sum_s module~co_sum_s->module~utilities_m module~co_min_s co_min_s module~co_min_s->module~utilities_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~utilities_m module~co_broadcast_s co_broadcast_s module~co_broadcast_s->module~utilities_m module~co_max_s co_max_s module~co_max_s->module~utilities_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Functions get_c_ptr get_c_ptr_character optional_value Functions public pure function get_c_ptr (stat) result(ptr) Arguments Type Intent Optional Attributes Name integer, intent(in), optional target :: stat Return Value type(c_ptr) public pure function get_c_ptr_character (errmsg) result(ptr) Arguments Type Intent Optional Attributes Name character(len=*), intent(in), optional target :: errmsg Return Value type(c_ptr) public pure function optional_value (var) result(c_val) Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: var Return Value integer(kind=c_int)","tags":"","loc":"module/utilities_m.html"},{"title":"program_termination_m – Caffeine","text":"Used by Descendants: program_termination_s module~~program_termination_m~~UsedByGraph module~program_termination_m program_termination_m proc~assert assert proc~assert->module~program_termination_m module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~caffeine_intrinsic_array_s->module~program_termination_m module~co_min_s co_min_s module~co_min_s->module~program_termination_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~program_termination_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~program_termination_m module~program_termination_s program_termination_s module~program_termination_s->module~program_termination_m module~caffeine_m caffeine_m module~caffeine_m->module~program_termination_m module~co_max_s co_max_s module~co_max_s->module~program_termination_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_error_stop caf_stop Interfaces public interface caf_error_stop private pure module subroutine caf_error_stop_character(stop_code) stop all images and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private pure module subroutine caf_error_stop_integer(stop_code) stop all images and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code public interface caf_stop private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"module/program_termination_m.html"},{"title":"synchronization_m – Caffeine","text":"Used by Descendants: sychronization_s module~~synchronization_m~~UsedByGraph module~synchronization_m synchronization_m module~caffeine_m caffeine_m module~caffeine_m->module~synchronization_m module~sychronization_s sychronization_s module~sychronization_s->module~synchronization_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~synchronization_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_sync_all Interfaces interface public module module subroutine caf_sync_all() Implementation → Arguments None","tags":"","loc":"module/synchronization_m.html"},{"title":"caffeinate_decaffeinate_m – Caffeine","text":"Uses team_type_m module~~caffeinate_decaffeinate_m~~UsesGraph module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~team_type_m team_type_m module~caffeinate_decaffeinate_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: caffeinate_decaffeinate_s module~~caffeinate_decaffeinate_m~~UsedByGraph module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeine_m caffeine_m module~caffeine_m->module~caffeinate_decaffeinate_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~caffeinate_decaffeinate_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables default_team Interfaces caf_caffeinate caf_decaffeinate Variables Type Visibility Attributes Name Initial type( team_type ), public, target :: default_team Interfaces interface public module module function caf_caffeinate() result(exit_code) Implementation → Arguments None Return Value integer interface public module module subroutine caf_decaffeinate(exit_code) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code","tags":"","loc":"module/caffeinate_decaffeinate_m.html"},{"title":"normal_termination_m – Caffeine","text":"Used by Descendants: normal_termination_s module~~normal_termination_m~~UsedByGraph module~normal_termination_m normal_termination_m module~normal_termination_s normal_termination_s module~normal_termination_s->module~normal_termination_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_stop Interfaces public interface caf_stop private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"module/normal_termination_m.html"},{"title":"image_enumeration_m – Caffeine","text":"Uses team_type_m module~~image_enumeration_m~~UsesGraph module~image_enumeration_m image_enumeration_m module~team_type_m team_type_m module~image_enumeration_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: image_enumeration_s module~~image_enumeration_m~~UsedByGraph module~image_enumeration_m image_enumeration_m proc~assert assert proc~assert->module~image_enumeration_m module~image_enumeration_s image_enumeration_s module~image_enumeration_s->module~image_enumeration_m module~caffeine_m caffeine_m module~caffeine_m->module~image_enumeration_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_num_images caf_this_image Interfaces public interface caf_num_images private module function num_images_team(team) result(image_count) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer private module function num_images_team_number(team_number) result(image_count) Arguments Type Intent Optional Attributes Name integer, intent(in) :: team_number Return Value integer public interface caf_this_image private module function this_image_coarray_dim_team(coarray, dim, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) integer, intent(in) :: dim type( team_type ), intent(in), optional :: team Return Value integer private module function this_image_coarray_team(coarray, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) type( team_type ), intent(in), optional :: team Return Value integer private pure module function this_image_team(team) result(image_number) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer","tags":"","loc":"module/image_enumeration_m.html"},{"title":"caffeine_h_m – Caffeine","text":"Uses iso_c_binding module~~caffeine_h_m~~UsesGraph module~caffeine_h_m caffeine_h_m iso_c_binding iso_c_binding module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by module~~caffeine_h_m~~UsedByGraph module~caffeine_h_m caffeine_h_m module~program_termination_s program_termination_s module~program_termination_s->module~caffeine_h_m module~normal_termination_s normal_termination_s module~normal_termination_s->module~caffeine_h_m module~co_sum_s co_sum_s module~co_sum_s->module~caffeine_h_m module~image_enumeration_s image_enumeration_s module~image_enumeration_s->module~caffeine_h_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~caffeine_h_m module~co_min_s co_min_s module~co_min_s->module~caffeine_h_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_h_m module~sychronization_s sychronization_s module~sychronization_s->module~caffeine_h_m module~co_broadcast_s co_broadcast_s module~co_broadcast_s->module~caffeine_h_m module~co_max_s co_max_s module~co_max_s->module~caffeine_h_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_c_caffeinate caf_c_co_broadcast caf_c_co_max caf_c_co_min caf_c_co_reduce caf_c_co_sum caf_c_decaffeinate caf_c_elem_len caf_c_is_f_string caf_c_num_images caf_c_numeric_type caf_c_same_cfi_type caf_c_sync_all caf_c_this_image Interfaces interface public subroutine caf_c_caffeinate(argc, argv) bind(c) void c_caffeinate(int argc, char *argv[]); Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: argc type(c_ptr) :: argv (*) interface public subroutine caf_c_co_broadcast(a, source_image, stat, nelem) bind(c) void c_co_broadcast(CFI_cdesc_t * a_desc, int source_image, int* stat, int num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: source_image type(c_ptr), value :: stat integer(kind=c_int), value :: nelem interface public subroutine caf_c_co_max(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) void c_co_max(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements interface public subroutine caf_c_co_min(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) void c_co_min(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements interface public subroutine caf_c_co_reduce(a, result_image, c_loc_stat, c_loc_errmsg, num_elements, coll_reducesub, client_data) bind(c) void caf_c_co_reduce(CFI_cdesc_t a_desc, int result_image, int stat, char errmsg, int num_elements, gex_Coll_ReduceFn_t user_op, void* client_data) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements type(c_funptr), value :: coll_reducesub type(c_ptr), value :: client_data interface public subroutine caf_c_co_sum(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) void c_co_sum(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements interface public subroutine caf_c_decaffeinate(exit_code) bind(c) void c_decaffeinate(); Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: exit_code interface public pure function caf_c_elem_len(a) result(a_elem_len) bind(c) size_t caf_c_elem_len(CFI_cdesc_t* a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value integer(kind=c_size_t),target interface public pure function caf_c_is_f_string(a) bind(c) bool caf_c_is_f_string(CFI_cdesc_t* a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) interface public pure function caf_c_num_images() bind(c) int caf_c_num_images(); Arguments None Return Value integer(kind=c_int) interface public pure function caf_c_numeric_type(a) bind(c) bool caf_c_numeric_type(CFI_cdesc_t* a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) interface public pure function caf_c_same_cfi_type(a, b) bind(c) bool caf_c_same_cfi_type(CFI_cdesc_t a_desc, CFI_cdesc_t a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) type(*), intent(in) :: b (..) Return Value logical(kind=c_bool) interface public subroutine caf_c_sync_all() bind(c) void caf_c_sync_all(); Arguments None interface public pure function caf_c_this_image() bind(c) int caf_c_this_image(); Arguments None Return Value integer(kind=c_int)","tags":"","loc":"module/caffeine_h_m.html"},{"title":"team_type_m – Caffeine","text":"Used by Descendants: team_type_s module~~team_type_m~~UsedByGraph module~team_type_m team_type_m module~image_enumeration_m image_enumeration_m module~image_enumeration_m->module~team_type_m module~team_type_s team_type_s module~team_type_s->module~team_type_m module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeinate_decaffeinate_m->module~team_type_m module~caffeine_m caffeine_m module~caffeine_m->module~team_type_m module~caffeine_m->module~image_enumeration_m module~caffeine_m->module~caffeinate_decaffeinate_m proc~assert assert proc~assert->module~image_enumeration_m module~image_enumeration_s image_enumeration_s module~image_enumeration_s->module~image_enumeration_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~caffeinate_decaffeinate_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables current_team Interfaces caf_change_team caf_end_team caf_form_team Derived Types team_type Variables Type Visibility Attributes Name Initial type( team_type ), public, pointer :: current_team => null() Interfaces interface public module module subroutine caf_change_team(team) Implementation → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team interface public module module subroutine caf_end_team() Implementation → Arguments None interface public module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg Derived Types type, public :: team_type","tags":"","loc":"module/team_type_m.html"},{"title":"collective_subroutines_m – Caffeine","text":"Uses iso_c_binding module~~collective_subroutines_m~~UsesGraph module~collective_subroutines_m collective_subroutines_m iso_c_binding iso_c_binding module~collective_subroutines_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: co_broadcast_s co_max_s co_min_s co_sum_s co_reduce_s module~~collective_subroutines_m~~UsedByGraph module~collective_subroutines_m collective_subroutines_m module~co_min_s co_min_s module~co_min_s->module~collective_subroutines_m module~co_sum_s co_sum_s module~co_sum_s->module~collective_subroutines_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~collective_subroutines_m module~caffeine_m caffeine_m module~caffeine_m->module~collective_subroutines_m module~co_broadcast_s co_broadcast_s module~co_broadcast_s->module~collective_subroutines_m module~co_max_s co_max_s module~co_max_s->module~collective_subroutines_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_co_broadcast caf_co_max caf_co_min caf_co_reduce caf_co_sum Abstract Interfaces c_bool_operation c_char_operation c_double_complex_operation c_double_operation c_float_complex_operation c_float_operation c_int32_t_operation c_int64_t_operation Interfaces interface public module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_max(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_min(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_sum(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Abstract Interfaces abstract interface public pure function c_bool_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name logical(kind=c_bool), intent(in) :: lhs logical(kind=c_bool), intent(in) :: rhs Return Value logical(kind=c_bool) abstract interface public pure function c_char_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=*), intent(in) :: lhs character(kind=c_char,len=*), intent(in) :: rhs Return Value character(kind=c_char,len=:),allocatable abstract interface public pure function c_double_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_double), intent(in) :: lhs complex(kind=c_double), intent(in) :: rhs Return Value complex(kind=c_double) abstract interface public pure function c_double_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_double), intent(in) :: lhs real(kind=c_double), intent(in) :: rhs Return Value real(kind=c_double) abstract interface public pure function c_float_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_float), intent(in) :: lhs complex(kind=c_float), intent(in) :: rhs Return Value complex(kind=c_float) abstract interface public pure function c_float_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_float), intent(in) :: lhs real(kind=c_float), intent(in) :: rhs Return Value real(kind=c_float) abstract interface public pure function c_int32_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int32_t), intent(in) :: lhs integer(kind=c_int32_t), intent(in) :: rhs Return Value integer(kind=c_int32_t) abstract interface public pure function c_int64_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int64_t), intent(in) :: lhs integer(kind=c_int64_t), intent(in) :: rhs Return Value integer(kind=c_int64_t)","tags":"","loc":"module/collective_subroutines_m.html"},{"title":"caffeine_assert_m – Caffeine","text":"use assertions_m, only : assert\n   call assert( 2 > 1, \"2 > 1\") Turn off assertions in production code by setting USE_ASSERTIONS to .false. via the preprocessor.\nThis file's capitalized .F90 extension causes most Fortran compilers to preprocess this file so\nthat building as follows turns off assertion enforcement: fpm build --flag \"-DUSE_ASSERTIONS=.false.\" Doing so may eliminate any associated runtime overhead by enabling optimizing compilers to ignore\nthe assertion procedure body during a dead-code-removal phase of optimization. Used by Descendants: caffeine_assert_s module~~caffeine_assert_m~~UsedByGraph module~caffeine_assert_m caffeine_assert_m module~co_min_s co_min_s module~co_min_s->module~caffeine_assert_m module~caffeine_assert_s caffeine_assert_s module~caffeine_assert_s->module~caffeine_assert_m module~co_max_s co_max_s module~co_max_s->module~caffeine_assert_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_assert_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables enforce_assertions Interfaces assert Variables Type Visibility Attributes Name Initial logical, private, parameter :: enforce_assertions = .true. Turn off assertions as follows: fpm build --flag \"-DUSE_ASSERTIONS=.false.\" Interfaces interface public pure module module subroutine assert(assertion, description, diagnostic_data) Implementation → If assertion is .false., error-terminate with a character stop code that contains diagnostic_data if present Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t","tags":"","loc":"module/caffeine_assert_m.html"},{"title":"caffeine_intrinsic_array_m – Caffeine","text":"Define an abstract class that supports object representation in character form Uses caffeine_characterizable_m module~~caffeine_intrinsic_array_m~~UsesGraph module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~caffeine_characterizable_m caffeine_characterizable_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: caffeine_intrinsic_array_s module~~caffeine_intrinsic_array_m~~UsedByGraph module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_intrinsic_array_m module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~caffeine_intrinsic_array_s->module~caffeine_intrinsic_array_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces intrinsic_array_t as_character Derived Types intrinsic_array_t Interfaces public interface intrinsic_array_t private pure module function construct(array) result(intrinsic_array) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: array (..) Return Value type( intrinsic_array_t ) interface private pure module module function as_character(self) result(character_self) Implementation → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable Derived Types type, public, extends( characterizable_t ) :: intrinsic_array_t Components Type Visibility Attributes Name Initial complex, private, allocatable :: complex_1d (:) complex, private, allocatable :: complex_2d (:,:) complex, private, allocatable :: complex_3d (:,:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_1d (:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_2d (:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_3d (:,:,:) double precision, private, allocatable :: double_precision_1d (:) double precision, private, allocatable :: double_precision_2d (:,:) double precision, private, allocatable :: double_precision_3d (:,:,:) integer, private, allocatable :: integer_1d (:) integer, private, allocatable :: integer_2d (:,:) integer, private, allocatable :: integer_3d (:,:,:) logical, private, allocatable :: logical_1d (:) logical, private, allocatable :: logical_2d (:,:) logical, private, allocatable :: logical_3d (:,:,:) real, private, allocatable :: real_1d (:) real, private, allocatable :: real_2d (:,:) real, private, allocatable :: real_3d (:,:,:) Constructor private pure,module function construct (array) Type-Bound Procedures procedure, public :: as_character","tags":"","loc":"module/caffeine_intrinsic_array_m.html"},{"title":"caffeine_characterizable_m – Caffeine","text":"Define an abstract class that supports object representation in character form Used by module~~caffeine_characterizable_m~~UsedByGraph module~caffeine_characterizable_m caffeine_characterizable_m proc~assert assert proc~assert->module~caffeine_characterizable_m module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_intrinsic_array_m module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~caffeine_intrinsic_array_s->module~caffeine_intrinsic_array_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Abstract Interfaces as_character_i Derived Types characterizable_t Abstract Interfaces abstract interface private pure function as_character_i(self) result(character_self) Arguments Type Intent Optional Attributes Name class( characterizable_t ), intent(in) :: self Return Value character(len=:),allocatable Derived Types type, public, abstract :: characterizable_t Type-Bound Procedures procedure(as_character_i), public :: as_character","tags":"","loc":"module/caffeine_characterizable_m.html"},{"title":"program_termination_s – Caffeine","text":"Uses caffeine_h_m iso_fortran_env iso_c_binding Ancestors: program_termination_m module~~program_termination_s~~UsesGraph module~program_termination_s program_termination_s module~caffeine_h_m caffeine_h_m module~program_termination_s->module~caffeine_h_m iso_fortran_env iso_fortran_env module~program_termination_s->iso_fortran_env iso_c_binding iso_c_binding module~program_termination_s->iso_c_binding module~program_termination_m program_termination_m module~program_termination_s->module~program_termination_m module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Functions c_f_string f_c_string Subroutines inner_caf_error_stop_character inner_caf_error_stop_integer Module Procedures caf_error_stop_character caf_error_stop_integer caf_stop_character caf_stop_integer Functions pure function c_f_string (c_string, length) result(f_string) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: c_string (length) integer(kind=c_int), intent(in) :: length Return Value character(len=length) pure function f_c_string (f_string) result(c_string) Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: f_string Return Value character(kind=c_char,len=1)(len(f_string)) Subroutines subroutine inner_caf_error_stop_character (stop_code, length) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: stop_code (length) integer(kind=c_int), intent(in) :: length subroutine inner_caf_error_stop_integer (stop_code) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code Module Procedures module procedure caf_error_stop_character module procedure caf_error_stop_character() Arguments None module procedure caf_error_stop_integer module procedure caf_error_stop_integer() Arguments None module procedure caf_stop_character module procedure caf_stop_character() Arguments None module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None","tags":"","loc":"module/program_termination_s.html"},{"title":"normal_termination_s – Caffeine","text":"Uses caffeine_h_m iso_fortran_env iso_c_binding Ancestors: normal_termination_m module~~normal_termination_s~~UsesGraph module~normal_termination_s normal_termination_s module~caffeine_h_m caffeine_h_m module~normal_termination_s->module~caffeine_h_m iso_fortran_env iso_fortran_env module~normal_termination_s->iso_fortran_env iso_c_binding iso_c_binding module~normal_termination_s->iso_c_binding module~normal_termination_m normal_termination_m module~normal_termination_s->module~normal_termination_m module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_stop_character caf_stop_integer Module Procedures module procedure caf_stop_character module procedure caf_stop_character() Arguments None module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None","tags":"","loc":"module/normal_termination_s.html"},{"title":"team_type_s – Caffeine","text":"Uses Ancestors: team_type_m module~~team_type_s~~UsesGraph module~team_type_s team_type_s module~team_type_m team_type_m module~team_type_s->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_change_team caf_end_team caf_form_team Module Procedures module procedure caf_change_team module module subroutine caf_change_team(team) Interface → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team module procedure caf_end_team module module subroutine caf_end_team() Interface → Arguments None module procedure caf_form_team module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg","tags":"","loc":"module/team_type_s.html"},{"title":"sychronization_s – Caffeine","text":"Uses caffeine_h_m Ancestors: synchronization_m module~~sychronization_s~~UsesGraph module~sychronization_s sychronization_s module~caffeine_h_m caffeine_h_m module~sychronization_s->module~caffeine_h_m module~synchronization_m synchronization_m module~sychronization_s->module~synchronization_m iso_c_binding iso_c_binding module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_sync_all Module Procedures module procedure caf_sync_all module module subroutine caf_sync_all() Interface → Arguments None","tags":"","loc":"module/sychronization_s.html"},{"title":"caffeinate_decaffeinate_s – Caffeine","text":"Uses caffeine_h_m synchronization_m iso_c_binding program_termination_m Ancestors: caffeinate_decaffeinate_m module~~caffeinate_decaffeinate_s~~UsesGraph module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeine_h_m caffeine_h_m module~caffeinate_decaffeinate_s->module~caffeine_h_m module~synchronization_m synchronization_m module~caffeinate_decaffeinate_s->module~synchronization_m module~program_termination_m program_termination_m module~caffeinate_decaffeinate_s->module~program_termination_m iso_c_binding iso_c_binding module~caffeinate_decaffeinate_s->iso_c_binding module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeinate_decaffeinate_s->module~caffeinate_decaffeinate_m module~caffeine_h_m->iso_c_binding module~team_type_m team_type_m module~caffeinate_decaffeinate_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_caffeinate caf_decaffeinate Module Procedures module procedure caf_caffeinate module module function caf_caffeinate() result(exit_code) Interface → Arguments None Return Value integer module procedure caf_decaffeinate module module subroutine caf_decaffeinate(exit_code) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code","tags":"","loc":"module/caffeinate_decaffeinate_s.html"},{"title":"image_enumeration_s – Caffeine","text":"Uses caffeine_h_m Ancestors: image_enumeration_m module~~image_enumeration_s~~UsesGraph module~image_enumeration_s image_enumeration_s module~caffeine_h_m caffeine_h_m module~image_enumeration_s->module~caffeine_h_m module~image_enumeration_m image_enumeration_m module~image_enumeration_s->module~image_enumeration_m iso_c_binding iso_c_binding module~caffeine_h_m->iso_c_binding module~team_type_m team_type_m module~image_enumeration_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures num_images_team num_images_team_number this_image_coarray_dim_team this_image_coarray_team this_image_team Module Procedures module procedure num_images_team module procedure num_images_team() Arguments None module procedure num_images_team_number module procedure num_images_team_number() Arguments None module procedure this_image_coarray_dim_team module procedure this_image_coarray_dim_team() Arguments None module procedure this_image_coarray_team module procedure this_image_coarray_team() Arguments None module procedure this_image_team module procedure this_image_team() Arguments None","tags":"","loc":"module/image_enumeration_s.html"},{"title":"caffeine_intrinsic_array_s – Caffeine","text":"Uses program_termination_m Ancestors: caffeine_intrinsic_array_m module~~caffeine_intrinsic_array_s~~UsesGraph module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~program_termination_m program_termination_m module~caffeine_intrinsic_array_s->module~program_termination_m module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~caffeine_intrinsic_array_s->module~caffeine_intrinsic_array_m module~caffeine_characterizable_m caffeine_characterizable_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures as_character construct Module Procedures module procedure as_character pure module module function as_character(self) result(character_self) Interface → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable module procedure construct module procedure construct() Arguments None","tags":"","loc":"module/caffeine_intrinsic_array_s.html"},{"title":"caffeine_assert_s – Caffeine","text":"Uses Ancestors: caffeine_assert_m module~~caffeine_assert_s~~UsesGraph module~caffeine_assert_s caffeine_assert_s module~caffeine_assert_m caffeine_assert_m module~caffeine_assert_s->module~caffeine_assert_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures assert Module Procedures module procedure assert pure module module subroutine assert(assertion, description, diagnostic_data) Interface → Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t","tags":"","loc":"module/caffeine_assert_s.html"},{"title":"co_sum_s – Caffeine","text":"Uses utilities_m caffeine_h_m iso_c_binding Ancestors: collective_subroutines_m module~~co_sum_s~~UsesGraph module~co_sum_s co_sum_s module~utilities_m utilities_m module~co_sum_s->module~utilities_m iso_c_binding iso_c_binding module~co_sum_s->iso_c_binding module~caffeine_h_m caffeine_h_m module~co_sum_s->module~caffeine_h_m module~collective_subroutines_m collective_subroutines_m module~co_sum_s->module~collective_subroutines_m module~utilities_m->iso_c_binding module~caffeine_h_m->iso_c_binding module~collective_subroutines_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_sum Module Procedures module procedure caf_co_sum module module subroutine caf_co_sum(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_sum_s.html"},{"title":"co_broadcast_s – Caffeine","text":"Uses utilities_m caffeine_h_m iso_c_binding Ancestors: collective_subroutines_m module~~co_broadcast_s~~UsesGraph module~co_broadcast_s co_broadcast_s module~utilities_m utilities_m module~co_broadcast_s->module~utilities_m iso_c_binding iso_c_binding module~co_broadcast_s->iso_c_binding module~caffeine_h_m caffeine_h_m module~co_broadcast_s->module~caffeine_h_m module~collective_subroutines_m collective_subroutines_m module~co_broadcast_s->module~collective_subroutines_m module~utilities_m->iso_c_binding module~caffeine_h_m->iso_c_binding module~collective_subroutines_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_broadcast Module Procedures module procedure caf_co_broadcast module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_broadcast_s.html"},{"title":"co_min_s – Caffeine","text":"Uses program_termination_m utilities_m caffeine_h_m caffeine_assert_m iso_c_binding Ancestors: collective_subroutines_m module~~co_min_s~~UsesGraph module~co_min_s co_min_s module~program_termination_m program_termination_m module~co_min_s->module~program_termination_m module~caffeine_h_m caffeine_h_m module~co_min_s->module~caffeine_h_m module~utilities_m utilities_m module~co_min_s->module~utilities_m module~collective_subroutines_m collective_subroutines_m module~co_min_s->module~collective_subroutines_m iso_c_binding iso_c_binding module~co_min_s->iso_c_binding module~caffeine_assert_m caffeine_assert_m module~co_min_s->module~caffeine_assert_m module~caffeine_h_m->iso_c_binding module~utilities_m->iso_c_binding module~collective_subroutines_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_min Module Procedures module procedure caf_co_min module module subroutine caf_co_min(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_min_s.html"},{"title":"co_max_s – Caffeine","text":"Uses program_termination_m utilities_m caffeine_h_m caffeine_assert_m iso_c_binding Ancestors: collective_subroutines_m module~~co_max_s~~UsesGraph module~co_max_s co_max_s module~program_termination_m program_termination_m module~co_max_s->module~program_termination_m module~caffeine_h_m caffeine_h_m module~co_max_s->module~caffeine_h_m module~utilities_m utilities_m module~co_max_s->module~utilities_m module~collective_subroutines_m collective_subroutines_m module~co_max_s->module~collective_subroutines_m iso_c_binding iso_c_binding module~co_max_s->iso_c_binding module~caffeine_assert_m caffeine_assert_m module~co_max_s->module~caffeine_assert_m module~caffeine_h_m->iso_c_binding module~utilities_m->iso_c_binding module~collective_subroutines_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_max Module Procedures module procedure caf_co_max module module subroutine caf_co_max(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_max_s.html"},{"title":"co_reduce_s – Caffeine","text":"Uses program_termination_m utilities_m caffeine_h_m caffeine_assert_m iso_c_binding caffeine_intrinsic_array_m Ancestors: collective_subroutines_m module~~co_reduce_s~~UsesGraph module~co_reduce_s co_reduce_s module~program_termination_m program_termination_m module~co_reduce_s->module~program_termination_m module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~co_reduce_s->module~caffeine_intrinsic_array_m module~caffeine_h_m caffeine_h_m module~co_reduce_s->module~caffeine_h_m module~utilities_m utilities_m module~co_reduce_s->module~utilities_m module~collective_subroutines_m collective_subroutines_m module~co_reduce_s->module~collective_subroutines_m iso_c_binding iso_c_binding module~co_reduce_s->iso_c_binding module~caffeine_assert_m caffeine_assert_m module~co_reduce_s->module~caffeine_assert_m module~caffeine_characterizable_m caffeine_characterizable_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m module~caffeine_h_m->iso_c_binding module~utilities_m->iso_c_binding module~collective_subroutines_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables dummy Module Procedures caf_co_reduce Variables Type Visibility Attributes Name Initial character(kind=c_char,len=5), private, parameter :: dummy = \"     \" Module Procedures module procedure caf_co_reduce module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_reduce_s.html"},{"title":"caffeine_m.f90 – Caffeine","text":"This file depends on sourcefile~~caffeine_m.f90~~EfferentGraph sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~caffeine_m.f90->sourcefile~program_termination_m.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~caffeine_m.f90->sourcefile~image_enumeration_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~caffeine_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeine_m.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~caffeine_m.f90->sourcefile~collective_subroutines_m.f90 sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~caffeine_m.f90->sourcefile~synchronization_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_m Source Code caffeine_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module caffeine_m use program_termination_m , only : caf_stop , caf_error_stop use image_enumeration_m , only : caf_this_image , caf_num_images use collective_subroutines_m , only : caf_co_sum , caf_co_max , caf_co_min , caf_co_reduce , caf_co_broadcast use caffeinate_decaffeinate_m , only : caf_caffeinate , caf_decaffeinate use team_type_m , only : caf_form_team , caf_change_team , caf_end_team , team_type use synchronization_m , only : caf_sync_all implicit none end module caffeine_m","tags":"","loc":"sourcefile/caffeine_m.f90.html"},{"title":"program_termination_s.f90 – Caffeine","text":"This file depends on sourcefile~~program_termination_s.f90~~EfferentGraph sourcefile~program_termination_s.f90 program_termination_s.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~program_termination_s.f90->sourcefile~program_termination_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~program_termination_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules program_termination_s Source Code program_termination_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( program_termination_m ) program_termination_s use iso_fortran_env , only : output_unit , error_unit use iso_c_binding , only : c_char , c_int use caffeine_h_m , only : caf_c_decaffeinate implicit none contains module procedure caf_stop_integer sync all !write(output_unit, *) \"caf_stop: stop code '\", stop_code, \"'\" write ( output_unit , * ) stop_code flush output_unit if (. not . present ( stop_code )) call caf_c_decaffeinate ( exit_code = 0_c_int ) ! does not return call caf_c_decaffeinate ( stop_code ) end procedure module procedure caf_stop_character sync all write ( output_unit , * ) \"caf_stop: stop code '\" // stop_code // \"'\" flush output_unit call caf_c_decaffeinate ( exit_code = 0_c_int ) ! does not return end procedure module procedure caf_error_stop_character interface pure subroutine caf_error_stop_character_c ( stop_code , length ) bind ( C , name = \"caf_error_stop_character_c\" ) use , intrinsic :: iso_c_binding , only : c_char , c_int implicit none integer ( c_int ), intent ( in ), value :: length character ( len = 1 , kind = c_char ), intent ( in ) :: stop_code ( length ) end subroutine end interface call caf_error_stop_character_c ( f_c_string ( stop_code ), len ( stop_code )) end procedure subroutine inner_caf_error_stop_character ( stop_code , length ) bind ( C , name = \"inner_caf_error_stop_character\" ) integer ( c_int ), intent ( in ) :: length character ( len = 1 , kind = c_char ), intent ( in ) :: stop_code ( length ) integer ( c_int ), parameter :: error_occured = 1 write ( error_unit , * ) c_f_string ( stop_code , length ) flush error_unit call caf_error_stop_integer ( error_occured ) end subroutine module procedure caf_error_stop_integer interface pure subroutine caf_error_stop_integer_c ( stop_code ) bind ( C , name = \"caf_error_stop_integer_c\" ) use , intrinsic :: iso_c_binding , only : c_int implicit none integer ( c_int ), intent ( in ) :: stop_code end subroutine end interface call caf_error_stop_integer_c ( stop_code ) end procedure subroutine inner_caf_error_stop_integer ( stop_code ) bind ( C , name = \"inner_caf_error_stop_integer\" ) integer , intent ( in ), optional :: stop_code integer exit_code if (. not . present ( stop_code )) then call caf_c_decaffeinate ( exit_code = 1 ) else if ( stop_code == 0 ) then write ( error_unit ) stop_code flush error_unit exit_code = 1 else exit_code = stop_code end if call caf_c_decaffeinate ( exit_code ) ! does not return end subroutine pure function f_c_string ( f_string ) result ( c_string ) character ( len =* ), intent ( in ) :: f_string character ( len = 1 , kind = c_char ) :: c_string ( len ( f_string )) integer :: i do concurrent ( i = 1 : len ( f_string )) c_string ( i ) = f_string ( i : i ) end do end function pure function c_f_string ( c_string , length ) result ( f_string ) integer ( c_int ), intent ( in ) :: length character ( len = 1 , kind = c_char ), intent ( in ) :: c_string ( length ) character ( len = length ) :: f_string integer :: i do concurrent ( i = 1 : length ) f_string ( i : i ) = c_string ( i ) end do end function end submodule program_termination_s","tags":"","loc":"sourcefile/program_termination_s.f90.html"},{"title":"utilities_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~utilities_m.f90~~AfferentGraph sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~co_broadcast_s.f90->sourcefile~utilities_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~utilities_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~utilities_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~utilities_m.f90 sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~co_sum_s.f90->sourcefile~utilities_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules utilities_m Source Code utilities_m.f90 Source Code module utilities_m use iso_c_binding , only : c_ptr , c_null_ptr , c_int , c_loc implicit none public :: get_c_ptr , get_c_ptr_character , optional_value contains pure function get_c_ptr ( stat ) result ( ptr ) integer , intent ( in ), optional , target :: stat type ( c_ptr ) ptr if ( present ( stat )) then ptr = c_loc ( stat ) else ptr = c_null_ptr end if end function pure function get_c_ptr_character ( errmsg ) result ( ptr ) character ( len =* ), intent ( in ), optional , target :: errmsg type ( c_ptr ) ptr if ( present ( errmsg )) then ptr = c_loc ( errmsg ) else ptr = c_null_ptr end if end function pure function optional_value ( var ) result ( c_val ) integer , intent ( in ), optional :: var integer ( c_int ) c_val if ( present ( var )) then c_val = var else c_val = 0_c_int end if end function end module utilities_m","tags":"","loc":"sourcefile/utilities_m.f90.html"},{"title":"normal_termination_s.f90 – Caffeine","text":"This file depends on sourcefile~~normal_termination_s.f90~~EfferentGraph sourcefile~normal_termination_s.f90 normal_termination_s.f90 sourcefile~normal_termination_m.f90 normal_termination_m.f90 sourcefile~normal_termination_s.f90->sourcefile~normal_termination_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~normal_termination_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules normal_termination_s Source Code normal_termination_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( normal_termination_m ) normal_termination_s use iso_fortran_env , only : output_unit use iso_c_binding , only : c_int use caffeine_h_m , only : caf_c_decaffeinate implicit none contains module procedure caf_stop_integer sync all write ( output_unit , * ) \"caf_stop: stop code '\" , stop_code , \"'\" flush output_unit if (. not . present ( stop_code )) call caf_c_decaffeinate ( exit_code = 0_c_int ) ! does not return call caf_c_decaffeinate ( stop_code ) end procedure module procedure caf_stop_character sync all write ( output_unit , * ) \"caf_stop: stop code '\" // stop_code // \"'\" flush output_unit call caf_c_decaffeinate ( exit_code = 0_c_int ) end procedure end submodule normal_termination_s","tags":"","loc":"sourcefile/normal_termination_s.f90.html"},{"title":"program_termination_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~program_termination_m.f90~~AfferentGraph sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~program_termination_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~program_termination_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~program_termination_m.f90 sourcefile~program_termination_s.f90 program_termination_s.f90 sourcefile~program_termination_s.f90->sourcefile~program_termination_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~program_termination_m.f90 sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_s.f90->sourcefile~program_termination_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~program_termination_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~program_termination_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules program_termination_m Source Code program_termination_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module program_termination_m implicit none private public :: caf_stop public :: caf_error_stop interface caf_stop module subroutine caf_stop_integer ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status integer , intent ( in ), optional :: stop_code end subroutine module subroutine caf_stop_character ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code as the process exit status character ( len =* ), intent ( in ) :: stop_code end subroutine end interface interface caf_error_stop pure module subroutine caf_error_stop_integer ( stop_code ) !! stop all images and provide the stop_code, or 0 if not present, as the process exit status integer , intent ( in ), optional :: stop_code end subroutine pure module subroutine caf_error_stop_character ( stop_code ) !! stop all images and provide the stop_code as the process exit status character ( len =* ), intent ( in ) :: stop_code end subroutine end interface end module program_termination_m","tags":"","loc":"sourcefile/program_termination_m.f90.html"},{"title":"synchronization_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~synchronization_m.f90~~AfferentGraph sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~synchronization_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~synchronization_m.f90 sourcefile~synchronization_s.f90 synchronization_s.f90 sourcefile~synchronization_s.f90->sourcefile~synchronization_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules synchronization_m Source Code synchronization_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module synchronization_m implicit none private public :: caf_sync_all interface module subroutine caf_sync_all () end subroutine end interface end module synchronization_m","tags":"","loc":"sourcefile/synchronization_m.f90.html"},{"title":"team_type_s.f90 – Caffeine","text":"This file depends on sourcefile~~team_type_s.f90~~EfferentGraph sourcefile~team_type_s.f90 team_type_s.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~team_type_s.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules team_type_s Source Code team_type_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( team_type_m ) team_type_s implicit none contains module procedure caf_change_team end procedure module procedure caf_end_team end procedure module procedure caf_form_team end procedure end submodule","tags":"","loc":"sourcefile/team_type_s.f90.html"},{"title":"caffeinate_decaffeinate_m.f90 – Caffeine","text":"This file depends on sourcefile~~caffeinate_decaffeinate_m.f90~~EfferentGraph sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Files dependent on this one sourcefile~~caffeinate_decaffeinate_m.f90~~AfferentGraph sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeinate_decaffeinate_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeinate_decaffeinate_m Source Code caffeinate_decaffeinate_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module caffeinate_decaffeinate_m use team_type_m , only : team_type implicit none private public :: caf_caffeinate , caf_decaffeinate , default_team type ( team_type ), target :: default_team interface module function caf_caffeinate () result ( exit_code ) implicit none integer exit_code end function module subroutine caf_decaffeinate ( exit_code ) implicit none integer , intent ( in ) :: exit_code end subroutine end interface end module caffeinate_decaffeinate_m","tags":"","loc":"sourcefile/caffeinate_decaffeinate_m.f90.html"},{"title":"synchronization_s.f90 – Caffeine","text":"This file depends on sourcefile~~synchronization_s.f90~~EfferentGraph sourcefile~synchronization_s.f90 synchronization_s.f90 sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~synchronization_s.f90->sourcefile~synchronization_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~synchronization_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules sychronization_s Source Code synchronization_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( synchronization_m ) sychronization_s use caffeine_h_m , only : caf_c_sync_all implicit none contains module procedure caf_sync_all call caf_c_sync_all end procedure end submodule","tags":"","loc":"sourcefile/synchronization_s.f90.html"},{"title":"normal_termination_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~normal_termination_m.f90~~AfferentGraph sourcefile~normal_termination_m.f90 normal_termination_m.f90 sourcefile~normal_termination_s.f90 normal_termination_s.f90 sourcefile~normal_termination_s.f90->sourcefile~normal_termination_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules normal_termination_m Source Code normal_termination_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module normal_termination_m implicit none private public :: caf_stop interface caf_stop module subroutine caf_stop_integer ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status integer , intent ( in ), optional :: stop_code end subroutine module subroutine caf_stop_character ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code as the process exit status character ( len =* ), intent ( in ) :: stop_code end subroutine end interface end module normal_termination_m","tags":"","loc":"sourcefile/normal_termination_m.f90.html"},{"title":"image_enumeration_m.f90 – Caffeine","text":"This file depends on sourcefile~~image_enumeration_m.f90~~EfferentGraph sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Files dependent on this one sourcefile~~image_enumeration_m.f90~~AfferentGraph sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~image_enumeration_m.f90 sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~image_enumeration_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules image_enumeration_m Source Code image_enumeration_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module image_enumeration_m use team_type_m , only : team_type implicit none private public :: caf_num_images public :: caf_this_image interface caf_num_images module function num_images_team ( team ) result ( image_count ) implicit none type ( team_type ), intent ( in ), optional :: team integer image_count end function module function num_images_team_number ( team_number ) result ( image_count ) implicit none integer , intent ( in ) :: team_number integer image_count end function end interface interface caf_this_image pure module function this_image_team ( team ) result ( image_number ) implicit none type ( team_type ), intent ( in ), optional :: team integer image_number end function module function this_image_coarray_team ( coarray , team ) result ( image_number ) implicit none type ( team_type ), intent ( in ), optional :: team class ( * ), intent ( in ) :: coarray (..) integer image_number end function module function this_image_coarray_dim_team ( coarray , dim , team ) result ( image_number ) implicit none class ( * ), intent ( in ) :: coarray (..) integer , intent ( in ) :: dim type ( team_type ), intent ( in ), optional :: team integer image_number end function end interface end module image_enumeration_m","tags":"","loc":"sourcefile/image_enumeration_m.f90.html"},{"title":"caffeinate_decaffeinate_s.F90 – Caffeine","text":"This file depends on sourcefile~~caffeinate_decaffeinate_s.f90~~EfferentGraph sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~synchronization_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~program_termination_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules caffeinate_decaffeinate_s Source Code caffeinate_decaffeinate_s.F90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( caffeinate_decaffeinate_m ) caffeinate_decaffeinate_s use iso_c_binding , only : c_int , c_loc , c_char , c_null_char use synchronization_m , only : caf_sync_all use caffeine_h_m , only : caf_c_caffeinate , caf_c_decaffeinate use program_termination_m , only : caf_error_stop implicit none contains module procedure caf_caffeinate integer i integer , parameter :: max_arg_len = 1024 associate ( argc => int ( command_argument_count (), c_int )) associate ( argv => [( c_loc ( c_interop_arg ( i )), i = 0 , argc )]) call caf_c_caffeinate ( argc , argv ) end associate end associate ! TODO: establish non-allocatable coarrays call caf_sync_all exit_code = 0 contains function c_interop_arg ( argnum ) result ( arg ) integer , intent ( in ) :: argnum integer arglen #ifndef __GFORTRAN__ character ( kind = c_char , len = max_arg_len ), target :: arg #else character ( kind = c_char , len = max_arg_len ), target :: targ ! work around gfortran bug character ( kind = c_char , len = max_arg_len ), pointer :: arg arg => targ #endif call get_command_argument ( argnum , arg , arglen ) if ( arglen + 1 > max_arg_len ) call caf_error_stop ( \"maximum argument length exceeded\" ) arg ( arglen + 1 : arglen + 1 ) = c_null_char end function end procedure module procedure caf_decaffeinate call caf_c_decaffeinate ( exit_code ) end procedure end submodule caffeinate_decaffeinate_s","tags":"","loc":"sourcefile/caffeinate_decaffeinate_s.f90.html"},{"title":"caffeine_h_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~caffeine_h_m.f90~~AfferentGraph sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~co_broadcast_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~program_termination_s.f90 program_termination_s.f90 sourcefile~program_termination_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~synchronization_s.f90 synchronization_s.f90 sourcefile~synchronization_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~normal_termination_s.f90 normal_termination_s.f90 sourcefile~normal_termination_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~co_sum_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_h_m Source Code caffeine_h_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module caffeine_h_m ! Fortran module shadowing the caffeine.h header file use iso_c_binding , only : c_int , c_ptr , c_size_t , c_funptr , c_bool implicit none private public :: caf_c_caffeinate , caf_c_decaffeinate public :: caf_c_num_images , caf_c_this_image public :: caf_c_sync_all public :: caf_c_co_broadcast , caf_c_co_sum , caf_c_co_min , caf_c_co_max , caf_c_co_reduce public :: caf_c_same_cfi_type , caf_c_elem_len , caf_c_numeric_type , caf_c_is_f_string interface ! ________ Program initiation and finalization ___________ subroutine caf_c_caffeinate ( argc , argv ) bind ( C ) !! void c_caffeinate(int argc, char *argv[]); import c_int , c_ptr implicit none integer ( c_int ), value :: argc type ( c_ptr ) argv ( * ) end subroutine subroutine caf_c_decaffeinate ( exit_code ) bind ( C ) !! void c_decaffeinate(); import c_int implicit none integer ( c_int ), value :: exit_code end subroutine ! _________________ Image enumeration ____________________ pure function caf_c_this_image () bind ( C ) !! int caf_c_this_image(); import c_int implicit none integer ( c_int ) caf_c_this_image end function pure function caf_c_num_images () bind ( C ) !! int caf_c_num_images(); import c_int implicit none integer ( c_int ) caf_c_num_images end function ! __________________ Synchronization _____________________ subroutine caf_c_sync_all () bind ( C ) !! void caf_c_sync_all(); import c_int implicit none end subroutine ! ______________ Collective Subroutines __________________ subroutine caf_c_co_broadcast ( a , source_image , stat , Nelem ) bind ( C ) !! void c_co_broadcast(CFI_cdesc_t * a_desc, int source_image, int* stat, int num_elements); import c_int , c_ptr implicit none type ( * ) a (..) type ( c_ptr ), value :: stat integer ( c_int ), value :: source_image , Nelem end subroutine subroutine caf_c_co_reduce ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements , Coll_ReduceSub , client_data ) bind ( C ) !! void caf_c_co_reduce(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, int num_elements, gex_Coll_ReduceFn_t* user_op, void* client_data) import c_int , c_ptr , c_size_t , c_funptr implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg , client_data type ( c_funptr ), value :: Coll_ReduceSub integer ( c_size_t ), value :: num_elements end subroutine subroutine caf_c_co_sum ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements ) bind ( C ) !! void c_co_sum(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, size_t num_elements); import c_int , c_ptr , c_size_t implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg integer ( c_size_t ), value :: num_elements end subroutine subroutine caf_c_co_min ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements ) bind ( C ) !! void c_co_min(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, size_t num_elements); import c_int , c_ptr , c_size_t implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg integer ( c_size_t ), value :: num_elements end subroutine subroutine caf_c_co_max ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements ) bind ( C ) !! void c_co_max(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, size_t num_elements); import c_int , c_ptr , c_size_t implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg integer ( c_size_t ), value :: num_elements end subroutine logical ( c_bool ) pure function caf_c_same_cfi_type ( a , b ) bind ( C ) !! bool caf_c_same_cfi_type(CFI_cdesc_t* a_desc, CFI_cdesc_t* a_desc); import c_bool type ( * ), intent ( in ) :: a (..), b (..) end function logical ( c_bool ) pure function caf_c_numeric_type ( a ) bind ( C ) !! bool caf_c_numeric_type(CFI_cdesc_t* a_desc); import c_bool type ( * ), intent ( in ) :: a (..) end function logical ( c_bool ) pure function caf_c_is_f_string ( a ) bind ( C ) !! bool caf_c_is_f_string(CFI_cdesc_t* a_desc); import c_bool type ( * ), intent ( in ) :: a (..) end function pure function caf_c_elem_len ( a ) result ( a_elem_len ) bind ( C ) !! size_t caf_c_elem_len(CFI_cdesc_t* a_desc); import c_size_t type ( * ), intent ( in ) :: a (..) integer ( c_size_t ), target :: a_elem_len end function end interface end module caffeine_h_m","tags":"","loc":"sourcefile/caffeine_h_m.f90.html"},{"title":"team_type_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~team_type_m.f90~~AfferentGraph sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 sourcefile~team_type_s.f90 team_type_s.f90 sourcefile~team_type_s.f90->sourcefile~team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeine_m.f90->sourcefile~image_enumeration_m.f90 sourcefile~caffeine_m.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~image_enumeration_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules team_type_m Source Code team_type_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module team_type_m implicit none private public :: team_type , caf_form_team , current_team , caf_end_team , caf_change_team type team_type end type type ( team_type ), pointer :: current_team => null () interface module subroutine caf_form_team ( num , team , new_index , stat , errmsg ) integer , intent ( in ) :: num type ( team_type ), intent ( out ) :: team integer , intent ( in ), optional :: new_index integer , intent ( out ), optional :: stat character ( len =* ), intent ( inout ), optional :: errmsg end subroutine module subroutine caf_change_team ( team ) type ( team_type ), target , intent ( in ) :: team end subroutine module subroutine caf_end_team () end subroutine end interface end module team_type_m","tags":"","loc":"sourcefile/team_type_m.f90.html"},{"title":"collective_subroutines_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~collective_subroutines_m.f90~~AfferentGraph sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~co_broadcast_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~co_sum_s.f90->sourcefile~collective_subroutines_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules collective_subroutines_m Source Code collective_subroutines_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module collective_subroutines_m use iso_c_binding , only : c_int32_t , c_int64_t , c_float , c_char , c_bool , c_funptr , c_double implicit none private public :: caf_co_sum public :: caf_co_max public :: caf_co_min public :: caf_co_reduce public :: caf_co_broadcast public :: c_int32_t_operation public :: c_int64_t_operation public :: c_float_operation public :: c_double_operation public :: c_bool_operation public :: c_char_operation public :: c_float_complex_operation public :: c_double_complex_operation abstract interface pure function c_int32_t_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_int32_t implicit none integer ( c_int32_t ), intent ( in ) :: lhs , rhs integer ( c_int32_t ) lhs_op_rhs end function pure function c_int64_t_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_int64_t implicit none integer ( c_int64_t ), intent ( in ) :: lhs , rhs integer ( c_int64_t ) lhs_op_rhs end function pure function c_float_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_float implicit none real ( c_float ), intent ( in ) :: lhs , rhs real ( c_float ) lhs_op_rhs end function pure function c_double_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_double implicit none real ( c_double ), intent ( in ) :: lhs , rhs real ( c_double ) lhs_op_rhs end function pure function c_bool_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_bool implicit none logical ( c_bool ), intent ( in ) :: lhs , rhs logical ( c_bool ) lhs_op_rhs end function pure function c_char_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_char implicit none character ( kind = c_char , len =* ), intent ( in ) :: lhs , rhs character ( kind = c_char , len = :), allocatable :: lhs_op_rhs end function pure function c_float_complex_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_float implicit none complex ( c_float ), intent ( in ) :: lhs , rhs complex ( c_float ) lhs_op_rhs end function pure function c_double_complex_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_double implicit none complex ( c_double ), intent ( in ) :: lhs , rhs complex ( c_double ) lhs_op_rhs end function end interface interface module subroutine caf_co_sum ( a , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , intent ( in ), target , optional :: result_image integer , intent ( out ), target , optional :: stat character ( len =* ), intent ( inout ), target , optional :: errmsg end subroutine module subroutine caf_co_max ( a , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , intent ( in ), optional , target :: result_image integer , intent ( out ), optional , target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine module subroutine caf_co_min ( a , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , intent ( in ), optional , target :: result_image integer , intent ( out ), optional , target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine module subroutine caf_co_reduce ( a , operation , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) type ( c_funptr ), value :: operation integer , intent ( in ), optional , target :: result_image integer , intent ( out ), optional , target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine module subroutine caf_co_broadcast ( a , source_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , optional , intent ( in ) :: source_image integer , optional , intent ( out ), target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine end interface end module","tags":"","loc":"sourcefile/collective_subroutines_m.f90.html"},{"title":"image_enumeration_s.f90 – Caffeine","text":"This file depends on sourcefile~~image_enumeration_s.f90~~EfferentGraph sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~image_enumeration_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~image_enumeration_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules image_enumeration_s Source Code image_enumeration_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( image_enumeration_m ) image_enumeration_s use caffeine_h_m , only : caf_c_num_images , caf_c_this_image implicit none contains module procedure num_images_team image_count = caf_c_num_images () end procedure module procedure num_images_team_number end procedure module procedure this_image_team image_number = caf_c_this_image () end procedure module procedure this_image_coarray_team end procedure module procedure this_image_coarray_dim_team end procedure end submodule image_enumeration_s","tags":"","loc":"sourcefile/image_enumeration_s.f90.html"},{"title":"intrinsic_array_s.F90 – Caffeine","text":"This file depends on sourcefile~~intrinsic_array_s.f90~~EfferentGraph sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~intrinsic_array_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~intrinsic_array_s.f90->sourcefile~program_termination_m.f90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules caffeine_intrinsic_array_s Source Code intrinsic_array_s.F90 Source Code submodule ( caffeine_intrinsic_array_m ) caffeine_intrinsic_array_s use program_termination_m , only : caf_error_stop implicit none contains module procedure construct #ifndef NAGFOR select rank ( array ) rank ( 1 ) #endif select type ( array ) type is ( complex ) intrinsic_array % complex_1D = array type is ( integer ) intrinsic_array % integer_1D = array type is ( logical ) intrinsic_array % logical_1D = array type is ( real ) intrinsic_array % real_1D = array type is ( double precision ) intrinsic_array % double_precision_1D = array class default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank-2 type\" ) end select #ifndef NAGFOR rank ( 2 ) select type ( array ) type is ( complex ) intrinsic_array % complex_2D = array type is ( integer ) intrinsic_array % integer_2D = array type is ( logical ) intrinsic_array % logical_2D = array type is ( real ) intrinsic_array % real_2D = array type is ( double precision ) intrinsic_array % double_precision_2D = array class default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank-2 type\" ) end select rank ( 3 ) select type ( array ) type is ( complex ) intrinsic_array % complex_3D = array type is ( integer ) intrinsic_array % integer_3D = array type is ( logical ) intrinsic_array % logical_3D = array type is ( real ) intrinsic_array % real_3D = array type is ( double precision ) intrinsic_array % double_precision_3D = array class default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank-3 type\" ) end select rank default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank\" ) end select #endif end procedure module procedure as_character integer , parameter :: single_number_width = 32 if ( 1 /= count ( & [ allocated ( self % complex_1D ), allocated ( self % complex_double_1D ), allocated ( self % integer_1D ), & allocated ( self % logical_1D ), allocated ( self % real_1D ), & allocated ( self % complex_2D ), allocated ( self % complex_double_2D ), allocated ( self % integer_2D ), & allocated ( self % logical_2D ), allocated ( self % real_2D ), & allocated ( self % complex_3D ), allocated ( self % complex_double_3D ), allocated ( self % integer_3D ), & allocated ( self % logical_3D ), allocated ( self % real_3D ) & ])) call caf_error_stop ( \"intrinsic_array_t as_character: ambiguous component allocation status.\" ) if ( allocated ( self % complex_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_1D )) write ( character_self , * ) self % complex_1D else if ( allocated ( self % complex_double_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_double_1D )) write ( character_self , * ) self % complex_double_1D else if ( allocated ( self % integer_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % integer_1D )) write ( character_self , * ) self % integer_1D else if ( allocated ( self % logical_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % logical_1D )) write ( character_self , * ) self % logical_1D else if ( allocated ( self % real_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % real_1D )) write ( character_self , * ) self % real_1D else if ( allocated ( self % double_precision_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % double_precision_1D )) write ( character_self , * ) self % double_precision_1D else if ( allocated ( self % complex_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_2D )) write ( character_self , * ) self % complex_2D else if ( allocated ( self % complex_double_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_double_2D )) write ( character_self , * ) self % complex_double_2D else if ( allocated ( self % integer_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % integer_2D )) write ( character_self , * ) self % integer_2D else if ( allocated ( self % logical_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % logical_1D )) write ( character_self , * ) self % logical_2D else if ( allocated ( self % real_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % real_2D )) write ( character_self , * ) self % real_2D else if ( allocated ( self % double_precision_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % double_precision_2D )) write ( character_self , * ) self % double_precision_2D else if ( allocated ( self % complex_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_3D )) write ( character_self , * ) self % complex_3D else if ( allocated ( self % complex_double_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_double_3D )) write ( character_self , * ) self % complex_double_3D else if ( allocated ( self % integer_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % integer_3D )) write ( character_self , * ) self % integer_3D else if ( allocated ( self % logical_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % logical_1D )) write ( character_self , * ) self % logical_3D else if ( allocated ( self % real_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % real_3D )) write ( character_self , * ) self % real_3D else if ( allocated ( self % double_precision_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % double_precision_3D )) write ( character_self , * ) self % double_precision_3D end if character_self = trim ( adjustl ( character_self )) end procedure end submodule","tags":"","loc":"sourcefile/intrinsic_array_s.f90.html"},{"title":"assert_m.F90 – Caffeine","text":"Files dependent on this one sourcefile~~assert_m.f90~~AfferentGraph sourcefile~assert_m.f90 assert_m.F90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~assert_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~assert_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~assert_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~assert_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_assert_m Source Code assert_m.F90 Source Code ! !     (c) 2019-2020 Guide Star Engineering, LLC !     This Software was developed for the US Nuclear Regulatory Commission (US NRC) under contract !     \"Multi-Dimensional Physics Implementation into Fuel Analysis under Steady-state and Transients (FAST)\", !     contract # NRC-HQ-60-17-C-0007 ! module caffeine_assert_m !! summary: Utility for runtime checking of logical assertions. !! usage: error-terminate if the assertion fails: !! !!    use assertions_m, only : assert !!    call assert( 2 > 1, \"2 > 1\") !! !! Turn off assertions in production code by setting USE_ASSERTIONS to .false. via the preprocessor. !! This file's capitalized .F90 extension causes most Fortran compilers to preprocess this file so !! that building as follows turns off assertion enforcement: !! !!    fpm build --flag \"-DUSE_ASSERTIONS=.false.\" !! !! Doing so may eliminate any associated runtime overhead by enabling optimizing compilers to ignore !! the assertion procedure body during a dead-code-removal phase of optimization. implicit none private public :: assert #ifndef USE_ASSERTIONS # define USE_ASSERTIONS .true. #endif logical , parameter :: enforce_assertions = USE_ASSERTIONS !! Turn off assertions as follows: fpm build --flag \"-DUSE_ASSERTIONS=.false.\" interface pure module subroutine assert ( assertion , description , diagnostic_data ) !! If assertion is .false., error-terminate with a character stop code that contains diagnostic_data if present implicit none logical , intent ( in ) :: assertion !! Most assertions will be expressions such as i>0 character ( len =* ), intent ( in ) :: description !! A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class ( * ), intent ( in ), optional :: diagnostic_data !! Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t end subroutine end interface end module","tags":"","loc":"sourcefile/assert_m.f90.html"},{"title":"intrinsic_array_m.F90 – Caffeine","text":"This file depends on sourcefile~~intrinsic_array_m.f90~~EfferentGraph sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Files dependent on this one sourcefile~~intrinsic_array_m.f90~~AfferentGraph sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~intrinsic_array_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_intrinsic_array_m Source Code intrinsic_array_m.F90 Source Code module caffeine_intrinsic_array_m !! Define an abstract class that supports object representation in character form use caffeine_characterizable_m , only : characterizable_t implicit none private public :: intrinsic_array_t type , extends ( characterizable_t ) :: intrinsic_array_t complex , allocatable :: complex_1D (:) complex ( kind ( 1.D0 )), allocatable :: complex_double_1D (:) integer , allocatable :: integer_1D (:) logical , allocatable :: logical_1D (:) real , allocatable :: real_1D (:) double precision , allocatable :: double_precision_1D (:) complex , allocatable :: complex_2D (:,:) complex ( kind ( 1.D0 )), allocatable :: complex_double_2D (:,:) integer , allocatable :: integer_2D (:,:) logical , allocatable :: logical_2D (:,:) real , allocatable :: real_2D (:,:) double precision , allocatable :: double_precision_2D (:,:) complex , allocatable :: complex_3D (:,:,:) complex ( kind ( 1.D0 )), allocatable :: complex_double_3D (:,:,:) integer , allocatable :: integer_3D (:,:,:) logical , allocatable :: logical_3D (:,:,:) real , allocatable :: real_3D (:,:,:) double precision , allocatable :: double_precision_3D (:,:,:) contains procedure :: as_character end type interface intrinsic_array_t pure module function construct ( array ) result ( intrinsic_array ) implicit none #ifndef NAGFOR class ( * ), intent ( in ) :: array (..) #else class ( * ), intent ( in ) :: array (:) #endif type ( intrinsic_array_t ) intrinsic_array end function end interface interface pure module function as_character ( self ) result ( character_self ) implicit none class ( intrinsic_array_t ), intent ( in ) :: self character ( len = :), allocatable :: character_self end function end interface end module","tags":"","loc":"sourcefile/intrinsic_array_m.f90.html"},{"title":"characterizable_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~characterizable_m.f90~~AfferentGraph sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~characterizable_m.f90 sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~intrinsic_array_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_characterizable_m Source Code characterizable_m.f90 Source Code module caffeine_characterizable_m !! Define an abstract class that supports object representation in character form implicit none private public :: characterizable_t type , abstract :: characterizable_t contains procedure ( as_character_i ), deferred :: as_character end type abstract interface pure function as_character_i ( self ) result ( character_self ) import characterizable_t implicit none class ( characterizable_t ), intent ( in ) :: self character ( len = :), allocatable :: character_self end function end interface end module","tags":"","loc":"sourcefile/characterizable_m.f90.html"},{"title":"assert_s.f90 – Caffeine","text":"This file depends on sourcefile~~assert_s.f90~~EfferentGraph sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~assert_s.f90->sourcefile~assert_m.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~assert_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~assert_s.f90->sourcefile~characterizable_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~assert_s.f90->sourcefile~program_termination_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules caffeine_assert_s Source Code assert_s.f90 Source Code ! !     (c) 2019-2020 Guide Star Engineering, LLC !     This Software was developed for the US Nuclear Regulatory Commission (US NRC) under contract !     \"Multi-Dimensional Physics Implementation into Fuel Analysis under Steady-state and Transients (FAST)\", !     contract # NRC-HQ-60-17-C-0007 ! submodule ( caffeine_assert_m ) caffeine_assert_s implicit none contains module procedure assert use caffeine_characterizable_m , only : characterizable_t use program_termination_m , only : caf_error_stop use image_enumeration_m , only : this_image => caf_this_image character ( len = :), allocatable :: header , trailer toggle_assertions : & if ( enforce_assertions ) then check_assertion : & if (. not . assertion ) then associate ( me => this_image ()) ! work around gfortran bug header = 'Assertion \"' // description // '\" failed on image ' // string ( me ) end associate represent_diagnostics_as_string : & if (. not . present ( diagnostic_data )) then trailer = \"(none provided)\" else select type ( diagnostic_data ) type is ( character ( len =* )) trailer = diagnostic_data type is ( complex ) trailer = string ( diagnostic_data ) type is ( integer ) trailer = string ( diagnostic_data ) type is ( logical ) trailer = string ( diagnostic_data ) type is ( real ) trailer = string ( diagnostic_data ) class is ( characterizable_t ) trailer = diagnostic_data % as_character () class default trailer = \"of unsupported type.\" end select end if represent_diagnostics_as_string call caf_error_stop ( header // ' with diagnostic data \"' // trailer // '\"' ) end if check_assertion end if toggle_assertions contains pure function string ( numeric ) result ( number_as_string ) !! Result is a string represention of the numeric argument class ( * ), intent ( in ) :: numeric integer , parameter :: max_len = 128 character ( len = max_len ) :: untrimmed_string character ( len = :), allocatable :: number_as_string select type ( numeric ) type is ( complex ) write ( untrimmed_string , * ) numeric type is ( integer ) write ( untrimmed_string , * ) numeric type is ( logical ) write ( untrimmed_string , * ) numeric type is ( real ) write ( untrimmed_string , * ) numeric class default call caf_error_stop ( \"Internal error in subroutine 'assert': unsupported type in function 'string'.\" ) end select number_as_string = trim ( adjustl ( untrimmed_string )) end function string end procedure end submodule","tags":"","loc":"sourcefile/assert_s.f90.html"},{"title":"co_sum_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_sum_s.f90~~EfferentGraph sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_sum_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_sum_s.f90->sourcefile~utilities_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_sum_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_sum_s Source Code co_sum_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_sum_s use iso_c_binding , only : c_ptr , c_size_t , c_null_char , c_f_pointer use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_sum implicit none contains module procedure caf_co_sum type ( c_ptr ) stat_c_ptr , errmsg_c_ptr character ( len = :), allocatable :: c_string character ( len = :), pointer :: errmsg_f_ptr stat_c_ptr = get_c_ptr ( stat ) c_string = errmsg // c_null_char errmsg_c_ptr = get_c_ptr_character ( c_string ) call caf_c_co_sum ( a , optional_value ( result_image ), stat_c_ptr , errmsg_c_ptr , int ( product ( shape ( a )), c_size_t )) call c_f_pointer ( errmsg_c_ptr , errmsg_f_ptr ) errmsg = errmsg_f_ptr end procedure end submodule co_sum_s","tags":"","loc":"sourcefile/co_sum_s.f90.html"},{"title":"co_broadcast_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_broadcast_s.f90~~EfferentGraph sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_broadcast_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_broadcast_s.f90->sourcefile~utilities_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_broadcast_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_broadcast_s Source Code co_broadcast_s.f90 Source Code submodule ( collective_subroutines_m ) co_broadcast_s use iso_c_binding , only : c_ptr use utilities_m , only : get_c_ptr use caffeine_h_m , only : caf_c_co_broadcast implicit none contains module procedure caf_co_broadcast type ( c_ptr ) stat_ptr stat_ptr = get_c_ptr ( stat ) call caf_c_co_broadcast ( a , source_image , stat_ptr , product ( shape ( a ))) ! With a compliant Fortran 2018 compiler, pass in c_sizeof(a) as the final argument ! and eliminate the calculation of num_elements*sizeof(a) in caffeine.c. end procedure end submodule co_broadcast_s","tags":"","loc":"sourcefile/co_broadcast_s.f90.html"},{"title":"co_min_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_min_s.f90~~EfferentGraph sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_min_s.f90->sourcefile~utilities_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~co_min_s.f90->sourcefile~program_termination_m.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~co_min_s.f90->sourcefile~assert_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_min_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_min_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_min_s Source Code co_min_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_min_s use iso_c_binding , only : c_ptr , c_size_t , c_null_char , c_f_pointer , c_funloc , c_null_ptr use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_min , caf_c_same_cfi_type , caf_c_numeric_type , caf_c_is_f_string use caffeine_assert_m , only : assert use program_termination_m , only : caf_error_stop implicit none contains module procedure caf_co_min type ( c_ptr ) :: stat_c_ptr = c_null_ptr , errmsg_c_ptr = c_null_ptr character ( len = :), allocatable :: c_string character ( len = :), pointer :: errmsg_f_ptr if ( caf_c_numeric_type ( a )) then stat_c_ptr = get_c_ptr ( stat ) c_string = errmsg // c_null_char errmsg_c_ptr = get_c_ptr_character ( c_string ) call caf_c_co_min ( a , optional_value ( result_image ), stat_c_ptr , errmsg_c_ptr , int ( product ( shape ( a )), c_size_t )) call c_f_pointer ( errmsg_c_ptr , errmsg_f_ptr ) ! no need to do this for stat was passed by reference errmsg = errmsg_f_ptr ! copy the output back & truncate the null terminator else if ( caf_c_is_f_string ( a )) then call caf_co_reduce ( a , c_funloc ( alphabetize ), optional_value ( result_image ), stat , errmsg ) else call caf_error_stop ( \"caf_co_min: unsupported type\" ) end if contains pure function alphabetize ( lhs , rhs ) result ( first_alphabetically ) character ( len =* ), intent ( in ) :: lhs , rhs character ( len = :), allocatable :: first_alphabetically call assert ( len ( lhs ) == len ( rhs ), \"caf_co_min: LHS/RHS length match\" , lhs // \" , \" // rhs ) first_alphabetically = min ( lhs , rhs ) end function end procedure end submodule co_min_s","tags":"","loc":"sourcefile/co_min_s.f90.html"},{"title":"co_max_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_max_s.f90~~EfferentGraph sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_max_s.f90->sourcefile~utilities_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~co_max_s.f90->sourcefile~program_termination_m.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~co_max_s.f90->sourcefile~assert_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_max_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_max_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_max_s Source Code co_max_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_max_s use iso_c_binding , only : c_ptr , c_size_t , c_null_char , c_f_pointer , c_funloc , c_null_ptr use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_max , caf_c_same_cfi_type , caf_c_numeric_type , caf_c_is_f_string use caffeine_assert_m , only : assert use program_termination_m , only : caf_error_stop implicit none contains module procedure caf_co_max type ( c_ptr ) :: stat_c_ptr = c_null_ptr , errmsg_c_ptr = c_null_ptr character ( len = :), allocatable :: c_string character ( len = :), pointer :: errmsg_f_ptr if ( caf_c_numeric_type ( a )) then stat_c_ptr = get_c_ptr ( stat ) c_string = errmsg // c_null_char errmsg_c_ptr = get_c_ptr_character ( c_string ) call caf_c_co_max ( a , optional_value ( result_image ), stat_c_ptr , errmsg_c_ptr , int ( product ( shape ( a )), c_size_t )) call c_f_pointer ( errmsg_c_ptr , errmsg_f_ptr ) ! no need to do this for stat was passed by reference errmsg = errmsg_f_ptr ! copy the output back & truncate the null terminator else if ( caf_c_is_f_string ( a )) then call caf_co_reduce ( a , c_funloc ( reverse_alphabetize ), optional_value ( result_image ), stat , errmsg ) else call caf_error_stop ( \"caf_co_max: unsupported type\" ) end if contains pure function reverse_alphabetize ( lhs , rhs ) result ( last_alphabetically ) character ( len =* ), intent ( in ) :: lhs , rhs character ( len = :), allocatable :: last_alphabetically call assert ( len ( lhs ) == len ( rhs ), \"caf_co_max: LHS/RHS length match\" , lhs // \" , \" // rhs ) last_alphabetically = max ( lhs , rhs ) end function end procedure end submodule co_max_s","tags":"","loc":"sourcefile/co_max_s.f90.html"},{"title":"co_reduce_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_reduce_s.f90~~EfferentGraph sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_reduce_s.f90->sourcefile~utilities_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~co_reduce_s.f90->sourcefile~program_termination_m.f90 sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~co_reduce_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~co_reduce_s.f90->sourcefile~assert_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_reduce_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_reduce_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_reduce_s Source Code co_reduce_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_reduce_s use iso_c_binding , only : & c_ptr , c_size_t , c_loc , c_null_ptr , c_funloc , c_associated , c_f_pointer , c_int , c_f_procpointer use caffeine_assert_m , only : assert use caffeine_intrinsic_array_m , only : intrinsic_array_t use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_reduce , caf_c_same_cfi_type , caf_c_elem_len , caf_c_is_f_string use program_termination_m , only : caf_error_stop implicit none character ( kind = c_char , len = 5 ), parameter :: dummy = \"     \" contains module procedure caf_co_reduce type ( c_ptr ) :: stat_ptr = c_null_ptr , errmsg_ptr = c_null_ptr procedure ( c_int32_t_operation ), pointer :: int32_op => null () procedure ( c_int64_t_operation ), pointer :: int64_op => null () procedure ( c_float_operation ), pointer :: float_op => null () procedure ( c_double_operation ), pointer :: double_op => null () procedure ( c_bool_operation ), pointer :: bool_op => null () procedure ( c_char_operation ), pointer :: char_op => null () procedure ( c_float_complex_operation ), pointer :: float_complex_op => null () procedure ( c_double_complex_operation ), pointer :: double_complex_op => null () call assert ( c_associated ( operation ), \"caf_co_reduce: c_associated(operation)\" ) stat_ptr = get_c_ptr ( stat ) errmsg_ptr = get_c_ptr_character ( errmsg ) if ( caf_c_same_cfi_type ( a , 0 )) then call c_f_procpointer ( operation , int32_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_int32_t ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , 0_c_int64_t )) then call c_f_procpointer ( operation , int64_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_int64_t ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , 1._c_double )) then call c_f_procpointer ( operation , double_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_double ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , 1._c_float )) then call c_f_procpointer ( operation , float_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_float ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , . true . _ c_bool )) then call c_f_procpointer ( operation , bool_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_bool ), c_null_ptr ) else if ( caf_c_is_f_string ( a )) then block integer ( c_size_t ), target :: len_a len_a = caf_c_elem_len ( a ) call c_f_procpointer ( operation , char_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_char ), c_loc ( len_a )) end block else if ( caf_c_same_cfi_type ( a , ( 0._c_float , 0._c_float ))) then call c_f_procpointer ( operation , float_complex_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_float_complex ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , ( 0._c_double , 0._c_double ))) then call c_f_procpointer ( operation , double_complex_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_double_complex ), c_null_ptr ) else call caf_error_stop ( \"caf_co_reduce: unsupported type\" ) end if contains subroutine Coll_ReduceSub_c_int32_t ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data integer ( c_int32_t ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_int32_t: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = int32_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_int64_t ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data integer ( c_int64_t ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_int64_t: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = int64_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_double ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data real ( c_double ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_double: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = double_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_float ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data real ( c_float ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_float: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = float_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_double_complex ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data complex ( c_double ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_dobule_complex: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = double_complex_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_float_complex ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data complex ( c_float ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_float_complex: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = float_complex_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_bool ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data logical ( c_bool ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_bool: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = bool_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_char ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data character ( kind = c_char , len = :), allocatable , target :: prototype (:) character ( kind = c_char , len = :), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_int ), pointer :: arglen => null () associate ( c_associated_args => [ c_associated ( arg1 ), c_associated ( arg2_and_out ), c_associated ( cdata )]) call assert ( all ( c_associated_args ), \"Coll_ReduceSub_c_char: all(c_associated_args)\" , intrinsic_array_t ( c_associated_args )) end associate call c_f_pointer ( cdata , arglen ) allocate ( character ( kind = c_char , len = arglen ) :: prototype ( count )) lhs => prototype ! set string length rhs_and_result => prototype ! set string length call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) block integer ( c_size_t ) i do concurrent ( i = 1 : count ) rhs_and_result ( i ) = char_op ( lhs ( i ), rhs_and_result ( i )) end do end block end subroutine end procedure end submodule co_reduce_s","tags":"","loc":"sourcefile/co_reduce_s.f90.html"}]}
\ No newline at end of file
+var tipuesearch = {"pages":[{"title":" Caffeine ","text":"Caffeine Documentation Philosophy and Motivations Organization Warning Caffeine is early-stage developmental software with evolving interfaces and functionality. Documentation Welcome to the Caffeine documentation. FORD generates this documentation from inline comments, static analysis, and Markdown files.\nThe target audience for Caffeine is Fortran compiler developers.\nWith a fully Caffeinated compiler, Fortran programmers can produce parallel executable files from standard Fortran with no need to directly reference Caffeine or any lower-level communication software. Philosophy and Motivations Write as much of Caffeine as possible in Fortran: Writing the runtime library in the language of the users increases the likelihood of community contributions. Writing the runtime library in Fortran obviates the need to directly manipulate compiler descriptors throughout much of Caffeine and allows Caffeine's underlying C layer to receive the Fortran-standard CFI_cdesc_t descriptor, which will make it easier to support multiple compilers. Writing most of Caffeine in Fortran offers the potential exploiting Fortran's rich array syntax, concurrent loop iterations ( do concurrent ), pure procedures and related features. Currently, these play a role only in one place: C callbacks to user-provided, pure functions that can be invoked inside a do concurrent block during the execution of co_reduce . Define an interface that remains agnostic about the back-end communication library: Once multiple back ends are supported, Fortran developers would not have to rewrite or even recompile their programs in order to change back ends. Switching from GASNet-EX to MPI, for example, could become a link-time decision. Organization The tree below depicts a skeletal overview of Caffeine's directory structure. build / - build directory created by running ./ install . sh |-- run - fpm . sh - shell script for rebuilding Caffeine or running examples or tests |-- * - temporary build files example / |-- hello . f90 - a Caffeinated \"Hello, world!\" program |-- support - test / - programs invoked by the test suite src / |-- caffeine_m . f90 - the Big Kahuna : one module that exports all Caffeine functionality |-- caffeine / |-- * _m . f90 - modules containing procedure interface bodies |-- * _s . f90 - submodules containing procedure definitions |-- *. c - thin C functions wrapping networking middleware |-- *. h - corresponding C header files |-- * _h_m . f90 - a Fortran translation of a C header file |-- collective_subroutines / |-- co_ * _s . f90 - submodules containing procedure definitions test / |-- main . f90 - test suite driver created by make_vegetable_driver |-- * _test . f90 - unit tests Developer Info Lawrence Berkeley National Laboratory A U.S. Department of Energy National Laboratory Managed by the University of California","tags":"home","loc":"index.html"},{"title":"team_type – Caffeine ","text":"type, public :: team_type Contents None","tags":"","loc":"type/team_type.html"},{"title":"characterizable_t – Caffeine ","text":"type, public, abstract :: characterizable_t Inherited by type~~characterizable_t~~InheritedByGraph type~characterizable_t characterizable_t type~intrinsic_array_t intrinsic_array_t type~intrinsic_array_t->type~characterizable_t Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Type-Bound Procedures as_character Type-Bound Procedures procedure( as_character_i ), public, deferred :: as_character pure function as_character_i(self) result(character_self) Prototype Arguments Type Intent Optional Attributes Name class( characterizable_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"type/characterizable_t.html"},{"title":"intrinsic_array_t – Caffeine ","text":"type, public, extends( characterizable_t ) :: intrinsic_array_t Inherits type~~intrinsic_array_t~~InheritsGraph type~intrinsic_array_t intrinsic_array_t type~characterizable_t characterizable_t type~intrinsic_array_t->type~characterizable_t Help × Graph Key Nodes of different colours represent the following: Graph Key Type Type This Page's Entity This Page's Entity Solid arrows point from a derived type to the parent type which it\n    extends. Dashed arrows point from a derived type to the other\n    types it contains as a components, with a label listing the name(s) of\n    said component(s). Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables complex_1d complex_2d complex_3d complex_double_1d complex_double_2d complex_double_3d double_precision_1d double_precision_2d double_precision_3d integer_1d integer_2d integer_3d logical_1d logical_2d logical_3d real_1d real_2d real_3d Constructor intrinsic_array_t Type-Bound Procedures as_character Components Type Visibility Attributes Name Initial complex, private, allocatable :: complex_1d (:) complex, private, allocatable :: complex_2d (:,:) complex, private, allocatable :: complex_3d (:,:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_1d (:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_2d (:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_3d (:,:,:) double precision, private, allocatable :: double_precision_1d (:) double precision, private, allocatable :: double_precision_2d (:,:) double precision, private, allocatable :: double_precision_3d (:,:,:) integer, private, allocatable :: integer_1d (:) integer, private, allocatable :: integer_2d (:,:) integer, private, allocatable :: integer_3d (:,:,:) logical, private, allocatable :: logical_1d (:) logical, private, allocatable :: logical_2d (:,:) logical, private, allocatable :: logical_3d (:,:,:) real, private, allocatable :: real_1d (:) real, private, allocatable :: real_2d (:,:) real, private, allocatable :: real_3d (:,:,:) Constructor public interface intrinsic_array_t private pure module function construct(array) result(intrinsic_array) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: array (..) Return Value type( intrinsic_array_t ) Type-Bound Procedures procedure, public :: as_character interface private pure module module function as_character(self) result(character_self) Implementation → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"type/intrinsic_array_t.html"},{"title":"c_bool_operation – Caffeine","text":"abstract interface public pure function c_bool_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name logical(kind=c_bool), intent(in) :: lhs logical(kind=c_bool), intent(in) :: rhs Return Value logical(kind=c_bool)","tags":"","loc":"interface/c_bool_operation.html"},{"title":"c_char_operation – Caffeine","text":"abstract interface public pure function c_char_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=*), intent(in) :: lhs character(kind=c_char,len=*), intent(in) :: rhs Return Value character(kind=c_char,len=:),allocatable","tags":"","loc":"interface/c_char_operation.html"},{"title":"c_double_complex_operation – Caffeine","text":"abstract interface public pure function c_double_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_double), intent(in) :: lhs complex(kind=c_double), intent(in) :: rhs Return Value complex(kind=c_double)","tags":"","loc":"interface/c_double_complex_operation.html"},{"title":"c_double_operation – Caffeine","text":"abstract interface public pure function c_double_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_double), intent(in) :: lhs real(kind=c_double), intent(in) :: rhs Return Value real(kind=c_double)","tags":"","loc":"interface/c_double_operation.html"},{"title":"c_float_complex_operation – Caffeine","text":"abstract interface public pure function c_float_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_float), intent(in) :: lhs complex(kind=c_float), intent(in) :: rhs Return Value complex(kind=c_float)","tags":"","loc":"interface/c_float_complex_operation.html"},{"title":"c_float_operation – Caffeine","text":"abstract interface public pure function c_float_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_float), intent(in) :: lhs real(kind=c_float), intent(in) :: rhs Return Value real(kind=c_float)","tags":"","loc":"interface/c_float_operation.html"},{"title":"c_int32_t_operation – Caffeine","text":"abstract interface public pure function c_int32_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int32_t), intent(in) :: lhs integer(kind=c_int32_t), intent(in) :: rhs Return Value integer(kind=c_int32_t)","tags":"","loc":"interface/c_int32_t_operation.html"},{"title":"c_int64_t_operation – Caffeine","text":"abstract interface public pure function c_int64_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int64_t), intent(in) :: lhs integer(kind=c_int64_t), intent(in) :: rhs Return Value integer(kind=c_int64_t)","tags":"","loc":"interface/c_int64_t_operation.html"},{"title":"as_character_i – Caffeine","text":"abstract interface private pure function as_character_i(self) result(character_self) Arguments Type Intent Optional Attributes Name class( characterizable_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"interface/as_character_i.html"},{"title":"caf_co_broadcast – Caffeine","text":"interface Calls interface~~caf_co_broadcast~~CallsGraph interface~caf_co_broadcast caf_co_broadcast proc~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast proc~get_c_ptr get_c_ptr proc~caf_co_broadcast->proc~get_c_ptr interface~caf_c_co_broadcast caf_c_co_broadcast proc~caf_co_broadcast->interface~caf_c_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_broadcast.html"},{"title":"caf_co_max – Caffeine","text":"interface Calls interface~~caf_co_max~~CallsGraph interface~caf_co_max caf_co_max proc~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_c_co_max caf_c_co_max proc~caf_co_max->interface~caf_c_co_max interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_max->interface~caf_c_is_f_string proc~optional_value optional_value proc~caf_co_max->proc~optional_value proc~get_c_ptr get_c_ptr proc~caf_co_max->proc~get_c_ptr interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_max->interface~caf_c_numeric_type proc~get_c_ptr_character get_c_ptr_character proc~caf_co_max->proc~get_c_ptr_character interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce interface~caf_error_stop caf_error_stop proc~caf_co_max->interface~caf_error_stop proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->interface~caf_c_is_f_string proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_error_stop interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_max(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_max.html"},{"title":"caf_co_min – Caffeine","text":"interface Calls interface~~caf_co_min~~CallsGraph interface~caf_co_min caf_co_min proc~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_min->interface~caf_c_is_f_string proc~optional_value optional_value proc~caf_co_min->proc~optional_value interface~caf_c_co_min caf_c_co_min proc~caf_co_min->interface~caf_c_co_min proc~get_c_ptr get_c_ptr proc~caf_co_min->proc~get_c_ptr interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_min->interface~caf_c_numeric_type proc~get_c_ptr_character get_c_ptr_character proc~caf_co_min->proc~get_c_ptr_character interface~caf_co_reduce caf_co_reduce proc~caf_co_min->interface~caf_co_reduce interface~caf_error_stop caf_error_stop proc~caf_co_min->interface~caf_error_stop proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->interface~caf_c_is_f_string proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_error_stop interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_min(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_min.html"},{"title":"caf_co_reduce – Caffeine","text":"interface Calls interface~~caf_co_reduce~~CallsGraph interface~caf_co_reduce caf_co_reduce proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_reduce->interface~caf_c_is_f_string interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len proc~optional_value optional_value proc~caf_co_reduce->proc~optional_value interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type proc~get_c_ptr get_c_ptr proc~caf_co_reduce->proc~get_c_ptr proc~get_c_ptr_character get_c_ptr_character proc~caf_co_reduce->proc~get_c_ptr_character interface~caf_error_stop caf_error_stop proc~caf_co_reduce->interface~caf_error_stop proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by interface~~caf_co_reduce~~CalledByGraph interface~caf_co_reduce caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_reduce.html"},{"title":"caf_co_sum – Caffeine","text":"interface Calls interface~~caf_co_sum~~CallsGraph interface~caf_co_sum caf_co_sum proc~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum proc~get_c_ptr get_c_ptr proc~caf_co_sum->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_sum->proc~optional_value proc~get_c_ptr_character get_c_ptr_character proc~caf_co_sum->proc~get_c_ptr_character interface~caf_c_co_sum caf_c_co_sum proc~caf_co_sum->interface~caf_c_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_co_sum(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"interface/caf_co_sum.html"},{"title":"c_f_string – Caffeine","text":"pure function c_f_string(c_string, length) result(f_string) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: c_string (length) integer(kind=c_int), intent(in) :: length Return Value character(len=length) Called by proc~~c_f_string~~CalledByGraph proc~c_f_string c_f_string proc~inner_caf_error_stop_character inner_caf_error_stop_character proc~inner_caf_error_stop_character->proc~c_f_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/c_f_string.html"},{"title":"f_c_string – Caffeine","text":"pure function f_c_string(f_string) result(c_string) Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: f_string Return Value character(kind=c_char,len=1)(len(f_string)) Called by proc~~f_c_string~~CalledByGraph proc~f_c_string f_c_string proc~caf_error_stop_character caf_error_stop_character proc~caf_error_stop_character->proc~f_c_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/f_c_string.html"},{"title":"inner_caf_error_stop_character – Caffeine","text":"subroutine inner_caf_error_stop_character(stop_code, length) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: stop_code (length) integer(kind=c_int), intent(in) :: length Calls proc~~inner_caf_error_stop_character~~CallsGraph proc~inner_caf_error_stop_character inner_caf_error_stop_character proc~c_f_string c_f_string proc~inner_caf_error_stop_character->proc~c_f_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/inner_caf_error_stop_character.html"},{"title":"inner_caf_error_stop_integer – Caffeine","text":"subroutine inner_caf_error_stop_integer(stop_code) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code Calls proc~~inner_caf_error_stop_integer~~CallsGraph proc~inner_caf_error_stop_integer inner_caf_error_stop_integer interface~caf_c_decaffeinate caf_c_decaffeinate proc~inner_caf_error_stop_integer->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/inner_caf_error_stop_integer.html"},{"title":"caf_change_team – Caffeine","text":"interface Calls interface~~caf_change_team~~CallsGraph interface~caf_change_team caf_change_team proc~caf_change_team caf_change_team interface~caf_change_team->proc~caf_change_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_change_team(team) Implementation → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team","tags":"","loc":"interface/caf_change_team.html"},{"title":"caf_end_team – Caffeine","text":"interface Calls interface~~caf_end_team~~CallsGraph interface~caf_end_team caf_end_team proc~caf_end_team caf_end_team interface~caf_end_team->proc~caf_end_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_end_team() Implementation → Arguments None","tags":"","loc":"interface/caf_end_team.html"},{"title":"caf_form_team – Caffeine","text":"interface Calls interface~~caf_form_team~~CallsGraph interface~caf_form_team caf_form_team proc~caf_form_team caf_form_team interface~caf_form_team->proc~caf_form_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg","tags":"","loc":"interface/caf_form_team.html"},{"title":"caf_stop – Caffeine","text":"public interface caf_stop Contents Subroutines caf_stop_character caf_stop_integer Subroutines private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"interface/caf_stop.html"},{"title":"caf_sync_all – Caffeine","text":"interface Calls interface~~caf_sync_all~~CallsGraph interface~caf_sync_all caf_sync_all proc~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by interface~~caf_sync_all~~CalledByGraph interface~caf_sync_all caf_sync_all proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_sync_all interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_sync_all() Implementation → Arguments None","tags":"","loc":"interface/caf_sync_all.html"},{"title":"get_c_ptr – Caffeine","text":"public pure function get_c_ptr(stat) result(ptr) Arguments Type Intent Optional Attributes Name integer, intent(in), optional target :: stat Return Value type(c_ptr) Called by proc~~get_c_ptr~~CalledByGraph proc~get_c_ptr get_c_ptr proc~caf_co_broadcast caf_co_broadcast proc~caf_co_broadcast->proc~get_c_ptr proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_max caf_co_max proc~caf_co_max->proc~get_c_ptr interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->proc~get_c_ptr proc~caf_co_min->interface~caf_co_reduce proc~caf_co_sum caf_co_sum proc~caf_co_sum->proc~get_c_ptr interface~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/get_c_ptr.html"},{"title":"get_c_ptr_character – Caffeine","text":"public pure function get_c_ptr_character(errmsg) result(ptr) Arguments Type Intent Optional Attributes Name character(len=*), intent(in), optional target :: errmsg Return Value type(c_ptr) Called by proc~~get_c_ptr_character~~CalledByGraph proc~get_c_ptr_character get_c_ptr_character proc~caf_co_max caf_co_max proc~caf_co_max->proc~get_c_ptr_character interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_min caf_co_min proc~caf_co_min->proc~get_c_ptr_character proc~caf_co_min->interface~caf_co_reduce proc~caf_co_sum caf_co_sum proc~caf_co_sum->proc~get_c_ptr_character interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/get_c_ptr_character.html"},{"title":"optional_value – Caffeine","text":"public pure function optional_value(var) result(c_val) Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: var Return Value integer(kind=c_int) Called by proc~~optional_value~~CalledByGraph proc~optional_value optional_value proc~caf_co_max caf_co_max proc~caf_co_max->proc~optional_value interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->proc~optional_value proc~caf_co_min caf_co_min proc~caf_co_min->proc~optional_value proc~caf_co_min->interface~caf_co_reduce proc~caf_co_sum caf_co_sum proc~caf_co_sum->proc~optional_value interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/optional_value.html"},{"title":"caf_error_stop – Caffeine","text":"public interface caf_error_stop Called by interface~~caf_error_stop~~CalledByGraph interface~caf_error_stop caf_error_stop proc~as_character as_character proc~as_character->interface~caf_error_stop proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_error_stop interface~assert assert proc~caf_co_reduce->interface~assert proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_error_stop interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~assert assert proc~assert->interface~caf_error_stop proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_error_stop proc~caf_co_min->interface~caf_co_reduce proc~construct construct proc~construct->interface~caf_error_stop interface~assert->proc~assert interface~as_character as_character interface~as_character->proc~as_character interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Subroutines caf_error_stop_character caf_error_stop_integer Subroutines private pure module subroutine caf_error_stop_character(stop_code) stop all images and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private pure module subroutine caf_error_stop_integer(stop_code) stop all images and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"interface/caf_error_stop.html"},{"title":"caf_stop – Caffeine","text":"public interface caf_stop Contents Subroutines caf_stop_character caf_stop_integer Subroutines private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"interface/caf_stop~2.html"},{"title":"caf_num_images – Caffeine","text":"public interface caf_num_images Contents Functions num_images_team num_images_team_number Functions private module function num_images_team(team) result(image_count) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer private module function num_images_team_number(team_number) result(image_count) Arguments Type Intent Optional Attributes Name integer, intent(in) :: team_number Return Value integer","tags":"","loc":"interface/caf_num_images.html"},{"title":"caf_this_image – Caffeine","text":"public interface caf_this_image Contents Functions this_image_coarray_dim_team this_image_coarray_team this_image_team Functions private module function this_image_coarray_dim_team(coarray, dim, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) integer, intent(in) :: dim type( team_type ), intent(in), optional :: team Return Value integer private module function this_image_coarray_team(coarray, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) type( team_type ), intent(in), optional :: team Return Value integer private pure module function this_image_team(team) result(image_number) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer","tags":"","loc":"interface/caf_this_image.html"},{"title":"caf_caffeinate – Caffeine","text":"interface Calls interface~~caf_caffeinate~~CallsGraph interface~caf_caffeinate caf_caffeinate proc~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate interface~caf_c_caffeinate caf_c_caffeinate proc~caf_caffeinate->interface~caf_c_caffeinate interface~caf_sync_all caf_sync_all proc~caf_caffeinate->interface~caf_sync_all proc~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module function caf_caffeinate() result(exit_code) Implementation → Arguments None Return Value integer","tags":"","loc":"interface/caf_caffeinate.html"},{"title":"caf_decaffeinate – Caffeine","text":"interface Calls interface~~caf_decaffeinate~~CallsGraph interface~caf_decaffeinate caf_decaffeinate proc~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate->proc~caf_decaffeinate interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_decaffeinate->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public module module subroutine caf_decaffeinate(exit_code) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code","tags":"","loc":"interface/caf_decaffeinate.html"},{"title":"caf_c_caffeinate – Caffeine","text":"interface Called by interface~~caf_c_caffeinate~~CalledByGraph interface~caf_c_caffeinate caf_c_caffeinate proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_c_caffeinate interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_caffeinate(argc, argv) bind(c) Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: argc type(c_ptr) :: argv (*) Description void c_caffeinate(int argc, char *argv[]);","tags":"","loc":"interface/caf_c_caffeinate.html"},{"title":"caf_c_co_broadcast – Caffeine","text":"interface Called by interface~~caf_c_co_broadcast~~CalledByGraph interface~caf_c_co_broadcast caf_c_co_broadcast proc~caf_co_broadcast caf_co_broadcast proc~caf_co_broadcast->interface~caf_c_co_broadcast interface~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_broadcast(a, source_image, stat, nelem) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: source_image type(c_ptr), value :: stat integer(kind=c_int), value :: nelem Description void c_co_broadcast(CFI_cdesc_t * a_desc, int source_image, int* stat, int num_elements);","tags":"","loc":"interface/caf_c_co_broadcast.html"},{"title":"caf_c_co_max – Caffeine","text":"interface Called by interface~~caf_c_co_max~~CalledByGraph interface~caf_c_co_max caf_c_co_max proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_c_co_max interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_max(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements Description void c_co_max(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements);","tags":"","loc":"interface/caf_c_co_max.html"},{"title":"caf_c_co_min – Caffeine","text":"interface Called by interface~~caf_c_co_min~~CalledByGraph interface~caf_c_co_min caf_c_co_min proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_c_co_min interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_min(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements Description void c_co_min(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements);","tags":"","loc":"interface/caf_c_co_min.html"},{"title":"caf_c_co_reduce – Caffeine","text":"interface Called by interface~~caf_c_co_reduce~~CalledByGraph interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_reduce(a, result_image, c_loc_stat, c_loc_errmsg, num_elements, coll_reducesub, client_data) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements type(c_funptr), value :: coll_reducesub type(c_ptr), value :: client_data Description void caf_c_co_reduce(CFI_cdesc_t a_desc, int result_image, int stat, char errmsg, int num_elements, gex_Coll_ReduceFn_t user_op, void* client_data)","tags":"","loc":"interface/caf_c_co_reduce.html"},{"title":"caf_c_co_sum – Caffeine","text":"interface Called by interface~~caf_c_co_sum~~CalledByGraph interface~caf_c_co_sum caf_c_co_sum proc~caf_co_sum caf_co_sum proc~caf_co_sum->interface~caf_c_co_sum interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_co_sum(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements Description void c_co_sum(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements);","tags":"","loc":"interface/caf_c_co_sum.html"},{"title":"caf_c_decaffeinate – Caffeine","text":"interface Called by interface~~caf_c_decaffeinate~~CalledByGraph interface~caf_c_decaffeinate caf_c_decaffeinate proc~inner_caf_error_stop_integer inner_caf_error_stop_integer proc~inner_caf_error_stop_integer->interface~caf_c_decaffeinate proc~caf_decaffeinate caf_decaffeinate proc~caf_decaffeinate->interface~caf_c_decaffeinate proc~caf_stop_integer~2 caf_stop_integer proc~caf_stop_integer~2->interface~caf_c_decaffeinate proc~caf_stop_integer caf_stop_integer proc~caf_stop_integer->interface~caf_c_decaffeinate proc~caf_stop_character caf_stop_character proc~caf_stop_character->interface~caf_c_decaffeinate proc~caf_stop_character~2 caf_stop_character proc~caf_stop_character~2->interface~caf_c_decaffeinate interface~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate->proc~caf_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_decaffeinate(exit_code) bind(c) Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: exit_code Description void c_decaffeinate();","tags":"","loc":"interface/caf_c_decaffeinate.html"},{"title":"caf_c_elem_len – Caffeine","text":"interface Called by interface~~caf_c_elem_len~~CalledByGraph interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_elem_len interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_elem_len(a) result(a_elem_len) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value integer(kind=c_size_t),target Description size_t caf_c_elem_len(CFI_cdesc_t* a_desc);","tags":"","loc":"interface/caf_c_elem_len.html"},{"title":"caf_c_is_f_string – Caffeine","text":"interface Called by interface~~caf_c_is_f_string~~CalledByGraph interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_c_is_f_string interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_is_f_string proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_c_is_f_string proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min interface~caf_co_reduce->proc~caf_co_reduce Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_is_f_string(a) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) Description bool caf_c_is_f_string(CFI_cdesc_t* a_desc);","tags":"","loc":"interface/caf_c_is_f_string.html"},{"title":"caf_c_num_images – Caffeine","text":"interface Called by interface~~caf_c_num_images~~CalledByGraph interface~caf_c_num_images caf_c_num_images proc~num_images_team num_images_team proc~num_images_team->interface~caf_c_num_images Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_num_images() bind(c) Arguments None Return Value integer(kind=c_int) Description int caf_c_num_images();","tags":"","loc":"interface/caf_c_num_images.html"},{"title":"caf_c_numeric_type – Caffeine","text":"interface Called by interface~~caf_c_numeric_type~~CalledByGraph interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_c_numeric_type proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_c_numeric_type interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_numeric_type(a) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) Description bool caf_c_numeric_type(CFI_cdesc_t* a_desc);","tags":"","loc":"interface/caf_c_numeric_type.html"},{"title":"caf_c_same_cfi_type – Caffeine","text":"interface Called by interface~~caf_c_same_cfi_type~~CalledByGraph interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~caf_c_same_cfi_type interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_same_cfi_type(a, b) bind(c) Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) type(*), intent(in) :: b (..) Return Value logical(kind=c_bool) Description bool caf_c_same_cfi_type(CFI_cdesc_t a_desc, CFI_cdesc_t a_desc);","tags":"","loc":"interface/caf_c_same_cfi_type.html"},{"title":"caf_c_sync_all – Caffeine","text":"interface Called by interface~~caf_c_sync_all~~CalledByGraph interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all caf_sync_all proc~caf_sync_all->interface~caf_c_sync_all interface~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_sync_all interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public subroutine caf_c_sync_all() bind(c) Arguments None Description void caf_c_sync_all();","tags":"","loc":"interface/caf_c_sync_all.html"},{"title":"caf_c_this_image – Caffeine","text":"interface Called by interface~~caf_c_this_image~~CalledByGraph interface~caf_c_this_image caf_c_this_image proc~this_image_team this_image_team proc~this_image_team->interface~caf_c_this_image Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure function caf_c_this_image() bind(c) Arguments None Return Value integer(kind=c_int) Description int caf_c_this_image();","tags":"","loc":"interface/caf_c_this_image.html"},{"title":"assert – Caffeine","text":"interface Calls interface~~assert~~CallsGraph interface~assert assert proc~assert assert interface~assert->proc~assert interface~caf_error_stop caf_error_stop proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by interface~~assert~~CalledByGraph interface~assert assert proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~assert interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. public pure module module subroutine assert(assertion, description, diagnostic_data) Implementation → Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t Description If assertion is .false., error-terminate with a character stop code that contains diagnostic_data if present","tags":"","loc":"interface/assert.html"},{"title":"intrinsic_array_t – Caffeine","text":"public interface intrinsic_array_t Contents Functions construct Functions private pure module function construct(array) result(intrinsic_array) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: array (..) Return Value type( intrinsic_array_t )","tags":"","loc":"interface/intrinsic_array_t.html"},{"title":"as_character – Caffeine","text":"interface Calls interface~~as_character~~CallsGraph interface~as_character as_character proc~as_character as_character interface~as_character->proc~as_character interface~caf_error_stop caf_error_stop proc~as_character->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. private pure module module function as_character(self) result(character_self) Implementation → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable","tags":"","loc":"interface/as_character.html"},{"title":"caf_error_stop_character – Caffeine","text":"module procedure caf_error_stop_character module procedure caf_error_stop_character() Arguments None Calls proc~~caf_error_stop_character~~CallsGraph proc~caf_error_stop_character caf_error_stop_character proc~f_c_string f_c_string proc~caf_error_stop_character->proc~f_c_string Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_error_stop_character.html"},{"title":"caf_error_stop_integer – Caffeine","text":"module procedure caf_error_stop_integer module procedure caf_error_stop_integer() Arguments None Contents None","tags":"","loc":"proc/caf_error_stop_integer.html"},{"title":"caf_stop_character – Caffeine","text":"module procedure caf_stop_character module procedure caf_stop_character() Arguments None Calls proc~~caf_stop_character~~CallsGraph proc~caf_stop_character caf_stop_character interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_character->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_character.html"},{"title":"caf_stop_integer – Caffeine","text":"module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None Calls proc~~caf_stop_integer~~CallsGraph proc~caf_stop_integer caf_stop_integer interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_integer->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_integer.html"},{"title":"caf_stop_character – Caffeine","text":"module procedure caf_stop_character module procedure caf_stop_character() Arguments None Calls proc~~caf_stop_character~2~~CallsGraph proc~caf_stop_character~2 caf_stop_character interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_character~2->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_character~2.html"},{"title":"caf_stop_integer – Caffeine","text":"module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None Calls proc~~caf_stop_integer~2~~CallsGraph proc~caf_stop_integer~2 caf_stop_integer interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_stop_integer~2->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_stop_integer~2.html"},{"title":"num_images_team – Caffeine","text":"module procedure num_images_team module procedure num_images_team() Arguments None Calls proc~~num_images_team~~CallsGraph proc~num_images_team num_images_team interface~caf_c_num_images caf_c_num_images proc~num_images_team->interface~caf_c_num_images Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/num_images_team.html"},{"title":"num_images_team_number – Caffeine","text":"module procedure num_images_team_number module procedure num_images_team_number() Arguments None Contents None","tags":"","loc":"proc/num_images_team_number.html"},{"title":"this_image_coarray_dim_team – Caffeine","text":"module procedure this_image_coarray_dim_team module procedure this_image_coarray_dim_team() Arguments None Contents None","tags":"","loc":"proc/this_image_coarray_dim_team.html"},{"title":"this_image_coarray_team – Caffeine","text":"module procedure this_image_coarray_team module procedure this_image_coarray_team() Arguments None Contents None","tags":"","loc":"proc/this_image_coarray_team.html"},{"title":"this_image_team – Caffeine","text":"module procedure this_image_team module procedure this_image_team() Arguments None Calls proc~~this_image_team~~CallsGraph proc~this_image_team this_image_team interface~caf_c_this_image caf_c_this_image proc~this_image_team->interface~caf_c_this_image Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/this_image_team.html"},{"title":"caf_change_team – Caffeine","text":"module procedure caf_change_team module module subroutine caf_change_team(team) Interface → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team Called by proc~~caf_change_team~~CalledByGraph proc~caf_change_team caf_change_team interface~caf_change_team caf_change_team interface~caf_change_team->proc~caf_change_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_change_team.html"},{"title":"caf_end_team – Caffeine","text":"module procedure caf_end_team module module subroutine caf_end_team() Interface → Arguments None Called by proc~~caf_end_team~~CalledByGraph proc~caf_end_team caf_end_team interface~caf_end_team caf_end_team interface~caf_end_team->proc~caf_end_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_end_team.html"},{"title":"caf_form_team – Caffeine","text":"module procedure caf_form_team module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg Called by proc~~caf_form_team~~CalledByGraph proc~caf_form_team caf_form_team interface~caf_form_team caf_form_team interface~caf_form_team->proc~caf_form_team Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_form_team.html"},{"title":"caf_caffeinate – Caffeine","text":"module procedure caf_caffeinate module module function caf_caffeinate() result(exit_code) Interface → Arguments None Return Value integer Calls proc~~caf_caffeinate~~CallsGraph proc~caf_caffeinate caf_caffeinate interface~caf_c_caffeinate caf_c_caffeinate proc~caf_caffeinate->interface~caf_c_caffeinate interface~caf_sync_all caf_sync_all proc~caf_caffeinate->interface~caf_sync_all proc~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_caffeinate~~CalledByGraph proc~caf_caffeinate caf_caffeinate interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_caffeinate.html"},{"title":"caf_decaffeinate – Caffeine","text":"module procedure caf_decaffeinate module module subroutine caf_decaffeinate(exit_code) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code Calls proc~~caf_decaffeinate~~CallsGraph proc~caf_decaffeinate caf_decaffeinate interface~caf_c_decaffeinate caf_c_decaffeinate proc~caf_decaffeinate->interface~caf_c_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_decaffeinate~~CalledByGraph proc~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate caf_decaffeinate interface~caf_decaffeinate->proc~caf_decaffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_decaffeinate.html"},{"title":"caf_sync_all – Caffeine","text":"module procedure caf_sync_all module module subroutine caf_sync_all() Interface → Arguments None Calls proc~~caf_sync_all~~CallsGraph proc~caf_sync_all caf_sync_all interface~caf_c_sync_all caf_c_sync_all proc~caf_sync_all->interface~caf_c_sync_all Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_sync_all~~CalledByGraph proc~caf_sync_all caf_sync_all interface~caf_sync_all caf_sync_all interface~caf_sync_all->proc~caf_sync_all proc~caf_caffeinate caf_caffeinate proc~caf_caffeinate->interface~caf_sync_all interface~caf_caffeinate caf_caffeinate interface~caf_caffeinate->proc~caf_caffeinate Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_sync_all.html"},{"title":"caf_co_min – Caffeine","text":"module procedure caf_co_min module module subroutine caf_co_min(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_min~~CallsGraph proc~caf_co_min caf_co_min interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_min->interface~caf_c_is_f_string proc~optional_value optional_value proc~caf_co_min->proc~optional_value interface~caf_c_co_min caf_c_co_min proc~caf_co_min->interface~caf_c_co_min proc~get_c_ptr get_c_ptr proc~caf_co_min->proc~get_c_ptr interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_min->interface~caf_c_numeric_type proc~get_c_ptr_character get_c_ptr_character proc~caf_co_min->proc~get_c_ptr_character interface~caf_co_reduce caf_co_reduce proc~caf_co_min->interface~caf_co_reduce interface~caf_error_stop caf_error_stop proc~caf_co_min->interface~caf_error_stop proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->interface~caf_c_is_f_string proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_error_stop interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_min~~CalledByGraph proc~caf_co_min caf_co_min interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_min.html"},{"title":"caf_co_sum – Caffeine","text":"module procedure caf_co_sum module module subroutine caf_co_sum(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_sum~~CallsGraph proc~caf_co_sum caf_co_sum proc~get_c_ptr get_c_ptr proc~caf_co_sum->proc~get_c_ptr proc~optional_value optional_value proc~caf_co_sum->proc~optional_value proc~get_c_ptr_character get_c_ptr_character proc~caf_co_sum->proc~get_c_ptr_character interface~caf_c_co_sum caf_c_co_sum proc~caf_co_sum->interface~caf_c_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_sum~~CalledByGraph proc~caf_co_sum caf_co_sum interface~caf_co_sum caf_co_sum interface~caf_co_sum->proc~caf_co_sum Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_sum.html"},{"title":"caf_co_reduce – Caffeine","text":"module procedure caf_co_reduce module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_reduce~~CallsGraph proc~caf_co_reduce caf_co_reduce interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_reduce->interface~caf_c_is_f_string interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len proc~optional_value optional_value proc~caf_co_reduce->proc~optional_value interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type proc~get_c_ptr get_c_ptr proc~caf_co_reduce->proc~get_c_ptr proc~get_c_ptr_character get_c_ptr_character proc~caf_co_reduce->proc~get_c_ptr_character interface~caf_error_stop caf_error_stop proc~caf_co_reduce->interface~caf_error_stop proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_reduce~~CalledByGraph proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_reduce.html"},{"title":"caf_co_max – Caffeine","text":"module procedure caf_co_max module module subroutine caf_co_max(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_max~~CallsGraph proc~caf_co_max caf_co_max interface~caf_c_co_max caf_c_co_max proc~caf_co_max->interface~caf_c_co_max interface~caf_c_is_f_string caf_c_is_f_string proc~caf_co_max->interface~caf_c_is_f_string proc~optional_value optional_value proc~caf_co_max->proc~optional_value proc~get_c_ptr get_c_ptr proc~caf_co_max->proc~get_c_ptr interface~caf_c_numeric_type caf_c_numeric_type proc~caf_co_max->interface~caf_c_numeric_type proc~get_c_ptr_character get_c_ptr_character proc~caf_co_max->proc~get_c_ptr_character interface~caf_co_reduce caf_co_reduce proc~caf_co_max->interface~caf_co_reduce interface~caf_error_stop caf_error_stop proc~caf_co_max->interface~caf_error_stop proc~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_reduce->interface~caf_c_is_f_string proc~caf_co_reduce->proc~optional_value proc~caf_co_reduce->proc~get_c_ptr proc~caf_co_reduce->proc~get_c_ptr_character proc~caf_co_reduce->interface~caf_error_stop interface~assert assert proc~caf_co_reduce->interface~assert interface~caf_c_elem_len caf_c_elem_len proc~caf_co_reduce->interface~caf_c_elem_len interface~caf_c_co_reduce caf_c_co_reduce proc~caf_co_reduce->interface~caf_c_co_reduce interface~caf_c_same_cfi_type caf_c_same_cfi_type proc~caf_co_reduce->interface~caf_c_same_cfi_type proc~assert assert interface~assert->proc~assert proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_max~~CalledByGraph proc~caf_co_max caf_co_max interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_max.html"},{"title":"caf_co_broadcast – Caffeine","text":"module procedure caf_co_broadcast module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Calls proc~~caf_co_broadcast~~CallsGraph proc~caf_co_broadcast caf_co_broadcast proc~get_c_ptr get_c_ptr proc~caf_co_broadcast->proc~get_c_ptr interface~caf_c_co_broadcast caf_c_co_broadcast proc~caf_co_broadcast->interface~caf_c_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~caf_co_broadcast~~CalledByGraph proc~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast caf_co_broadcast interface~caf_co_broadcast->proc~caf_co_broadcast Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/caf_co_broadcast.html"},{"title":"assert – Caffeine","text":"module procedure assert pure module module subroutine assert(assertion, description, diagnostic_data) Interface → Uses program_termination_m caffeine_characterizable_m image_enumeration_m proc~~assert~~UsesGraph proc~assert assert module~program_termination_m program_termination_m proc~assert->module~program_termination_m module~caffeine_characterizable_m caffeine_characterizable_m proc~assert->module~caffeine_characterizable_m module~image_enumeration_m image_enumeration_m proc~assert->module~image_enumeration_m module~team_type_m team_type_m module~image_enumeration_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t Calls proc~~assert~~CallsGraph proc~assert assert interface~caf_error_stop caf_error_stop proc~assert->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~assert~~CalledByGraph proc~assert assert interface~assert assert interface~assert->proc~assert proc~caf_co_reduce caf_co_reduce proc~caf_co_reduce->interface~assert interface~caf_co_reduce caf_co_reduce interface~caf_co_reduce->proc~caf_co_reduce proc~caf_co_max caf_co_max proc~caf_co_max->interface~caf_co_reduce proc~caf_co_min caf_co_min proc~caf_co_min->interface~caf_co_reduce interface~caf_co_max caf_co_max interface~caf_co_max->proc~caf_co_max interface~caf_co_min caf_co_min interface~caf_co_min->proc~caf_co_min Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/assert.html"},{"title":"as_character – Caffeine","text":"module procedure as_character pure module module function as_character(self) result(character_self) Interface → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable Calls proc~~as_character~~CallsGraph proc~as_character as_character interface~caf_error_stop caf_error_stop proc~as_character->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Called by proc~~as_character~~CalledByGraph proc~as_character as_character interface~as_character as_character interface~as_character->proc~as_character Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/as_character.html"},{"title":"construct – Caffeine","text":"module procedure construct module procedure construct() Arguments None Calls proc~~construct~~CallsGraph proc~construct construct interface~caf_error_stop caf_error_stop proc~construct->interface~caf_error_stop Help × Graph Key Nodes of different colours represent the following: Graph Key Subroutine Subroutine Function Function Interface Interface Unknown Procedure Type Unknown Procedure Type Program Program This Page's Entity This Page's Entity Solid arrows point from a procedure to one which it calls. Dashed \n    arrows point from an interface to procedures which implement that interface.\n    This could include the module procedures in a generic interface or the\n    implementation in a submodule of an interface in a parent module. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"proc/construct.html"},{"title":"caffeine_m – Caffeine","text":"Uses team_type_m synchronization_m program_termination_m caffeinate_decaffeinate_m image_enumeration_m collective_subroutines_m module~~caffeine_m~~UsesGraph module~caffeine_m caffeine_m module~team_type_m team_type_m module~caffeine_m->module~team_type_m module~collective_subroutines_m collective_subroutines_m module~caffeine_m->module~collective_subroutines_m module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeine_m->module~caffeinate_decaffeinate_m module~synchronization_m synchronization_m module~caffeine_m->module~synchronization_m module~program_termination_m program_termination_m module~caffeine_m->module~program_termination_m module~image_enumeration_m image_enumeration_m module~caffeine_m->module~image_enumeration_m iso_c_binding iso_c_binding module~collective_subroutines_m->iso_c_binding module~caffeinate_decaffeinate_m->module~team_type_m module~image_enumeration_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents None","tags":"","loc":"module/caffeine_m.html"},{"title":"collective_subroutines_m – Caffeine","text":"Uses iso_c_binding module~~collective_subroutines_m~~UsesGraph module~collective_subroutines_m collective_subroutines_m iso_c_binding iso_c_binding module~collective_subroutines_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: co_broadcast_s co_max_s co_min_s co_sum_s co_reduce_s module~~collective_subroutines_m~~UsedByGraph module~collective_subroutines_m collective_subroutines_m module~caffeine_m caffeine_m module~caffeine_m->module~collective_subroutines_m module~co_broadcast_s co_broadcast_s module~co_broadcast_s->module~collective_subroutines_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~collective_subroutines_m module~co_min_s co_min_s module~co_min_s->module~collective_subroutines_m module~co_max_s co_max_s module~co_max_s->module~collective_subroutines_m module~co_sum_s co_sum_s module~co_sum_s->module~collective_subroutines_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_co_broadcast caf_co_max caf_co_min caf_co_reduce caf_co_sum Abstract Interfaces c_bool_operation c_char_operation c_double_complex_operation c_double_operation c_float_complex_operation c_float_operation c_int32_t_operation c_int64_t_operation Interfaces interface public module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_max(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_min(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg interface public module module subroutine caf_co_sum(a, result_image, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg Abstract Interfaces abstract interface public pure function c_bool_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name logical(kind=c_bool), intent(in) :: lhs logical(kind=c_bool), intent(in) :: rhs Return Value logical(kind=c_bool) abstract interface public pure function c_char_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=*), intent(in) :: lhs character(kind=c_char,len=*), intent(in) :: rhs Return Value character(kind=c_char,len=:),allocatable abstract interface public pure function c_double_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_double), intent(in) :: lhs complex(kind=c_double), intent(in) :: rhs Return Value complex(kind=c_double) abstract interface public pure function c_double_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_double), intent(in) :: lhs real(kind=c_double), intent(in) :: rhs Return Value real(kind=c_double) abstract interface public pure function c_float_complex_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name complex(kind=c_float), intent(in) :: lhs complex(kind=c_float), intent(in) :: rhs Return Value complex(kind=c_float) abstract interface public pure function c_float_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name real(kind=c_float), intent(in) :: lhs real(kind=c_float), intent(in) :: rhs Return Value real(kind=c_float) abstract interface public pure function c_int32_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int32_t), intent(in) :: lhs integer(kind=c_int32_t), intent(in) :: rhs Return Value integer(kind=c_int32_t) abstract interface public pure function c_int64_t_operation(lhs, rhs) result(lhs_op_rhs) Arguments Type Intent Optional Attributes Name integer(kind=c_int64_t), intent(in) :: lhs integer(kind=c_int64_t), intent(in) :: rhs Return Value integer(kind=c_int64_t)","tags":"","loc":"module/collective_subroutines_m.html"},{"title":"team_type_m – Caffeine","text":"Used by Descendants: team_type_s module~~team_type_m~~UsedByGraph module~team_type_m team_type_m module~image_enumeration_m image_enumeration_m module~image_enumeration_m->module~team_type_m module~caffeine_m caffeine_m module~caffeine_m->module~team_type_m module~caffeine_m->module~image_enumeration_m module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeine_m->module~caffeinate_decaffeinate_m module~team_type_s team_type_s module~team_type_s->module~team_type_m module~caffeinate_decaffeinate_m->module~team_type_m proc~assert assert proc~assert->module~image_enumeration_m module~image_enumeration_s image_enumeration_s module~image_enumeration_s->module~image_enumeration_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~caffeinate_decaffeinate_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables current_team Interfaces caf_change_team caf_end_team caf_form_team Derived Types team_type Variables Type Visibility Attributes Name Initial type( team_type ), public, pointer :: current_team => null() Interfaces interface public module module subroutine caf_change_team(team) Implementation → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team interface public module module subroutine caf_end_team() Implementation → Arguments None interface public module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg Derived Types type, public :: team_type","tags":"","loc":"module/team_type_m.html"},{"title":"normal_termination_m – Caffeine","text":"Used by Descendants: normal_termination_s module~~normal_termination_m~~UsedByGraph module~normal_termination_m normal_termination_m module~normal_termination_s normal_termination_s module~normal_termination_s->module~normal_termination_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_stop Interfaces public interface caf_stop private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"module/normal_termination_m.html"},{"title":"synchronization_m – Caffeine","text":"Used by Descendants: sychronization_s module~~synchronization_m~~UsedByGraph module~synchronization_m synchronization_m module~caffeine_m caffeine_m module~caffeine_m->module~synchronization_m module~sychronization_s sychronization_s module~sychronization_s->module~synchronization_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~synchronization_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_sync_all Interfaces interface public module module subroutine caf_sync_all() Implementation → Arguments None","tags":"","loc":"module/synchronization_m.html"},{"title":"utilities_m – Caffeine","text":"Uses iso_c_binding module~~utilities_m~~UsesGraph module~utilities_m utilities_m iso_c_binding iso_c_binding module~utilities_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by module~~utilities_m~~UsedByGraph module~utilities_m utilities_m module~co_min_s co_min_s module~co_min_s->module~utilities_m module~co_broadcast_s co_broadcast_s module~co_broadcast_s->module~utilities_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~utilities_m module~co_max_s co_max_s module~co_max_s->module~utilities_m module~co_sum_s co_sum_s module~co_sum_s->module~utilities_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Functions get_c_ptr get_c_ptr_character optional_value Functions public pure function get_c_ptr (stat) result(ptr) Arguments Type Intent Optional Attributes Name integer, intent(in), optional target :: stat Return Value type(c_ptr) public pure function get_c_ptr_character (errmsg) result(ptr) Arguments Type Intent Optional Attributes Name character(len=*), intent(in), optional target :: errmsg Return Value type(c_ptr) public pure function optional_value (var) result(c_val) Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: var Return Value integer(kind=c_int)","tags":"","loc":"module/utilities_m.html"},{"title":"program_termination_m – Caffeine","text":"Used by Descendants: program_termination_s module~~program_termination_m~~UsedByGraph module~program_termination_m program_termination_m module~caffeine_m caffeine_m module~caffeine_m->module~program_termination_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~program_termination_m module~co_min_s co_min_s module~co_min_s->module~program_termination_m module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~caffeine_intrinsic_array_s->module~program_termination_m module~program_termination_s program_termination_s module~program_termination_s->module~program_termination_m proc~assert assert proc~assert->module~program_termination_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~program_termination_m module~co_max_s co_max_s module~co_max_s->module~program_termination_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_error_stop caf_stop Interfaces public interface caf_error_stop private pure module subroutine caf_error_stop_character(stop_code) stop all images and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private pure module subroutine caf_error_stop_integer(stop_code) stop all images and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code public interface caf_stop private module subroutine caf_stop_character(stop_code) synchronize, stop the executing image, and provide the stop_code as the process exit status Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: stop_code private module subroutine caf_stop_integer(stop_code) synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code","tags":"","loc":"module/program_termination_m.html"},{"title":"image_enumeration_m – Caffeine","text":"Uses team_type_m module~~image_enumeration_m~~UsesGraph module~image_enumeration_m image_enumeration_m module~team_type_m team_type_m module~image_enumeration_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: image_enumeration_s module~~image_enumeration_m~~UsedByGraph module~image_enumeration_m image_enumeration_m proc~assert assert proc~assert->module~image_enumeration_m module~caffeine_m caffeine_m module~caffeine_m->module~image_enumeration_m module~image_enumeration_s image_enumeration_s module~image_enumeration_s->module~image_enumeration_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_num_images caf_this_image Interfaces public interface caf_num_images private module function num_images_team(team) result(image_count) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer private module function num_images_team_number(team_number) result(image_count) Arguments Type Intent Optional Attributes Name integer, intent(in) :: team_number Return Value integer public interface caf_this_image private module function this_image_coarray_dim_team(coarray, dim, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) integer, intent(in) :: dim type( team_type ), intent(in), optional :: team Return Value integer private module function this_image_coarray_team(coarray, team) result(image_number) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: coarray (..) type( team_type ), intent(in), optional :: team Return Value integer private pure module function this_image_team(team) result(image_number) Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), optional :: team Return Value integer","tags":"","loc":"module/image_enumeration_m.html"},{"title":"caffeinate_decaffeinate_m – Caffeine","text":"Uses team_type_m module~~caffeinate_decaffeinate_m~~UsesGraph module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~team_type_m team_type_m module~caffeinate_decaffeinate_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: caffeinate_decaffeinate_s module~~caffeinate_decaffeinate_m~~UsedByGraph module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeine_m caffeine_m module~caffeine_m->module~caffeinate_decaffeinate_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~caffeinate_decaffeinate_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables default_team Interfaces caf_caffeinate caf_decaffeinate Variables Type Visibility Attributes Name Initial type( team_type ), public, target :: default_team Interfaces interface public module module function caf_caffeinate() result(exit_code) Implementation → Arguments None Return Value integer interface public module module subroutine caf_decaffeinate(exit_code) Implementation → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code","tags":"","loc":"module/caffeinate_decaffeinate_m.html"},{"title":"caffeine_h_m – Caffeine","text":"Uses iso_c_binding module~~caffeine_h_m~~UsesGraph module~caffeine_h_m caffeine_h_m iso_c_binding iso_c_binding module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by module~~caffeine_h_m~~UsedByGraph module~caffeine_h_m caffeine_h_m module~program_termination_s program_termination_s module~program_termination_s->module~caffeine_h_m module~co_broadcast_s co_broadcast_s module~co_broadcast_s->module~caffeine_h_m module~sychronization_s sychronization_s module~sychronization_s->module~caffeine_h_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_h_m module~co_min_s co_min_s module~co_min_s->module~caffeine_h_m module~image_enumeration_s image_enumeration_s module~image_enumeration_s->module~caffeine_h_m module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s module~caffeinate_decaffeinate_s->module~caffeine_h_m module~normal_termination_s normal_termination_s module~normal_termination_s->module~caffeine_h_m module~co_sum_s co_sum_s module~co_sum_s->module~caffeine_h_m module~co_max_s co_max_s module~co_max_s->module~caffeine_h_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces caf_c_caffeinate caf_c_co_broadcast caf_c_co_max caf_c_co_min caf_c_co_reduce caf_c_co_sum caf_c_decaffeinate caf_c_elem_len caf_c_is_f_string caf_c_num_images caf_c_numeric_type caf_c_same_cfi_type caf_c_sync_all caf_c_this_image Interfaces interface public subroutine caf_c_caffeinate(argc, argv) bind(c) void c_caffeinate(int argc, char *argv[]); Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: argc type(c_ptr) :: argv (*) interface public subroutine caf_c_co_broadcast(a, source_image, stat, nelem) bind(c) void c_co_broadcast(CFI_cdesc_t * a_desc, int source_image, int* stat, int num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: source_image type(c_ptr), value :: stat integer(kind=c_int), value :: nelem interface public subroutine caf_c_co_max(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) void c_co_max(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements interface public subroutine caf_c_co_min(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) void c_co_min(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements interface public subroutine caf_c_co_reduce(a, result_image, c_loc_stat, c_loc_errmsg, num_elements, coll_reducesub, client_data) bind(c) void caf_c_co_reduce(CFI_cdesc_t a_desc, int result_image, int stat, char errmsg, int num_elements, gex_Coll_ReduceFn_t user_op, void* client_data) Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements type(c_funptr), value :: coll_reducesub type(c_ptr), value :: client_data interface public subroutine caf_c_co_sum(a, result_image, c_loc_stat, c_loc_errmsg, num_elements) bind(c) void c_co_sum(CFI_cdesc_t a_desc, int result_image, int stat, char* errmsg, size_t num_elements); Arguments Type Intent Optional Attributes Name type(*) :: a (..) integer(kind=c_int), value :: result_image type(c_ptr), value :: c_loc_stat type(c_ptr), value :: c_loc_errmsg integer(kind=c_size_t), value :: num_elements interface public subroutine caf_c_decaffeinate(exit_code) bind(c) void c_decaffeinate(); Arguments Type Intent Optional Attributes Name integer(kind=c_int), value :: exit_code interface public pure function caf_c_elem_len(a) result(a_elem_len) bind(c) size_t caf_c_elem_len(CFI_cdesc_t* a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value integer(kind=c_size_t),target interface public pure function caf_c_is_f_string(a) bind(c) bool caf_c_is_f_string(CFI_cdesc_t* a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) interface public pure function caf_c_num_images() bind(c) int caf_c_num_images(); Arguments None Return Value integer(kind=c_int) interface public pure function caf_c_numeric_type(a) bind(c) bool caf_c_numeric_type(CFI_cdesc_t* a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) Return Value logical(kind=c_bool) interface public pure function caf_c_same_cfi_type(a, b) bind(c) bool caf_c_same_cfi_type(CFI_cdesc_t a_desc, CFI_cdesc_t a_desc); Arguments Type Intent Optional Attributes Name type(*), intent(in) :: a (..) type(*), intent(in) :: b (..) Return Value logical(kind=c_bool) interface public subroutine caf_c_sync_all() bind(c) void caf_c_sync_all(); Arguments None interface public pure function caf_c_this_image() bind(c) int caf_c_this_image(); Arguments None Return Value integer(kind=c_int)","tags":"","loc":"module/caffeine_h_m.html"},{"title":"caffeine_assert_m – Caffeine","text":"use assertions_m, only : assert\n   call assert( 2 > 1, \"2 > 1\") Turn off assertions in production code by setting USE_ASSERTIONS to .false. via the preprocessor.\nThis file's capitalized .F90 extension causes most Fortran compilers to preprocess this file so\nthat building as follows turns off assertion enforcement: fpm build --flag \"-DUSE_ASSERTIONS=.false.\" Doing so may eliminate any associated runtime overhead by enabling optimizing compilers to ignore\nthe assertion procedure body during a dead-code-removal phase of optimization. Used by Descendants: caffeine_assert_s module~~caffeine_assert_m~~UsedByGraph module~caffeine_assert_m caffeine_assert_m module~co_min_s co_min_s module~co_min_s->module~caffeine_assert_m module~co_max_s co_max_s module~co_max_s->module~caffeine_assert_m module~caffeine_assert_s caffeine_assert_s module~caffeine_assert_s->module~caffeine_assert_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_assert_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables enforce_assertions Interfaces assert Variables Type Visibility Attributes Name Initial logical, private, parameter :: enforce_assertions = .true. Turn off assertions as follows: fpm build --flag \"-DUSE_ASSERTIONS=.false.\" Interfaces interface public pure module module subroutine assert(assertion, description, diagnostic_data) Implementation → If assertion is .false., error-terminate with a character stop code that contains diagnostic_data if present Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t","tags":"","loc":"module/caffeine_assert_m.html"},{"title":"caffeine_characterizable_m – Caffeine","text":"Define an abstract class that supports object representation in character form Used by module~~caffeine_characterizable_m~~UsedByGraph module~caffeine_characterizable_m caffeine_characterizable_m proc~assert assert proc~assert->module~caffeine_characterizable_m module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_intrinsic_array_m module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~caffeine_intrinsic_array_s->module~caffeine_intrinsic_array_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Abstract Interfaces as_character_i Derived Types characterizable_t Abstract Interfaces abstract interface private pure function as_character_i(self) result(character_self) Arguments Type Intent Optional Attributes Name class( characterizable_t ), intent(in) :: self Return Value character(len=:),allocatable Derived Types type, public, abstract :: characterizable_t Type-Bound Procedures procedure(as_character_i), public :: as_character","tags":"","loc":"module/caffeine_characterizable_m.html"},{"title":"caffeine_intrinsic_array_m – Caffeine","text":"Define an abstract class that supports object representation in character form Uses caffeine_characterizable_m module~~caffeine_intrinsic_array_m~~UsesGraph module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~caffeine_characterizable_m caffeine_characterizable_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Used by Descendants: caffeine_intrinsic_array_s module~~caffeine_intrinsic_array_m~~UsedByGraph module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~co_reduce_s co_reduce_s module~co_reduce_s->module~caffeine_intrinsic_array_m module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~caffeine_intrinsic_array_s->module~caffeine_intrinsic_array_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Interfaces intrinsic_array_t as_character Derived Types intrinsic_array_t Interfaces public interface intrinsic_array_t private pure module function construct(array) result(intrinsic_array) Arguments Type Intent Optional Attributes Name class(*), intent(in) :: array (..) Return Value type( intrinsic_array_t ) interface private pure module module function as_character(self) result(character_self) Implementation → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable Derived Types type, public, extends( characterizable_t ) :: intrinsic_array_t Components Type Visibility Attributes Name Initial complex, private, allocatable :: complex_1d (:) complex, private, allocatable :: complex_2d (:,:) complex, private, allocatable :: complex_3d (:,:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_1d (:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_2d (:,:) complex(kind=kind(1.d0)), private, allocatable :: complex_double_3d (:,:,:) double precision, private, allocatable :: double_precision_1d (:) double precision, private, allocatable :: double_precision_2d (:,:) double precision, private, allocatable :: double_precision_3d (:,:,:) integer, private, allocatable :: integer_1d (:) integer, private, allocatable :: integer_2d (:,:) integer, private, allocatable :: integer_3d (:,:,:) logical, private, allocatable :: logical_1d (:) logical, private, allocatable :: logical_2d (:,:) logical, private, allocatable :: logical_3d (:,:,:) real, private, allocatable :: real_1d (:) real, private, allocatable :: real_2d (:,:) real, private, allocatable :: real_3d (:,:,:) Constructor private pure,module function construct (array) Type-Bound Procedures procedure, public :: as_character","tags":"","loc":"module/caffeine_intrinsic_array_m.html"},{"title":"program_termination_s – Caffeine","text":"Uses iso_c_binding iso_fortran_env caffeine_h_m Ancestors: program_termination_m module~~program_termination_s~~UsesGraph module~program_termination_s program_termination_s iso_c_binding iso_c_binding module~program_termination_s->iso_c_binding module~caffeine_h_m caffeine_h_m module~program_termination_s->module~caffeine_h_m module~program_termination_m program_termination_m module~program_termination_s->module~program_termination_m iso_fortran_env iso_fortran_env module~program_termination_s->iso_fortran_env module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Functions c_f_string f_c_string Subroutines inner_caf_error_stop_character inner_caf_error_stop_integer Module Procedures caf_error_stop_character caf_error_stop_integer caf_stop_character caf_stop_integer Functions pure function c_f_string (c_string, length) result(f_string) Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: c_string (length) integer(kind=c_int), intent(in) :: length Return Value character(len=length) pure function f_c_string (f_string) result(c_string) Arguments Type Intent Optional Attributes Name character(len=*), intent(in) :: f_string Return Value character(kind=c_char,len=1)(len(f_string)) Subroutines subroutine inner_caf_error_stop_character (stop_code, length) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name character(kind=c_char,len=1), intent(in) :: stop_code (length) integer(kind=c_int), intent(in) :: length subroutine inner_caf_error_stop_integer (stop_code) bind(c, name = \"0\") Arguments Type Intent Optional Attributes Name integer, intent(in), optional :: stop_code Module Procedures module procedure caf_error_stop_character module procedure caf_error_stop_character() Arguments None module procedure caf_error_stop_integer module procedure caf_error_stop_integer() Arguments None module procedure caf_stop_character module procedure caf_stop_character() Arguments None module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None","tags":"","loc":"module/program_termination_s.html"},{"title":"normal_termination_s – Caffeine","text":"Uses iso_c_binding iso_fortran_env caffeine_h_m Ancestors: normal_termination_m module~~normal_termination_s~~UsesGraph module~normal_termination_s normal_termination_s iso_c_binding iso_c_binding module~normal_termination_s->iso_c_binding module~caffeine_h_m caffeine_h_m module~normal_termination_s->module~caffeine_h_m module~normal_termination_m normal_termination_m module~normal_termination_s->module~normal_termination_m iso_fortran_env iso_fortran_env module~normal_termination_s->iso_fortran_env module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_stop_character caf_stop_integer Module Procedures module procedure caf_stop_character module procedure caf_stop_character() Arguments None module procedure caf_stop_integer module procedure caf_stop_integer() Arguments None","tags":"","loc":"module/normal_termination_s.html"},{"title":"image_enumeration_s – Caffeine","text":"Uses caffeine_h_m Ancestors: image_enumeration_m module~~image_enumeration_s~~UsesGraph module~image_enumeration_s image_enumeration_s module~caffeine_h_m caffeine_h_m module~image_enumeration_s->module~caffeine_h_m module~image_enumeration_m image_enumeration_m module~image_enumeration_s->module~image_enumeration_m iso_c_binding iso_c_binding module~caffeine_h_m->iso_c_binding module~team_type_m team_type_m module~image_enumeration_m->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures num_images_team num_images_team_number this_image_coarray_dim_team this_image_coarray_team this_image_team Module Procedures module procedure num_images_team module procedure num_images_team() Arguments None module procedure num_images_team_number module procedure num_images_team_number() Arguments None module procedure this_image_coarray_dim_team module procedure this_image_coarray_dim_team() Arguments None module procedure this_image_coarray_team module procedure this_image_coarray_team() Arguments None module procedure this_image_team module procedure this_image_team() Arguments None","tags":"","loc":"module/image_enumeration_s.html"},{"title":"team_type_s – Caffeine","text":"Uses Ancestors: team_type_m module~~team_type_s~~UsesGraph module~team_type_s team_type_s module~team_type_m team_type_m module~team_type_s->module~team_type_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_change_team caf_end_team caf_form_team Module Procedures module procedure caf_change_team module module subroutine caf_change_team(team) Interface → Arguments Type Intent Optional Attributes Name type( team_type ), intent(in), target :: team module procedure caf_end_team module module subroutine caf_end_team() Interface → Arguments None module procedure caf_form_team module module subroutine caf_form_team(num, team, new_index, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: num type( team_type ), intent(out) :: team integer, intent(in), optional :: new_index integer, intent(out), optional :: stat character(len=*), intent(inout), optional :: errmsg","tags":"","loc":"module/team_type_s.html"},{"title":"caffeinate_decaffeinate_s – Caffeine","text":"Uses program_termination_m iso_c_binding synchronization_m caffeine_h_m Ancestors: caffeinate_decaffeinate_m module~~caffeinate_decaffeinate_s~~UsesGraph module~caffeinate_decaffeinate_s caffeinate_decaffeinate_s iso_c_binding iso_c_binding module~caffeinate_decaffeinate_s->iso_c_binding module~caffeinate_decaffeinate_m caffeinate_decaffeinate_m module~caffeinate_decaffeinate_s->module~caffeinate_decaffeinate_m module~program_termination_m program_termination_m module~caffeinate_decaffeinate_s->module~program_termination_m module~caffeine_h_m caffeine_h_m module~caffeinate_decaffeinate_s->module~caffeine_h_m module~synchronization_m synchronization_m module~caffeinate_decaffeinate_s->module~synchronization_m module~team_type_m team_type_m module~caffeinate_decaffeinate_m->module~team_type_m module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_caffeinate caf_decaffeinate Module Procedures module procedure caf_caffeinate module module function caf_caffeinate() result(exit_code) Interface → Arguments None Return Value integer module procedure caf_decaffeinate module module subroutine caf_decaffeinate(exit_code) Interface → Arguments Type Intent Optional Attributes Name integer, intent(in) :: exit_code","tags":"","loc":"module/caffeinate_decaffeinate_s.html"},{"title":"sychronization_s – Caffeine","text":"Uses caffeine_h_m Ancestors: synchronization_m module~~sychronization_s~~UsesGraph module~sychronization_s sychronization_s module~caffeine_h_m caffeine_h_m module~sychronization_s->module~caffeine_h_m module~synchronization_m synchronization_m module~sychronization_s->module~synchronization_m iso_c_binding iso_c_binding module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_sync_all Module Procedures module procedure caf_sync_all module module subroutine caf_sync_all() Interface → Arguments None","tags":"","loc":"module/sychronization_s.html"},{"title":"co_min_s – Caffeine","text":"Uses caffeine_assert_m program_termination_m utilities_m caffeine_h_m iso_c_binding Ancestors: collective_subroutines_m module~~co_min_s~~UsesGraph module~co_min_s co_min_s module~caffeine_assert_m caffeine_assert_m module~co_min_s->module~caffeine_assert_m iso_c_binding iso_c_binding module~co_min_s->iso_c_binding module~utilities_m utilities_m module~co_min_s->module~utilities_m module~collective_subroutines_m collective_subroutines_m module~co_min_s->module~collective_subroutines_m module~caffeine_h_m caffeine_h_m module~co_min_s->module~caffeine_h_m module~program_termination_m program_termination_m module~co_min_s->module~program_termination_m module~utilities_m->iso_c_binding module~collective_subroutines_m->iso_c_binding module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_min Module Procedures module procedure caf_co_min module module subroutine caf_co_min(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_min_s.html"},{"title":"co_sum_s – Caffeine","text":"Uses iso_c_binding utilities_m caffeine_h_m Ancestors: collective_subroutines_m module~~co_sum_s~~UsesGraph module~co_sum_s co_sum_s iso_c_binding iso_c_binding module~co_sum_s->iso_c_binding module~caffeine_h_m caffeine_h_m module~co_sum_s->module~caffeine_h_m module~collective_subroutines_m collective_subroutines_m module~co_sum_s->module~collective_subroutines_m module~utilities_m utilities_m module~co_sum_s->module~utilities_m module~caffeine_h_m->iso_c_binding module~collective_subroutines_m->iso_c_binding module~utilities_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_sum Module Procedures module procedure caf_co_sum module module subroutine caf_co_sum(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_sum_s.html"},{"title":"co_reduce_s – Caffeine","text":"Uses caffeine_assert_m program_termination_m caffeine_intrinsic_array_m utilities_m caffeine_h_m iso_c_binding Ancestors: collective_subroutines_m module~~co_reduce_s~~UsesGraph module~co_reduce_s co_reduce_s module~caffeine_assert_m caffeine_assert_m module~co_reduce_s->module~caffeine_assert_m iso_c_binding iso_c_binding module~co_reduce_s->iso_c_binding module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~co_reduce_s->module~caffeine_intrinsic_array_m module~utilities_m utilities_m module~co_reduce_s->module~utilities_m module~collective_subroutines_m collective_subroutines_m module~co_reduce_s->module~collective_subroutines_m module~caffeine_h_m caffeine_h_m module~co_reduce_s->module~caffeine_h_m module~program_termination_m program_termination_m module~co_reduce_s->module~program_termination_m module~caffeine_characterizable_m caffeine_characterizable_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m module~utilities_m->iso_c_binding module~collective_subroutines_m->iso_c_binding module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Variables dummy Module Procedures caf_co_reduce Variables Type Visibility Attributes Name Initial character(kind=c_char,len=5), private, parameter :: dummy = \"     \" Module Procedures module procedure caf_co_reduce module module subroutine caf_co_reduce(a, operation, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) type(c_funptr), value :: operation integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_reduce_s.html"},{"title":"co_max_s – Caffeine","text":"Uses caffeine_assert_m program_termination_m utilities_m caffeine_h_m iso_c_binding Ancestors: collective_subroutines_m module~~co_max_s~~UsesGraph module~co_max_s co_max_s module~caffeine_assert_m caffeine_assert_m module~co_max_s->module~caffeine_assert_m iso_c_binding iso_c_binding module~co_max_s->iso_c_binding module~utilities_m utilities_m module~co_max_s->module~utilities_m module~collective_subroutines_m collective_subroutines_m module~co_max_s->module~collective_subroutines_m module~caffeine_h_m caffeine_h_m module~co_max_s->module~caffeine_h_m module~program_termination_m program_termination_m module~co_max_s->module~program_termination_m module~utilities_m->iso_c_binding module~collective_subroutines_m->iso_c_binding module~caffeine_h_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_max Module Procedures module procedure caf_co_max module module subroutine caf_co_max(a, result_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional target :: result_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_max_s.html"},{"title":"co_broadcast_s – Caffeine","text":"Uses iso_c_binding utilities_m caffeine_h_m Ancestors: collective_subroutines_m module~~co_broadcast_s~~UsesGraph module~co_broadcast_s co_broadcast_s iso_c_binding iso_c_binding module~co_broadcast_s->iso_c_binding module~caffeine_h_m caffeine_h_m module~co_broadcast_s->module~caffeine_h_m module~collective_subroutines_m collective_subroutines_m module~co_broadcast_s->module~collective_subroutines_m module~utilities_m utilities_m module~co_broadcast_s->module~utilities_m module~caffeine_h_m->iso_c_binding module~collective_subroutines_m->iso_c_binding module~utilities_m->iso_c_binding Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures caf_co_broadcast Module Procedures module procedure caf_co_broadcast module module subroutine caf_co_broadcast(a, source_image, stat, errmsg) Interface → Arguments Type Intent Optional Attributes Name type(*), intent(inout), contiguous, target :: a (..) integer, intent(in), optional :: source_image integer, intent(out), optional target :: stat character(len=*), intent(inout), optional target :: errmsg","tags":"","loc":"module/co_broadcast_s.html"},{"title":"caffeine_assert_s – Caffeine","text":"Uses Ancestors: caffeine_assert_m module~~caffeine_assert_s~~UsesGraph module~caffeine_assert_s caffeine_assert_s module~caffeine_assert_m caffeine_assert_m module~caffeine_assert_s->module~caffeine_assert_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures assert Module Procedures module procedure assert pure module module subroutine assert(assertion, description, diagnostic_data) Interface → Arguments Type Intent Optional Attributes Name logical, intent(in) :: assertion Most assertions will be expressions such as i>0 character(len=*), intent(in) :: description A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class(*), intent(in), optional :: diagnostic_data Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t","tags":"","loc":"module/caffeine_assert_s.html"},{"title":"caffeine_intrinsic_array_s – Caffeine","text":"Uses program_termination_m Ancestors: caffeine_intrinsic_array_m module~~caffeine_intrinsic_array_s~~UsesGraph module~caffeine_intrinsic_array_s caffeine_intrinsic_array_s module~program_termination_m program_termination_m module~caffeine_intrinsic_array_s->module~program_termination_m module~caffeine_intrinsic_array_m caffeine_intrinsic_array_m module~caffeine_intrinsic_array_s->module~caffeine_intrinsic_array_m module~caffeine_characterizable_m caffeine_characterizable_m module~caffeine_intrinsic_array_m->module~caffeine_characterizable_m Help × Graph Key Nodes of different colours represent the following: Graph Key Module Module Submodule Submodule Subroutine Subroutine Function Function Program Program This Page's Entity This Page's Entity Solid arrows point from a submodule to the (sub)module which it is\n    descended from. Dashed arrows point from a module or program unit to \n    modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Module Procedures as_character construct Module Procedures module procedure as_character pure module module function as_character(self) result(character_self) Interface → Arguments Type Intent Optional Attributes Name class( intrinsic_array_t ), intent(in) :: self Return Value character(len=:),allocatable module procedure construct module procedure construct() Arguments None","tags":"","loc":"module/caffeine_intrinsic_array_s.html"},{"title":"caffeine_m.f90 – Caffeine","text":"This file depends on sourcefile~~caffeine_m.f90~~EfferentGraph sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~caffeine_m.f90->sourcefile~program_termination_m.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~caffeine_m.f90->sourcefile~image_enumeration_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~caffeine_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeine_m.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~caffeine_m.f90->sourcefile~collective_subroutines_m.f90 sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~caffeine_m.f90->sourcefile~synchronization_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_m Source Code caffeine_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module caffeine_m use program_termination_m , only : caf_stop , caf_error_stop use image_enumeration_m , only : caf_this_image , caf_num_images use collective_subroutines_m , only : caf_co_sum , caf_co_max , caf_co_min , caf_co_reduce , caf_co_broadcast use caffeinate_decaffeinate_m , only : caf_caffeinate , caf_decaffeinate use team_type_m , only : caf_form_team , caf_change_team , caf_end_team , team_type use synchronization_m , only : caf_sync_all implicit none end module caffeine_m","tags":"","loc":"sourcefile/caffeine_m.f90.html"},{"title":"collective_subroutines_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~collective_subroutines_m.f90~~AfferentGraph sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~co_broadcast_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~co_sum_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~collective_subroutines_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~collective_subroutines_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules collective_subroutines_m Source Code collective_subroutines_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module collective_subroutines_m use iso_c_binding , only : c_int32_t , c_int64_t , c_float , c_char , c_bool , c_funptr , c_double implicit none private public :: caf_co_sum public :: caf_co_max public :: caf_co_min public :: caf_co_reduce public :: caf_co_broadcast public :: c_int32_t_operation public :: c_int64_t_operation public :: c_float_operation public :: c_double_operation public :: c_bool_operation public :: c_char_operation public :: c_float_complex_operation public :: c_double_complex_operation abstract interface pure function c_int32_t_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_int32_t implicit none integer ( c_int32_t ), intent ( in ) :: lhs , rhs integer ( c_int32_t ) lhs_op_rhs end function pure function c_int64_t_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_int64_t implicit none integer ( c_int64_t ), intent ( in ) :: lhs , rhs integer ( c_int64_t ) lhs_op_rhs end function pure function c_float_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_float implicit none real ( c_float ), intent ( in ) :: lhs , rhs real ( c_float ) lhs_op_rhs end function pure function c_double_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_double implicit none real ( c_double ), intent ( in ) :: lhs , rhs real ( c_double ) lhs_op_rhs end function pure function c_bool_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_bool implicit none logical ( c_bool ), intent ( in ) :: lhs , rhs logical ( c_bool ) lhs_op_rhs end function pure function c_char_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_char implicit none character ( kind = c_char , len =* ), intent ( in ) :: lhs , rhs character ( kind = c_char , len = :), allocatable :: lhs_op_rhs end function pure function c_float_complex_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_float implicit none complex ( c_float ), intent ( in ) :: lhs , rhs complex ( c_float ) lhs_op_rhs end function pure function c_double_complex_operation ( lhs , rhs ) result ( lhs_op_rhs ) import c_double implicit none complex ( c_double ), intent ( in ) :: lhs , rhs complex ( c_double ) lhs_op_rhs end function end interface interface module subroutine caf_co_sum ( a , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , intent ( in ), target , optional :: result_image integer , intent ( out ), target , optional :: stat character ( len =* ), intent ( inout ), target , optional :: errmsg end subroutine module subroutine caf_co_max ( a , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , intent ( in ), optional , target :: result_image integer , intent ( out ), optional , target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine module subroutine caf_co_min ( a , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , intent ( in ), optional , target :: result_image integer , intent ( out ), optional , target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine module subroutine caf_co_reduce ( a , operation , result_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) type ( c_funptr ), value :: operation integer , intent ( in ), optional , target :: result_image integer , intent ( out ), optional , target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine module subroutine caf_co_broadcast ( a , source_image , stat , errmsg ) implicit none type ( * ), intent ( inout ), contiguous , target :: a (..) integer , optional , intent ( in ) :: source_image integer , optional , intent ( out ), target :: stat character ( len =* ), intent ( inout ), optional , target :: errmsg end subroutine end interface end module","tags":"","loc":"sourcefile/collective_subroutines_m.f90.html"},{"title":"program_termination_s.f90 – Caffeine","text":"This file depends on sourcefile~~program_termination_s.f90~~EfferentGraph sourcefile~program_termination_s.f90 program_termination_s.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~program_termination_s.f90->sourcefile~program_termination_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~program_termination_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules program_termination_s Source Code program_termination_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( program_termination_m ) program_termination_s use iso_fortran_env , only : output_unit , error_unit use iso_c_binding , only : c_char , c_int use caffeine_h_m , only : caf_c_decaffeinate implicit none contains module procedure caf_stop_integer sync all !write(output_unit, *) \"caf_stop: stop code '\", stop_code, \"'\" write ( output_unit , * ) stop_code flush output_unit if (. not . present ( stop_code )) call caf_c_decaffeinate ( exit_code = 0_c_int ) ! does not return call caf_c_decaffeinate ( stop_code ) end procedure module procedure caf_stop_character sync all write ( output_unit , * ) \"caf_stop: stop code '\" // stop_code // \"'\" flush output_unit call caf_c_decaffeinate ( exit_code = 0_c_int ) ! does not return end procedure module procedure caf_error_stop_character interface pure subroutine caf_error_stop_character_c ( stop_code , length ) bind ( C , name = \"caf_error_stop_character_c\" ) use , intrinsic :: iso_c_binding , only : c_char , c_int implicit none integer ( c_int ), intent ( in ), value :: length character ( len = 1 , kind = c_char ), intent ( in ) :: stop_code ( length ) end subroutine end interface call caf_error_stop_character_c ( f_c_string ( stop_code ), len ( stop_code )) end procedure subroutine inner_caf_error_stop_character ( stop_code , length ) bind ( C , name = \"inner_caf_error_stop_character\" ) integer ( c_int ), intent ( in ) :: length character ( len = 1 , kind = c_char ), intent ( in ) :: stop_code ( length ) integer ( c_int ), parameter :: error_occured = 1 write ( error_unit , * ) c_f_string ( stop_code , length ) flush error_unit call caf_error_stop_integer ( error_occured ) end subroutine module procedure caf_error_stop_integer interface pure subroutine caf_error_stop_integer_c ( stop_code ) bind ( C , name = \"caf_error_stop_integer_c\" ) use , intrinsic :: iso_c_binding , only : c_int implicit none integer ( c_int ), intent ( in ) :: stop_code end subroutine end interface call caf_error_stop_integer_c ( stop_code ) end procedure subroutine inner_caf_error_stop_integer ( stop_code ) bind ( C , name = \"inner_caf_error_stop_integer\" ) integer , intent ( in ), optional :: stop_code integer exit_code if (. not . present ( stop_code )) then call caf_c_decaffeinate ( exit_code = 1 ) else if ( stop_code == 0 ) then write ( error_unit ) stop_code flush error_unit exit_code = 1 else exit_code = stop_code end if call caf_c_decaffeinate ( exit_code ) ! does not return end subroutine pure function f_c_string ( f_string ) result ( c_string ) character ( len =* ), intent ( in ) :: f_string character ( len = 1 , kind = c_char ) :: c_string ( len ( f_string )) integer :: i do concurrent ( i = 1 : len ( f_string )) c_string ( i ) = f_string ( i : i ) end do end function pure function c_f_string ( c_string , length ) result ( f_string ) integer ( c_int ), intent ( in ) :: length character ( len = 1 , kind = c_char ), intent ( in ) :: c_string ( length ) character ( len = length ) :: f_string integer :: i do concurrent ( i = 1 : length ) f_string ( i : i ) = c_string ( i ) end do end function end submodule program_termination_s","tags":"","loc":"sourcefile/program_termination_s.f90.html"},{"title":"normal_termination_s.f90 – Caffeine","text":"This file depends on sourcefile~~normal_termination_s.f90~~EfferentGraph sourcefile~normal_termination_s.f90 normal_termination_s.f90 sourcefile~normal_termination_m.f90 normal_termination_m.f90 sourcefile~normal_termination_s.f90->sourcefile~normal_termination_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~normal_termination_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules normal_termination_s Source Code normal_termination_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( normal_termination_m ) normal_termination_s use iso_fortran_env , only : output_unit use iso_c_binding , only : c_int use caffeine_h_m , only : caf_c_decaffeinate implicit none contains module procedure caf_stop_integer sync all write ( output_unit , * ) \"caf_stop: stop code '\" , stop_code , \"'\" flush output_unit if (. not . present ( stop_code )) call caf_c_decaffeinate ( exit_code = 0_c_int ) ! does not return call caf_c_decaffeinate ( stop_code ) end procedure module procedure caf_stop_character sync all write ( output_unit , * ) \"caf_stop: stop code '\" // stop_code // \"'\" flush output_unit call caf_c_decaffeinate ( exit_code = 0_c_int ) end procedure end submodule normal_termination_s","tags":"","loc":"sourcefile/normal_termination_s.f90.html"},{"title":"team_type_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~team_type_m.f90~~AfferentGraph sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 sourcefile~team_type_s.f90 team_type_s.f90 sourcefile~team_type_s.f90->sourcefile~team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~team_type_m.f90 sourcefile~caffeine_m.f90->sourcefile~image_enumeration_m.f90 sourcefile~caffeine_m.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeinate_decaffeinate_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules team_type_m Source Code team_type_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module team_type_m implicit none private public :: team_type , caf_form_team , current_team , caf_end_team , caf_change_team type team_type end type type ( team_type ), pointer :: current_team => null () interface module subroutine caf_form_team ( num , team , new_index , stat , errmsg ) integer , intent ( in ) :: num type ( team_type ), intent ( out ) :: team integer , intent ( in ), optional :: new_index integer , intent ( out ), optional :: stat character ( len =* ), intent ( inout ), optional :: errmsg end subroutine module subroutine caf_change_team ( team ) type ( team_type ), target , intent ( in ) :: team end subroutine module subroutine caf_end_team () end subroutine end interface end module team_type_m","tags":"","loc":"sourcefile/team_type_m.f90.html"},{"title":"normal_termination_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~normal_termination_m.f90~~AfferentGraph sourcefile~normal_termination_m.f90 normal_termination_m.f90 sourcefile~normal_termination_s.f90 normal_termination_s.f90 sourcefile~normal_termination_s.f90->sourcefile~normal_termination_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules normal_termination_m Source Code normal_termination_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module normal_termination_m implicit none private public :: caf_stop interface caf_stop module subroutine caf_stop_integer ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code (or 0 if not present) as the process exit status integer , intent ( in ), optional :: stop_code end subroutine module subroutine caf_stop_character ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code as the process exit status character ( len =* ), intent ( in ) :: stop_code end subroutine end interface end module normal_termination_m","tags":"","loc":"sourcefile/normal_termination_m.f90.html"},{"title":"synchronization_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~synchronization_m.f90~~AfferentGraph sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~synchronization_m.f90 sourcefile~synchronization_s.f90 synchronization_s.f90 sourcefile~synchronization_s.f90->sourcefile~synchronization_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~synchronization_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules synchronization_m Source Code synchronization_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module synchronization_m implicit none private public :: caf_sync_all interface module subroutine caf_sync_all () end subroutine end interface end module synchronization_m","tags":"","loc":"sourcefile/synchronization_m.f90.html"},{"title":"image_enumeration_s.f90 – Caffeine","text":"This file depends on sourcefile~~image_enumeration_s.f90~~EfferentGraph sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~image_enumeration_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~image_enumeration_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules image_enumeration_s Source Code image_enumeration_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( image_enumeration_m ) image_enumeration_s use caffeine_h_m , only : caf_c_num_images , caf_c_this_image implicit none contains module procedure num_images_team image_count = caf_c_num_images () end procedure module procedure num_images_team_number end procedure module procedure this_image_team image_number = caf_c_this_image () end procedure module procedure this_image_coarray_team end procedure module procedure this_image_coarray_dim_team end procedure end submodule image_enumeration_s","tags":"","loc":"sourcefile/image_enumeration_s.f90.html"},{"title":"utilities_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~utilities_m.f90~~AfferentGraph sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~utilities_m.f90 sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~co_broadcast_s.f90->sourcefile~utilities_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~utilities_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~utilities_m.f90 sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~co_sum_s.f90->sourcefile~utilities_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules utilities_m Source Code utilities_m.f90 Source Code module utilities_m use iso_c_binding , only : c_ptr , c_null_ptr , c_int , c_loc implicit none public :: get_c_ptr , get_c_ptr_character , optional_value contains pure function get_c_ptr ( stat ) result ( ptr ) integer , intent ( in ), optional , target :: stat type ( c_ptr ) ptr if ( present ( stat )) then ptr = c_loc ( stat ) else ptr = c_null_ptr end if end function pure function get_c_ptr_character ( errmsg ) result ( ptr ) character ( len =* ), intent ( in ), optional , target :: errmsg type ( c_ptr ) ptr if ( present ( errmsg )) then ptr = c_loc ( errmsg ) else ptr = c_null_ptr end if end function pure function optional_value ( var ) result ( c_val ) integer , intent ( in ), optional :: var integer ( c_int ) c_val if ( present ( var )) then c_val = var else c_val = 0_c_int end if end function end module utilities_m","tags":"","loc":"sourcefile/utilities_m.f90.html"},{"title":"program_termination_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~program_termination_m.f90~~AfferentGraph sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~program_termination_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~program_termination_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~program_termination_m.f90 sourcefile~program_termination_s.f90 program_termination_s.f90 sourcefile~program_termination_s.f90->sourcefile~program_termination_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~program_termination_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~program_termination_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~program_termination_m.f90 sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_s.f90->sourcefile~program_termination_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules program_termination_m Source Code program_termination_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module program_termination_m implicit none private public :: caf_stop public :: caf_error_stop interface caf_stop module subroutine caf_stop_integer ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code, or 0 if not present, as the process exit status integer , intent ( in ), optional :: stop_code end subroutine module subroutine caf_stop_character ( stop_code ) !! synchronize, stop the executing image, and provide the stop_code as the process exit status character ( len =* ), intent ( in ) :: stop_code end subroutine end interface interface caf_error_stop pure module subroutine caf_error_stop_integer ( stop_code ) !! stop all images and provide the stop_code, or 0 if not present, as the process exit status integer , intent ( in ), optional :: stop_code end subroutine pure module subroutine caf_error_stop_character ( stop_code ) !! stop all images and provide the stop_code as the process exit status character ( len =* ), intent ( in ) :: stop_code end subroutine end interface end module program_termination_m","tags":"","loc":"sourcefile/program_termination_m.f90.html"},{"title":"team_type_s.f90 – Caffeine","text":"This file depends on sourcefile~~team_type_s.f90~~EfferentGraph sourcefile~team_type_s.f90 team_type_s.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~team_type_s.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules team_type_s Source Code team_type_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( team_type_m ) team_type_s implicit none contains module procedure caf_change_team end procedure module procedure caf_end_team end procedure module procedure caf_form_team end procedure end submodule","tags":"","loc":"sourcefile/team_type_s.f90.html"},{"title":"caffeinate_decaffeinate_s.F90 – Caffeine","text":"This file depends on sourcefile~~caffeinate_decaffeinate_s.f90~~EfferentGraph sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~synchronization_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~program_termination_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules caffeinate_decaffeinate_s Source Code caffeinate_decaffeinate_s.F90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( caffeinate_decaffeinate_m ) caffeinate_decaffeinate_s use iso_c_binding , only : c_int , c_loc , c_char , c_null_char use synchronization_m , only : caf_sync_all use caffeine_h_m , only : caf_c_caffeinate , caf_c_decaffeinate use program_termination_m , only : caf_error_stop implicit none contains module procedure caf_caffeinate integer i integer , parameter :: max_arg_len = 1024 associate ( argc => int ( command_argument_count (), c_int )) associate ( argv => [( c_loc ( c_interop_arg ( i )), i = 0 , argc )]) call caf_c_caffeinate ( argc , argv ) end associate end associate ! TODO: establish non-allocatable coarrays call caf_sync_all exit_code = 0 contains function c_interop_arg ( argnum ) result ( arg ) integer , intent ( in ) :: argnum integer arglen #ifndef __GFORTRAN__ character ( kind = c_char , len = max_arg_len ), target :: arg #else character ( kind = c_char , len = max_arg_len ), target :: targ ! work around gfortran bug character ( kind = c_char , len = max_arg_len ), pointer :: arg arg => targ #endif call get_command_argument ( argnum , arg , arglen ) if ( arglen + 1 > max_arg_len ) call caf_error_stop ( \"maximum argument length exceeded\" ) arg ( arglen + 1 : arglen + 1 ) = c_null_char end function end procedure module procedure caf_decaffeinate call caf_c_decaffeinate ( exit_code ) end procedure end submodule caffeinate_decaffeinate_s","tags":"","loc":"sourcefile/caffeinate_decaffeinate_s.f90.html"},{"title":"image_enumeration_m.f90 – Caffeine","text":"This file depends on sourcefile~~image_enumeration_m.f90~~EfferentGraph sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Files dependent on this one sourcefile~~image_enumeration_m.f90~~AfferentGraph sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~image_enumeration_m.f90 sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~image_enumeration_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules image_enumeration_m Source Code image_enumeration_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module image_enumeration_m use team_type_m , only : team_type implicit none private public :: caf_num_images public :: caf_this_image interface caf_num_images module function num_images_team ( team ) result ( image_count ) implicit none type ( team_type ), intent ( in ), optional :: team integer image_count end function module function num_images_team_number ( team_number ) result ( image_count ) implicit none integer , intent ( in ) :: team_number integer image_count end function end interface interface caf_this_image pure module function this_image_team ( team ) result ( image_number ) implicit none type ( team_type ), intent ( in ), optional :: team integer image_number end function module function this_image_coarray_team ( coarray , team ) result ( image_number ) implicit none type ( team_type ), intent ( in ), optional :: team class ( * ), intent ( in ) :: coarray (..) integer image_number end function module function this_image_coarray_dim_team ( coarray , dim , team ) result ( image_number ) implicit none class ( * ), intent ( in ) :: coarray (..) integer , intent ( in ) :: dim type ( team_type ), intent ( in ), optional :: team integer image_number end function end interface end module image_enumeration_m","tags":"","loc":"sourcefile/image_enumeration_m.f90.html"},{"title":"caffeinate_decaffeinate_m.f90 – Caffeine","text":"This file depends on sourcefile~~caffeinate_decaffeinate_m.f90~~EfferentGraph sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~caffeinate_decaffeinate_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Files dependent on this one sourcefile~~caffeinate_decaffeinate_m.f90~~AfferentGraph sourcefile~caffeinate_decaffeinate_m.f90 caffeinate_decaffeinate_m.f90 sourcefile~caffeine_m.f90 caffeine_m.f90 sourcefile~caffeine_m.f90->sourcefile~caffeinate_decaffeinate_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeinate_decaffeinate_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeinate_decaffeinate_m Source Code caffeinate_decaffeinate_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module caffeinate_decaffeinate_m use team_type_m , only : team_type implicit none private public :: caf_caffeinate , caf_decaffeinate , default_team type ( team_type ), target :: default_team interface module function caf_caffeinate () result ( exit_code ) implicit none integer exit_code end function module subroutine caf_decaffeinate ( exit_code ) implicit none integer , intent ( in ) :: exit_code end subroutine end interface end module caffeinate_decaffeinate_m","tags":"","loc":"sourcefile/caffeinate_decaffeinate_m.f90.html"},{"title":"caffeine_h_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~caffeine_h_m.f90~~AfferentGraph sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~normal_termination_s.f90 normal_termination_s.f90 sourcefile~normal_termination_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~co_broadcast_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~synchronization_s.f90 synchronization_s.f90 sourcefile~synchronization_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~program_termination_s.f90 program_termination_s.f90 sourcefile~program_termination_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~image_enumeration_s.f90 image_enumeration_s.f90 sourcefile~image_enumeration_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~caffeinate_decaffeinate_s.f90 caffeinate_decaffeinate_s.F90 sourcefile~caffeinate_decaffeinate_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~co_sum_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_h_m Source Code caffeine_h_m.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt module caffeine_h_m ! Fortran module shadowing the caffeine.h header file use iso_c_binding , only : c_int , c_ptr , c_size_t , c_funptr , c_bool implicit none private public :: caf_c_caffeinate , caf_c_decaffeinate public :: caf_c_num_images , caf_c_this_image public :: caf_c_sync_all public :: caf_c_co_broadcast , caf_c_co_sum , caf_c_co_min , caf_c_co_max , caf_c_co_reduce public :: caf_c_same_cfi_type , caf_c_elem_len , caf_c_numeric_type , caf_c_is_f_string interface ! ________ Program initiation and finalization ___________ subroutine caf_c_caffeinate ( argc , argv ) bind ( C ) !! void c_caffeinate(int argc, char *argv[]); import c_int , c_ptr implicit none integer ( c_int ), value :: argc type ( c_ptr ) argv ( * ) end subroutine subroutine caf_c_decaffeinate ( exit_code ) bind ( C ) !! void c_decaffeinate(); import c_int implicit none integer ( c_int ), value :: exit_code end subroutine ! _________________ Image enumeration ____________________ pure function caf_c_this_image () bind ( C ) !! int caf_c_this_image(); import c_int implicit none integer ( c_int ) caf_c_this_image end function pure function caf_c_num_images () bind ( C ) !! int caf_c_num_images(); import c_int implicit none integer ( c_int ) caf_c_num_images end function ! __________________ Synchronization _____________________ subroutine caf_c_sync_all () bind ( C ) !! void caf_c_sync_all(); import c_int implicit none end subroutine ! ______________ Collective Subroutines __________________ subroutine caf_c_co_broadcast ( a , source_image , stat , Nelem ) bind ( C ) !! void c_co_broadcast(CFI_cdesc_t * a_desc, int source_image, int* stat, int num_elements); import c_int , c_ptr implicit none type ( * ) a (..) type ( c_ptr ), value :: stat integer ( c_int ), value :: source_image , Nelem end subroutine subroutine caf_c_co_reduce ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements , Coll_ReduceSub , client_data ) bind ( C ) !! void caf_c_co_reduce(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, int num_elements, gex_Coll_ReduceFn_t* user_op, void* client_data) import c_int , c_ptr , c_size_t , c_funptr implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg , client_data type ( c_funptr ), value :: Coll_ReduceSub integer ( c_size_t ), value :: num_elements end subroutine subroutine caf_c_co_sum ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements ) bind ( C ) !! void c_co_sum(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, size_t num_elements); import c_int , c_ptr , c_size_t implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg integer ( c_size_t ), value :: num_elements end subroutine subroutine caf_c_co_min ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements ) bind ( C ) !! void c_co_min(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, size_t num_elements); import c_int , c_ptr , c_size_t implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg integer ( c_size_t ), value :: num_elements end subroutine subroutine caf_c_co_max ( a , result_image , c_loc_stat , c_loc_errmsg , num_elements ) bind ( C ) !! void c_co_max(CFI_cdesc_t* a_desc, int result_image, int* stat, char* errmsg, size_t num_elements); import c_int , c_ptr , c_size_t implicit none type ( * ) a (..) integer ( c_int ), value :: result_image type ( c_ptr ), value :: c_loc_stat , c_loc_errmsg integer ( c_size_t ), value :: num_elements end subroutine logical ( c_bool ) pure function caf_c_same_cfi_type ( a , b ) bind ( C ) !! bool caf_c_same_cfi_type(CFI_cdesc_t* a_desc, CFI_cdesc_t* a_desc); import c_bool type ( * ), intent ( in ) :: a (..), b (..) end function logical ( c_bool ) pure function caf_c_numeric_type ( a ) bind ( C ) !! bool caf_c_numeric_type(CFI_cdesc_t* a_desc); import c_bool type ( * ), intent ( in ) :: a (..) end function logical ( c_bool ) pure function caf_c_is_f_string ( a ) bind ( C ) !! bool caf_c_is_f_string(CFI_cdesc_t* a_desc); import c_bool type ( * ), intent ( in ) :: a (..) end function pure function caf_c_elem_len ( a ) result ( a_elem_len ) bind ( C ) !! size_t caf_c_elem_len(CFI_cdesc_t* a_desc); import c_size_t type ( * ), intent ( in ) :: a (..) integer ( c_size_t ), target :: a_elem_len end function end interface end module caffeine_h_m","tags":"","loc":"sourcefile/caffeine_h_m.f90.html"},{"title":"synchronization_s.f90 – Caffeine","text":"This file depends on sourcefile~~synchronization_s.f90~~EfferentGraph sourcefile~synchronization_s.f90 synchronization_s.f90 sourcefile~synchronization_m.f90 synchronization_m.f90 sourcefile~synchronization_s.f90->sourcefile~synchronization_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~synchronization_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules sychronization_s Source Code synchronization_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( synchronization_m ) sychronization_s use caffeine_h_m , only : caf_c_sync_all implicit none contains module procedure caf_sync_all call caf_c_sync_all end procedure end submodule","tags":"","loc":"sourcefile/synchronization_s.f90.html"},{"title":"co_min_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_min_s.f90~~EfferentGraph sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_min_s.f90->sourcefile~utilities_m.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~co_min_s.f90->sourcefile~assert_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~co_min_s.f90->sourcefile~program_termination_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_min_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_min_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_min_s Source Code co_min_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_min_s use iso_c_binding , only : c_ptr , c_size_t , c_null_char , c_f_pointer , c_funloc , c_null_ptr use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_min , caf_c_same_cfi_type , caf_c_numeric_type , caf_c_is_f_string use caffeine_assert_m , only : assert use program_termination_m , only : caf_error_stop implicit none contains module procedure caf_co_min type ( c_ptr ) :: stat_c_ptr = c_null_ptr , errmsg_c_ptr = c_null_ptr character ( len = :), allocatable :: c_string character ( len = :), pointer :: errmsg_f_ptr if ( caf_c_numeric_type ( a )) then stat_c_ptr = get_c_ptr ( stat ) c_string = errmsg // c_null_char errmsg_c_ptr = get_c_ptr_character ( c_string ) call caf_c_co_min ( a , optional_value ( result_image ), stat_c_ptr , errmsg_c_ptr , int ( product ( shape ( a )), c_size_t )) call c_f_pointer ( errmsg_c_ptr , errmsg_f_ptr ) ! no need to do this for stat was passed by reference errmsg = errmsg_f_ptr ! copy the output back & truncate the null terminator else if ( caf_c_is_f_string ( a )) then call caf_co_reduce ( a , c_funloc ( alphabetize ), optional_value ( result_image ), stat , errmsg ) else call caf_error_stop ( \"caf_co_min: unsupported type\" ) end if contains pure function alphabetize ( lhs , rhs ) result ( first_alphabetically ) character ( len =* ), intent ( in ) :: lhs , rhs character ( len = :), allocatable :: first_alphabetically call assert ( len ( lhs ) == len ( rhs ), \"caf_co_min: LHS/RHS length match\" , lhs // \" , \" // rhs ) first_alphabetically = min ( lhs , rhs ) end function end procedure end submodule co_min_s","tags":"","loc":"sourcefile/co_min_s.f90.html"},{"title":"co_sum_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_sum_s.f90~~EfferentGraph sourcefile~co_sum_s.f90 co_sum_s.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_sum_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_sum_s.f90->sourcefile~utilities_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_sum_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_sum_s Source Code co_sum_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_sum_s use iso_c_binding , only : c_ptr , c_size_t , c_null_char , c_f_pointer use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_sum implicit none contains module procedure caf_co_sum type ( c_ptr ) stat_c_ptr , errmsg_c_ptr character ( len = :), allocatable :: c_string character ( len = :), pointer :: errmsg_f_ptr stat_c_ptr = get_c_ptr ( stat ) c_string = errmsg // c_null_char errmsg_c_ptr = get_c_ptr_character ( c_string ) call caf_c_co_sum ( a , optional_value ( result_image ), stat_c_ptr , errmsg_c_ptr , int ( product ( shape ( a )), c_size_t )) call c_f_pointer ( errmsg_c_ptr , errmsg_f_ptr ) errmsg = errmsg_f_ptr end procedure end submodule co_sum_s","tags":"","loc":"sourcefile/co_sum_s.f90.html"},{"title":"co_reduce_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_reduce_s.f90~~EfferentGraph sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_reduce_s.f90->sourcefile~utilities_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~co_reduce_s.f90->sourcefile~program_termination_m.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~co_reduce_s.f90->sourcefile~assert_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_reduce_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~co_reduce_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_reduce_s.f90->sourcefile~caffeine_h_m.f90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_reduce_s Source Code co_reduce_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_reduce_s use iso_c_binding , only : & c_ptr , c_size_t , c_loc , c_null_ptr , c_funloc , c_associated , c_f_pointer , c_int , c_f_procpointer use caffeine_assert_m , only : assert use caffeine_intrinsic_array_m , only : intrinsic_array_t use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_reduce , caf_c_same_cfi_type , caf_c_elem_len , caf_c_is_f_string use program_termination_m , only : caf_error_stop implicit none character ( kind = c_char , len = 5 ), parameter :: dummy = \"     \" contains module procedure caf_co_reduce type ( c_ptr ) :: stat_ptr = c_null_ptr , errmsg_ptr = c_null_ptr procedure ( c_int32_t_operation ), pointer :: int32_op => null () procedure ( c_int64_t_operation ), pointer :: int64_op => null () procedure ( c_float_operation ), pointer :: float_op => null () procedure ( c_double_operation ), pointer :: double_op => null () procedure ( c_bool_operation ), pointer :: bool_op => null () procedure ( c_char_operation ), pointer :: char_op => null () procedure ( c_float_complex_operation ), pointer :: float_complex_op => null () procedure ( c_double_complex_operation ), pointer :: double_complex_op => null () call assert ( c_associated ( operation ), \"caf_co_reduce: c_associated(operation)\" ) stat_ptr = get_c_ptr ( stat ) errmsg_ptr = get_c_ptr_character ( errmsg ) if ( caf_c_same_cfi_type ( a , 0 )) then call c_f_procpointer ( operation , int32_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_int32_t ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , 0_c_int64_t )) then call c_f_procpointer ( operation , int64_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_int64_t ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , 1._c_double )) then call c_f_procpointer ( operation , double_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_double ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , 1._c_float )) then call c_f_procpointer ( operation , float_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_float ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , . true . _ c_bool )) then call c_f_procpointer ( operation , bool_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_bool ), c_null_ptr ) else if ( caf_c_is_f_string ( a )) then block integer ( c_size_t ), target :: len_a len_a = caf_c_elem_len ( a ) call c_f_procpointer ( operation , char_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_char ), c_loc ( len_a )) end block else if ( caf_c_same_cfi_type ( a , ( 0._c_float , 0._c_float ))) then call c_f_procpointer ( operation , float_complex_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_float_complex ), c_null_ptr ) else if ( caf_c_same_cfi_type ( a , ( 0._c_double , 0._c_double ))) then call c_f_procpointer ( operation , double_complex_op ) call caf_c_co_reduce ( a , optional_value ( result_image ), stat_ptr , errmsg_ptr , & int ( product ( shape ( a )), c_size_t ), c_funloc ( Coll_ReduceSub_c_double_complex ), c_null_ptr ) else call caf_error_stop ( \"caf_co_reduce: unsupported type\" ) end if contains subroutine Coll_ReduceSub_c_int32_t ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data integer ( c_int32_t ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_int32_t: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = int32_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_int64_t ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data integer ( c_int64_t ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_int64_t: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = int64_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_double ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data real ( c_double ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_double: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = double_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_float ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data real ( c_float ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_float: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = float_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_double_complex ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data complex ( c_double ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_dobule_complex: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = double_complex_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_float_complex ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data complex ( c_float ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_float_complex: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = float_complex_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_bool ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data logical ( c_bool ), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_size_t ) i call assert ( all ([ c_associated ( arg1 ), c_associated ( arg2_and_out )]), \"Coll_ReduceSub_c_bool: operands associated\" ) call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) do concurrent ( i = 1 : count ) rhs_and_result ( i ) = bool_op ( lhs ( i ), rhs_and_result ( i )) end do end subroutine subroutine Coll_ReduceSub_c_char ( arg1 , arg2_and_out , count , cdata ) bind ( C ) type ( c_ptr ), value :: arg1 !! \"Left\" operands type ( c_ptr ), value :: arg2_and_out !! \"Right\" operands and result integer ( c_size_t ), value :: count !! Operand count type ( c_ptr ), value :: cdata !! Client data character ( kind = c_char , len = :), allocatable , target :: prototype (:) character ( kind = c_char , len = :), pointer :: lhs (:) => null (), rhs_and_result (:) => null () integer ( c_int ), pointer :: arglen => null () associate ( c_associated_args => [ c_associated ( arg1 ), c_associated ( arg2_and_out ), c_associated ( cdata )]) call assert ( all ( c_associated_args ), \"Coll_ReduceSub_c_char: all(c_associated_args)\" , intrinsic_array_t ( c_associated_args )) end associate call c_f_pointer ( cdata , arglen ) allocate ( character ( kind = c_char , len = arglen ) :: prototype ( count )) lhs => prototype ! set string length rhs_and_result => prototype ! set string length call c_f_pointer ( arg1 , lhs , [ count ]) call c_f_pointer ( arg2_and_out , rhs_and_result , [ count ]) block integer ( c_size_t ) i do concurrent ( i = 1 : count ) rhs_and_result ( i ) = char_op ( lhs ( i ), rhs_and_result ( i )) end do end block end subroutine end procedure end submodule co_reduce_s","tags":"","loc":"sourcefile/co_reduce_s.f90.html"},{"title":"co_max_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_max_s.f90~~EfferentGraph sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_max_s.f90->sourcefile~utilities_m.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~co_max_s.f90->sourcefile~assert_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~co_max_s.f90->sourcefile~program_termination_m.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_max_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_max_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_max_s Source Code co_max_s.f90 Source Code ! Copyright (c), The Regents of the University of California ! Terms of use are as specified in LICENSE.txt submodule ( collective_subroutines_m ) co_max_s use iso_c_binding , only : c_ptr , c_size_t , c_null_char , c_f_pointer , c_funloc , c_null_ptr use utilities_m , only : get_c_ptr , get_c_ptr_character , optional_value use caffeine_h_m , only : caf_c_co_max , caf_c_same_cfi_type , caf_c_numeric_type , caf_c_is_f_string use caffeine_assert_m , only : assert use program_termination_m , only : caf_error_stop implicit none contains module procedure caf_co_max type ( c_ptr ) :: stat_c_ptr = c_null_ptr , errmsg_c_ptr = c_null_ptr character ( len = :), allocatable :: c_string character ( len = :), pointer :: errmsg_f_ptr if ( caf_c_numeric_type ( a )) then stat_c_ptr = get_c_ptr ( stat ) c_string = errmsg // c_null_char errmsg_c_ptr = get_c_ptr_character ( c_string ) call caf_c_co_max ( a , optional_value ( result_image ), stat_c_ptr , errmsg_c_ptr , int ( product ( shape ( a )), c_size_t )) call c_f_pointer ( errmsg_c_ptr , errmsg_f_ptr ) ! no need to do this for stat was passed by reference errmsg = errmsg_f_ptr ! copy the output back & truncate the null terminator else if ( caf_c_is_f_string ( a )) then call caf_co_reduce ( a , c_funloc ( reverse_alphabetize ), optional_value ( result_image ), stat , errmsg ) else call caf_error_stop ( \"caf_co_max: unsupported type\" ) end if contains pure function reverse_alphabetize ( lhs , rhs ) result ( last_alphabetically ) character ( len =* ), intent ( in ) :: lhs , rhs character ( len = :), allocatable :: last_alphabetically call assert ( len ( lhs ) == len ( rhs ), \"caf_co_max: LHS/RHS length match\" , lhs // \" , \" // rhs ) last_alphabetically = max ( lhs , rhs ) end function end procedure end submodule co_max_s","tags":"","loc":"sourcefile/co_max_s.f90.html"},{"title":"co_broadcast_s.f90 – Caffeine","text":"This file depends on sourcefile~~co_broadcast_s.f90~~EfferentGraph sourcefile~co_broadcast_s.f90 co_broadcast_s.f90 sourcefile~collective_subroutines_m.f90 collective_subroutines_m.f90 sourcefile~co_broadcast_s.f90->sourcefile~collective_subroutines_m.f90 sourcefile~utilities_m.f90 utilities_m.f90 sourcefile~co_broadcast_s.f90->sourcefile~utilities_m.f90 sourcefile~caffeine_h_m.f90 caffeine_h_m.f90 sourcefile~co_broadcast_s.f90->sourcefile~caffeine_h_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules co_broadcast_s Source Code co_broadcast_s.f90 Source Code submodule ( collective_subroutines_m ) co_broadcast_s use iso_c_binding , only : c_ptr use utilities_m , only : get_c_ptr use caffeine_h_m , only : caf_c_co_broadcast implicit none contains module procedure caf_co_broadcast type ( c_ptr ) stat_ptr stat_ptr = get_c_ptr ( stat ) call caf_c_co_broadcast ( a , source_image , stat_ptr , product ( shape ( a ))) ! With a compliant Fortran 2018 compiler, pass in c_sizeof(a) as the final argument ! and eliminate the calculation of num_elements*sizeof(a) in caffeine.c. end procedure end submodule co_broadcast_s","tags":"","loc":"sourcefile/co_broadcast_s.f90.html"},{"title":"assert_m.F90 – Caffeine","text":"Files dependent on this one sourcefile~~assert_m.f90~~AfferentGraph sourcefile~assert_m.f90 assert_m.F90 sourcefile~co_min_s.f90 co_min_s.f90 sourcefile~co_min_s.f90->sourcefile~assert_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~assert_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~assert_m.f90 sourcefile~co_max_s.f90 co_max_s.f90 sourcefile~co_max_s.f90->sourcefile~assert_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_assert_m Source Code assert_m.F90 Source Code ! !     (c) 2019-2020 Guide Star Engineering, LLC !     This Software was developed for the US Nuclear Regulatory Commission (US NRC) under contract !     \"Multi-Dimensional Physics Implementation into Fuel Analysis under Steady-state and Transients (FAST)\", !     contract # NRC-HQ-60-17-C-0007 ! module caffeine_assert_m !! summary: Utility for runtime checking of logical assertions. !! usage: error-terminate if the assertion fails: !! !!    use assertions_m, only : assert !!    call assert( 2 > 1, \"2 > 1\") !! !! Turn off assertions in production code by setting USE_ASSERTIONS to .false. via the preprocessor. !! This file's capitalized .F90 extension causes most Fortran compilers to preprocess this file so !! that building as follows turns off assertion enforcement: !! !!    fpm build --flag \"-DUSE_ASSERTIONS=.false.\" !! !! Doing so may eliminate any associated runtime overhead by enabling optimizing compilers to ignore !! the assertion procedure body during a dead-code-removal phase of optimization. implicit none private public :: assert #ifndef USE_ASSERTIONS # define USE_ASSERTIONS .true. #endif logical , parameter :: enforce_assertions = USE_ASSERTIONS !! Turn off assertions as follows: fpm build --flag \"-DUSE_ASSERTIONS=.false.\" interface pure module subroutine assert ( assertion , description , diagnostic_data ) !! If assertion is .false., error-terminate with a character stop code that contains diagnostic_data if present implicit none logical , intent ( in ) :: assertion !! Most assertions will be expressions such as i>0 character ( len =* ), intent ( in ) :: description !! A brief statement of what is being asserted such as \"i>0\" or \"positive i\" class ( * ), intent ( in ), optional :: diagnostic_data !! Data to include in an error ouptput: may be of an intrinsic type or a type that extends characterizable_t end subroutine end interface end module","tags":"","loc":"sourcefile/assert_m.f90.html"},{"title":"characterizable_m.f90 – Caffeine","text":"Files dependent on this one sourcefile~~characterizable_m.f90~~AfferentGraph sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_s.f90->sourcefile~characterizable_m.f90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_s.f90->sourcefile~intrinsic_array_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_characterizable_m Source Code characterizable_m.f90 Source Code module caffeine_characterizable_m !! Define an abstract class that supports object representation in character form implicit none private public :: characterizable_t type , abstract :: characterizable_t contains procedure ( as_character_i ), deferred :: as_character end type abstract interface pure function as_character_i ( self ) result ( character_self ) import characterizable_t implicit none class ( characterizable_t ), intent ( in ) :: self character ( len = :), allocatable :: character_self end function end interface end module","tags":"","loc":"sourcefile/characterizable_m.f90.html"},{"title":"intrinsic_array_m.F90 – Caffeine","text":"This file depends on sourcefile~~intrinsic_array_m.f90~~EfferentGraph sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Files dependent on this one sourcefile~~intrinsic_array_m.f90~~AfferentGraph sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~co_reduce_s.f90 co_reduce_s.f90 sourcefile~co_reduce_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_s.f90->sourcefile~intrinsic_array_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Modules caffeine_intrinsic_array_m Source Code intrinsic_array_m.F90 Source Code module caffeine_intrinsic_array_m !! Define an abstract class that supports object representation in character form use caffeine_characterizable_m , only : characterizable_t implicit none private public :: intrinsic_array_t type , extends ( characterizable_t ) :: intrinsic_array_t complex , allocatable :: complex_1D (:) complex ( kind ( 1.D0 )), allocatable :: complex_double_1D (:) integer , allocatable :: integer_1D (:) logical , allocatable :: logical_1D (:) real , allocatable :: real_1D (:) double precision , allocatable :: double_precision_1D (:) complex , allocatable :: complex_2D (:,:) complex ( kind ( 1.D0 )), allocatable :: complex_double_2D (:,:) integer , allocatable :: integer_2D (:,:) logical , allocatable :: logical_2D (:,:) real , allocatable :: real_2D (:,:) double precision , allocatable :: double_precision_2D (:,:) complex , allocatable :: complex_3D (:,:,:) complex ( kind ( 1.D0 )), allocatable :: complex_double_3D (:,:,:) integer , allocatable :: integer_3D (:,:,:) logical , allocatable :: logical_3D (:,:,:) real , allocatable :: real_3D (:,:,:) double precision , allocatable :: double_precision_3D (:,:,:) contains procedure :: as_character end type interface intrinsic_array_t pure module function construct ( array ) result ( intrinsic_array ) implicit none #ifndef NAGFOR class ( * ), intent ( in ) :: array (..) #else class ( * ), intent ( in ) :: array (:) #endif type ( intrinsic_array_t ) intrinsic_array end function end interface interface pure module function as_character ( self ) result ( character_self ) implicit none class ( intrinsic_array_t ), intent ( in ) :: self character ( len = :), allocatable :: character_self end function end interface end module","tags":"","loc":"sourcefile/intrinsic_array_m.f90.html"},{"title":"assert_s.f90 – Caffeine","text":"This file depends on sourcefile~~assert_s.f90~~EfferentGraph sourcefile~assert_s.f90 assert_s.f90 sourcefile~assert_m.f90 assert_m.F90 sourcefile~assert_s.f90->sourcefile~assert_m.f90 sourcefile~image_enumeration_m.f90 image_enumeration_m.f90 sourcefile~assert_s.f90->sourcefile~image_enumeration_m.f90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~assert_s.f90->sourcefile~characterizable_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~assert_s.f90->sourcefile~program_termination_m.f90 sourcefile~team_type_m.f90 team_type_m.f90 sourcefile~image_enumeration_m.f90->sourcefile~team_type_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules caffeine_assert_s Source Code assert_s.f90 Source Code ! !     (c) 2019-2020 Guide Star Engineering, LLC !     This Software was developed for the US Nuclear Regulatory Commission (US NRC) under contract !     \"Multi-Dimensional Physics Implementation into Fuel Analysis under Steady-state and Transients (FAST)\", !     contract # NRC-HQ-60-17-C-0007 ! submodule ( caffeine_assert_m ) caffeine_assert_s implicit none contains module procedure assert use caffeine_characterizable_m , only : characterizable_t use program_termination_m , only : caf_error_stop use image_enumeration_m , only : this_image => caf_this_image character ( len = :), allocatable :: header , trailer toggle_assertions : & if ( enforce_assertions ) then check_assertion : & if (. not . assertion ) then associate ( me => this_image ()) ! work around gfortran bug header = 'Assertion \"' // description // '\" failed on image ' // string ( me ) end associate represent_diagnostics_as_string : & if (. not . present ( diagnostic_data )) then trailer = \"(none provided)\" else select type ( diagnostic_data ) type is ( character ( len =* )) trailer = diagnostic_data type is ( complex ) trailer = string ( diagnostic_data ) type is ( integer ) trailer = string ( diagnostic_data ) type is ( logical ) trailer = string ( diagnostic_data ) type is ( real ) trailer = string ( diagnostic_data ) class is ( characterizable_t ) trailer = diagnostic_data % as_character () class default trailer = \"of unsupported type.\" end select end if represent_diagnostics_as_string call caf_error_stop ( header // ' with diagnostic data \"' // trailer // '\"' ) end if check_assertion end if toggle_assertions contains pure function string ( numeric ) result ( number_as_string ) !! Result is a string represention of the numeric argument class ( * ), intent ( in ) :: numeric integer , parameter :: max_len = 128 character ( len = max_len ) :: untrimmed_string character ( len = :), allocatable :: number_as_string select type ( numeric ) type is ( complex ) write ( untrimmed_string , * ) numeric type is ( integer ) write ( untrimmed_string , * ) numeric type is ( logical ) write ( untrimmed_string , * ) numeric type is ( real ) write ( untrimmed_string , * ) numeric class default call caf_error_stop ( \"Internal error in subroutine 'assert': unsupported type in function 'string'.\" ) end select number_as_string = trim ( adjustl ( untrimmed_string )) end function string end procedure end submodule","tags":"","loc":"sourcefile/assert_s.f90.html"},{"title":"intrinsic_array_s.F90 – Caffeine","text":"This file depends on sourcefile~~intrinsic_array_s.f90~~EfferentGraph sourcefile~intrinsic_array_s.f90 intrinsic_array_s.F90 sourcefile~intrinsic_array_m.f90 intrinsic_array_m.F90 sourcefile~intrinsic_array_s.f90->sourcefile~intrinsic_array_m.f90 sourcefile~program_termination_m.f90 program_termination_m.f90 sourcefile~intrinsic_array_s.f90->sourcefile~program_termination_m.f90 sourcefile~characterizable_m.f90 characterizable_m.f90 sourcefile~intrinsic_array_m.f90->sourcefile~characterizable_m.f90 Help × Graph Key Nodes of different colours represent the following: Graph Key Source File Source File This Page's Entity This Page's Entity Solid arrows point from a file to a file which it depends on. A file\n    is dependent upon another if the latter must be compiled before the former\n    can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs. Contents Submodules caffeine_intrinsic_array_s Source Code intrinsic_array_s.F90 Source Code submodule ( caffeine_intrinsic_array_m ) caffeine_intrinsic_array_s use program_termination_m , only : caf_error_stop implicit none contains module procedure construct #ifndef NAGFOR select rank ( array ) rank ( 1 ) #endif select type ( array ) type is ( complex ) intrinsic_array % complex_1D = array type is ( integer ) intrinsic_array % integer_1D = array type is ( logical ) intrinsic_array % logical_1D = array type is ( real ) intrinsic_array % real_1D = array type is ( double precision ) intrinsic_array % double_precision_1D = array class default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank-2 type\" ) end select #ifndef NAGFOR rank ( 2 ) select type ( array ) type is ( complex ) intrinsic_array % complex_2D = array type is ( integer ) intrinsic_array % integer_2D = array type is ( logical ) intrinsic_array % logical_2D = array type is ( real ) intrinsic_array % real_2D = array type is ( double precision ) intrinsic_array % double_precision_2D = array class default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank-2 type\" ) end select rank ( 3 ) select type ( array ) type is ( complex ) intrinsic_array % complex_3D = array type is ( integer ) intrinsic_array % integer_3D = array type is ( logical ) intrinsic_array % logical_3D = array type is ( real ) intrinsic_array % real_3D = array type is ( double precision ) intrinsic_array % double_precision_3D = array class default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank-3 type\" ) end select rank default call caf_error_stop ( \"intrinsic_array_t construct: unsupported rank\" ) end select #endif end procedure module procedure as_character integer , parameter :: single_number_width = 32 if ( 1 /= count ( & [ allocated ( self % complex_1D ), allocated ( self % complex_double_1D ), allocated ( self % integer_1D ), & allocated ( self % logical_1D ), allocated ( self % real_1D ), & allocated ( self % complex_2D ), allocated ( self % complex_double_2D ), allocated ( self % integer_2D ), & allocated ( self % logical_2D ), allocated ( self % real_2D ), & allocated ( self % complex_3D ), allocated ( self % complex_double_3D ), allocated ( self % integer_3D ), & allocated ( self % logical_3D ), allocated ( self % real_3D ) & ])) call caf_error_stop ( \"intrinsic_array_t as_character: ambiguous component allocation status.\" ) if ( allocated ( self % complex_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_1D )) write ( character_self , * ) self % complex_1D else if ( allocated ( self % complex_double_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_double_1D )) write ( character_self , * ) self % complex_double_1D else if ( allocated ( self % integer_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % integer_1D )) write ( character_self , * ) self % integer_1D else if ( allocated ( self % logical_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % logical_1D )) write ( character_self , * ) self % logical_1D else if ( allocated ( self % real_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % real_1D )) write ( character_self , * ) self % real_1D else if ( allocated ( self % double_precision_1D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % double_precision_1D )) write ( character_self , * ) self % double_precision_1D else if ( allocated ( self % complex_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_2D )) write ( character_self , * ) self % complex_2D else if ( allocated ( self % complex_double_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_double_2D )) write ( character_self , * ) self % complex_double_2D else if ( allocated ( self % integer_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % integer_2D )) write ( character_self , * ) self % integer_2D else if ( allocated ( self % logical_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % logical_1D )) write ( character_self , * ) self % logical_2D else if ( allocated ( self % real_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % real_2D )) write ( character_self , * ) self % real_2D else if ( allocated ( self % double_precision_2D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % double_precision_2D )) write ( character_self , * ) self % double_precision_2D else if ( allocated ( self % complex_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_3D )) write ( character_self , * ) self % complex_3D else if ( allocated ( self % complex_double_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % complex_double_3D )) write ( character_self , * ) self % complex_double_3D else if ( allocated ( self % integer_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % integer_3D )) write ( character_self , * ) self % integer_3D else if ( allocated ( self % logical_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % logical_1D )) write ( character_self , * ) self % logical_3D else if ( allocated ( self % real_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % real_3D )) write ( character_self , * ) self % real_3D else if ( allocated ( self % double_precision_3D )) then character_self = repeat ( \" \" , ncopies = single_number_width * size ( self % double_precision_3D )) write ( character_self , * ) self % double_precision_3D end if character_self = trim ( adjustl ( character_self )) end procedure end submodule","tags":"","loc":"sourcefile/intrinsic_array_s.f90.html"}]}
\ No newline at end of file
diff --git a/type/characterizable_t.html b/type/characterizable_t.html
index 9a45e0f5..59e162d3 100644
--- a/type/characterizable_t.html
+++ b/type/characterizable_t.html
@@ -118,7 +118,7 @@ <h3>Contents</h3>
   <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#boundprocs-0">Type-Bound Procedures</a></h3></div>
   <div id="boundprocs-0" class="panel-collapse collapse">
     <div class="list-group">
-      <a class="list-group-item" href="../type/characterizable_t.html#boundprocedure-as_character~2">as_character</a>
+      <a class="list-group-item" href="../type/characterizable_t.html#boundprocedure-as_character">as_character</a>
     </div>
   </div>
 </div>
@@ -215,7 +215,7 @@ <h3>Contents</h3>
   <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#boundprocs-1">Type-Bound Procedures</a></h3></div>
   <div id="boundprocs-1" class="panel-collapse collapse">
     <div class="list-group">
-      <a class="list-group-item" href="../type/characterizable_t.html#boundprocedure-as_character~2">as_character</a>
+      <a class="list-group-item" href="../type/characterizable_t.html#boundprocedure-as_character">as_character</a>
     </div>
   </div>
 </div>
@@ -230,7 +230,7 @@ <h3>Contents</h3>
     <section>
     <h2>Type-Bound Procedures</h2>
      <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="boundprocedure-as_character~2"></span><h3>procedure(<a href='../interface/as_character_i.html'>as_character_i</a>), public, deferred :: <strong>as_character</strong>    </h3></div>
+  <div class="panel-heading codesum"><span class="anchor" id="boundprocedure-as_character"></span><h3>procedure(<a href='../interface/as_character_i.html'>as_character_i</a>), public, deferred :: <strong>as_character</strong>    </h3></div>
   <ul class="list-group">
       <li class="list-group-item">
             <h3>pure function as_character_i(self) result(character_self)<small>Prototype</small></h3>    
@@ -270,7 +270,7 @@ <h4>Return Value <small>character(len=:),allocatable</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/type/intrinsic_array_t.html b/type/intrinsic_array_t.html
index 6cff89c7..dd113e37 100644
--- a/type/intrinsic_array_t.html
+++ b/type/intrinsic_array_t.html
@@ -151,7 +151,7 @@ <h3>Contents</h3>
   <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#boundprocs-0">Type-Bound Procedures</a></h3></div>
   <div id="boundprocs-0" class="panel-collapse collapse">
     <div class="list-group">
-      <a class="list-group-item" href="../type/intrinsic_array_t.html#boundprocedure-as_character">as_character</a>
+      <a class="list-group-item" href="../type/intrinsic_array_t.html#boundprocedure-as_character~2">as_character</a>
     </div>
   </div>
 </div>
@@ -281,7 +281,7 @@ <h3>Contents</h3>
   <div class="panel-heading text-left"><h3 class="panel-title"><a data-toggle="collapse" href="#boundprocs-1">Type-Bound Procedures</a></h3></div>
   <div id="boundprocs-1" class="panel-collapse collapse">
     <div class="list-group">
-      <a class="list-group-item" href="../type/intrinsic_array_t.html#boundprocedure-as_character">as_character</a>
+      <a class="list-group-item" href="../type/intrinsic_array_t.html#boundprocedure-as_character~2">as_character</a>
     </div>
   </div>
 </div>
@@ -423,7 +423,7 @@ <h4>Return Value <small>type(<a href='../type/intrinsic_array_t.html'>intrinsic_
     <section>
     <h2>Type-Bound Procedures</h2>
      <div class="panel panel-default">
-  <div class="panel-heading codesum"><span class="anchor" id="boundprocedure-as_character"></span><h3>procedure, public :: <strong>as_character</strong>    </h3></div>
+  <div class="panel-heading codesum"><span class="anchor" id="boundprocedure-as_character~2"></span><h3>procedure, public :: <strong>as_character</strong>    </h3></div>
   <ul class="list-group">
       <li class="list-group-item">
           <h3>interface
@@ -467,7 +467,7 @@ <h4>Return Value <small>character(len=:),allocatable</small></h4>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>
diff --git a/type/team_type.html b/type/team_type.html
index ef211c7f..a9f1d440 100644
--- a/type/team_type.html
+++ b/type/team_type.html
@@ -153,7 +153,7 @@ <h3>Contents</h3>
           <p class="text-right">
             Documentation generated by 
             <a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
- on 2023-12-08 00:35            </p>
+ on 2023-12-08 01:08            </p>
         </div>
       </div>
       <br>