Changeset 5d21402 in git

Timestamp:

Feb 26, 2018, 4:07:04 PM (5 years ago)

Author:

Karim Abou Zeid <karim23697@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a657104b677b4c461d018cbf3204d72d34ad66a9')

Children:

d75898dddf30641f4056f5755f5f4dc5fef0e9f1

Parents:

092377cdba0501e956f9019d2bd0ebb350e31c5c

Message:

Fix examples

File:

• Singular/LIB/fpalgebras.lib (modified) (6 diffs)

Singular/LIB/fpalgebras.lib

@@ -448 +448 @@
 @*    - d gives the degreebound for the Letterplace ring
 "
-example {
-  "EXAMPLE:"; echo = 2;
-  def R = crystallographicGroupC2MM(5); setring R;
-  I;
-}
 {
  if (d < 3){ERROR("Degreebound is to small for choosen example!");}
@@ -472 +467 @@
  if (baseringdef == 1) {setring save;}
  return(R);
+}
+example {
+  "EXAMPLE:"; echo = 2;
+  def R = crystallographicGroupC2MM(5); setring R;
+  I;
 }
 
@@ -653 +653 @@
 @*    - d gives the degreebound for the Letterplace ring
 "
-example {
-  "EXAMPLE:"; echo = 2;
-  def R = crystallographicGroupP3M1(5); setring R;
-  I;
-}
 {
  if (d < 4){ERROR("Degreebound is to small for choosen example!");}
@@ -678 +673 @@
  return(R);
 }
+example {
+  "EXAMPLE:"; echo = 2;
+  def R = crystallographicGroupP3M1(5); setring R;
+  I;
+}
 
 proc crystallographicGroupP6(int d)
@@ -721 +721 @@
 @*    - d gives the degreebound for the Letterplace ring
 "
-example {
-  "EXAMPLE:"; echo = 2;
-  def R = crystallographicGroupP6MM(5); setring R;
-  I;
-}
 {
  if (d < 7){ERROR("Degreebound is to small for choosen example!");}
@@ -746 +741 @@
  if (baseringdef == 1) {setring save;}
  return(R);
+}
+example {
+  "EXAMPLE:"; echo = 2;
+  def R = crystallographicGroupP6MM(5); setring R;
+  I;
 }