Resize_Scalar2D Subroutine

  1. SELF_Scalar_2D.f90
  2. SELF_Scalar_2D
  3. Resize_Scalar2D

public subroutine Resize_Scalar2D(this, interp, nVar, nElem)

Rebind to a new element count, reusing host pools and device buffers where they fit. Deliberately does NOT call UpdateDevice: Init uploads freshly zeroed arrays, which in the adaptive loop is pure waste because the solution transfer overwrites them immediately.

Arguments

TypeIntentOptionalAttributesName
class(Scalar2D), intent(inout) :: this
type(Lagrange), intent(in), target:: interp
integer, intent(in) :: nVar
integer, intent(in) :: nElem

Calls

proc~~resize_scalar2d~~CallsGraph proc~resize_scalar2d Resize_Scalar2D proc~resize_scalar2d_t Resize_Scalar2D_t proc~resize_scalar2d->proc~resize_scalar2d_t proc~ensuredevicebuffers_scalar2d EnsureDeviceBuffers_Scalar2D proc~resize_scalar2d->proc~ensuredevicebuffers_scalar2d ensuredevicebuffer ensuredevicebuffer proc~ensuredevicebuffers_scalar2d->ensuredevicebuffer

Contents

Source Code

Resize_Scalar2D

Source Code

  subroutine Resize_Scalar2D(this,interp,nVar,nElem)
    !! Rebind to a new element count, reusing host pools and device buffers where they fit.
    !! Deliberately does NOT call UpdateDevice: Init uploads freshly zeroed arrays, which in the
    !! adaptive loop is pure waste because the solution transfer overwrites them immediately.
    implicit none
    class(Scalar2D),intent(inout) :: this
    type(Lagrange),intent(in),target :: interp
    integer,intent(in) :: nVar
    integer,intent(in) :: nElem

    call Resize_Scalar2D_t(this,interp,nVar,nElem)
    call EnsureDeviceBuffers_Scalar2D(this)

  endsubroutine Resize_Scalar2D