diff --git a/source/satellites.merging.virial_orbits.Wetzel2010.F90 b/source/satellites.merging.virial_orbits.Wetzel2010.F90
index 8bcf53968..3f710fb16 100644
--- a/source/satellites.merging.virial_orbits.Wetzel2010.F90
+++ b/source/satellites.merging.virial_orbits.Wetzel2010.F90
@@ -264,7 +264,7 @@ function wetzel2010Orbit(self,node,host,acceptUnboundOrbits)
     massHost     =Dark_Matter_Profile_Mass_Definition(                                                                                                                             &
          &                                                                   host                                                                                                , &
          &                                                                   self%virialDensityContrastDefinition_%densityContrast(basicHost%mass(),basicHost%timeLastIsolated()), &
-         &                                                                   radiusHost                                                                                          , &
+         &                                                                   radiusHostSelf                                                                                      , &
          &                                                                   velocityHost                                                                                        , &
          &                                            cosmologyParameters_  =self%cosmologyParameters_                                                                           , &
          &                                            cosmologyFunctions_   =self%cosmologyFunctions_                                                                            , &