к вопросу о русской операционной системе
Jul. 23rd, 2010 09:51 am
(10x
(Обратите внимание на еврейские черты проклятого буржуазного капиталиста. Товарищ

class SetMorphism[X, Y] (val tag: String, val d0: Set[X], val d1: Set[Y], f : X => Y)
extends Morphism[Set[X], Set[Y]] with Map[X, Y] {
...
def product = exponent(codomain, domain) filter(m => d0.forall(x => f(m(x)) == x))
def exponent[X, Y] (xs : Set[X], ys: Set[Y]): Set[Map[X, Y]] = setOf(
exponentElements(ys, xs),
pow(ys size, xs size),
(m: Map[X, Y])=> xs == m.keySet
)
f: xs -> ys, product builds a П{x|f(x)==y}y, a product of reverse images of elements of ys. ysxs, which consists of all maps from xs to ys.