Last updated 8 months ago
Distlā āAā āāā āā\textbf{Distl} \; A \; \otimes \; \oplusDistlAāā
Distrā āAā āāā āā\textbf{Distr} \; A \; \otimes \; \oplusDistrAāā
pred Ringoid(A: set univ, tms,pls: univ->univ->univ){ Distl[A,tms,pls] Distr[A,tms,pls] }
Magmaā āAā āf\textbf{Magma} \; A \; fMagmaAf
Magmaā āAā āg\textbf{Magma} \; A \; gMagmaAg
ā(x,y,zāA::f(x,g(y,z))=g(f(x,y),f(x,z))\forall(x,y,z \in A :: f(x,g(y,z)) = g(f(x,y),f(x,z))ā(x,y,zāA::f(x,g(y,z))=g(f(x,y),f(x,z))
pred Distl(A: set univ, f,g: univ->univ->univ) { Magma[A,f] Magma[A,g] all x,y,z: A { f[x,g[y,z]] = g[f[x,y],f[x,z]] } }
ā(x,y,zāA::f(g(y,z),x)=g(f(y,x),f(z,x))\forall(x,y,z \in A :: f(g(y,z),x) = g(f(y,x),f(z,x))ā(x,y,zāA::f(g(y,z),x)=g(f(y,x),f(z,x))
pred Distr(A: set univ, f,g: univ->univ->univ) { Magma[A,f] Magma[A,g] all x,y,z: A { f[g[y,z],x] = g[f[y,x],f[z,x]] } }