Get_Distance

Description: Get the distance between two sites and report it in the .inp file

Conributed by: John Evans

macro Get_Distance(sites, c, d_calc)
{
   #m_ifarg c ""
      #m_unique_not_refine c
   #m_endif
	sites_distance c 
		load site_to_restrain { sites }
	prm = c; : d_calc
}

====== Get_Distance ====== Topas v5 reporting bug

Contributed by: Lucy Saunders

The Get_distance does not update in the inp file but does refine. To access refined Get_Distance, output to a .out file.

out “temp_res.out” append Out(c, “ %11.5f”,“ %11.5f”\n“)