| 
              
                
                  
                   | 
            
            
              
              
                
      
    
                
                 | 
            
            last edited 17 years ago by Bill Page | 
| 1 | ||
| 
              Editor: Bill Page
               Time: 2007/11/20 23:11:36 GMT-8  | 
          ||
| Note: | ||
changed: - \begin{aldor}[subobjects] #pile #include "axiom" +++ +++ Quotients +++ define Quotient(Obj:Category):Category == with Quotient: (A:Obj,B:Obj) -> (A->B) -> (Quo:Obj,A->Quo,(X:Obj)->(A->X)->(Quo->X)) /:(A:Obj,B:Obj) -> ((A->B)->Obj) default (A:Obj)/(B:Obj):((A->B)->Obj) == F(f:A->B):Obj == (Q:Obj,insert:A->Q,quo:(X:Obj)->(A->X)->(Q->X)) == Quotient(A,B)(f) Q add F +++ +++ Subobjects (the dual of Quotients) +++ define Subobject(Obj:Category):Category == with Subobject: (A:Obj,B:Obj) -> (B->A) -> (Sub:Obj,Sub->A,(X:Obj)->(X->A)->(X->Sub)) \:(A:Obj,B:Obj) -> ((B->A)->Obj) default (A:Obj)\(B:Obj):(B->A)->Obj == F(f:(B->A)): Obj == (S:Obj,include:S->A,sub:(X:Obj)->(X->A)->(X->S)) == Subobject(A,B)(f) S add F \end{aldor}
(1) -> <aldor>
#pile
#include "axiom"
+++
+++  Quotients
+++ 
define Quotient(Obj:Category):Category == with
    Quotient:  (A:Obj, B:Obj) -> (A->B) -> (Quo:Obj, A->Quo, (X:Obj)->(A->X)->(Quo->X))
    /:(A:Obj, B:Obj) -> ((A->B)->Obj)
    default
        (A:Obj)/(B:Obj):((A->B)->Obj) ==
            F(f:A->B):Obj == 
                (Q:Obj, insert:A->Q, quo:(X:Obj)->(A->X)->(Q->X)) == Quotient(A, B)(f)
                Q add
            F
+++
+++   Subobjects (the dual of Quotients)
+++    
define Subobject(Obj:Category):Category == with
    Subobject: (A:Obj, B:Obj) -> (B->A) -> (Sub:Obj, Sub->A, (X:Obj)->(X->A)->(X->Sub))
    \:(A:Obj, B:Obj) -> ((B->A)->Obj)
    default
        (A:Obj)\(B:Obj):(B->A)->Obj ==
            F(f:(B->A)): Obj ==
                (S:Obj, include:S->A, sub:(X:Obj)->(X->A)->(X->S)) == Subobject(A, B)(f)
                S add
            F</aldor>
Compiling FriCAS source code from file 
      /var/lib/zope2.10/instance/axiom-wiki/var/LatexWiki/subobjects.as
      using Aldor compiler and options 
-O -Fasy -Fao -Flsp -lfricas -Mno-ALDOR_W_WillObsolete -DFriCAS -Y $FRICAS/algebra -I $FRICAS/algebra
      Use the system command )set compiler args to change these 
      options.
"/var/lib/zope2.10/instance/axiom-wiki/var/LatexWiki/subobjects.as",  line 2: 
#include "axiom"
^
[L2 C1] #1 (Error) Could not open file `axiom'.
   The )library system command was not called after compilation.