( D-                               subtract two double numbers )

: d-                              ( d1 d2 --- d3 )
  dminus                          ( negate d2)
  d+                              ( add the two double nubmers)
;