class CFPropertyList::Binary

def real_to_binary(val)

Codes a real value to binary format 
def real_to_binary(val)
  bdata = Binary.type_bytes(0b0010,3)
  buff = [val].pack("d")
  return bdata + buff.reverse
end