do_concurrent_m Module

Uses

- t_cell_collection_m
- iso_c_binding
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Used by

- Descendants:
- do_concurrent_s
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Interfaces

interface

public pure module subroutine do_concurrent_sampled_speeds(speeds, vel, cumulative_distribution, sampled_speeds) bind(C)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=c_double),	intent(in)			::	speeds(:,:)
real(kind=c_double),	intent(in)			::	vel(:)
real(kind=c_double),	intent(in)			::	cumulative_distribution(:)
real(kind=c_double),	intent(out),		allocatable	::	sampled_speeds(:,:)

interface

public pure module subroutine do_concurrent_my_velocities(nsteps, dir, sampled_speeds, my_velocities) bind(C)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=c_int),	intent(in)			::	nsteps
real(kind=c_double),	intent(in)			::	dir(:,:,:)
real(kind=c_double),	intent(in)			::	sampled_speeds(:,:)
real(kind=c_double),	intent(out),		allocatable	::	my_velocities(:,:,:)

interface

public pure module subroutine do_concurrent_k(speeds, vel, k) bind(C)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=c_double),	intent(in)			::	speeds(:)
real(kind=c_double),	intent(in)			::	vel(:)
integer(kind=c_int),	intent(out),		allocatable	::	k(:)

interface

public pure module subroutine do_concurrent_output_distribution(nintervals, speed, freq, emp_distribution, k, output_distribution) bind(C)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=c_int),	intent(in)			::	nintervals
integer(kind=c_int),	intent(in)			::	speed
integer(kind=c_int),	intent(in)			::	freq
real(kind=c_double),	intent(in)			::	emp_distribution(:,:)
integer(kind=c_int),	intent(in)			::	k(:)
real(kind=c_double),	intent(out),		allocatable	::	output_distribution(:,:)

interface

public module subroutine do_concurrent_speeds(history, speeds) bind(C)

Arguments

Type	Intent	Optional	Attributes		Name
type(t_cell_collection_bind_C_t),	intent(in)			::	history(:)
real(kind=c_double),	intent(out),		allocatable	::	speeds(:)