OKlibrary  0.2.1.6
TranslationActions.mac
Go to the documentation of this file.
00001 /* Oliver Kullmann, 5.7.2008 (Swansea) */
00002 /* Copyright 2008 Oliver Kullmann
00003 This file is part of the OKlibrary. OKlibrary is free software; you can redistribute
00004 it and/or modify it under the terms of the GNU General Public License as published by
00005 the Free Software Foundation and included in this library; either version 3 of the
00006 License, or any later version. */
00007 
00022 oklib_include("OKlib/ComputerAlgebra/Algebra/Lisp/Groupoids/Constructions.mac")$
00023 
00024 
00025 /* Given a groupoid (V,compo), the left- resp. right-action of set V on set V
00026    by left- resp. right-translation: */
00027 leftactiontrans_grd(compo) := compo$
00028 rightactiontrans_grd(compo) := compo$
00029 
00030 /* The left/right actions of V on the powerset of V: */
00031 leftactionptrans_grd(compo) := buildq([compo],
00032   lambda([x,X], complex_compo(compo)({x},X)))$
00033 rightactionptrans_grd(compo) := buildq([compo],
00034   lambda([X,x], complex_compo(compo)(X,{x})))$
00035 
00036 
00037