Skip to content

refac: append _t to data_partition class name #17

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 1 commit into from
Jan 5, 2021
Merged

refac: append _t to data_partition class name #17

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 2 additions & 2 deletions src/data-partition-interface.f90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -5,9 +5,9 @@ module data_partition_interface
implicit none

private
public :: data_partition
public :: data_partition_t

type data_partition
type data_partition_t
!! encapsulate a description of the data subset the executing image owns
private
contains
Expand Down
16 changes: 8 additions & 8 deletions tests/data_partition_test.f90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -5,14 +5,14 @@ module data_partition_test
use vegetables, only: &
result_t, input_t, integer_input_t, test_item_t, & ! types
describe, it, assert_equals, assert_that, example ! functions
use data_partition_interface, only : data_partition
use data_partition_interface, only : data_partition_t
use iso_fortran_env, only : real64
implicit none

private
public :: test_data_partition

type(data_partition) partition
type(data_partition_t) partition
integer, parameter :: num_particles=31, gatherer=1, num_steps=9, dummy=0

contains
Expand Down Expand Up @@ -56,7 +56,7 @@ function test_data_partition() result(tests)
function verify_block_partitioning() result(result_)
!! Verify that the data is partitioned across images evenly to
!! within a difference of one datum between any two images.
type(data_partition) partition
type(data_partition_t) partition
type(result_t) result_
integer my_particles

Expand All @@ -75,7 +75,7 @@ function verify_block_partitioning() result(result_)
function verify_all_particles_partitioned() result(result_)
!! Verify that the number of particles on each image sums to the
!! total number of particles distributed.
type(data_partition) partition
type(data_partition_t) partition
type(result_t) result_
integer particles

Expand All @@ -89,7 +89,7 @@ function verify_all_particles_partitioned() result(result_)
end function

function verify_all_gather_1D_real_array(unused) result(result_)
type(data_partition) partition
type(data_partition_t) partition
class(input_t), intent(in) :: unused
type(result_t) result_
real(real64) :: particle_scalar(num_particles)
Expand All @@ -115,7 +115,7 @@ function verify_all_gather_1D_real_array(unused) result(result_)

function verify_all_gather_2D_real_array(unused) result(result_)
class(input_t), intent(in) :: unused
type(data_partition) partition
type(data_partition_t) partition
type(result_t) result_
integer, parameter :: vec_space_dim=3
real(real64) particle_vector(vec_space_dim, num_particles)
Expand All @@ -141,7 +141,7 @@ function verify_all_gather_2D_real_array(unused) result(result_)

function verify_all_gather_2D_real_array_dim1(unused) result(result_)
class(input_t), intent(in) :: unused
type(data_partition) partition
type(data_partition_t) partition
type(result_t) result_
integer, parameter :: vec_space_dim=3
real(real64) :: vector_transpose(num_particles, vec_space_dim)
Expand All @@ -167,7 +167,7 @@ function verify_all_gather_2D_real_array_dim1(unused) result(result_)

function verify_gather_2D_real_array_dim1(unused) result(result_)
class(input_t), intent(in) :: unused
type(data_partition) partition
type(data_partition_t) partition
type(result_t) result_
integer, parameter :: vec_space_dim=3
real(real64) :: vector_transpose(num_particles, vec_space_dim)
Expand Down