DEM_col Function

private pure function DEM_col(r1, r2, d1, d2, m1, m2, v1, v2, w1, w2, tcol, edry, muc) result(val)

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: r1(3)
real(kind=wp), intent(in) :: r2(3)
real(kind=wp), intent(in) :: d1
real(kind=wp), intent(in) :: d2
real(kind=wp), intent(in) :: m1
real(kind=wp), intent(in) :: m2
real(kind=wp), intent(in) :: v1(3)
real(kind=wp), intent(in) :: v2(3)
real(kind=wp), intent(in) :: w1(3)
real(kind=wp), intent(in) :: w2(3)
real(kind=wp), intent(in) :: tcol
real(kind=wp), intent(in) :: edry
real(kind=wp), intent(in) :: muc

Return Value real(kind=wp), (3)


Calls

proc~~dem_col~~CallsGraph proc~dem_col DEM_col proc~cross_product~2 cross_product proc~dem_col->proc~cross_product~2

Called by

proc~~dem_col~~CalledByGraph proc~dem_col DEM_col proc~collision_obj_computecollisionsppvib collision_obj%collision_obj_ComputeCollisionsPPvIB proc~collision_obj_computecollisionsppvib->proc~dem_col proc~collision_obj_computecollisionsppvpp collision_obj%collision_obj_ComputeCollisionsPPvPP proc~collision_obj_computecollisionsppvpp->proc~dem_col proc~collision_obj_computecollisionsppvwall collision_obj%collision_obj_ComputeCollisionsPPvWALL proc~collision_obj_computecollisionsppvwall->proc~dem_col proc~collision_obj_computecollisionsrpvib collision_obj%collision_obj_ComputeCollisionsRPvIB proc~collision_obj_computecollisionsrpvib->proc~dem_col proc~collision_obj_computecollisionsrpvpp collision_obj%collision_obj_ComputeCollisionsRPvPP proc~collision_obj_computecollisionsrpvpp->proc~dem_col proc~collision_obj_computecollisionsrpvrp collision_obj%collision_obj_ComputeCollisionsRPvRP proc~collision_obj_computecollisionsrpvrp->proc~dem_col proc~collision_obj_computecollisionsrpvwall collision_obj%collision_obj_ComputeCollisionsRPvWALL proc~collision_obj_computecollisionsrpvwall->proc~dem_col proc~collision_obj_computecollisions collision_obj%collision_obj_ComputeCollisions proc~collision_obj_computecollisions->proc~collision_obj_computecollisionsppvpp proc~collision_obj_computecollisions->proc~collision_obj_computecollisionsppvwall proc~collision_obj_computecollisions->proc~collision_obj_computecollisionsrpvib proc~collision_obj_computecollisions->proc~collision_obj_computecollisionsrpvpp proc~collision_obj_computecollisions->proc~collision_obj_computecollisionsrpvrp proc~collision_obj_computecollisions->proc~collision_obj_computecollisionsrpvwall proc~cdifs_obj_updatecollisions cdifs_obj_UpdateCollisions proc~cdifs_obj_updatecollisions->proc~collision_obj_computecollisions proc~grans_obj_advancesolution_computecollisionforces grans_obj_AdvanceSolution_ComputeCollisionForces proc~grans_obj_advancesolution_computecollisionforces->proc~collision_obj_computecollisions proc~cdifs_obj_advancesolutionrp cdifs_obj_AdvanceSolutionRP proc~cdifs_obj_advancesolutionrp->proc~cdifs_obj_updatecollisions proc~grans_obj_advancesolution grans_obj_AdvanceSolution proc~grans_obj_advancesolution->proc~grans_obj_advancesolution_computecollisionforces interface~grans_obj_advancesolution grans_obj%grans_obj_AdvanceSolution interface~grans_obj_advancesolution->proc~grans_obj_advancesolution proc~cdifs_obj_advancesolution cdifs_obj_AdvanceSolution proc~cdifs_obj_advancesolution->proc~cdifs_obj_advancesolutionrp interface~cdifs_obj_advancesolution cdifs_obj%cdifs_obj_AdvanceSolution interface~cdifs_obj_advancesolution->proc~cdifs_obj_advancesolution