with Specs; use Specs;
package Calculation_Nodes is
task type Compute_Node is
entry Responsive;
entry Compute (Job : Jobs; Diverge_Column : out Natural_Array);
end Compute_Node;
Compute_Nodes : array (Core_Range) of Compute_Node;
end Calculation_Nodes;