real1d_add Module Function

module function real1d_add(a, b) result(c)

Add a real array to an autodiff array

Arguments

Type IntentOptional Attributes Name
real(kind=real32), intent(in), dimension(:) :: a
class(array_type), intent(in), target :: b

Return Value type(array_type), pointer


Source Code

  module function real1d_add(a, b) result(c)
    !! Add a real array to an autodiff array
    implicit none
    real(real32), dimension(:), intent(in) :: a
    class(array_type), intent(in), target :: b
    type(array_type), pointer :: c

    c => add_real1d(b, a)
  end function real1d_add