1;;Autoloads for maxima
2(in-package :maxima)
3
4($auto_mexpr '$nusum "nusum")
5($auto_mexpr '$unsum "nusum")
6($auto_mexpr '$funcsolve "nusum")
7
8($auto_mexpr '$bffac "bffac")
9($auto_mexpr '$cbffac "bffac")
10($auto_mexpr '$bfzeta "bffac")
11($auto_mexpr '$bfpsi "bffac")
12($auto_mexpr '$bfpsi0 "bffac")
13
14(auto-mexpr '$trigrat '|trigrat|)
15($auto_mexpr '$gcdex '|gcdex|)
16($auto_mexpr '$expandwrt "simplification/stopex")
17($auto_mexpr '$expandwrt_factored "simplification/stopex")
18(declaim (special $expandwrt_denom $expandwrt_nonrat))
19
20($auto_mexpr '$facsum "simplification/facexp")
21($auto_mexpr '$factorfacsum "simplification/facexp")
22($auto_mexpr '$collectterms "simplification/facexp")
23(declaim (special $nextlayerfactor $facsum_combine))
24
25($auto_mexpr '$disolate "simplification/disol")
26
27($auto_mexpr '$linsimp "misc/declin")
28($auto_mexpr '$declare_linear_operator "misc/declin")
29
30($auto_mexpr '$nonumfactor "simplification/genut")
31(meval '((%setup_autoload simp) "bffac" $bfzeta))
32
33;jfa
34($auto_mexpr '$eigenvectors "eigen.mac")
35($auto_mexpr '$eivects "eigen.mac")
36($auto_mexpr '$eigenvalues "eigen.mac")
37($auto_mexpr '$eivals "eigen.mac")
38
39($auto_mexpr '$trigsimp "trgsmp.mac")
40($auto_mexpr '$ode2 "ode2.mac")
41($auto_mexpr '$ic1 "ode2.mac")
42($auto_mexpr '$ic2 "ode2.mac")
43($auto_mexpr '$bc2 "ode2.mac")
44($auto_mexpr '$desimp "ode2.mac")
45($auto_mexpr '$linear2 "ode2")
46
47(dolist (v
48	  '($arite
49	    $card_orbit
50	    $card_stab
51	    $comp2ele
52	    $comp2pui
53	    $cont2part
54	    $contract
55	    $direct
56	    $ele2comp
57	    $ele2polynome
58	    $ele2pui
59	    $elem
60	    $explose
61	    $kostka
62	    $lgtreillis
63	    $ltreillis
64	    $mon2schur
65	    $multi_elem
66	    $multi_orbit
67	    $multi_pui
68	    $multinomial
69	    $multsym
70	    $orbit
71	    $part2cont
72	    $partpol
73	    $permut
74	    $polynome2ele
75	    $prodrac
76	    $pui
77	    $pui2comp
78	    $pui2ele
79	    $pui2polynome
80	    $pui_direct
81	    $puireduc
82	    $resolvante
83	    $resolvante_alternee1
84	    $resolvante_bipartite
85	    $resolvante_diedrale
86	    $resolvante_klein
87	    $resolvante_klein3
88	    $resolvante_produit_sym
89	    $resolvante_unitaire
90	    $resolvante_vierer
91	    $schur2comp
92	    $somrac
93	    $tcontract
94	    $tpartpol
95	    $treillis
96	    $treinat
97	    ))
98  (setf (get v 'autoload)        "sym.mac")
99  )
100
101
102(dolist (f
103     '($adjust_external_format
104       $close
105       $flush_output
106       $flength
107       $fposition
108       $freshline
109       $newline
110       $opena
111       $openr
112       $openw
113       $make_string_input_stream
114       $make_string_output_stream
115       $get_output_stream_string
116       $stderr
117       $stdin
118       $stdout
119       $printf
120       $sprint
121       $writebyte
122       $readbyte
123       $readchar
124       $readline
125       $alphacharp
126       $alphanumericp
127       $ascii
128       $cequal
129       $cequalignore
130       $cgreaterp
131       $cgreaterpignore
132       $charp
133       $cint
134       $clessp
135       $clesspignore
136       $constituent
137       $cunlisp
138       $digitcharp
139       $lcharp
140       $lowercasep
141       $uppercasep
142       $stringp
143       $charat
144       $charlist
145       $eval_string
146       $parse_string
147       $scopy
148       $sdowncase
149       $sequal
150       $sequalignore
151       $sexplode
152       $simplode
153       $sinsert
154       $sinvertcase
155       $slength
156       $smake
157       $smismatch
158       $split
159       $sposition
160       $sremove
161       $sremovefirst
162       $sreverse
163       $ssearch
164       $ssort
165       $ssubst
166       $ssubstfirst
167       $strim
168       $striml
169       $strimr
170       $substring
171       $supcase
172       $tab
173       $tokens
174       $unicode
175       $unicode_to_utf8
176       $utf8_to_unicode
177       $base64
178       $base64_decode
179       $crc24sum
180       $md5sum
181       $mgf1_sha1
182       $number_to_octets
183       $octets_to_number
184       $octets_to_oid
185       $oid_to_octets
186       $octets_to_string
187       $string_to_octets
188       $sha1sum
189       $sha256sum
190       $inferred_encoding
191       $recognized_encoding_p))
192  (setf (get f 'autoload) "stringproc"))
193
194
195(dolist (f
196  '($regex_compile
197    $regex_match_pos
198    $regex_match
199    $regex_split
200    $regex_subst_first
201    $regex_subst
202    $string_to_regex ))
203  (setf (get f 'autoload) "sregex"))
204
205
206(setf (get '$romberg 'autoload) "romberg")
207
208(dolist (f
209  '($assume_external_byte_order
210    $opena_binary
211    $openr_binary
212    $openw_binary
213    $read_array
214    $read_binary_array
215    $read_binary_list
216    $read_binary_matrix
217    $read_hashed_array
218    $read_lisp_array
219    $read_list
220    $read_matrix
221    $read_maxima_array
222    $read_nested_list
223    $write_binary_data
224    $write_data))
225  (setf (get f 'autoload) "numericalio"))
226
227(dolist (f
228  '($bit_and
229    $bit_length
230    $bit_lsh
231    $bit_not
232    $bit_onep
233    $bit_or
234    $bit_rsh
235    $bit_xor ))
236  (setf (get f 'autoload) "bitwise"))
237
238
239;; functions from share/linearalgebra
240(dolist (f
241     '($eigens_by_jacobi       ; eigens-by-jacobi.lisp
242
243       $cholesky               ; linalgcholesky.lisp
244
245       $circulant              ; linalg-extra.lisp
246       $cauchy_matrix
247       $hessian
248       $jacobian
249       $krylov_matrix
250       $matrix_sign
251       $sylvester_matrix
252       $vandermonde_matrix
253
254       $blockmatrixp           ; linalg-utilities.lisp
255       $ctranspose
256       $identfor
257       $matrix_size
258       $require_list
259       $require_matrix
260       $require_nonempty_matrix
261       $require_posinteger
262       $require_real_symmetric_matrix
263       $require_selfadjoint_matrix
264       $require_square_matrix
265       $require_symmetric_matrix
266       $require_unblockedmatrix
267       $zerofor
268       $zeromatrixp
269
270       $determinant_by_lu        ; lu.lisp
271       $get_lu_factors
272       $invert_by_lu
273       $linsolve_by_lu
274       $lu_backsub
275       $lu_factor
276       $mat_cond
277
278       $matrixexp              ; matrixexp.lisp
279       $matrixfun
280       $spectral_rep
281
282       $addmatrices            ; mring.lisp
283       $require_ring
284
285       $nonnegintegerp         ; polynomialp.lisp
286       $polynomialp ))
287  (setf (get f 'autoload) "linearalgebra"))
288
289(dolist (mexpr
290     '($column_reduce          ; linearalgebra.mac
291       $columnop
292       $columnspace
293       $columnswap
294       $diag_matrix
295       $dotproduct
296       $good_pivot
297       $hankel
298       $hilbert_matrix
299       $hipow_gzero
300       $kronecker_product
301       $linalg_rank
302       $locate_matrix_entry
303       $mat_fullunblocker
304       $mat_norm
305       $mat_trace
306       $mat_unblocker
307       $moore_penrose_pseudoinverse
308       $nullity
309       $nullspace
310       $orthogonal_complement
311       $polytocompanion
312       $ptriangularize
313       $ptriangularize_with_proviso
314       $request_rational_matrix
315       $require_integer
316       $require_symbol
317       $rowop
318       $rowswap
319       $toeplitz))
320  ($auto_mexpr mexpr "linearalgebra"))
321
322
323(dolist (f
324     '($assoc_legendre_p
325       $assoc_legendre_q
326       $chebyshev_t
327       $chebyshev_u
328       $gen_laguerre
329       $hermite
330       $intervalp
331       $jacobi_p
332       $laguerre
333       $legendre_p
334       $legendre_q
335       $orthopoly_recur
336       $orthopoly_weight
337       $pochhammer
338       $spherical_bessel_j
339       $spherical_bessel_y
340       $spherical_hankel1
341       $spherical_hankel2
342       $spherical_harmonic
343       $ultraspherical))
344  (setf (get f 'autoload) "orthopoly"))
345
346(defprop $unit_step simp-unit-step operators)
347(autof 'simp-unit-step "orthopoly")
348
349(defprop $pochhammer simp-pochhammer operators)
350(autof 'simp-pochhammer "orthopoly")
351
352(dolist (f
353  '($draw
354    $draw2d
355    $draw3d
356    $set_draw_defaults
357    $multiplot_mode
358    $make_level_picture
359    $make_rgb_picture
360    $get_pixel
361    $take_channel))
362  (setf (get f 'autoload) "draw"))
363
364(dolist (f
365  '($julia
366    $mandelbrot
367    $plotdf
368    $ploteq
369    $rk))
370  (setf (get f 'autoload) "dynamics"))
371
372(dolist (mexpr
373  '($evolution
374    $staircase
375    $evolution2d
376    $chaosgame
377    $ifs
378    $orbits))
379  ($auto_mexpr mexpr "dynamics"))
380
381(setf (get '$scene 'autoload) "visualization")
382
383(defprop $hypergeometric simp-hypergeometric operators)
384(autof 'simp-hypergeometric "hypergeometric")
385
386(dolist (f
387  '($cl_eval
388    $common_lisp
389    $to_cl))
390  (setf (get f 'autoload) "tocl"))
391