1 require_extension('D');
2 require_fp;
3 WRITE_FRD(fsgnj64(FRS1, FRS2, false, true));
4