(Inherited-Facet-Value Slot-Value-Type Elevator Elevator.Governorcable Governor_Cable_Model) (<= (Has-Parameter-Slot $X Governor_Cable_Diameter) (Governor_Cable_Model $X)) (=> (Elevator.Governorcable $X $Y) (Governor_Cable_Model $Y))