:	material.l	/^(defun : (object material)$/
AliasAllPoints	mesh.l	/^(defun AliasAllPoints (obj)$/
AliasPoint	mesh.l	/^(defun AliasPoint (pt-name)$/
Ambient	lighting.l	/^(defun Ambient (strength)$/
ArrayStore	franzinit.l	/^(defun ArrayStore (arr &rest dim)$/
AssignMi	auxiliary.l	/^(defun AssignMi (left right)$/
AssocEqual	franzinit.l	/^(defmacro AssocEqual  (&rest args) (cons 'assoc ar/
Background	lighting.l	/^(defun Background (arg1 &optional arg2 arg3)$/
Basic	parse.l	/^(defun Basic ()$/
Best-Perp-Vector	geometry.l	/^(defun Best-Perp-Vector (vec)$/
Carve	material.l	/^(defun Carve (object material)$/
Carve-Primitive	material.l	/^(defun Carve-Primitive (object material)$/
CloseFile	auxiliary.l	/^(defun CloseFile (file)$/
CloseOpenFile	auxiliary.l	/^(defun CloseOpenFile (filevar mode filename)$/
Compose	geometry.l	/^(defun Compose (&rest tlist)$/
ComposeList	geometry.l	/^(defun ComposeList (tlist)$/
CondEcho	trace.l	/^(defun CondEcho (red)$/
CondMatchSym	scan.l	/^(defun CondMatchSym (Sym)$/
CondReport	trace.l	/^(def CondReport $/
DefinePoints	mesh.l	/^(defun DefinePoints (ptl)$/
Desc	parse.l	/^(defun Desc ()$/
Diff	csg.l	/^(defun Diff (obj1 obj2)$/
DoFunc	parse.l	/^(defun DoFunc (Func Argl)$/
DoInMiSyntax	scan.l	/^(defun DoInMiSyntax fexpr (funcexpr)$/
DoOp	parse.l	/^(defun DoOp (OpSym Argl)$/
DoSubInSub	utility.l	/^(defun DoSubInSub (newsub oldsub)$/
Embedding	csg.l	/^(defun Embedding (object)$/
ExitMi	leonardo.l	/^(defun ExitMi (tag &aux code)$/
Expo	parse.l	/^(defun Expo ()$/
Expression	parse.l	/^(defun Expression ()$/
Eye_Point	viewing.l	/^(defun Eye_Point (arg1 &optional arg2 arg3)$/
Factor	parse.l	/^(defun Factor (&aux left)$/
FatalError	trace.l	/^(defun FatalError (&rest amsg)$/
Focal_Length	viewing.l	/^(defun Focal_Length (len)$/
Funcall	parse.l	/^(defun Funcall ()$/
GetActSym	scan.l	/^(defmacro GetActSym (Sym)$/
GetBrackExpList	parse.l	/^(defun GetBrackExpList (LSym &aux RSym)$/
GetCurrentClass	scan.l	/^(defmacro GetCurrentClass ()$/
GetCurrentSym	scan.l	/^(defmacro GetCurrentSym ()$/
GetFile	auxiliary.l	/^(defun GetFile (filevar mode filename)$/
GetFunc	parse.l	/^(defun GetFunc (OpSym ArgTypes)$/
GetMatchSym	scan.l	/^(defmacro GetMatchSym (Sym)$/
GetMiSymbols	scan.l	/^(defun GetMiSymbols ()$/
GetMiType	parse.l	/^(defun GetMiType (Item &aux Type)$/
GetNextClass	scan.l	/^(defmacro GetNextClass ()$/
GetNextSym	scan.l	/^(defmacro GetNextSym ()$/
GetOption	leonardo.l	/^(defun GetOption (opt)$/
GetSpecTypes	parse.l	/^(defun GetSpecTypes (desc SignList)$/
GetToken	scan.l	/^(defmacro GetToken (key)$/
GetValList	parse.l	/^(defun GetValList (NextPrecLevel &aux explist)$/
GobbleSym	scan.l	/^(defun GobbleSym ()$/
HandleBracket	parse.l	/^(defun HandleBracket (LBrackSym)$/
HandleIdent	parse.l	/^(defun HandleIdent (Ident)$/
HandleLit	parse.l	/^(defun HandleLit (&aux func)$/
IdFunc	auxiliary.l	/^(defun IdFunc (x) x)$/
Identity	geometry.l	/^(defun Identity ()$/
InitMi	leonardo.l	/^(defun InitMi ()$/
Insert	auxiliary.l	/^(defun Insert (filename &aux oldenv)$/
InstallTable	scan.l	/^(defun InstallTable (table)$/
Instance	csg.l	/^(defun Instance (&rest objectlist)$/
Instance-List	csg.l	/^(defun Instance-List (objectlist)$/
Instance-Object	csg.l	/^(defun Instance-Object (object)$/
Instance-Primitive	csg.l	/^(defun Instance-Primitive (object)$/
InstanceMesh	mesh.l	/^(defun InstanceMesh (msh)$/
Int	csg.l	/^(defun Int (&rest object-list)$/
Intersect-List	csg.l	/^(defun Intersect-List (object-list)$/
InverseTransform	geometry.l	/^(defun InverseTransform (xform &aux inv)$/
Join	mesh.l	/^(defun Join (x y)$/
JoinMesh	mesh.l	/^(defun JoinMesh (&rest meshl)$/
JoinMixedMesh	mesh.l	/^(defun JoinMixedMesh (&rest mixl)$/
LBinaryExpr	parse.l	/^(defun LBinaryExpr (OpClass NextPrecLevel &aux lef/
Left-Object	csg.l	/^(defun Left-Object (composite-object)$/
Light	lighting.l	/^(defun Light (arg1 &optional arg2 arg3 arg4)$/
ListOfListP	utility.l	/^(defmacro ListOfListP (Item)$/
LookUp	utility.l	/^(defmacro LookUp (key l default)$/
MakeMaterial	parse.l	/^(defun MakeMaterial (alist)$/
MakeMesh	mesh.l	/^(defun MakeMesh (Elements Points)$/
MakeMiReadtable	scan.l	/^(defun MakeMiReadtable (&aux cur_table mi_table)$/
MakeMiSyntax	scan.l	/^(defun MakeMiSyntax ()$/
MakeMiTokens	scan.l	/^(defun MakeMiTokens ()$/
MakeUniq	utility.l	/^(defun MakeUniq (l)$/
Match	parse.l	/^(defun Match (act pat)$/
MatchLists	parse.l	/^(defun MatchLists (alist plist)$/
MatchSym	scan.l	/^(defun MatchSym (Sym)$/
Material	material.l	/^(defun Material (&rest properties)$/
Material!	material.l	/^(def Material!$/
MatrixAdjoint	geometry.l	/^(defun MatrixAdjoint (mat i j &aux (size 4) adj)$/
MatrixDet	geometry.l	/^(defun MatrixDet (mat)$/
MatrixInvert	geometry.l	/^(defun MatrixInvert (mat &aux detm (size 4) minv)$/
MemberEqual	franzinit.l	/^(defmacro MemberEqual (&rest args) (cons 'member a/
MeshElements	mesh.l	/^(defun MeshElements (m)$/
MeshPoints	mesh.l	/^(defun MeshPoints (object)$/
MiError	trace.l	/^(defun MiError (&rest amsg)$/
MiErrorHandler	trace.l	/^(defun MiErrorHandler (desc)$/
MiFileName	leonardo.l	/^(defun MiFileName (name)$/
ModelError	trace.l	/^(defun ModelError (&rest amsg)$/
Name	geometry.l	/^(defun Name (pt)$/
Nearly-Orthogonal-Axis	geometry.l	/^(defun Nearly-Orthogonal-Axis (vec)$/
NewMiToken	scan.l	/^(defmacro NewMiToken (Symbol Class Name SignMap)$/
NullCheck	parse.l	/^(defun NullCheck (l)$/
O*	geometry.l	/^(defun O* (structure &rest transform-list)$/
Object	mesh.l	/^(defun Object (obj &optional (arg 0))$/
OpenFile	auxiliary.l	/^(defun OpenFile (filevar mode filename)$/
Operator	csg.l	/^(defun Operator (composite-object)$/
PMesh	mesh.l	/^(defun PMesh (obj)$/
PName	mesh.l	/^(defun PName (msh)$/
ParseCommandLine	leonardo.l	/^(defun ParseCommandLine (args)$/
PointSub	mesh.l	/^(defun PointSub (object)$/
Primitive-Material	csg.l	/^(defun Primitive-Material (object)$/
Primitive-Type	csg.l	/^(defun Primitive-Type (object)$/
Primitive-p	csg.l	/^(defun Primitive-p (object)$/
Print	trace.l	/^(defun Print (&rest amsg)$/
Print-List	utility.l	/^(defun Print-List (list)$/
Print-Material	material.l	/^(defun Print-Material (mat)$/
Print-Surface	material.l	/^(defun Print-Surface (material)$/
Print-Texture	material.l	/^(defun Print-Texture (text)$/
Print-Transform	geometry.l	/^(defun Print-Transform (transform)$/
Print-Transform-Inst	geometry.l	/^(defun Print-Transform-Inst (xform)$/
PrintErr	trace.l	/^(defun PrintErr (&rest amsg)$/
PrintErrList	trace.l	/^(defun PrintErrList (amsg)$/
PrintFace	mesh.l	/^(defun PrintFace (vertices)$/
PrintHeader	leonardo.l	/^(defun PrintHeader ()$/
PrintList	utility.l	/^(defmacro PrintList (alist &optional (aport poport/
PrintLn	trace.l	/^(defun PrintLn (&rest amsg)$/
PrintMesh	mesh.l	/^(defun PrintMesh (printname pm sub)$/
PrintMeshElement	mesh.l	/^(defun PrintMeshElement (element sub)$/
PrintWBlank	utility.l	/^(defmacro PrintWBlank (it &optional (aport poport)/
ReadMi	scan.l	/^(defun ReadMi ()$/
ReadNormal	scan.l	/^(defun ReadNormal ()$/
Recover	scan.l	/^(defun Recover ()$/
RemoveEach	utility.l	/^(defun RemoveEach (Items List)$/
RemoveEqual	franzinit.l	/^(defmacro RemoveEqual (&rest args) (cons 'remove a/
Render	csg.l	/^(defun Render (&rest objectlist)$/
Right-Object	csg.l	/^(defun Right-Object (composite-object)$/
Rotate	geometry.l	/^(defun Rotate (base direction angle)$/
Run-mi	leonardo.l	/^(defun Run-mi (&aux tag)$/
RunDesc	leonardo.l	/^(defun RunDesc ()$/
Scale	geometry.l	/^(defun Scale (s1 &optional s2 s3)$/
SetOption	leonardo.l	/^(defun SetOption (option value)$/
Simple-Int	csg.l	/^(defun Simple-Int (obj1 obj2)$/
Simple-Union	csg.l	/^(defun Simple-Union (obj1 obj2)$/
StartMi	leonardo.l	/^(defun StartMi ()$/
Stmt	parse.l	/^(defun Stmt ()$/
StopMi	leonardo.l	/^(defun StopMi ()$/
StripOct	mesh.l	/^(defun StripOct (name)$/
SubDiv	mesh.l	/^(defun SubDiv (obj)$/
SubInSub	utility.l	/^(defun SubInSub (newsub oldsub)$/
SubstEqual	franzinit.l	/^(defmacro SubstEqual  (&rest args) (cons 'subst ar/
Term	parse.l	/^(defun Term ()$/
TextureTransform	material.l	/^(defun TextureTransform (obj)$/
Tmult	geometry.l	/^(defun Tmult (t1 t2)$/
TokenizeMi	scan.l	/^(defun TokenizeMi (Atom)$/
Transform	geometry.l	/^(defun Transform (structure &rest transform-list)$/
Transform*	geometry.l	/^(defun Transform* (structure trans)$/
Transform-Object	geometry.l	/^(defun Transform-Object (object trans)$/
Transform-p	geometry.l	/^(defun Transform-p (trans)$/
Transform-point	geometry.l	/^(defun Transform-point (p trans)$/
Transform-vector	geometry.l	/^(defun Transform-vector (v trans)$/
TransformMesh	mesh.l	/^(defun TransformMesh (mesh xfm)$/
Transformation	geometry.l	/^(defun Transformation (row1 row2 row3 row4)$/
Translate	geometry.l	/^(defun Translate (arg1 &optional arg2 arg3)$/
Unary	parse.l	/^(defun Unary ()$/
UnboundError	trace.l	/^(defun UnboundError (ident)$/
UnifyMi	parse.l	/^(defun UnifyMi (Arg Poss)$/
UnifyMiL	parse.l	/^(defun UnifyMiL (ArgTypes PossSign)$/
Union	csg.l	/^(defun Union (&rest object-list)$/
Union-List	csg.l	/^(defun Union-List (object-list)$/
Up_Vector	viewing.l	/^(defun Up_Vector (arg1 &optional arg2 arg3)$/
UseCurrentSym	scan.l	/^(defun UseCurrentSym ()$/
Vertices	mesh.l	/^(defun Vertices (face)$/
View_Direction	viewing.l	/^(defun View_Direction (arg1 &optional arg2 arg3)$/
Viewing_Distance	viewing.l	/^(defun Viewing_Distance (len)$/
ZeroTransform	geometry.l	/^(defun ZeroTransform ()$/
cone	csg.l	/^(defun cone (&optional radius height)$/
cross	geometry.l	/^(defun cross (v1 v2)$/
cube	csg.l	/^(defun cube (&optional length width height)$/
cylinder	csg.l	/^(defun cylinder (&optional radius length)$/
diffuse	material.l	/^(defun diffuse (arg1 &optional arg2 arg3)$/
diffuse!	material.l	/^(defun diffuse! (diffusivity kdiffRed kdiffGreen k/
dot	geometry.l	/^(defun dot (v1 v2)$/
elt	utility.l	/^(defun elt (matrix i j)$/
emittance	material.l	/^(defun emittance (arg1 &optional arg2 arg3)$/
face	mesh.l	/^(defun face (&rest Vertices)$/
halfspace	csg.l	/^(defun halfspace ()$/
l	franzinit.l	/^(defun l fexpr (files)$/
mag	geometry.l	/^(defun mag (v)$/
make-alist	utility.l	/^(defun make-alist (key-list)$/
make-struct	utility.l	/^(defun make-struct (structure-type var-names)$/
mapcap	utility.l	/^(defun mapcap (func args)$/
mapfunc	utility.l	/^(defmacro mapfunc (aFunc arg_ls)$/
mesh	mesh.l	/^(defun mesh (&rest Faces)$/
mi	leonardo.l	/^(defun mi (&optional (cmd-args (command-line-args)/
model-load	auxiliary.l	/^(defun model-load (search-path filename)$/
normalize	geometry.l	/^(defun normalize (v)$/
p-	geometry.l	/^(defun p- (p1 p2)$/
phong	material.l	/^(defun phong (number)$/
point	geometry.l	/^(defun point (x y z)$/
point-p	geometry.l	/^(defun point-p (p)$/
point-w	geometry.l	/^(defun point-w (p)$/
point-x	geometry.l	/^(defun point-x (p)$/
point-y	geometry.l	/^(defun point-y (p)$/
point-z	geometry.l	/^(defun point-z (p)$/
pv+	geometry.l	/^(defun pv+ (P V)$/
reflectance	material.l	/^(defun reflectance (arg1 &optional arg2 arg3)$/
rmember	utility.l	/^(defun rmember (x l)$/
specular	material.l	/^(defun specular (arg1 &optional arg2 arg3)$/
specular!	material.l	/^(defun specular! (specular-fraction Redfraction Gr/
specularity	material.l	/^(defun specularity (number)$/
sphere	csg.l	/^(defun sphere (&optional radius)$/
struct-type	utility.l	/^(defun struct-type (structure)$/
struct-var	utility.l	/^(defun struct-var (var-name structure)$/
struct-var-set	utility.l	/^(defun struct-var-set (var-name structure new-valu/
texture-p	material.l	/^(defun texture-p (mat)$/
torus	csg.l	/^(defun torus (tube-radius &optional major-radius)$/
transmittance	material.l	/^(defun transmittance (arg1 &optional arg2 arg3)$/
uv-	auxiliary.l	/^(defun uv- (v)$/
v*	geometry.l	/^(defun v* (scalar v)$/
v+	geometry.l	/^(defun v+ (v1 v2)$/
v/	geometry.l	/^(defun v\/ (scalar v)$/
vector	geometry.l	/^(defun vector (x y z)$/
vector-p	geometry.l	/^(defun vector-p (v)$/
vector-w	geometry.l	/^(defun vector-w (v)$/
vector-x	geometry.l	/^(defun vector-x (v)$/
vector-y	geometry.l	/^(defun vector-y (v)$/
vector-z	geometry.l	/^(defun vector-z (v)$/
vp+	geometry.l	/^(defun vp+ (V P)$/
while	utility.l	/^(defmacro while (test &rest body)$/
