D0<
* D0< ( d1.d1 -- flag )

the double-cell less-than-zero operation ( 0< )

double ordinary primitive