squareWrapperInternal Subroutine

subroutine squareWrapperInternal(x, y)

Arguments

Type IntentOptional AttributesName
real(kind=wp), intent(in), dimension(:):: x
real(kind=wp), intent(out), dimension(:):: y

Calls

proc~~squarewrapperinternal~~CallsGraph proc~squarewrapperinternal squareWrapperInternal proc~squarefun squareFun proc~squarewrapperinternal->proc~squarefun
Help

Called By

proc~~squarewrapperinternal~~CalledByGraph proc~squarewrapperinternal squareWrapperInternal program~main main program~main->proc~squarewrapperinternal
Help

Source Code


Source Code

  subroutine squareWrapperInternal(x, y)
    real(wp), intent(in),   dimension(:)  :: x
    real(wp), intent(out),  dimension(:)  :: y

    y = squareFun(x)

    return
  end subroutine squareWrapperInternal