Object Support type Customer firstName, middlelnitial lastName member this firstName= firstName member this middlelnitial middlelnitial member this lastName lastName member this Say FulLName =this FirstName +this Middlelnitial++this LastName let customer =Customer(Emillia", Miller") printf Hello, I'm %s! "(customer. SayFulIName()Object Support type Customer(firstName, middleInitial, lastName) = member this.FirstName = firstName member this.MiddleInitial = middleInitial member this.LastName = lastName member this.SayFullName() = this.FirstName + " " + this.MiddleInitial + " " + this.LastName let customer = Customer("Emillia" , "C", "Miller") printfn "Hello, I'm %s!" (customer.SayFullName())