Skip to content

Commit

Permalink
wrote some comments in generate_examples_files_new.g
Browse files Browse the repository at this point in the history
  • Loading branch information
jdebeule committed Oct 29, 2024
1 parent 8530ec0 commit c6e64ed
Show file tree
Hide file tree
Showing 2 changed files with 9 additions and 6 deletions.
9 changes: 6 additions & 3 deletions examples/generate_example_files_new.g
Original file line number Diff line number Diff line change
Expand Up @@ -16,7 +16,7 @@ quit;

#restart gap now.

#initialize filenames
#initialize filenames. for each filename, there exists a .g file in ./pkg/forms/examples/gap/

files := ["conic", "w53", "preservedform", "bg_th_ex1", "bg_th_ex2","bg_th_ex3","bg_th_ex4",
"bg_th_ex5", "bg_th_ex6", "bg_th_ex7", "bg_th_ex8", "bg_th_ex9", "bilformbymatrix",
Expand All @@ -42,7 +42,7 @@ pathsstr := Concatenation("\"",paths,"\"");
exampledir := DirectoriesPackageLibrary("forms","examples/gap")[1];
outputdir := DirectoriesPackageLibrary("forms","examples/output")[1];

filename := "conic";
#filename := "conic";
#cmd := ["gap4r13.1 -l "./;/opt/gap-4.13.1/" -L forms.ws -c "LogTo(\"test.out\");" < conic.g]
#gap4r13.1 -l "./;/opt/gap-4.13.1/" -L forms.ws -c "LogTo(\"test.out\");" < conic.g

Expand All @@ -56,12 +56,15 @@ cmd := JoinStringsWithSeparator(cmdlist," ");
AppendTo(scriptfile,cmd);
od;

filename := "conic";
#Now there is a .sh file ready called generate_output_forms.sh. Make it executable and execute it, then for each filename
#in files an .out file will be generated in ./pkg/forms/examples/gap/output. Each of these .out files contains output almost suitable
#to include in the documentation, or to include in the test directory.

#create .include files
#for the include files, some characters will be translated to suitable xml
#codes, taking more then one character. Therefore we widen the screen a little bit.
#includir: directory containing the include files: ".../pkg/forms/examples/include"

SizeScreen([85,24]);
includedir := DirectoriesPackageLibrary("forms","examples/include")[1];
for filename in files do
Expand Down
6 changes: 3 additions & 3 deletions examples/include/preservedforms2.include
Original file line number Diff line number Diff line change
Expand Up @@ -23,10 +23,10 @@ gap> gens := [ [ [ Z(5)^0, 0*Z(5), 0*Z(5), 0*Z(5) ],
gap> group := Group(gens);
&lt;matrix group with 3 generators>
gap> PreservedForms(group);
[ &lt; quadratic form > ]
[ &lt; quadratic form >, &lt; hermitian form > ]
gap> PreservedForms(group);
[ &lt; quadratic form > ]
[ &lt; quadratic form >, &lt; hermitian form > ]
gap> PreservedForms(group);
[ &lt; quadratic form > ]
[ &lt; quadratic form >, &lt; hermitian form > ]
gap> PreservedForms(group);
[ &lt; quadratic form >, &lt; hermitian form > ]

0 comments on commit c6e64ed

Please sign in to comment.