Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(Scalar1D), | intent(in) | :: | this | |||
type(c_ptr), | intent(inout) | :: | f |
subroutine GridInterp_Scalar1D(this,f)
implicit none
class(Scalar1D),intent(in) :: this
type(c_ptr),intent(inout) :: f
call self_blas_matrixop_1d(this%interp%iMatrix_gpu, &
this%interior_gpu, &
f,this%M+1,this%N+1, &
this%nvar*this%nelem,this%blas_handle)
endsubroutine GridInterp_Scalar1D