executeFun Function

function executeFun(myfun, x) result(y)

Arguments

Type IntentOptional AttributesName
procedure(fun_interf) :: myfun
real(kind=wp), intent(in), dimension(:):: x

Return Value real(kind=wp), dimension(size(x))

Called By

proc~~executefun~~CalledByGraph proc~executefun executeFun proc~funwrapper funWrapper proc~funwrapper->proc~executefun program~main main program~main->proc~funwrapper
Help

Source Code


Source Code

  function executeFun(myfun, x) result(y)
    real(wp), intent(in),   dimension(:)  :: x
    real(wp),             dimension(size(x))  :: y
    procedure(fun_interf)                 :: myfun

    y = myfun(x)

    return
  end function executeFun