Function Dasin

Part of:

package f2cl-lib
( dasin < x > )