ZXTape! 0Created with Ramsoft MakeTZXTEXT  ,0 "TEXT" (1:1:7:56999  30 #821,0;" PLEASE WAIT " (<N=19 :G$:R=07:B:G$+R,B:R:N 2"A",28,34",33!,28,62>,63?,63?,31,"B",0,0,0,128,64@,32 ,144,200 7"C",15,7,3,1,0,0,0,0,"D",228,242,250,252,254,126~,62>,28 <~"E",0,480,60<,63?,60<,480,0,0,"F",63?,63?,63?,63?,513,33!,0,0,"G",63?,63?,63?,31,31,31,0,0,"H",255,255,255,255,255,255,0,0,"I",255,255,254,252,248,224,0,0 F@C=0242:0,C;"";1,C;"":C PL=2162:L,0;"";L+1,0;"";L,30-(4L=2)-(2L=4);"";L+1,30-(4L=2)-(2L=4);"":L ZBC=0302:18,C;"";19,C;"":C dq3,20;"";4,20;"";5,3;"LONGMAN SOFTWARE ";6,20;"" n9000(#:9000(# x4A$="MATHEMATICS":L=9 :C=3:9180# 0:1 140:A=57000 !N=023:B:A+N,B:N m33!,0,64@,17,0,228,1,0,27,237,176,201 m33!,0,228,17,0,64@,1,9 ,27,237,176,201 621,0;" " 57000 :21,0;" SEARCHING AND LOADING " &7:1:20,0; ""  #' "dbsize"" #("DOUBLE HEIGHT" #2&n=5705057129):z:n,z:n #F237,75K,176,92\,121y,254,32 ,568,1,201,120x,254,21,568,1,201,205,158,14,197,6,0,9 ,193 #P229,229,120x,60<,205,158,14,6,0,9 ,209,1,0,7,9 ,235,9 ,229,6,4,126~,18,21,18,21,37%,16,248 #Z209,6,4,126~,18,21,18,21,37%,16,248,225,124|,15,15,15,230,3,246,88X,103g,126~,1,32 ,0,9 ,119w,201 #"DOUBLE WIDTH" #n=57150>57241 #z:n,z #n #237,75K,176,92\,121y,254,31,568,1,201,120x,254,22,568,1,201,205,158,14,6,0,9 ,229,14 #8,126~,35#,546,0,6,4,15,568,6,203,14,203,14,24,8,203,14,203,14,203,254,203,246 #Ț16,237,43+,546,0,6,4,15,568,6,203,14,203,14,24,8,203,14,203,14,203,254,203,246,16,237,36$,13 ,32 ,203,225,124|,15,15,15,230,3,246,88X,103g,126~,35#,119w,201 # #)23729\,9 :n=111 #23728\,c # l,c;a$(n) #57150> #357050:23728\,c+1:57050 #c=c+2:n $ (bGIZ PzA MATHEMATICSaText 3S Qp-5S57012:90Z "Text" E 1984 MERCURIAN PULP  PRODUCTS/CONTRACT BOOKS  @7:1:a$=" TEXT ":C=8:23729\,13 (&N=16:13 ,C;A$(N) 223728\,C:57150> <357050:23728\,C+1:57050 FXC=C+2:N:21,0;" ":57000 P<21,0;" STOP THE TAPE - PRESS ANY KEY " Z1,0:0 d1:7:1: i64@,170:40(,0:0,-12 ,-:-40(,0:0,12 ,-:1,8;"START":1,0 k 502 n84T,158:0,-4:64@,0:0,-12 :-128,0:0,12 :64@,0:3,3;"SELECT A FIELD":1,2 p 502 s84T,142:0,-4:72H,0:0,-12 :-144,0:0,12 :72H,0:5,2;"READ THE ENTRIES":1,4 u 502 x84T,126~:0,-5:64@,-22:-64@,-22:-64@,22:64@,22:8,8;"DO YOU";9 ,6;"KNOW THEM";10 ,9 ;"ALL?":1,5 z 502 }148,98b:24,0:8,18;"NO":0,14:80P,0:0,-28:-80P,0:0,14 8,22;"FIND THEM";9 ,22;"IN YOUR";10 ,22;"TEXTBOOK":212,112p:0,12 :-128,0:1,7:502:12 ,12 ;"YES" 84T,76L:0,-4:72H,-24:-72H,-24:-72H,24:72H,24:14,9 ;"ALL";15,6;"THE FIELDS";16,7;"COVERED?":1,9 502 z12 ,480:-8,0:14,1;"NO":0,108l:80P,0:1,11 18,12 ;"YES" 84T,22:0,-4:20,0:0,-12 ,-:-40(,0:0,12 ,-:20,0:20,8;"STOP":1,12 .150:r=07:b:"a"+r,b:r J254,66B,32 ,16,32 ,66B,254,0 H#1;0,0;" Press  any key  to start work " 1,0:0 NZ$(32 ):1:1:0::N=06:7;Z$:N <8:1,1;"Tell me your field of interest" \3,1;"and I will list all of my";5,1;"references for that field." t$(5,24):800 :n=15:t$(n):6+n*2,3;5;" ";t$(n,1);" ";6;t$(n,2):n X#1;1,0;" PRESS  A   B   C   D  OR  E . " '.5,0:23658j\,0 s$="" x$=:x$=""210 x$="e"700 'x$>96`Ưx$<102f240 1,-10 :210 s$=x$ %1,10 :tx=(s$)-96` ,67::1,3;6;t$(tx,3) 633,2;"Please select sub-section." @3800 +40(*(x$-96`):r=x$-97a Js$=x$ Tn ^:i=1n h+p$:"  ";p$(1);" ";p$(2) ri |'''"  0  RETURN TO MAIN CHOICE " I20,2;" PRESS A NUMBER TO SELECT ":.5,10 X$=:X$=""400 X$="0"175 X$<"1"X$>"9"390 x$>n420  s$=s$+x$ 840H+r*40(+x$ 0p$ :v5:1:p=7:l=1:v$(9 ,25):z$(32 )::" SEARCHING FOR ENTRIES ON......" ?)5;" ";t$(tx,3);" " DI6;" ";p$(3);:p$<286;z$(30-p$) IM3,0;1;7;z$;" *** INDICATES IMPORTANT IDEA ";Z$ Nq=1:1000 Xi=1540 bx:p$:p$="end"650 l j=1x vx$:x$=s$5+q*2,1;7-(q/2=(q/2));" ";p$;z$(29-p$):q=q+1:q>7710 j:i L#1;1,0;"   N  FOR NEW FIELD  E  TO END " 1,10 :0 ="n"175 ="e"700  660 E1:57012:21,8;" END OF PROGRAM ": _#1;1,0;" MORE TO COME. PRESS WHEN READY ":1,10 :0 /n=621:n,0;5;z$:n B#1;1,0;" "  q=1:  data for menus ""A GEOMETRY & SETS" #"B GRAPHICAL METHODS" $"C NUMERICAL MATHEMATICS" %"D METHODS & PROCESSES" &"E END OF PROGRAM" H 9 I"1 AXIOMS & DEFINITIONS" J!"2 PROPERTIES OF SETS & GROUPS" K"3 FUNCTIONS & OPERATORS" L "4 SOLIDS" M "5 ANGLES" N"6 CIRCLES & CURVES" O"7 TRIANGLES" P"8 OTHER PLANAR SHAPES" Q"9 TRANSFORMATIONS" p 8 q"1 COORDINATES" r"2 CHARTS & DIAGRAMS" s"3 LAWS & DEFINITIONS" t "4 VECTORS" u"5 MATRICES & NETWORKS" v "6 LOCI" w"7 STRAIGHT LINES" x"8 MECHANICS"  9 "1 UNITS & CONSTANTS" "2 NUMBERS THEMSELVES" "3 STATISTICS" "4 BASES & MODULI" "5 LAWS & DEFINITIONS" "6 SEQUENCES & SERIES" "7 APPROXIMATION METHODS" "8 EQUIPMENT" "9 COMPLEX NUMBERS"  9 "1 LAWS & AXIOMS" "2 OPERATORS" "3 TRIG. FUNCTIONS" "4 POWERS & EXPONENTIALS" "5 POLYNOMIALS" "6 FUNCTIONS" "7 ALGEBRAIC METHODS"  "8 OTHER FUNCTIONS & FORMULAE" "9 VARIABLES"  main data  1,"Abacus","c8" 1,"Abscissa ***","b1" 1,"Absolute","c2" "2,"Acceleration","c1","b8" 1,"Acute ***","a5" 11,"Addition","d2",1,"adjacent","a5" 2,"Affine","b4","a9" 2,"Algebra","c2","c5" 1,"Algorithm","d7" 1,"Alternate ***","a5" 2,"Altitude","a7","b8" 1,"Amplitude","b3" 1,"Annulus","a6" $2,"Anti-clockwise","a9","a5" $2,"Antilogarithms","c7","d4" 2,"Apex","a4","a7" 1,"Arc ***","a6" 1,"Area","a8"  1,"Argand diagrams","c9" 2,"Argument","c9","d9" %3,"Arithmetic","c2","c6","c3" %2,"Associative ***","a1","a2" 1,"Asymptote","b7" 2,"Average","c3","c7" 1,"Axis ***","b1" 2,"Bar Chart","b2","c3" 1,"Base","d4" !2,"Bearing ***","a5","b8"  1,"Billion","c1"  2,"Bimodal","c3","b2"  2,"Binary ***","c4","c2"  1,"Binomial","d5"  1,"Bisect","a7" 2,"Brackets","d6","d7" 41,"Calculate","c5",1,"Calculator","c8" 2,"Calculus","d1","d7" "2,"Cancellation","c2","d1"  1,"Cardinal Number","a3" 1,"Cardioid","b6" &1,"Cartesian Coordinates","b1" 2,"Catenary","a6","b8" 1,"Centigrade","c1" 1,"Centimetre","c1" *1,"Characteristic (logs) ***","d4" 1,"Chord ***","b7" 1,"Circumcircle","a7" "1,"Circumference ***","a6" #1,"Class Interval ***","c3" 2,"Clockwise","a9","a5" &4,"Closed","a1","a2","a8","c2" !2,"Coefficient","c1","d5"  1,"Collinear","b1" !$1,"Column (Matrix) ***","b5" "1,"Combination","a3" ##1,"Common Denominator","c2" $"1,"Common Difference","c6" %&2,"Common Logarithm","d4","c7" &=1,"Common Ratio","c6",2,"Commutative","a3","a1" '1,"Complement ***","a3" (%1,"Complementary Angles","a5" )(1,"Complete the Square ***","d7" +2,"Component","b4","b8" ,#1,"Composite Function","d6" -"1,"Compound Interest","d4" .1,"Computer","c8" /1,"Concave","a6" 01,"Cone","a4" 12,"Congruent","a4","a8" 22,"Conic","b6","a6" 32,"Conjugate","a5","c9" 51,"Construction","a5" 6%3,"Continuous","b2","c3","d9" 71,"Converse","d1" 81,"Conversion","d7" 91,"Convex","a6" ;1,"Coplanar","a8" <1,"Correlation","c3" =$2,"Correspondence","d1","c5" >%1,"Corresponding points","b7" ?1,"Cosecant","d3" @61,"Cosine ***","d3",1,"Cosine Rule","d3" A1,"Cotangent","d3" B1,"Count","c2" C1,"Cross Multiply","d7" D1,"Cross Section","a4" E.1,"Cube","a4",1,"Cube Root","c2" F,1,"Cubic","d5",1,"Cuboid","a4" G)1,"Cumulative Frequency ***","c3" H1,"Cusp","a6" I1,"Cyclic","a2" J1,"Cycloid","b6" K1,"Cylinder","a4" L1,"Data ***","c3" M1,"Decagon","a8" N2,"Decimal","c2","c4" O22,"Degree","a5","d5",1,"Denary","c4" P1,"Denominator","c2" Q'1,"Depression (Angle) ***","a5" R1,"Derivative","d6" S1,"Determinant","b5" T2,"Diagonal","a8","b7" U1,"Diameter","a6" V1,"Difference","d8" W*3,"Differentiation","b3","d1","d7" X1,"Digit","c2" Y81,"Digital","c2",1,"Direct Variation","d8" Z&2,"Directed Numbers","c5","c2" [1,"Directrion","b4" \#3,"Discrete","b2","c3","d9" ]"2,"Discriminant","c9","d5" ^1,"Displacement","b4" _1,"Distribution","c3" `&2,"Distributive Law","a1","d2" a1,"Dividend","d9" b1,"Division","d2" c1,"Divisor","d9" d1,"Dodecagon","a8" e1,"Dodecahedron","a4" f2,"Domain","d9","d6" h1,"Duodecimal","c4" k1,"Edge","a4" l1,"Element ***","a1" m&1,"Elevation (Angle) ***","a5" n1,"Ellipse","a6" o1,"Empty Set ***","a1" p1,"Enlargement","a9" q1,"Envelope","a6" r1,"Epicycloid","b6" s2,"Equal","a3","c5" t1,"Equation ***","d1" u1,"Equator","a4" v!2,"Equilateral","a2","a3" w!2,"Equilibrium","b3","b8" x!2,"Equivalence","a2","a3" y1,"Equivalent","c2" z2,"Euclidean","b1","b3" {%2,"Euler's Formula","c5","d8" |1,"Even","c2" }1,"Expansion","d5" ~1,"Exponent","d4" &3,"Extrapolate","b7","b2","d7" 1,"Face","a4" 1,"Factor ***","c2" $2,"Factor Theorem","d1","d5" 1,"Factorization","d5" 1,"Fahrenheit","c1" 1,"Farey Sequence","c6" #1,"Fibonacci Sequence","c6" 11,"Flow Diagram","b2",1,"Foot","c1" 2,"Fraction","d2","c1" 1,"Frequency ***","c3" 1,"Frustum","a4" $2,"Geometric Mean","a3","c3" &1,"Geometric Progression","c6" 1,"Gradient","b7" 1,"Gram","c1" &2,"Great Circle ***","a6","a4" -1,"Hectare","c1",1,"Helix","a6" 1,"Hemisphere","a4" 1,"Heptagon","a8" $2,"Hero's Formula","d8","a7" 31,"Hexadecimal","c4",1,"Hexagon","a8" &1,"Highest Common Factor","c2" #2,"Histogram ***","b2","c3" 1,"Hook's Law","b3" 1,"Horizontal","b7" 1,"Hour","c1" 1,"Hyperbola","a6" 1,"Hypocycloid","b6" 1,"Hypotenuse","a7" 1,"Hypothesis","d1" 1,"Icosahedron","a4" 1,"Identity ***","a2" 2,"Image ***","d6","a9" 1,"Imaginary","c9" 1,"Improper","c2" 1,"Inch","c1" 1,"Incircle","a7" 1,"Independent","d9" 1,"Index","d4" 1,"Inequality ***","d2" 1,"Infinite","c5" 1,"Inflection","a6" 2,"Integer","c2","c4" 1,"Integral","d6" &3,"Integration","d1","d7","b3" 1,"Intercept ***","b7" 1,"Interest","d8" #2,"Interpolation","b7","d7" $1,"Interquartile Range","c3" 1,"Intersection","b3" 1,"Interval","c2" 1,"Invariant","c1" &3,"Inverse ***","b5","a2","d8" 1,"Irrational","c2" 2,"Isometric","a7","b2" 1,"Isometry","a9" %3,"Isomorphic","a1","a2","c4" &3,"Isomorphism","a1","a2","a3" 1,"Isosceles","a7" 1,"Iterate","d7" 1,"Iterative","d7" 1,"Kilogram","c1" 1,"Kilometre","c1" 1,"Kite","a8" 2,"Knot","c1","a6" *1,"Konigsberg Bridge Problem","b5" "2,"Latin Square","a2","a1" 1,"Latitude ***","a5" 2,"Limit","c6","c7" 1,"Line Segment","b7" 91,"Linear","b7",1,"Linear Programming","b7" 1,"Litre","c1" 2,"Logarithm","b7","d4" 1,"Longitude","a5" !2,"Lower Bound","a2","d6" B2,"Lowest","d7","c2",1,"Lowest Common Multiple","c2" "2,"Magic Square","b5","c2" 2,"Magnitude","b4","b8" 1,"Major Axis","a6" 1,"Mantissa","d4" !2,"Mapping ***","a3","d8" 1,"Maximum","b3" 2,"Mean ***","c3","c2" 1,"Mean Deviation","c3" 1,"Median ***","c3" 1,"Mediator","b7" 1,"Member ***","a3" &3,"Mensuration","a4","c7","d8" 1,"Meridian","a6" 1,"Metre","c1" 1,"Mile","c1" 1,"Millimetre","c1" 1,"Million","c1" 1,"Minimum","b3" 1,"Minor Axis","a6" 1,"Minute","c1" 1,"Mixed Number","c2" 1,"Mode ***","c3" 2,"Modulus","c9","c2" 1,"Multiple","c5" )3,"Multiplication","b5","d2","d9" 2,"Natural","c2","c5" 1,"Nautical Mile","c1" 2,"Negative","c5","c2" 1,"Net","a4" 1,"Newton","c1" 1,"Node","b5" 1,"Nonagon","a8" 1,"Normal","b7" 2,"Notation","b3","c5" 1,"Numeral","c5" 1,"Numerator","c2" 1,"Obtuse","a5" 1,"Octagon","a8" 1,"Octahedron","a4" 1,"Odd","c2" 1,"Ogive","c3" 1,"Operation ***","a3"  3,"Order","b5","a9","a2" 1,"Ordered Pair","b1" 1,"Ordinate ***","b1" 1,"Origin ***","b1" 1,"Orthocentre","a7" 1,"Parabola","a6" 1,"Parallel","b7" 1,"Parallelepiped","a4" 1,"Parallelogram","a8" 1,"Parameter","d9" 1,"Blaise Pascal","c5" 1,"Penny","c1" 1,"Pentagon","a8" 1,"Percentage","c2" 1,"Percentile","c3"  1,"Perfect Number","c5"  1,"Perimeter","a8"  2,"Period","d3","d6"  1,"Permutation","d8"  1,"Perpendicular","a5" 1,"Pi","c1" 1,"Pictogram","b2" 1,"Pie Chart","b2" 2,"Plan","a8","a4" 1,"Plane","b1" 1,"Point","b1" "1,"Polar Coordinates","b1" 1,"Polygon","a8" 1,"Polyhedron","a4" 1,"Population","c3" 1,"Positive","c5" 1,"Pound","c1" 2,"Prime","c2","c5" 1,"Prism","a4"  1,"Probability ***","c3" 2,"Product","d2","d8" 1,"Progression","c6"  1,"Projectile","b8" !1,"Projection","a8" "%4,"Proof","a1","b3","c5","d1" #%2,"Proper Fraction","c2","c5" $ 2,"Proportion","a2","c6" %1,"Protractor","c8" &1,"Pyramid","a4" '-2,"Pythagoras' Theorem ***","d8","a7" (2,"Quadrant","b1","a6" )1,"Quadratic ***","d5" *1,"Quadrilateral","a8" +1,"Quarter","c5" -1,"Quartile","c3" /1,"Quotient","c2" 01,"Radian","a5" 11,"Radius","a6" 21,"Random","c3" 32,"Range","c3","d6" 41,"Rank","c5" 51,"Ratio","c2" 61,"Rational","c5" 71,"Rationalize","d7" 81,"Ray","b7" 91,"Real Numbers","c2" :1,"Reciprocal","d8" ;1,"Rectangle","a8" 1,"Rectilinear","b7" ?1,"Recurring","c5" @1,"Reentrant","a8" A1,"Reflection","a9" B#1,"Reflex (Angle) ***","a5" C1,"Reflexive","a3" D2,"Region","b5","b1" E1,"Regular","a8" F1,"Relation","a3" G@2,"Remainder","c2","d5",1,"Remainder Theorem","a5" H1,"Repeated Root","d5" I1,"Residue","c4" J2,"Resolve","b4","b8" K1,"Resultant","b4" L2,"Revolve","a9","b8" M1,"Rhombus","a8" N1,"Right Angle","a5" P1,"Roman Numerals","c5" Q1,"Root","d6" R1,"Rotation","a9" S1,"Rounding Off","c7" T2,"Row","b1","b5" U1,"Ruler","c8" V1,"Sample","c3" W2,"Scalar","c5","c1" X2,"Scale","c8","b2" Y!1,"Scale Factor ***","a9" Z1,"Scalene","a7" [ 1,"Scatter Diagram","b2" \1,"Secant","d3" ]1,"Segment","a6" ^"2,"Self-inverse","a2","a3" _1,"Second","c1" `1,"Section","a8" a1,"Sector","a6" b1,"Semi-circle","a6" c)1,"Semi-interquartile Range","c3" d1,"Sense","a9" g1,"Sexagesimal","c4" h1,"Shear ***","a9" i1,"Side","a8" j1,"Sieve","c2" k1,"Sigma ","c5" l1,"Sign","c5" m'1,"Significant Figure ***","c3" n1,"Similar","a9" o$1,"Simple Closed Curve","a6" q1,"Simplify","d7" r$2,"Simpson's Rule","c7","d8" s53,"Simultaneous Equations ***","b7","b5","d8" t21,"Sine ***","d3",1,"Sine Rule","d3" u1,"Singular","b5" v1,"Skew Lines","b7" w"1,"Skew Distribution","b2" x1,"Slant","a4" y1,"Slide Rule","c8" z"2,"Small Circle","a4","a6" {)2,"Solid of Revolution","a4","b1" |1,"Solution","d7" }1,"Speed","b8" ~2,"Sphere","a4","d8" 1,"Spiral","a6" H1,"Spread","c3",1,"Square","a8",1,"Square Root","c2" #1,"Standard Deviation","c3" (1,"Standard Index Form ***","c2" !1,"Stationary Point","b3" 11,"Stretch","a9",1,"Structure","a2" 1,"Subgroup","a2" 1,"Subset ***","a1" !1,"Substitution ***","d2" 2,"Subtend","b7","a5" 1,"Subtraction","d2" %1,"Sufficient Condition","d1" 1,"Sum","d2" 1,"Supplementary","a5" 1,"Surd","c2" 1,"Symbol","d1" G1,"Symmetric","a3",2,"Symmetry (line/rotation)","a8","a9" !2,"Tangent ***","a6","d3" $1,"Terminating Decimal","c5" 1,"Ternary","c4" 1,"Tessellation","a8" 1,"Tetrahedron","a4" 1,"Theorem","d1" 1,"Tonne","c1" 1,"Topology","a8" 1,"Torus","a4" 1,"Trajectory","b8" >2,"Transcendental","c5","d9",1,"Transitive","a3" 91,"Translation ***","a9",1,"Transpose","b5" 1,"Transversal","b7" 81,"Trapezium","a8",1,"Trapezoid Rule","c7" 1,"Traversability","b5" ;2,"Tree Diagram ***","c3","b2",1,"Trial","c3" 1,"Trigonometry","a7" 1,"Trinomial","d5" 1,"Truncated","a4" 1,"Turning Point","b2" 1,"Unbounded","d6" )1,"Unconditional Inequality","d1" 1,"Unicursal","a6" 1,"Union ***","a3" 1,"Unity","c1" "1,"Universal Set ***","a1" !2,"Upper Bound","d6","a2" /1,"Value","d8",1,"Variation","d8" 2,"Velocity","b4","b8" &2,"Venn Diagram ***","a2","b2" 2,"Vertex","a4","a8" 1,"Vertical","b7" 2,"Volume","c1","a4"  1,"Vulgar Fraction","c2" 1,"Yard","c1" 1,"Zero","a1" 1,"Zone","a4" 99c,"end" b(Xplqxclc  Pend# }A GEOMETRY & SETS B GRAPHICAL METHODS C NUMERICAL MATHEMATICS D METHODS & PROCESSES E END OF PROGRAM SXeA TEXT TRIG  c  "TRIG" (1:1:7:56999  30 #821,0;" PLEASE WAIT " (<N=19 :G$:R=07:B:G$+R,B:R:N 2"A",28,34",33!,28,62>,63?,63?,31,"B",0,0,0,128,64@,32 ,144,200 7"C",15,7,3,1,0,0,0,0,"D",228,242,250,252,254,126~,62>,28 <~"E",0,480,60<,63?,60<,480,0,0,"F",63?,63?,63?,63?,513,33!,0,0,"G",63?,63?,63?,31,31,31,0,0,"H",255,255,255,255,255,255,0,0,"I",255,255,254,252,248,224,0,0 F@C=0242:0,C;"";1,C;"":C PL=2162:L,0;"";L+1,0;"";L,30-(4L=2)-(2L=4);"";L+1,30-(4L=2)-(2L=4);"":L ZBC=0302:18,C;"";19,C;"":C dq3,20;"";4,20;"";5,3;"LONGMAN SOFTWARE ";6,20;"" n9000(#:9000(# x4A$="MATHEMATICS":L=9 :C=3:9180# 0:1 140:A=57000 !N=023:B:A+N,B:N m33!,0,64@,17,0,228,1,0,27,237,176,201 m33!,0,228,17,0,64@,1,9 ,27,237,176,201 621,0;" " 57000 :21,0;" SEARCHING AND LOADING " &7:1:20,0; ""  #' "dbsize"" #("DOUBLE HEIGHT" #2a=57050 #<.z:z999a,z:a=a+1:9020<# #F237,75K,176,92\,121y,254,32 ,568,1,201,120x,254,21,568,1,201,205,158,14,197,6,0,9 ,193 #P229,229,120x,60<,205,158,14,6,0,9 ,209,1,0,7,9 ,235,9 ,229,6,4,126~,18,21,18,21,37%,16,248 #Z 209,6,4,126~,18,21,18,21,37%,16,248,225,124|,15,15,15,230,3,246,88X,103g,126~,1,32 ,0,9 ,119w,201,999 #"DOUBLE WIDTH" #a=57150> #.z:z999a,z:a=a+1:9130# #237,75K,176,92\,121y,254,31,568,1,201,120x,254,22,568,1,201,205,158,14,6,0,9 ,229,14 #8,126~,35#,546,0,6,4,15,568,6,203,14,203,14,24,8,203,14,203,14,203,254,203,246 #Ȥ16,237,43+,546,0,6,4,15,568,6,203,14,203,14,24,8,203,14,203,14,203,254,203,246,16,237,36$,13 ,32 ,203,225,124|,15,15,15,230,3,246,88X,103g,126~,35#,119w,201,999 # #n=1̱a$ #23729\,l:23728\,c # l,c;a$(n) #57150> #357050:23728\,c+1:57050 #c=c+2:n $ (bGIZ PazA MATHEMATICSTrig ._ [^Vnt0_57012:120x "Trig" I 1984 MERCURIAN PULP  PRODUCTS/CONTRACT BOOKS  FU7:1:A$="TRIGONOMETRY":23729\,13 :C=3:N=1̱A$ P"23728\,C:13 ,C;A$(N) Z57150>:57050 d523728\,C+1:57050:C=C+2:N nJ21,0;" ":57000 x:21,0;" STOP THE TAPE - PRESS ANY KEY " 1,0:0 G180:n=14:g$:R=07:B:g$+R,B:R:n "a",480,72H,8,480,64@,120x,0,0,"b",1,2,4,8,16,32 ,64@,255,"c",24,24,0,0,0,0,195,195 I"d",24,36$,36$,24,0,0,0,0 +Z$(32 ):1:1:0: >2;Z$;Z$;Z$;1,8;" PROGRAM OPTIONS " 96,2;" 1  PYTHAGORAS' THEOREM " 99 ,2;" 2  SINES,COSINES & TANGENTS" :12 ,2;" 3  COMPUTER USE " :15,2;" 4  SOLUTION OF TRIANGLES " :18,2;" 5  END OF PROGRAM " H#1;0,0;" PRESS  A NUMBER  TO SELECT " ,1,0 6A$=:A$=""3106 @A$<"1"A$>"5"300, J1000*A$:200 )st=0:4:7:0: L96`,88X:40(,0:0,30:-40(,-30 D8,13 ;"H";9 ,18;"Y";12 ,14;"X" 21,5;" Pythagoras' Theorem " L:21,0;" " Vl#1;0,0;" Demonstration, Test, or Return? PRESS  D   T  or  R  " `'.5,0:23658j\,0 ja$=:a$=""1130j t a$="d"1200:1100L ~ a$="t"1300:1100L A$"r"1110V  4:96`,88X:0,-40(:40(,0:0,40(:30,0:0,30:-30,0 =-30,40(:-40(,-30:30,-40( D8,13 ;" ";9 ,18;" ";12 ,14;" " ΀y=58:78N10 :96`,y:40(,0:y:x=106j126~10 :x,480:0,40(:x g25:13 ,3;" X=4 ";14,3;" X=16 ":.5,0:502 ؙ136,98b:30,0:136,108l:30,0:146,88X:0,30:156,88X:0,30 g25:8,22;" Y=3 ";9 ,22;" Y=9 ":.5,2:502 n=14:96`+n*8,88X+n*6:-30,40(:96`-n*6,88X+n*8:40(,30:n e25:3,2;" H=5 ";4,2;" H=25 ":.5,4:502 16,4;"H = X+Y":25:.5,5:502:16,18;"= 16+ 9 =25" 2.5,7:502:21,0;z$ W$=Z$+"In any right-angled triangle the square of the hypotenuse is equal to the sum of the squares of the two other sides."+z$ '#1;0,0;4;z$ 6000p:502 w502:18,1;"so H=SQR(X+Y)":502:18,16;"=SQR(16+ 9)=5" r502:19,4;"X=SQR(H-Y)":502:19,16;"=SQR(25- 9)=4"  r502:20,4;"Y=SQR(H-X)":502:20,16;"=SQR(25-16)=3"  502: 4:7:0: L96`,88X:40(,0:0,30:-40(,-30 (P8,11 ;"H";9 ,18;"Y";12 ,14;"X" 22x=(*20)+3:y=(*20)+2 <h=(x*x+y*y):z= Ah=(h*10 )/10 P7z>.6z<.312 ,14;"";x;"" Z+z.39 ,18;"";y;"" d+z.68,11 ;"";h;"" n'q=h:z.6q=x:z.3q=y s0q$="H":z.6q$="X":z.3q$="Y" x 7150 ap1300  st=1:2900T  502 n12 ,4;"SINE = OPPOSITE/HYPOTENUSE";13 ,7;"(SIN a = Y/H)"  502 n15,2;"COSINE = ADJACENT/HYPOTENUSE";16,7;"(COS a = X/H)"  502 m18,1;"TANGENT = OPPOSITE/ADJACENT";19,7;"(TAN a = Y/X)"  502 :21,0;" " r#1;0,0;" Demonstration, Test, Utility or Return?  D   T   U  or  R  "  '.5,0:23658j\,0 a$=:a$=""2070  a$="d"21004:2040  a$="t"2300:2040 % a$="u"2500 :2040 * a$="r" / 2050 4B2900T :5,11 ;"H=30";6,23;"=15" 9 502 >C13 ,1;"Problem Given H and Y find a" C 502 HT.5,0:502:15,2;"S=O/H SIN a = Y/H" M 502 RN.5,0:502:17,9 ;"SIN a = 15/30 = .5" W 502 \I.5,0:502:19,7;" a =ARCSINE 0.5R= 30" a 502 f]#1;1,0;"  E  another Example  R  Return ":.5,10 p.23658j\,0:a$=:a$=""2160p z a$="r" a$"e"2150f B2900T :5,11 ;"H=40";8,13 ;"=25"  502 ?12 ,1;"Problem Given H and a find X"  502 S.5,0:502:14,2;"C=A/H COS a = X/H"  502 g.5,0:502:16,1;"cross multiply";17,9 ;"X =COS a*H"  502 R.5,0:502:19,2;" X =COS a*40 =.91*40=36.4"  502 ]#1;1,0;"  E  another Example  R  Return ":.5,10 .23658j\,0:a$=:a$=""2240  a$="r" a$"e"2235 >2900T :6,23;"=12";10 ,16;"=20"  502 A13 ,1;"Problem Given Y and X find b"  502 S.5,0:502:15,2;"T=O/A TAN b = X/Y"  502 P.5,0:502:17,8;"TAN b = 20/12 = 1.67"  502 M.5,0:502:19,3;" b =ARCTANGENT 1.67 = 60"  502 H#1;1,0;"Last example  any key  to return" 1,0:0: G:'" In the following section you"''" will be set various problems." D'" You can use a calculator or"''" sine tables for these, or you" ]'" can use the Spectrum."'''" If you do not know how the"''" trigonometry functions work," 8'" then go to the  COMPUTER USE"''" option now." $`#1;1,0;"  1  Carry on  2  COMPUTER USE  ":.5,0 .a$=:a$=""2350. 8 a$="2"3000 :2370B =a$"1"2340$ B 2900T L3X=(*20)+10 :Y=(*20)+3 V1H=((X^2+Y^2)*100d)/100d `=A=(((Y/X))*180/*100d)/100d:B=90Z-A j~Z=:Z>.8L5,10 ;"H=";H;6,23;"=";y;8,13 ;"=?":Q$="a":q=a:2435 ozZ>.65,10 ;"H=";H;10 ,16;"=";X;8,13 ;"=?":Q$="a":q=a:2435 tZ>.4L8,13 ;"=";(a*10 )/10 ;10 ,16;"=";X;5,10 ;"H=?":Q$="H":q=h:2435 yZ>.2~L8,13 ;"=";(a*10 )/10 ;5,10 ;"H=";H;6,23;"=?":Q$="Y":q=y:2435 ~a8,13 ;"=";a;6,22;"Y=";Y;10 ,16;"=?":Q$="X":q=x Bz>.618,2;" Angles in degrees please " 7150 ap2370B  2900T 2500 12 ,0;"  Tell me 2 sides or 1 side   and 1 angle. I will work   out the other figures. " +"   ENTER  0 if not known " l=16:c=2 x$:2800 :h=a$ x$:2800 :y=a$ x$:2800 :x=a$ x$:2800 :a=a$ x$:2800 :b=a$ 0"Side H","Side Y","Side X","Angle a","Angle b" #X+Y+H=0(h0(x>hy>h))a+b>90Z#1;1,5;" IMPOSSIBLE TRIANGLE!!":1,10 :1,20:2500 (+H*Yx=(h^2-y^2):2650Z 2+H*XY=(h^2-X^2):2650Z <+Y*XH=(X^2+X^2):2650Z F8B=0B=90Z-A:18,26;6;B K8A=0A=90Z-B:16,26;6;A P;HX=(A*/180)*H:Y=(A*/180)*H:2670n T;YX=(B*/180)*Y:H=Y/(A*/180):2670n V;XY=(A*/180)*X:H=X/(A*/180):2670n ZA=(Y/H)*180/ _b=(X/H)*180/ nVx=(x*10 )/10 :(20,9 )=63?20,9 ;6;X sVY=(Y*10 )/10 :(18,9 )=63?18,9 ;5;Y xVH=(H*10 )/10 :(16,9 )=63?16,9 ;4;H }dA=((A+.05|L)*10 )/10 :(16,26)=63?16,26;6;A dB=((B+.05|L)*10 )/10 :(18,26)=63?18,26;6;B J#1;1,0;"   A  for Another  E  to End " '23658j\,0:.5,0 a$=:a$=""2720 a$="e" a$="a"2500 2700 T.5,0:1,0;(" ";x$;" ");a$:6100:f2800 +l,c;x$;"=";0+(7a$="0");a$ 1l=l+2:l>20l=16:c=18  S T3:7:0: ^31,3;" SINES,COSINES & TANGENTS " hO68D,100d:100d,0:0,568:-100d,-568 m9156,100d:0,10 :10 ,0 r`88X,100d:-3,10 ,2:168,144:-12 ,4,-2 |~8,12 ;"a";4,19;"b";5,12 ;"H";6,22;"Y";10 ,15;"X"  H0:0:7::0,0;" COMPUTER USE " 16,0;"Computers measure angles in"'"RADIANS not DEGREES."''"Imagine a segment where the ARC"'"is the same length as the RADIUS" 250 (128,108l,60<:502 0128,108l:4;0,60< 3900< ix=550210 :128,168:4;x,-60<+(x*7/11 ),-x/557 n=110 :n:x ax=28-32 -10 :178,140:4;-502,x,(x+32 )/557 n=110 :n:x O4,14;1;7,20;1;1,21;1 "16,0;z$;z$;z$;z$;z$ 416,3;" The angle is 1 RADIAN ." c" The arc here is 1 Radius"'" The circumference is 2**R"''" 2* RADIANS make a circle." !O3900<:4,14;" ";7,20;" ";1,21;" " &Xa=.43\(5.43-\1:128,107k:3;a*60<,-a*60< 0 502:a :816,1;"  2* RADIANS = 360 DEGREES " D"17,0;z$;z$;z$;z$;z$ N:18,0;"1 Rad=360/(2*)=180/=57.3" X*''"1=2*/360=/180Rad=0.017Rad" b 3900< ,:0,0;" COMPUTER USE "; R16;"SIN COS TAN";1,16;"Q  W  E " "16;"ASN ACS ATN" ("   ALL ""E"" MODE FUNCTIONS " +''"To find the SINE of a use SINa" e''"If the angle is in DEGREES ..."'"EITHER use SIN(a*/180)"'"OR convert to Radians first." M''"(This program's SCRATCHPAD has a conversion function built in.)" 23900<:n=521:n,0;z$:n _5,0;" Use the  SCRATCHPAD  now to find SIN 30 " 1'" Use either method.":st=2:7000X 3900< N5,0;" Did you find that SIN 30=.42? "'z$;z$;z$:3900< _5,0;"To convert a SINE to an angle use the  ARCSINE (ASN) function." n'" To convert Radians to Degrees EITHER use a=a Rad.*180/ OR use the SCRATCHPAD function." +z$;" What angle has a SINE of 0.71? "  7000X 23900<:n=513 :n,0;z$:n 45,0;" NOTE: the SCRATCHPAD works to 2 decimal places. It is not as accurate as SPECTRUM's normal functions. " >m'"Try some more calculations now. ACS=ARCOSINE (COSINE - ANGLE ) ATN=ARCTANGENT (TANGENT - ANGLE)" H7000X: <""3900< FV.5,0:#1;1,2;" Press  any key  when ready " P=""3920P Z>#1;1,2;" " d st=0:4900$ \12 ,1;" We can calculate all 3 sides  and angles if we know either.." P'" (1) 3 sides"'" (2) 2 sides + between"'" (3) 2 's and any side." )'" See the insert for the proofs. " :21,0;" " r#1;0,0;" Demonstration, Test, Utility or Return?  D   T   U  or  R  " '.5,0:23658j\,0 a$=:a$=""4120 " a$="d"4200h:4090 , a$="t"44000:4090 6 a$="u"4600:4090 @ a$="r" J 4100 h4900$:502 r912 ,4;"Z=24 Y=15 X=10. Find a" t_28,84T:192,0:0,-16:-192,0:0,16 w 200 |'" COSa=(Z+X-Y)/2ZX"  200 H'" COSa=(24^2+10^2-15^2)/(2*24*10)":250:'" COSa=451/480=0.94"  200 "'" a=ACS .94 = 0.35 Rads = 20"  250 4850:e 4900$:502 712 ,4;"Z=30 X=18 a=30. Find Y" _28,84T:192,0:0,-16:-192,0:0,16  250 '" Y=X+Z-2ZX*COSa"  250 "'" Y=30^2+18^2-2*30*18*COS 30"  250 '" Y=SQR 288.4 = 16.9"  250 4850:e 4900$:502 812 ,2;"a=40 c=60 Z=16. Find Y" _12 ,84T:216,0:0,-16:-216,0:0,16  250 '" Y=(Z*SINa)/SINc"  250 '" Y=(16*SIN 40)/SIN 60"  250 $'" Y=(16*SIN.7 Rad)/SIN 1.05 Rad"  250  '" Y=11.9"  250 F#1;1,0;"Last example  any key  to return" &.5,0:0: 0 4900$ :y=(*20)+5 Dx=(y*(1+))+1 Nz=(x*(1+))+1 S zx+yz=z-2:4435S X 4970j vnr=:r>.66(12 ,4;"Z=";z;" Y=";y;" X=";x;". Find a":q=a:q$="a":4500 lr>.33(12 ,3;"Z=";z;" X=";x;" a=";a;". Find Y":q=y:q$="H":4500 \12 ,1;"Z=";z;" a=";a;" c=";c;". Find Y":q=y:q$="Y":4500 ^4,84T:248,0:0,-16:-248,0:0,16  7150 ap44000  4900$:12 ,2;" What do you know ? ";14,2;" 1  all 3 sides ";16,2;" 2  2 sides + between " k18,2;" 3  2 angles and a side ";20,2;" 4  none of these " Cx=0:y=0:z=0::a=0:b=0:c=0  \#1;1,3;" Press  1   2   3  or  4  ":.5,0 a$=:a$=""4630  fa$="4"#1;1,3;" Sorry, I can't help you. ":1,10 :502: %a$="1"4670> *a$="3"4700\ /a$="2"4760 4 4620  >X.5,0:1,0;" Side X ? ";a$:6100:f4670> C x=a$:BN=X HX.5,0:1,0;" Side Y ? ";a$:6100:f4680H My=a$:SN=Y:Y>XBN=Y:SN=X RX.5,0:1,0;" Side Z ? ";a$:6100:f4690R Wz=a$:Z>BNBN=Z:SN=X+Y XZ Z4970j:4800 \4700\:.5,0:23658j\,8:1,0;" Which side ? (X,Y,Z)";q$:q$"X"q$"Y"q$"Z"4700\ ac.5,0:1,0;(" Length of Side ";q$;" ");a$:6100:f4705a fq$="X"x=a$:p$,p$ hq$="Y"y=a$:p$ jq$="Z"z=a$ l"a","b","c","a" p#cn=0:n=12:q$ zT1,0;(" Size of ";q$;" (degrees) ");a$:6100:f4730z |q$="a"a=a$ ~q$="b"b=a$ q$="c"c=a$ ?cn=cn+a$:n:cn=0cn1806300:4700\  62008 qzy=(z*(a*/180))/(c*/180):x=(z^2+y^2-(2*z*y*(b*/180))):4800 qxz=(x*(c*/180))/(b*/180):y=(z^2+x^2-(2*x*z*(a*/180))):4800 qyx=(y*(b*/180))/(a*/180):z=(y^2+x^2-(2*x*y*(c*/180))):4800 4760:.5,0:23658j\,0:1,0;" Which angle ? (a,b,c)";q$:q$"a"q$"b"q$"c"4760 e.5,0:1,0;(" Angle ";q$;" (degrees)? ");a$:6100:f4762 3A$=0ŰA$>1796300:4760 q$="a"a=a$:p$,p$ q$="b"b=a$:p$ q$="c"c=a$ "X","Y","Z","X" n=12:q$ L1,0;(" Length of ";q$;"? ");a$:6100:f4774 q$="X"x=a$ q$="Y"y=a$ q$="Z"z=a$ n Pz=0z=(x^2+y^2-(2*x*y*(c*/180))):4790 Px=0x=(z^2+y^2-(2*z*y*(b*/180))):4790 Dy=0y=(z^2+x^2-(2*z*x*(a*/180))) ca=0a=((x^2+z^2-y^2)/(2*x*z))*180/:62008:4800 cb=0b=((y^2+z^2-x^2)/(2*y*z))*180/:62008:4800 Wc=0c=((y^2+x^2-z^2)/(2*y*x))*180/:62008 'n=12 20:n,0;z$:n ?x=((x*10 ))/10 :14,2;"Side X=";x ?y=((y*10 ))/10 :16,2;"Side Y=";y ?z=((z*10 ))/10 :18,2;"Side Z=";z 8a=((a*10 ))/10 :14,18;"a=";a 8b=((b*10 ))/10 :16,18;"b=";b 8c=((c*10 ))/10 :18,18;"c=";c 4850:e  4600 D#1;1,2;" A  for Another  E  to end " '23658j\,0:.5,0 a$=:a$=""4870  e=0:a$="e"e=1:  a$="a"  4860 # $M4:7:0::1,4;" SOLUTION OF TRIANGLES " .P40(,96`:144,0:-40(,60<:-104h,-60< 8e2:60<,96`:-3,9 ,1:170,96`:4,11 ,-1 B1148,148:-14,0,-1 L(144,156:0,-60< V0:5,11 ;"Z";5,21;"Y";10 ,16;"X";8,9 ;"a";8,20;"c";4,16;"b" ` j@a=((z^2+x^2-y^2)/(2*x*z))*180/ oa=((a*10 ))/10 t@b=((z^2+y^2-x^2)/(2*z*y))*180/ yb=((b*10 ))/10 ~c=180-(a+b): :57012:21,8;" END OF PROGRAM "  pZq=1̱w$-32 :#1;1,0;7;w$(qq+31):10 :q z a$=""a$="0" :f=0:i=1̱a$:a$(i)<"0"a$(i)>"9"f=1 a$(i)="."f=0 i: 8a=0a=180-(b+c) Bb=0b=180-(a+c) Lc=0c=180-(a+b) V m#1;1,5;" IMPOSSIBLE TRIANGLE!! ":1,10 :1,20:502: X5" ":l=1421:l,0;6;z$:l Zst=13,0;"SINa=Y/H"'"Y=SINa*H"'"H=Y/SINa"''"COSa=X/H"'"X=COSa*H"'"H=X/COSa"''"TANa=Y/X"'"Y=TANa*X"'"X=Y/TANa" bpl=18:14,0;" Press  C  to calculate or "'" D convert degrees to radians" g[" R Radians to Degrees E to End "'" If you ""crash"", type GOTO 7020 " hj.5,0:#1,1,0;"  Press  C   D   R  or  E  " i.23658j\,8:a$=:a$=""7017i ja$="E"7100 ka$="R"7050 la$="D"7070 qa$"C"7010b vl23658j\,8:.5,10 :0,0;"  ENTER  like this - 30*45 :";a$ |Ia$="Y"a$="X"a$="H"a$="A"a$="B"a$="C"1,30:7020l Ul,0;a$;"=";(a$*100d)/100d;" ":l=l+1-(4l=21)  7016h W1,0;"  ENTER  Angle in Radians:";a$:6100:f7050  l,0;" ";a$;"Rads = ";((a$*180/+.005y# =)*100d)/100d;"":l=l+1-(4l=21):7016 h W1,0;"  ENTER  Angle in Degrees:";a$:6100:f7070  l,0;" ";a$;" = ";((a$*/180+.005y# =)*100d)/100d;" Rads":l=l+1-(4l=21):7016h st=2 ;" ":14,0;7;z$;Z$;Z$;Z$;Z$;Z$;Z$;Z$;: >st=1l=313 :l,0;" ":l  E#1;1,2;" Scratchpad ?  Y  or  N  " '1,10 :23658j\,0 a$=:a$=""7160  a$="y"7000X:7200   a$"n"7155  =21,0;"   ENTER  the value for ";q$;" " *J.5,0:0,0;" Answer to 1 decimal place ";a$ >6100:f7210* HG20,10 ;6;a$:j=a$:(j-q)/j<.05|L7300 RZ#1;1,0;" Wrong.Try again?  Y  or  N ":.5,-10 \.23658j\,0:a$=:a$=""7260\ fa$="y"7210* pVa$="n"#1;0,0;" The value of ";q$;" is ";q;" ":7310 z 7250R 2#1;0,9 ;" Near Enough! " ]#1;1,0;"  A  for Another  R  to Return ":.5,10 .23658j\,0:a$=:a$=""7320 "ap=0:a$="a"ap=1:  a$="r"  7310 F}jbpGdxyhahzz0qXfj=pcQH# A TRIGONOMETRYf