fordot Module


Uses

  • module~~fordot~~UsesGraph module~fordot fordot kinds kinds module~fordot->kinds module~fordot_opts fordot_opts module~fordot->module~fordot_opts module~fordot_opts->kinds

Used by

  • module~~fordot~~UsedByGraph module~fordot fordot program~test_dot1 test_dot1 program~test_dot1->module~fordot program~test_dot2 test_dot2 program~test_dot2->module~fordot

Interfaces

public interface dot_product

  • private pure function dot_R0R1R1_rel(u, v, option) result(a)

    Author
    Seyed Ali Ghasemi
    License
    BSD 3-Clause

    Arguments

    Type IntentOptional Attributes Name
    real(kind=rk), intent(in), contiguous :: u(:)
    real(kind=rk), intent(in), contiguous :: v(:)
    character(len=*), intent(in), optional :: option

    Return Value real(kind=rk)

  • private pure function dot_R0R1R1_rel_block(u, v, option, nblock) result(a)

    Author
    Seyed Ali Ghasemi
    License
    BSD 3-Clause

    Arguments

    Type IntentOptional Attributes Name
    real(kind=rk), intent(in), contiguous :: u(:)
    real(kind=rk), intent(in), contiguous :: v(:)
    character(len=*), intent(in), optional :: option
    integer, intent(in) :: nblock

    Return Value real(kind=rk)

  • private impure function dot_R0R1R1_rel_coarray(u, v, option, coarray) result(a)

    Author
    Seyed Ali Ghasemi
    License
    BSD 3-Clause

    Arguments

    Type IntentOptional Attributes Name
    real(kind=rk), intent(in), contiguous :: u(:)
    real(kind=rk), intent(in), contiguous :: v(:)
    character(len=*), intent(in), optional :: option
    logical, intent(in) :: coarray

    Return Value real(kind=rk)


Functions

private pure function dot_R0R1R1_rel(u, v, option) result(a)

Author
Seyed Ali Ghasemi
License
BSD 3-Clause

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in), contiguous :: u(:)
real(kind=rk), intent(in), contiguous :: v(:)
character(len=*), intent(in), optional :: option

Return Value real(kind=rk)

private pure function dot_R0R1R1_rel_block(u, v, option, nblock) result(a)

Author
Seyed Ali Ghasemi
License
BSD 3-Clause

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in), contiguous :: u(:)
real(kind=rk), intent(in), contiguous :: v(:)
character(len=*), intent(in), optional :: option
integer, intent(in) :: nblock

Return Value real(kind=rk)

private impure function dot_R0R1R1_rel_coarray(u, v, option, coarray) result(a)

Author
Seyed Ali Ghasemi
License
BSD 3-Clause

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in), contiguous :: u(:)
real(kind=rk), intent(in), contiguous :: v(:)
character(len=*), intent(in), optional :: option
logical, intent(in) :: coarray

Return Value real(kind=rk)


Subroutines

private pure subroutine compute_block_ranges(d, nimg, block_size, start_elem, end_elem)

Calculate block sizes and ranges. author: Seyed Ali Ghasemi

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: d
integer, intent(in) :: nimg
integer, intent(out) :: block_size(nimg)
integer, intent(out) :: start_elem(nimg)
integer, intent(out) :: end_elem(nimg)