new copyright; att/bsd/shared
declare function as float, not double.
Add copyright
date and time created 83/01/21 11:16:59 by dlw