Annotation of OpenXM/src/kan96xx/Doc/printhelp.sm1, Revision 1.9
1.1 maekawa 1: /printOnlineHelp {
2: [/keys /i] pushVariables
3: [
4: (\documentclass{article}) message
5: (\title{{\bf kan/sm1 operators reference}}) message
6: (\author{ } \date{) messagen
7: [(Version)] system_variable messagen
8: ( }) message
9: (\begin{document}) message
10: (\maketitle) message
11: (\section{Primitive Operators}) message
12: [(keywords)] extension /keys set
13: 0 1 keys length 1 sub {
14: /i set
1.4 takayama 15: (\subsection{ ) messagen keys i get removeIllegalChars messagen ( } ) message
1.1 maekawa 16: ({\footnotesize \begin{verbatim}) message
17: keys i get usage
18: ( ) message
19: (\end{verbatim} }) message ( ) message ( ) message
20: } for
21: (\newpage) message ( ) message
22:
23: (\section{Macro Operators}) message
24: @.usages { 0 get } map shell /keys set
25: 0 1 keys length 1 sub{
26: /i set
1.4 takayama 27: (\subsection{ ) messagen keys i get removeIllegalChars messagen ( } ) message
1.1 maekawa 28: ({\footnotesize \begin{verbatim}) message
29: keys i get usage
30: ( ) message
31: (\end{verbatim} }) message ( ) message ( ) message
32: } for
33:
34:
35: (\section{Macros in libraries}) message
36: printlibhelp
37:
38: (\end{document}) message
39: ] pop
40: popVariables
41: } def
42:
1.4 takayama 43: /removeIllegalChars {
44: /arg1 set
45: [/in-removeIllegalChars /ss /i] pushVariables
46: [
47: /ss arg1 def
48: ss (array) dc /ss set
49: 0 1 ss length 1 sub {
50: /i set
51: ss i get 95 eq %% _
52: {
53: ss i [92 95] put %% \_
54: }{ } ifelse
55: } for
56: ss flatten /ss set
57: ss {(string) dc}map cat /arg1 set
58: ] pop
59: popVariables
60: arg1
61: } def
62:
1.1 maekawa 63: /printlibhelp {
64: [/in-printlibhelp /keys /i] pushVariables
65: [
66: (The macros described in this section can be used by loading) message
1.4 takayama 67: (library files by the command $cohom.sm1$ run) message
1.1 maekawa 68: (\verb+ ox_asir + functions require open asir module.) message
69: ( ) message
1.6 takayama 70: (\noindent \begin{verbatim}) message
71: [(parse) (cohom.sm1) pushfile] extension ( ) message
1.1 maekawa 72: [(parse) (bfunction.sm1) pushfile] extension ( ) message
73: [(parse) (oxasir.sm1)pushfile] extension ( ) message
74: [(parse) (intw.sm1)pushfile] extension ( ) message
1.6 takayama 75: ( ) message
76: (\end{verbatim}) message
1.1 maekawa 77:
78: %% Offverbose must be the smallest
79: /keys [(Offverbose) (ann-t-f) (appell1) (bfunction) (rank)
80: (rrank) (characteristic) (ch)
81: (gkz) (appell4) (gb) (pgb) (syz) (resol0) (resol1)
82: (genericAnn) (annfs) (deRham) (restriction)
83: (integration) (Onverbose) (genericAnnWithL)
84: (asir) (primadec) (fctr) (asirconnectr)
85: (loadAsirFile) (reduceByAsir) (ptozp_subst)
86: (integral-k1) (wbf) (intwbf) (tensor0) (wTensor0)
87: (intwbfRoots) (wbfRoots)
88: (wIntegration0) (wRestriction0) (bf-111) (wdeRham0) (restall_s)
89: (intersection)
90: (saturation)
91: (res-div) (res-solv) (res-dual) (res-kernel-image) (ox) (oxconnect)
1.7 takayama 92: (ox_launch) (ox_launch_nox) (extension-oxLog)
1.2 takayama 93: (debugMode) (db.where) (db.restore) (db.clear) (db.clear.es)
94: (db.where.es) (localVariables) (restoreVariables) (db.clear.ds)
95: (db.clear.es)
1.6 takayama 96: (ecart.gb) (ecart.minimalResol) (ecart.minimalBase) (ecart.syz)
1.8 takayama 97: (ecartd.reduction)
1.9 ! takayama 98: (mgkz)
1.1 maekawa 99: ]
100: def
101: keys shell /keys set
102: 0 1 keys length 1 sub{
103: /i set
1.4 takayama 104: (\subsection{ ) messagen keys i get removeIllegalChars messagen (} ) message
1.1 maekawa 105: ({\footnotesize \begin{verbatim}) message
106: keys i get usage
107: ( ) message
108: (\end{verbatim} }) message ( ) message ( ) message
109: } for
110: ] pop
111: %% popVariables %% I do not know the reason, but the stack seems to be broken.
112: } def
113:
114: %% sm1 -q -s "[(parse) (printhelp.sm1) pushfile] extension printOnlineHelp quit"
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>