Print a warning when translating subscripted functions
[maxima.git] / share / contrib / gentran / man / appB.ms
blobcb4c098773777b57e0b9acc69f35073d00b63e82
1 .SH
2 B.  LIST OF GENTRAN FUNCTIONS, SWITCHES AND VARIABLES
3 .DS L
4 .ft CR
5 User Level Syntax               | LISP Level Syntax
6 --------------------------------+----------------------------------------------
7 .ft
8 .DE
9 .DS L
10 .ft CR
11 Functions:                      | Functions:
12                                 |
13   \fIgentran(\fRstmt1,stmt2,...,stmtn |   (\fIgentran '(\fRstmt1 stmt2 ...
14           {,[f1,f2,...,fm]});   |                          stmtn)
15                            [16] |            '(f1 f2 ... fm))[16]
16   \fIgentranin(\fRf1,f2,...,fn        |   (\fIgentranin '(\fRf1 f2 ... fn)
17             {,[f1,f2,...,fm]}); |              '(f1 f2 ... fm))
18   \fIgentranout(\fRf1,f2,...,fn);     |   \fI(gentranout '(\fRf1 f2 ... fn))
19   \fIgentranpop(\fRf1,f2,...,fn);     |   \fI(gentranpop '(\fRf1 f2 ... fn))
20   \fIgentranpush(\fRf1,f2,...,fn);    |   \fI(gentranpush '(\fRf1 f2 ... fn))
21   \fIgentranshut(\fRf1,f2,...,fn);    |   \fI(gentranshut '(\fRf1 f2 ... fn))
22 .ft
23 .DE
24 .FS
25 [16] In addition to the subset of translatable VAXIMA
26 statements given in Appendix A, the following special functions
27 and arguments can also be given as arguments to the
28 \fIgentran\fR function:
29 .DS L
30 .ft CR
31   \fIbegin_group\fR                   |   \fI$begin_group\fR
32   \fIbody(\fRstmt1,stmt2,...,stmtn)   |   \fI(($body) \fRstmt1 stmt2 ...
33                                 |                          stmtn)
34   \fIbreak()\fR                       |   \fI(($break))\fR
35   \fIcprocedure({\fRtype,}            |   \fI(($cprocedure) {\fRtype}
36              name(p1,p2,...,pn))|                  ((name) p1 p2
37                                 |                        ... pn))
38   \fIend()\fR                         |   \fI(($end))\fR
39   \fIend_group\fR                     |   \fI$end_group\fR
40   \fIeval(\fRexp)                     |   \fI(($eval) \fRexp)
41   \fIfunction({\fRtype,}              |   \fI(($function) {\fRtype}
42            name(p1,p2,...,pn))  |                ((name) p1 p2
43                                 |                        ... pn))
44   \fIliteral(\fRarg1,arg2,...,argn)   |   \fI(($literal) \fRarg1 arg2 ...
45                                 |                           argn)
46   \fIlrsetq(\fRvar,exp)               |   \fI(($lrsetq) \fRvar exp)
47   \fIlsetq(\fRvar,exp)                |   \fI(($lsetq) \fRvar exp)
48   \fIrsetq(\fRvar,exp)                |   \fI(($rsetq) \fRvar exp)
49   \fIstop()\fR                        |   \fI(($stop))\fR
50   \fIsubroutine(\fRname(p1,p2,...,pn))|   \fI(($subroutine) ((\fRname) p1 p2
51                                 |                        ... pn))
52   \fItype(\fRtype, v1,v2,...,vn)      |   \fI(($type) \fRtype v1 v2 ... vn)
53 .ft
54 .DE
55 .FE
56 .DS L
57 .ft CR
58   \fIoff(\fRflag1,flag2,...,flagn);   |   \fI(off '(\fRflag1 flag2 ...
59                                 |                         flagn))
60   \fIon(\fRflag1,flag2,...,flagn);    |   \fI(on '(\fRflag1 flag2 ... flagn))
61 .ft
62 .DE
63 .DS L
64 .ft CR
65   \fIgendecs(\fRname);                |   \fI(gendecs \fR'name)
66   \fIgenstmtno();\fR                  |   \fI(genstmtno)\fR
67   \fImarkedvarp(\fRvar);              |   \fI(markedvarp \fR'var)
68   \fImarkvar(\fRvar);                 |   \fI(markvar \fR'var)
69   \fIrecurunmark(\fRexp);             |   \fI(recurunmark \fR'exp)
70   \fItempvar(\fRtype);                |   \fI(tempvar \fR'type)
71   \fIunmarkvar(\fRvar);               |   \fI(unmarkvar \fR'var)
72 .ft
73 .DE
74 .DS L
75 .ft CR
76 Flags & Mode Switches:          | Flags & Mode Switches:
77                                 |
78   \fIc\fR                             |   \fIc\fR
79   \fIfloat\fR                         |   \fIfloat\fR
80   \fIfortran\fR                       |   \fIfortran\fR
81   \fIgendecs\fR                       |   \fIgendecs\fR
82   \fIgentranopt\fR                    |   \fIgentranopt\fR
83   \fIgentranparser\fR                 |   \fIgentranparser\fR
84   \fIgentranseg\fR                    |   \fIgentranseg\fR
85   \fIratfor\fR                        |   \fIratfor\fR
86 .ft
87 .DE
88 .DS L
89 .ft CR
90 Global Variables:               | Global Variables:
91                                 |
92   \fI?ccurrind\e*\fR                   |   \fIccurrind*\fR
93   \fI?clinelen\e*\fR                   |   \fIclinelen*\fR
94   \fI?fortcurrind\e*\fR                |   \fIfortcurrind*\fR
95   \fI?fortlinelen\e*\fR                |   \fIfortlinelen*\fR
96   \fI?genstmtincr\e*\fR                |   \fIgenstmtincr*\fR
97   \fI?genstmtno\e*\fR                  |   \fIgenstmtno*\fR
98   \fI?gentranlang\e*\fR                |   \fIgentranlang*\fR
99   \fI?gentranopt\e*\fR                 |   \fIgentranopt*\fR
100   \fI?maxexpprintlen\e*\fR             |   \fImaxexpprintlen*\fR
101   \fI?ratcurrind\e*\fR                 |   \fIratcurrind*\fR
102   \fI?ratlinelen\e*\fR                 |   \fIratlinelen*\fR
103   \fI?tablen\e*\fR                     |   \fItablen*\fR
104   \fI?tempvarname\e*\fR                |   \fItempvarname*\fR
105   \fI?tempvarnum\e*\fR                 |   \fItempvarnum*\fR
106   \fI?tempvartype\e*\fR                |   \fItempvartype*\fR