aerosayan

program myalltoall
   !Program to show a simple implementation of a deadlock avoiding mpi loop among all processes which,
   !in principle, is similar to an alltoall loop. However, the main purpose of the technique shown here is to
   !properly reorder shortest (i.e., each process with just few others) non-blocking communication loops,
   !in order to alleviate the burden on the communication side (as each exchange is matched, everything
   !is exchanged very quickly). Here, it is tested against the the mpi_allreduce intrinsic with MPI_SUM
   !on a single real variable, but IT IS NOT a replacement for allreduce (nor alltoall or any other intrinsic).
   use, intrinsic :: iso_fortran_env, only : int32, real64
   use mpi
   implicit none

aerosayan

// The Most Memory Safe Buffer Overflow in Rust!
//
// Consider all the code below under Public Domain
//
// How to build:
// $ rustc main.rs
//
// Wrong password:
// $ printf "hello\n" | ./main
//