scott_product[T1,T2:TYPE, (IMPORTING orders@product_orders)
le1:(directed_complete_partial_order?[T1]),
le2:(directed_complete_partial_order?[T2])]: THEORY
BEGIN
x,y: VAR [T1,T2]
product_order(le1:(partial_order?[T1]),
le2:(partial_order?[T2])):
(partial_order?[[T1,T2]])
= (LAMBDA x,y: le1(x`1,y`1) & le2(x`2,y`2))
IMPORTING scott[[T1,T2],(product_order(le1,le2))]
END scott_product
¤ Dauer der Verarbeitung: 0.15 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|