  
  [1m[4m[31mC. A graphical interface[0m
  
  Here we describe a Tcl/Tk interface to specify numerical semigroups.
  
  
  [1m[4m[31mC.1 Graphical interface[0m
  
  [1m[4m[31mC.1-1 XNumericalSemigroup[0m
  
  [1m[34m> XNumericalSemigroup( [0m[22m[34m[s][0m[1m[34m ) _______________________________________[0mfunction
  
  This  function  pops  up  a  Tcl/Tk window which allows the specification of
  numerical semigroups. The optional argument [22m[34ms[0m is a numerical semigroup whose
  definition becomes displayed in the graphical interface.
  
  The  interface is very simple, it allows to specify a numerical semigroup by
  its  generators  or  a  (proportionally)  modular numerical semigroup by its
  (proportionally)  modular condition. The [1mGAP[0m variable by which the semigroup
  will be known must also be specified.
  
  The  interface  also allows to apply some functions to the semigroup, namely
  [1m[34mAperyListOfNumericalSemigroupWRTElement[0m                             ([1m3.1-5[0m),
  [1m[34mDrawAperyListOfNumericalSemigroup[0m ([1m3.1-6[0m), [1m[34mSmallElementsOfNumericalSemigroup[0m
  ([1m3.1-3[0m),                  [1m[34mGapsOfNumericalSemigroup[0m                  ([1m3.3-1[0m),
  [1m[34mFrobeniusNumberOfNumericalSemigroup[0m                ([1m3.2-1[0m)               and
  [1m[34mMinimalPresentationOfNumericalSemigroup[0m   ([1m4.1-2[0m).   Finally,   it  is  also
  possible to add functions to this list and remove them.
  
  [22m[35m---------------------------  Example  ----------------------------[0m
    [22m[35mgap> s:=RandomNumericalSemigroup(3,9);[0m
    [22m[35m<Numerical semigroup with 3 generators>[0m
    [22m[35mgap> XNumericalSemigroup(s);[0m
  [22m[35m------------------------------------------------------------------[0m
  
  This would pop up the following window:
  
