particle_capacity Function

public pure function particle_capacity(pcls) result(capacity)

確保済みの粒子枠数。未確保なら 0。

Arguments

Type IntentOptional Attributes Name
type(particles_soa), intent(in) :: pcls

Return Value integer(kind=i32)


Called by

proc~~particle_capacity~~CalledByGraph proc~particle_capacity particle_capacity proc~extend_particles extend_particles proc~extend_particles->proc~particle_capacity proc~reserve_particles reserve_particles proc~extend_particles->proc~reserve_particles proc~reserve_particles->proc~particle_capacity proc~append_particles append_particles proc~append_particles->proc~extend_particles

Source Code

  pure integer(i32) function particle_capacity(pcls) result(capacity)
    type(particles_soa), intent(in) :: pcls

    capacity = 0_i32
    if (allocated(pcls%q)) capacity = int(size(pcls%q), i32)
  end function particle_capacity