(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED " 9-Sep-94 09:45:23" ("compiled on " {DSK}lispusers>EQUATIONFORMS.;1) "28-Jul-94 17:28:46" bcompl'd in "Medley 25-Aug-94 ..." dated "25-Aug-94 10:02:49") (FILECREATED "18-Apr-88 14:00:00" {ERINYES}LYRIC>EQUATIONFORMS.;2 102911 changes to%: (VARS EQUATIONFORMSCOMS) (FNS EQ.SumGroup EQ.IntegralGroup EQ.MakeNSItem) previous date%: "30-Apr-87 10:52:34" |{IE:PARC:XEROX}LYRIC>LISPUSERS>EQUATIONFORMS.;1|) AB.RealPosition :D8 (I 2 side I 1 box I 0 pos) VBgBdg@BgA@ԃj@gBg@BgA@ԃj@HNIL (69 right 54 right 46 left 26 top 14 bottom 5 top) () AB.PointPos :D8 (L (2 pt 1 side 0 box)) XAg AgBdgj6gHj*@$BdgH@@lێg H@@jNIL (73 high 54 center 36 display 25 low 14 bottom 5 top) () AB.SidePosition :D8 (L (2 side 1 box 0 pos)) NBgBdg@Bg@Aj@gBg@Bg@Aj@NIL (64 right 53 right 45 left 26 top 14 bottom 5 top) () AB.PlaceRegion :D8 (P 3 posSide P 2 posAddPt P 1 opposite P 0 posMainPt I 6 shift I 5 gap I 4 addPt I 3 addBox I 2 mainPt I 1 side I 0 mainBox) O@AB A "HFHEZCID [dJKKJK@A CA [dKCCh(61 AB.AdjustToLL 54 AB.RealPosition 34 AB.PointPos 13 AB.OppositeSide 7 AB.PointPos) NIL () AB.AdjustToLL :D8 (L (2 side 1 addBox 0 pos)) 7Bg-Bdg𒿰!g@dABg@dA@NIL (41 bottom 25 left 15 right 5 top) () AB.OppositeSide :D8 (L (0 side)) :@dggdgggg@ggNIL (55 left 47 right 40 right 33 left 27 top 20 bottom 13 bottom 6 top) () AB.RegionToBox :D8 (L (1 displayYPos 0 region)) Ajb@@A@jhNIL NIL () AB.BoxToRegion :D8 (L (2 cornerYPos 1 cornerXPos 0 box)) BAbAAB@@hNIL NIL () AB.RelativePos :D8 (I 2 yShift I 1 bigRegion I 0 region) @A@ABNIL NIL () AB.BiggerRegion :D8 (I 1 extra I 0 region) 9A5Aj0A$@A@A@lA@lAh @(51 \FZEROP) NIL () AB.Check :D8 (P 4 overlap P 3 r I 3 clear I 2 side I 1 regionList I 0 region) Cjbj*0AdKC IHhZH&JbhAmd@K ]iBdg@KKBg@K@-Bdg@K@g@KKL@(161 SHOULDNT 69 REGIONSINTERSECTP 27 AB.BiggerRegion) (144 right 125 left 102 bottom 80 top) () AB.PositionRegion :D8 (I 8 clear I 7 shift I 6 gap I 5 addPt I 4 addBox I 3 mainPt I 2 side I 1 addedRegions I 0 mainBox)  @BCDEFG ABG A(22 AB.Check 13 AB.PlaceRegion) NIL () AB.Position2Regions :D8 (P 3 totalSize P 2 shift P 1 placeLow P 0 placeHigh I 11 clear I 10 lowShift I 9 highShift I 8 lowGap I 7 highGap I 6 lowPt I 5 lowBox I 4 highPt I 3 highBox I 2 side I 1 addedRegions I 0 mainBox) /  @BgCDGG X@BgEFGG YGjbHIG  BgBdgPIIGHZjIHԻIdjoJIKjHdoJHKjlgBgWIIGHZjHIHԻIIjoJIKjHHoJHKjIABG YHABG dIA(295 AB.Check 284 AB.Check 272 SHOULDNT 63 REGIONSINTERSECTP 58 AB.BiggerRegion 41 AB.PlaceRegion 21 AB.PlaceRegion) (179 right 171 left 85 bottom 76 top 29 low 9 high) ( 252 0.5 226 0.5 151 0.5 128 0.5) EQ.Group :D8 (P 2 pos P 1 enclose P 0 innerBox I 2 draw? I 1 imageStream I 0 eqnObj) 7@k A !H@AB YdZddHIJ h (52 EQIO.MakeSpec 45 EQIO.MakeDataSpec 24 EQ.enclosure 12 FS.Box 6 EQIO.EqnData) NIL () EQ.GroupCreate :D8 NIL i (5 EQ.EnclosureCreate) NIL () EQ.Make.group :D8 (I 3 fontSpec I 2 enclosureSide I 1 enclosureKind I 0 data) !g@hCgAgBh (30 EQN.Make) (19 enclosureSide 13 enclosureKind 4 group) () EQ.AddEnclosure :D8 (P 1 newValue P 0 enclosures I 2 label I 1 formFn I 0 kind) Lgg ABhH*@IhXggH ggh @I (72 LISTPUT 64 EQIO.TypeProp 48 EQIO.TypeProp 14 EQIO.TypeProp) (58 kindMenu 53 group 42 enclosures 37 group 9 enclosures 4 group) () EQ.GetEnclosureData :D8 (I 0 kind) gg @'(14 EQIO.TypeProp) (9 enclosures 4 group) () EQ.enclosure :D8 (P 2 formFn P 1 which P 0 kind I 3 draw? I 2 imageStream I 1 eqnObj I 0 innerBox) ZAg gg Ag IgIghH J@BCIHlJ@jd(65 EQ.GetEnclosureData 38 EQIO.EqnProperty 27 EQIO.TypeProp 10 EQIO.EqnProperty) (55 right 47 left 33 enclosureSide 22 defaultEnclosure 17 group 5 enclosureKind) () EQ.EnclosureCreate :D8 (P 1 which P 0 kind I 0 getWhich?) .@YgHgIhgHh(15 EQ.EnclosureSide 4 EQ.EnclosureKind) (39 enclosureKind 27 enclosureSide 21 enclosureKind) () EQ.EnclosureEdit :D8 (P 1 newValue P 0 editMenu I 0 eqnObj) gg !HT`di dododg dgjdndhdJ ggH H dgY-@gI igY@gI i(173 EQIO.EqnProperty 158 EQ.EnclosureSide 143 EQIO.EqnProperty 128 EQ.EnclosureKind 113 MENU 106 EQIO.TypeProp 14 EQIO.TypeProp) (167 enclosureSide 150 side 137 enclosureKind 119 kind 100 editMenu 95 group 69 DEFAULTMENUHELDFN 60 CLRPROMPT 30 |MENUTYPE#| 23 MENU 9 editMenu 4 group) ( 51 (("symbol" (QUOTE kind)) ("which side" (QUOTE side))) 42 "change what?") EQ.EnclosureKind :D8 (P 0 kindMenu) gg 1Hi`di gg PIOLdJdodg dgjdndhdK ggH H _I_IOOddi3 gOhhM Nh]{N&u(134 MENU 127 EQIO.TypeProp 51 EQIO.TypeProp 14 EQIO.TypeProp) (171 QUOTE 121 kindMenu 116 group 90 DEFAULTMENUHELDFN 81 CLRPROMPT 46 enclosures 41 group 30 |MENUTYPE#| 23 MENU 9 kindMenu 4 group) ( 72 "enclosures") EQ.EnclosureSide :D8 (P 0 whichMenu) ogg HO`dododg dgjdndhdI ggH H (108 MENU 101 EQIO.TypeProp 14 EQIO.TypeProp) (95 whichMenu 90 group 64 DEFAULTMENUHELDFN 55 CLRPROMPT 30 |MENUTYPE#| 23 MENU 9 whichMenu 4 group) ( 46 "Which side?" 37 (left right both)) EQ.angles :D8 (P 9 overlap P 8 spacing P 7 descent P 6 height P 5 width P 4 Vex P 3 Vgap P 2 Hex P 1 Hgap P 0 size I 3 which I 2 draw? I 1 imageStream I 0 innerBox) A  HZd[d\@lK^HN ]lHNl__OOOY@lIM_@K_lHIMl__OOO_BNOOJMOAC OJNLOMhIK (137 EQ.enclosureForm 119 EQ.DrawAngles 30 EQ.enclosureWidth 5 EQ.StreamSize) NIL () EQ.bars :D8 (P 8 spacing P 7 descent P 6 height P 5 width P 4 Vex P 3 Vgap P 2 Hex P 1 Hgap P 0 size I 3 which I 2 draw? I 1 imageStream I 0 innerBox) ] A lHYHZI[J\@lK^HN ]@lIM_@K_BNOOJMAC OJNLOMhIK (90 EQ.enclosureForm 72 EQ.DrawBars 35 EQ.enclosureWidth 5 EQ.StreamSize) NIL () EQ.braces :D8 (P 12 extra P 11 space P 10 point P 9 overlap P 8 spacing P 7 descent P 6 height P 5 width P 4 Vex P 3 Vgap P 2 Hex P 1 Hgap P 0 size I 3 which I 2 draw? I 1 imageStream I 0 innerBox) A lH[HZd\@lK^HN ]NlM^@KM_lHNl__OOOY@lIM_IM_HOl_Ol_d_BNOOJMOOOOAC OJNLOMiIK (153 EQ.enclosureForm 135 EQ.DrawBraces 33 EQ.enclosureWidth 5 EQ.StreamSize) NIL () EQ.brackets :D8 (P 9 overlap P 8 spacing P 7 descent P 6 height P 5 width P 4 Vex P 3 Vgap P 2 Hex P 1 Hgap P 0 size I 3 which I 2 draw? I 1 imageStream I 0 innerBox) A  lHYHZI[J\@lK^HN ]NlM^@lIM_@KM_lHIM__OOO_BNOOJMOAC OJNLOMiIK (125 EQ.enclosureForm 107 EQ.DrawBrackets 35 EQ.enclosureWidth 5 EQ.StreamSize) NIL () EQ.parentheses :D8 (P 9 overlap P 8 spacing P 7 descent P 6 height P 5 width P 4 Vex P 3 Vgap P 2 Hex P 1 Hgap P 0 size I 3 which I 2 draw? I 1 imageStream I 0 innerBox) A  lH[HZd\@lK^HN ]NlM^@KM_lHNl__OOOY@lIM_lHIMl__OOO_BNOOJMOAC OJNLOMiIK (149 EQ.enclosureForm 131 EQ.DrawParentheses 33 EQ.enclosureWidth 5 EQ.StreamSize) NIL () EQ.enclosureForm :D8 (I 8 Vgap I 7 Hgap I 6 verticalWidth? I 5 width I 4 descent I 3 Vex I 2 height I 1 Hex I 0 spacing) ) @lABlCDCjhGEAGFEjCNIL NIL () EQ.enclosureWidth :D8 (L (1 height 0 size)) @AldHIHINIL NIL () EQ.DrawAngles :D8 (P 7 right P 6 left P 5 middle P 4 top P 3 lowerY P 2 lowerX P 1 halfWidth1 P 0 halfWidth I 7 which I 6 imageStream I 5 overlap I 4 width I 3 xShift I 2 spacing I 1 descent I 0 height) DlDklhF ChF ADK@k\K@kl]Gdg*JEH^KJHMDhF JHMNLDhF Gg;JBkjEI_dKJBkjIMDhF JBkjIMOLDhF h(160 DRAWLINE 138 DRAWLINE 93 DRAWLINE 77 DRAWLINE 25 DSPYPOSITION 16 DSPXPOSITION) (101 left 53 right) () EQ.DrawBars :D8 (P 3 lowerY P 2 lowerX P 1 halfWidth1 P 0 halfWidth I 6 which I 5 imageStream I 4 width I 3 xShift I 2 spacing I 1 descent I 0 height) iDlDklhE ChE AFdgJIKE j@kDhE FgJBHKE j@kDhE h(101 RELDRAWTO 87 MOVETO 65 RELDRAWTO 51 MOVETO 25 DSPYPOSITION 16 DSPXPOSITION) (72 left 37 right) () EQ.DrawBraces :D8 (P 9 right2 P 8 right1 P 7 left2 P 6 left1 P 5 middle P 4 top P 3 lowerY P 2 lowerX P 1 halfWidth1 P 0 halfWidth I 10 which I 9 imageStream I 8 space I 7 point I 6 extra I 5 overlap I 4 width I 3 xShift I 2 spacing I 1 descent I 0 height)  DlDklhG ChG Ad K@k\K@kl]Gdg`JEkԾJGk_NKOKFOMGkJMhhDhG JMOMGkOLFNLhhDhG GgrJBkjEk_JBkjGk_OKOKFOMGkJBkMhhDhG JBkMOMGkOLFOLhhDhG h(271 DRAWCURVE 229 DRAWCURVE 149 DRAWCURVE 111 DRAWCURVE 27 DSPYPOSITION 17 DSPXPOSITION) (157 left 55 right) () EQ.DrawBrackets :D8 (P 3 lowerY P 2 lowerX P 1 halfWidth1 P 0 halfWidth I 7 which I 6 imageStream I 5 overlap I 4 width I 3 xShift I 2 spacing I 1 descent I 0 height) DlDklhF ChF AGdgPJIKF j@kDhF jdHF EjDhF JDkKIF EjDhF GgPJBEDKIF EjDhF IjIF j@kDhF jdHF jEjDhF h(205 RELDRAWTO 191 RELMOVETO 180 RELDRAWTO 166 RELMOVETO 155 RELDRAWTO 143 MOVETO 116 RELDRAWTO 104 MOVETO 89 RELDRAWTO 77 RELMOVETO 66 RELDRAWTO 52 MOVETO 25 DSPYPOSITION 16 DSPXPOSITION) (124 left 38 right) () EQ.DrawParentheses :D8 (P 7 right P 6 left P 5 middle P 4 top P 3 lowerY P 2 lowerX P 1 halfWidth1 P 0 halfWidth I 7 which I 6 imageStream I 5 overlap I 4 width I 3 xShift I 2 spacing I 1 descent I 0 height) DlDklhF ChF ADK@k\K@kl]Gdg$JEH^KJHMNLhhDhF Gg0JBkjEI_dKJBkjIMOLhhDhF h(143 DRAWCURVE 87 DRAWCURVE 25 DSPYPOSITION 16 DSPXPOSITION) (95 left 53 right) () EQ.Matrix :D8 (P 7 pos P 6 dataSpec P 5 yShift P 4 xShift P 2 specs P 1 enclose P 0 layout I 2 draw? I 1 imageStream I 0 eqnObj) U@A !H @AB YH ZdII#K IJ ^ _dLOdMK[(62 EQIO.GetDataPosition 54 EQIO.MakeSpec 30 EQIO.GetDataSpecList 23 EQ.enclosure 15 EQIO.GetBox 6 EQ.layout) NIL () EQ.Make.matrix :D8 (P 0 numPieces I 5 fontSpec I 4 enclosureSide I 3 enclosureKind I 2 dataList I 1 columns I 0 rows) =@AgBEgHg@gAgCgDh (58 EQN.Make) (41 enclosureSide 35 enclosureKind 29 columns 23 rows 17 numPieces 10 matrix) () EQ.layout :D8 (P 48 b P 44 col P 42 rowValue P 40 rowPos P 39 boxes P 38 row P 36 colPos P 35 yHigh P 34 xLow P 32 row P 30 col P 28 b P 27 col P 25 rDesc P 24 rAscent P 23 boxes P 22 row P 20 piece P 10 shift P 9 rowGap P 8 colGap P 7 rowData P 6 colData P 5 boxList P 4 layoutBox P 3 fontSpec P 2 rows P 1 columns P 0 size I 1 imageStream I 0 eqnObj) 1A @g @g @g `hddA Kl_oK _d_IjJjjdS0@ %dO(A _"O$ O"h_&O"&_$O&Igj J _JkM#O,O*j_0_2IkO6O4mO._8O._.O0O8O8__OOO_0O2O8__OOO_2NO6NO6 O8_ _O OO O6k_6OO,O0O2O2 O,k_,cIkjONO< _>OIkOJkj!O@O>OBOO@ _BO@k_@OBJkOhdd\LlOLjjLIg $IjFOHkOD IlO6O4-OHO6OHO6k ONO6k O6k_6LIjJjJkMOFO$*OLOJOROPOOOL _T_PIkB0OXOVSON_`ON_NOHOX NOX O`lOPOT _^O\O^h_\_ZOXk_XO^&_\OZ _ROLk_LtOR (736 EQIO.MakeSpec 716 \NCONC2 676 EQIO.MakeDataSpec 656 ELT 648 ELT 607 ELT 543 SETA 537 ELT 524 ELT 495 SETA 477 ARRAY 413 ELT 367 ELT 333 SETA 306 SETA 284 ELT 172 ARRAY 165 ARRAY 124 FS.Box 109 EQIO.EqnDataList 82 STRINGWIDTH 55 FONTCREATE 38 EQIO.EqnProperty 27 EQIO.EqnProperty 16 EQIO.EqnProperty 5 EQ.StreamSize) (472 FIXP 159 FIXP 64 FONTDESCRIPTOR 45 DEFAULTFONT 33 fontSpec 22 rows 11 columns) ( 76 " ") EQ.MatrixAdd :D8 (P 29 d P 25 j P 23 d P 19 j P 17 newD P 15 i P 13 d P 9 i P 6 continueFlg P 5 firstPiece P 4 tempData P 3 newData P 2 dataList P 1 columns P 0 rows I 3 window I 2 place I 1 which I 0 eqnObj) @g @g @ CAdg@ @g I BIJkC O") (EQ.AddEnclosure (QUOTE bars) (FUNCTION EQ.bars) "| bars |") (EQ.AddEnclosure (QUOTE braces) (FUNCTION EQ.braces) "{ braces }") (EQ.AddEnclosure (QUOTE brackets) (FUNCTION EQ.brackets) "[ brackets ]") ( EQ.AddEnclosure (QUOTE parentheses) (FUNCTION EQ.parentheses) "( parentheses )") (EQIO.TypeProp (QUOTE group) (QUOTE defaultEnclosure) (QUOTE brackets))) (* ;;; "general enclosure functions") (FNS EQ.enclosure EQ.EnclosureCreate EQ.EnclosureEdit EQ.EnclosureKind EQ.EnclosureSide) (* ;;; "enclosure form functions") (FNS EQ.angles EQ.bars EQ.braces EQ.brackets EQ.parentheses EQ.enclosureForm EQ.enclosureWidth) (* ;;; "enclosure drawing functions") (FNS EQ.DrawAngles EQ.DrawBars EQ.DrawBraces EQ.DrawBrackets EQ.DrawParentheses) (* ;;; "EQMATRIX module: Part 3 of 5") ( * ; "matrix equation functions") (FNS EQ.Matrix EQ.Make.matrix EQ.layout EQ.MatrixAdd EQ.MatrixChanged EQ.MatrixCreate EQ.MatrixDelete EQ.MatrixEdit EQ.MatrixGetMenu EQ.MatrixSelect) (INITVARS ( EQ.Matrix.MaxPieces 100)) (GLOBALVARS EQ.Matrix.MaxPieces) (P (EQIO.AddType (QUOTE matrix) (QUOTE EQ.Matrix) 1 (QUOTE (objectProps (rows 1 columns 1 enclosureKind NIL enclosureSide NIL) variable? T wholeEditFn EQ.MatrixEdit specialSelectFn EQ.MatrixSelect initialPropFn EQ.MatrixCreate changeFn EQ.MatrixChanged)))) (* ;;; "EQNFORMS module: Part 4 of 5") (* ; "fraction") (FNS EQ.Fraction EQ.Make.fraction) (* ;;; "sum group") (FNS EQ.SumGroup EQ.Make.sum EQ.Make.product EQ.Make.union EQ.Make.intersection) (* ;;; "integral group") (FNS EQ.IntegralGroup EQ.Make.integral EQ.Make.lineIntegral) (* ;;; "super- and sub- scripts") (FNS EQ.Script EQ.Make.sub/superscripts) (* ;;; "max/min/limit etc") (FNS EQ.MaxMin EQ.Make.max/min) (* ;;; "utilities") (FNS EQ.StreamSize EQ.UseNS? EQ.MakeNSItem) (GLOBALVARS EQ.UseNSChars EQ.NSChars) (* ; "EQ.UseNSChars = NIL to use press fonts for display") (INITVARS EQ.UseNSChars (EQ.NSChars (QUOTE (SUM ((CLASSIC 24) 9814) PRODUCT ((CLASSIC 24) 9811) SUM ((MODERN 30) 61306) PRODUCT ((MODERN 30) 61307) INTERSECTION ((MODERN 30) 61270) UNION ((MODERN 30) 61271) INTEGRAL ((MODERN 30) 61301) LINEINTEGRAL ( (MODERN 30) 61302))))) (P (EQIO.AddType (QUOTE fraction) (QUOTE EQ.Fraction) 2 (QUOTE (pieceNames ( "numerator" "denominator")))) (EQIO.AddType (QUOTE sum) (QUOTE EQ.SumGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("index" "limit" "summand")))) (EQIO.AddType (QUOTE product) (QUOTE EQ.SumGroup) 3 ( QUOTE (initialData (-2 -2 0) pieceNames ("index" "limit" "factor")))) (EQIO.AddType (QUOTE union) ( QUOTE EQ.SumGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("index" "limit" "set")))) (EQIO.AddType (QUOTE intersection) (QUOTE EQ.SumGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("index" "limit" "set")))) (EQIO.AddType (QUOTE integral) (QUOTE EQ.IntegralGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("lower limit" "upper limit" "integrand")))) (EQIO.AddType (QUOTE lineIntegral) (QUOTE EQ.IntegralGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("lower limit" "upper limit" "integrand") menuLabel "line integral"))) (EQIO.AddType (QUOTE sub/superscripts) (QUOTE EQ.Script) 5 (QUOTE ( initialData (0 -1 -1 -1 -1) pieceNames ("main value" "right subscript" "right superscript" "left subscript" "left superscript")))) (EQIO.AddType (QUOTE max/min) (QUOTE EQ.MaxMin) 3 (QUOTE ( initialData (0 -2 0) pieceNames ("function" "index" "value") menuLabel "max min limit")))) (* ;;; "EQROOT module: Part 5 of 5") (FNS EQ.Root EQ.Make.root) (FNS EQ.DrawRadicalSign) (P (EQIO.AddType ( QUOTE root) (QUOTE EQ.Root) 2 (QUOTE (pieceNames ("radicand" "index") initialData (0 -1))))))) (EQIO.AddType (QUOTE group) (QUOTE EQ.Group) 1 (QUOTE (objectProps (enclosureKind NIL enclosureSide NIL) pieceNames ("item") wholeEditFn EQ.EnclosureEdit initialPropFn EQ.GroupCreate))) (RECORD EQ.EnclosureData (formFn label)) (EQ.AddEnclosure (QUOTE angles) (FUNCTION EQ.angles) "< angle brackets >") (EQ.AddEnclosure (QUOTE bars) (FUNCTION EQ.bars) "| bars |") (EQ.AddEnclosure (QUOTE braces) (FUNCTION EQ.braces) "{ braces }") (EQ.AddEnclosure (QUOTE brackets) (FUNCTION EQ.brackets) "[ brackets ]") (EQ.AddEnclosure (QUOTE parentheses) (FUNCTION EQ.parentheses) "( parentheses )") (EQIO.TypeProp (QUOTE group) (QUOTE defaultEnclosure) (QUOTE brackets)) (RPAQ? EQ.Matrix.MaxPieces 100) (EQIO.AddType (QUOTE matrix) (QUOTE EQ.Matrix) 1 (QUOTE (objectProps (rows 1 columns 1 enclosureKind NIL enclosureSide NIL) variable? T wholeEditFn EQ.MatrixEdit specialSelectFn EQ.MatrixSelect initialPropFn EQ.MatrixCreate changeFn EQ.MatrixChanged))) (RPAQ? EQ.UseNSChars NIL) (RPAQ? EQ.NSChars (QUOTE (SUM ((CLASSIC 24) 9814) PRODUCT ((CLASSIC 24) 9811) SUM ((MODERN 30) 61306) PRODUCT ((MODERN 30) 61307) INTERSECTION ((MODERN 30) 61270) UNION ((MODERN 30) 61271) INTEGRAL (( MODERN 30) 61301) LINEINTEGRAL ((MODERN 30) 61302)))) (EQIO.AddType (QUOTE fraction) (QUOTE EQ.Fraction) 2 (QUOTE (pieceNames ("numerator" "denominator")))) (EQIO.AddType (QUOTE sum) (QUOTE EQ.SumGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("index" "limit" "summand")))) (EQIO.AddType (QUOTE product) (QUOTE EQ.SumGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("index" "limit" "factor")))) (EQIO.AddType (QUOTE union) (QUOTE EQ.SumGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("index" "limit" "set")))) (EQIO.AddType (QUOTE intersection) (QUOTE EQ.SumGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ( "index" "limit" "set")))) (EQIO.AddType (QUOTE integral) (QUOTE EQ.IntegralGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ( "lower limit" "upper limit" "integrand")))) (EQIO.AddType (QUOTE lineIntegral) (QUOTE EQ.IntegralGroup) 3 (QUOTE (initialData (-2 -2 0) pieceNames ("lower limit" "upper limit" "integrand") menuLabel "line integral"))) (EQIO.AddType (QUOTE sub/superscripts) (QUOTE EQ.Script) 5 (QUOTE (initialData (0 -1 -1 -1 -1) pieceNames ("main value" "right subscript" "right superscript" "left subscript" "left superscript")))) (EQIO.AddType (QUOTE max/min) (QUOTE EQ.MaxMin) 3 (QUOTE (initialData (0 -2 0) pieceNames ("function" "index" "value") menuLabel "max min limit"))) (EQIO.AddType (QUOTE root) (QUOTE EQ.Root) 2 (QUOTE (pieceNames ("radicand" "index") initialData (0 -1 )))) (PUTPROPS EQUATIONFORMS COPYRIGHT ("Xerox Corporation" 1986 1987 1988)) NIL