setup_f90_test(f90block_partition block_partition.F90)