Part I very basic def X(expr A) = def Y(expr A) = def Z(expr A) = def W(expr A) = def conorm(expr A) = def cmyknorm(expr A) = %% This is not good when MalcomX is true def makecmyk( expr A, B ) = def maketrio( expr A ) = Vector Calculus def N(expr A) = def cdotprod(expr A, B) = def ccrossprod(expr A, B) = def ndotprod(expr A, B) = def ncrossprod(expr A, B) = def paircrossprod(expr A, B) = def getangle(expr A, B) = def getcossine( expr Center, Radius ) = vardef planarrotation( expr VecX, VecY, TheAngle ) = def eulerrotation( expr AngA, AngB, AngC, Vec ) = def rotvecaroundanother( expr Angle, RotVec, FixVec ) = def inplanarvolume( expr PointPerpA, PointPerpB, Point ) = def getanglepair( expr InVec ) = Auxiliary def ps(expr A, Thicken_Factor) = def signalvertex(expr A, TF, Col) = def signalshadowvertex(expr A, TF, Col) = def resolvec(expr A, B) = def produce_vga_border = def produce_auto_scale = vardef cstr( expr Cl ) = vardef bstr( expr bv ) = Fundamental def rp(expr R) = def vp(expr D) = def cb(expr R) = def projectpoint(expr ViewCentr, R) = def lineintersectplan( expr LinePoi, LineDir, PlanPoi, PlanDir ) = Basic Functions def pathofstraightline( expr A, B ) = def drawsegment( expr A, B ) = def cartaxes(expr axex, axey, axez) = def orthaxes(expr axex, strx, axey, stry, axez, strz ) = def angline(expr A, B, Or, W, S)(suffix RelPos) = def anglinen(expr A, B, Or, W, S, RelPos) = def squareangline(expr A, B, Or, W) = def rigorouscircle( expr CenterPos, AngulMom, Radius ) = def tdarrow(expr FromPos, ToTip ) = def tdcircarrow(expr CenterPos, AngulMom, Ray, StartAngle, Amplituda ) = def emptyline(expr JoinP,ThickenFactor,OutCol,InCol,theN,EmptyFrac,sN)(text LinFunc) = def closedline( expr ThisIsClosed, theN, ForeFrac, BackFrac )( text LinFunc ) = def twocyclestogether( expr CycleA, CycleB ) = def ellipticpath(expr CenterPos, OneAxe, OtherAxe ) = def ellipticshadowpath(expr CenterPos, OneAxe, OtherAxe ) = def labelinspace(expr KeepRatio,RefPoi,BaseVec,UpVec)(text SomeString) = def closedpathinspace( expr SomeTDPath, NDivide )( text ConverterFunc ) = Standard Objects def goodcirclepath(expr CenterPos, AngulMom, Radius ) = def circleshadowpath(expr CenterPos, AngulMom, Radius ) = def head_on_circle(expr Pos, Radius ) = def spatialhalfcircle(expr Center, AngulMom, Radius, ItsTheNearest ) = def rigorousdisc(expr InRay, FullFill, BaseCenter, Radius, LenVec) = def rigorouscone(expr UsualForm,CenterPos,AngulMom,Radius,VertexPos) = def verygoodcone(expr BackDash,CenterPos,AngulMom,Radius,VertexPos) = def rigorousfearpath(expr Center, Radius ) = def rigorousfearshadowpath(expr Center, Radius ) = def tropicalglobe( expr NumLats, TheCenter, Radius, AngulMom ) = def whatisthis(expr CenterPos,OneAxe,OtherAxe,CentersDist,TheFactor) = def spheroidshadow( expr CentrPoi, NorthPoleVec, Ray ) = def spheroid( expr CentrPoi, NorthPoleVec, Ray ) = def ellipsoid( expr Centr, AxOne, AxTwo, AxThr ) = def ellipsoidshadow( expr Centr, AxOne, AxTwo, AxThr ) = def revolparab( expr BaseCenter, ParabTip, BaseRay ) = def fakehole( expr CenterPos, LenVec, Radius ) = def kindofcube(expr WithDash, IsVertex, RefP, AngA, AngB, AngC, LenA, LenB, LenC ) = def setthestage( expr NumberOfSideSquares, SideSize ) = def setthearena( expr NumberOfDiameterCircles, ArenaDiameter ) = def spatialhalfsfear(expr Center, AngulMom, Radius ) = Toroidal Stuff def smoothtorus( expr Tcenter, Tmoment, Bray, Sray ) = def torushadow( expr Tcenter, Tmoment, Bray, Sray ) = def quartertorus( expr Tcenter, Tstart, Tfinis, Sray ) = def pointinsidetorus( expr Point, Tcenter, Tmoment, Bray, Sray ) = def pointrelativetotorus( expr Point, Tcenter, Tmoment, Bray, Sray ) = def intersectorus( expr Tcenter, Tmoment, Bray, Sray, LinePoi, LineDir ) = Non-standard objects def positivecharge( expr InFactPositive, Center, BallRay ) = def simplecar(expr RefP, AngCol, LenCol, FronWheelCol, RearWheelCol ) = Differential Equations def fieldlinestep( expr Spos, Step )( text VecFunc ) = def fieldlinepath( expr Numb, Spos, Step )( text VecFunc ) = def trajectorypath( expr Numb, Spos, Svel, Step )( text VecFunc ) = def dragtrajectorypath( expr Spos, Svel, Step )( text VecFunc ) = def magnetictrajectorypath( expr Numb, Spos, Svel, Step )( text VecFunc ) = Part II Advanced 3D-Object Definition Functions vardef makeline@#( text vertices ) = vardef makeface@#( text vertices ) = vardef getready( expr commstr, refpoi ) = def flipvector(expr A, B) = def facevector(expr A, B, C) = def masscenter(expr Nsides)(suffix Coords) = def covervector(expr A, B, MassCenter) = def themarkisinview(expr Mark, OwnFace) = def maycrossviewplan(expr Ea, Eb, La, Lb) = def crossingpoint(expr Ea, Eb, La, Lb) = def crossingpointf(expr Ea, Eb, Fen) = def maycrossviewplanf(expr Ea, Eb, Fen) = def insidedge(expr Point, Ea, Eb) = def insideviewsphere(expr Ea, Eb, La, Lb) = def insidethistriangle(expr Point, A, B, C ) = def insideviewtriangle(expr Point, Ea, Eb) = def insidethisface(expr Point, FaN) = def coarse_line(expr A, B, Facen, Press, Col) = def facepath(expr Facen) = def faceshadowpath(expr Facen) = def face_invisible( expr Facen )( text LineAtribs ) = Different kinds of renderers def sharpraytrace def lineraytrace(expr Press, Col) = def faceraytrace(expr Press, Col) = def draw_all_test( expr AlsoDrawLines ) = def fill_faces( text LineAtribs ) = def doitnow = Nematic Liquid Crystal wise def generatedirline(expr Lin, Phi, Theta, Long, Currpos ) = def generatedirface(expr Fen, Phi, Theta, Long, Base, Currpos ) = def generateonebiax(expr Lin, Phi, Theta, Long, SndDirAngl, Base, Currpos ) = def director_invisible( expr SortEmAll, ThickenFactor, CyclicLines ) = def circularsheet( expr CenterP, Rad, VecX, VecY, StartA, FinisA, Width ) = def banana( expr CenterPos, Radius, AngleColor, Wid, Amp ) = Plotting def hexagonaltrimesh( expr BeHexa,theN,SideSize )( text SurFunc ) = def fillfacewithlight( expr FaceN ) = Part III parametric plots and another renderer def face_drawfill( expr Facen, dmin_, dmax_ ,ColAtrib, ColAtribone ) = def draw_invisible( expr Option, DoJS, ColAtrib, ColAtribone ) = def bracket( expr low, poi, hig ) = def partrimesh( expr nt,ns,lowt,higt,lows,higs,lowx,higx,lowy,higy,lowz,higz,facz)( text parSurFunc ) = Part IV automatic perspective tuning and minimization def randomfear = def renormalizevc( expr inF, inVC ) = def calculatecost( expr TryF, TryVc, TrySp, TrySh ) = def forcepointinsidefear( text A ) = def forcepairinsidepage( text A ) = def calculatejump( expr AverCost, PrevCost, RandCost, JumpLimit ) = def photoreverse( expr IterNum, ExpTao, JumpFact ) = def minimizestep( expr Abcisscolor )( text PlainFunc ) = Part V Intersections def calculatecostver(expr VerA,DisA,VerB,DisB,VerC,DisC,TryV) = def improvertex( expr VerA, DisA, VerB, DisB, VerC, DisC, IniV ) = def ultraimprovertex( expr PlanPoi, PlanDir, BaseCenter, Radius, LenVec, def necplusimprovertex( expr PlanPoi, PlanDir, def intersectprolatespheroid( expr CentrPoi, NorthPoleVec, Ray, Part VI strictly two-dimensional def is_cyclic expr cpath = def springpath( expr begp, endp, piturnum, piturnproj, spgfrac ) = def zigzagfrontier( expr begp, endp, nzigs, dev, zthick, tthick, fthick, excol, incol ) = def randomcirc( expr radi, stddev, numpois ) = def labeln(expr S, Pos, RelPos) = def dotlabelrand(expr S, Pos ) = def radialcross( expr A, la, B, lb, GoUp) = def ropethread( expr Index ) = def ropepattern( expr BasePath, RopeWidth, Nturns ) = def firsttangencypoint( expr Path, Point, ResolvN ) = def lasermachine( expr DefinedPath, Beam, CosLimit ) = def startahead( expr DefinedPath, JumpTime ) = def crossingline( expr FirstPath, SecondPath, TimeTolerance ) = vardef segmentarea( expr Ps ) = vardef cyclicpatharea( expr P ) = % result = area of the interior vardef archangle@#( expr _p, _q, _s, archwidth ) text _t =