Serialize

example.fs

type Address =
    { Street: string
       Number: int }
     
     static member ToJson (x: Address) =
         json {
             do! Json.write "street" x.Street
             do! Json.write "streetNumber" x.Number }

type House =
    { Inhabitant: string
      Address: Address }
      
    static member ToJson (x: House) =
        json {
            do! Json.write "inhabitant" x.Inhabitant
            do! Json.write "address" x.Address }