8 The optional Double-Number word set

8.6.1.1230 DNEGATE d-negate DOUBLE

( d1 -- d2 )

d2 is the negation of d1.

Testing:

T{   0. DNEGATE ->  0. }T
T{   1. DNEGATE -> -1. }T
T{  -1. DNEGATE ->  1. }T
T{ max-2int DNEGATE -> min-2int SWAP 1+ SWAP }T
T{ min-2int SWAP 1+ SWAP DNEGATE -> max-2int }T

ContributeContributions