@verb #6757:":verify_radius" this none this rxdo #60
@program #6757:":verify_radius" this none this
if (typeof(this.spherical_radius) == WAIF && this.spherical_radius.class == $unit_number && this.spherical_radius:is_type("Distance"))
  return 1
endif
return 0
"Last modified by Lao-Tzu (#8084) on Mon Jan 14 15:37:00 2002 MST."
.