Annotation of OpenXM/src/kan96xx/Doc/printhelp.sm1, Revision 1.4
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
70: (\noindent ) messagen
1.2 takayama 71: [(parse) (var.sm1) pushfile] extension ( ) message
72: (\noindent ) messagen
1.1 maekawa 73: [(parse) (bfunction.sm1) pushfile] extension ( ) message
74: (\noindent ) messagen
75: [(parse) (hol.sm1) pushfile] extension ( ) message
76: (\noindent ) messagen
77: [(parse) (gkz.sm1) pushfile] extension ( ) message
78: (\noindent ) messagen
79: [(parse) (appell.sm1)pushfile] extension ( ) message
80: (\noindent ) messagen
81: [(parse) (resol0.sm1)pushfile] extension ( ) message
82: (\noindent ) messagen
83: [(parse) (complex.sm1)pushfile] extension ( ) message
84: (\noindent ) messagen
85: /BFmessage 0 def
86: [(parse) (restall.sm1)pushfile] extension ( ) message
87: (\noindent ) messagen
88: [(parse) (restall_s.sm1)pushfile] extension ( ) message
89: (\noindent ) messagen
90: [(parse) (ox.sm1)pushfile] extension ( ) message
91: (\noindent ) messagen
92: [(parse) (oxasir.sm1)pushfile] extension ( ) message
93: (\noindent ) messagen
94: [(parse) (r-interface.sm1)pushfile] extension ( ) message
95: (\noindent ) messagen
96: [(parse) (intw.sm1)pushfile] extension ( ) message
97:
98: %% Offverbose must be the smallest
99: /keys [(Offverbose) (ann-t-f) (appell1) (bfunction) (rank)
100: (rrank) (characteristic) (ch)
101: (gkz) (appell4) (gb) (pgb) (syz) (resol0) (resol1)
102: (genericAnn) (annfs) (deRham) (restriction)
103: (integration) (Onverbose) (genericAnnWithL)
104: (asir) (primadec) (fctr) (asirconnectr)
105: (loadAsirFile) (reduceByAsir) (ptozp_subst)
106: (integral-k1) (wbf) (intwbf) (tensor0) (wTensor0)
107: (intwbfRoots) (wbfRoots)
108: (wIntegration0) (wRestriction0) (bf-111) (wdeRham0) (restall_s)
109: (intersection)
110: (saturation)
111: (res-div) (res-solv) (res-dual) (res-kernel-image) (ox) (oxconnect)
1.3 takayama 112: (ox_launch) (ox_launch_nox)
1.2 takayama 113: (debugMode) (db.where) (db.restore) (db.clear) (db.clear.es)
114: (db.where.es) (localVariables) (restoreVariables) (db.clear.ds)
115: (db.clear.es)
1.1 maekawa 116: ]
117: def
118: keys shell /keys set
119: 0 1 keys length 1 sub{
120: /i set
1.4 ! takayama 121: (\subsection{ ) messagen keys i get removeIllegalChars messagen (} ) message
1.1 maekawa 122: ({\footnotesize \begin{verbatim}) message
123: keys i get usage
124: ( ) message
125: (\end{verbatim} }) message ( ) message ( ) message
126: } for
127: ] pop
128: %% popVariables %% I do not know the reason, but the stack seems to be broken.
129: } def
130:
131: %% sm1 -q -s "[(parse) (printhelp.sm1) pushfile] extension printOnlineHelp quit"
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>