require_fp; WRITE_FRD(cvt_sh(FRS1, RM)); set_fp_exceptions;