emulated_intrinsics_interface Module

  1. emulated_intrinsics_interface.F90
  2. emulated_intrinsics_interface

Fortran 2008 coarray emulations of Fortran 2018 intrinsic collective subroutines and Fortran 2003 emulation of Fortran 2008 intrinsic procedures (e.g, findloc)


Used by

  • module~~emulated_intrinsics_interface~~UsedByGraph module~emulated_intrinsics_interface emulated_intrinsics_interface proc~set_block_metadata set_block_metadata proc~set_block_metadata->module~emulated_intrinsics_interface module~plate_3d_implementation plate_3d_implementation module~plate_3d_implementation->module~emulated_intrinsics_interface module~emulated_intrinsics_implementation emulated_intrinsics_implementation module~emulated_intrinsics_implementation->module~emulated_intrinsics_interface proc~set_block_metadata~2 set_block_metadata proc~set_block_metadata~2->module~emulated_intrinsics_interface proc~partition partition proc~partition->module~emulated_intrinsics_interface module~cylinder_2d_implementation cylinder_2d_implementation module~cylinder_2d_implementation->module~emulated_intrinsics_interface module~surfaces_implementation surfaces_implementation module~surfaces_implementation->module~emulated_intrinsics_interface proc~set_block_metadata~3 set_block_metadata proc~set_block_metadata~3->module~emulated_intrinsics_interface module~sphere_1d_implementation sphere_1d_implementation module~sphere_1d_implementation->module~emulated_intrinsics_interface module~package_implementation package_implementation module~package_implementation->module~emulated_intrinsics_interface

Contents

Interfaces


Interfaces

public interface co_broadcast

parallel one-to-all communication of the value of first argument

interface

  • public module subroutine co_broadcast_integer(a, source_image, stat, errmsg)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout) :: a
    integer, intent(in) :: source_image
    integer, intent(out), optional :: stat
    character(len=*), intent(inout), optional :: errmsg

public interface co_sum

parallel computation of the sum of the first argument

interface

  • public module subroutine co_sum_integer(a, result_image, stat, errmsg)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout) :: a
    integer, intent(in), optional :: result_image
    integer, intent(out), optional :: stat
    character(len=*), intent(inout), optional :: errmsg

public interface findloc

result is the last occurrence of a value in an array or zero if not found

interface

  • public pure module function findloc_character_dim1(array, value, dim, back) result(location)

    Arguments

    Type IntentOptional AttributesName
    character(len=*), intent(in) :: array(:)
    character(len=*), intent(in) :: value
    integer, intent(in) :: dim
    logical, intent(in) :: back

    Return Value integer

interface

  • public pure module function findloc_integer_dim1(array, value, dim, back) result(location)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in) :: array(:)
    integer, intent(in) :: value
    integer, intent(in) :: dim
    logical, intent(in), optional :: back

    Return Value integer

interface

  • public pure module function findloc_logical_dim1(array, value, dim, back) result(location)

    Arguments

    Type IntentOptional AttributesName
    logical, intent(in) :: array(:)
    logical, intent(in) :: value
    integer, intent(in) :: dim
    logical, intent(in) :: back

    Return Value integer