feat: write all needed collective subroutines

Author: everythingfunctional

fpm.toml

@@ -6,7 +6,7 @@ maintainer = "[email protected]"
 copyright = "2020 Sourcery Institute"
 
 [dev-dependencies]
-vegetables = {git = "https://gitlab.com/everythingfunctional/vegetables", tag = "v6.0.1"}
+vegetables = {git = "https://gitlab.com/everythingfunctional/vegetables", tag = "v7.2.0"}
 
 [[test]]
 name="unit"

src/data-partition-implementation.F90

@@ -1,5 +1,8 @@
 submodule(data_partition_interface) data_partition_implementation
   use assertions_interface, only : assert, assertions
+#ifdef COMPILER_LACKS_COLLECTIVE_SUBROUTINES
+  use emulated_intrinsics_interface, only: co_sum
+#endif
   implicit none
 
   logical, parameter :: verbose=.false.