particle_SetObjectType Subroutine

private subroutine particle_SetObjectType(this)

Set the sample type used in allocation of polymorphic variables

Type Bound

particle_set

Arguments

Type IntentOptional Attributes Name
class(particle_set), intent(inout) :: this

Lagrangian array to dump

Called by

proc~~particle_setobjecttype~~CalledByGraph proc~particle_setobjecttype particle_set%particle_SetObjectType proc~particle_set_init particle_set%particle_set_Init proc~particle_set_init->proc~particle_setobjecttype none~initialize~14 particle_set%Initialize none~initialize~14->proc~particle_set_init proc~grans_headon_collision_pp grans_headon_collision_PP proc~grans_headon_collision_pp->none~initialize~14 proc~grans_homogeneous_cooling_pp grans_homogeneous_cooling_PP proc~grans_homogeneous_cooling_pp->none~initialize~14 proc~grans_obj_preparesolver_pp grans_obj_PrepareSolver_PP proc~grans_obj_preparesolver_pp->none~initialize~14 proc~grans_rotating_drum_pp grans_rotating_drum_PP proc~grans_rotating_drum_pp->none~initialize~14 proc~grans_headon_collision grans_headon_collision proc~grans_headon_collision->proc~grans_headon_collision_pp proc~grans_homogeneous_cooling grans_homogeneous_cooling proc~grans_homogeneous_cooling->proc~grans_homogeneous_cooling_pp proc~grans_obj_preparesolver grans_obj_PrepareSolver proc~grans_obj_preparesolver->proc~grans_obj_preparesolver_pp proc~grans_rotating_drum grans_rotating_drum proc~grans_rotating_drum->proc~grans_rotating_drum_pp interface~grans_headon_collision grans_headon_collision interface~grans_headon_collision->proc~grans_headon_collision interface~grans_homogeneous_cooling grans_homogeneous_cooling interface~grans_homogeneous_cooling->proc~grans_homogeneous_cooling interface~grans_obj_preparesolver grans_obj%grans_obj_PrepareSolver interface~grans_obj_preparesolver->proc~grans_obj_preparesolver interface~grans_rotating_drum grans_rotating_drum interface~grans_rotating_drum->proc~grans_rotating_drum proc~case_obj_setup~2 grans_case_obj%case_obj_setup proc~case_obj_setup~2->interface~grans_headon_collision proc~case_obj_setup~2->interface~grans_homogeneous_cooling proc~case_obj_setup~2->interface~grans_rotating_drum proc~grans_obj_setinitialconditions grans_obj%grans_obj_SetInitialConditions proc~grans_obj_setinitialconditions->proc~case_obj_setup~2