print 0.5 * (-1 + unpack "I", pack "I", -1); print 0.5 * (-1 - unpack "I", pack "I", -1); print unpack "I", pack "I", -1 ;