class CFPropertyList::Binary

def real_to_binary(val)

Codes a real value to binary format 
def real_to_binary(val)
  bdata = Binary.type_bytes("2",3) # 2 is 0010, type indicator for reals
  buff = [val].pack("d")
  return bdata + buff.reverse
end