this.Name, , , Person. , ,
type Person (name : string) =
member this.Name = name
type School (name : string, address : string) =
member this.Name = name
member this.Address = address
let printName x = printfn "%s" x.Name
, - Person School. , , , , , .
Intellisense , , , , . , , , .
,
let printPerson level p =
let printPerson level (p : Person) =