RE: LZ: Fractions
[Prev][Next][Index][Thread]
RE: LZ: Fractions
-
Subject: RE: LZ: Fractions
-
From: Edward Plese <eplese@lnd.com>
-
Date: Thu, 22 Aug 1996 10:39:20 -0500
-
In-Reply-To: <>
>The problem with this routine is that it won't work if you want to divide it
>by 3, (or 7, or 9, or whatever). I'd need a generic routine. If there is no
>generic routine, this would be a good idea, but I was hoping for a simple
>routine that would work for most numbers. (Actually, I need to divide
>numbers by 2, 3, 5, and 10, and maybe some others later).
Well, my routine will not work for 3, but will work for the other three by changing what you multiply the number by.
Ed Plese, Jr.
(eplese@lnd.com)
begin 600 WINMAIL.DAT
M>)\^(C(0`0:0" `$```````!``$``0>0!@`(````Y 0```````#H``$-@ 0`
M`@````(``@`!!) &`'0!```!````# ````,``# #````"P`/#@`````"`?\/
M`0```&D`````````@2L?I+ZC$!F=;@#=`0]4`@````!L:7-T+7IS:&5L;$!D
M969I86YT+G)B:RYS;VQL96YT=6YA+G-E`%--5% `;&ES="UZ<VAE;&Q 9&5F
M:6%N="YR8FLN<V]L;&5N='5N82YS90`````>``(P`0````4```!33510````
M`!X``S !````)@```&QI<W0M>G-H96QL0&1E9FEA;G0N<F)K+G-O;&QE;G1U
M;F$N<V4````#`!4,`0````,`_@\&````'@`!, $````H````)VQI<W0M>G-H
M96QL0&1E9FEA;G0N<F)K+G-O;&QE;G1U;F$N<V4G``(!"S !````*P```%--
M5% Z3$E35"U:4TA%3$Q 1$5&24%.5"Y20DLN4T],3$5.5%5.02Y310```P``
M.0`````+`$ Z`0````(!]@\!````! ````````.J5 $(@ <`& ```$E032Y-
M:6-R;W-O9G0@36%I;"Y.;W1E`#$(`02 `0`2````4D4Z($Q:.B!&<F%C=&EO
M;G,`F@4!!8 #``X```#,!P@`%@`*`"<`% `$`#H!`2" `P`.````S <(`!8`
M"@`C`#8`! !8`0$)@ $`(0```#!"131$,SA&,#A&0T-&,3$Y,D4P-#0T-34S
M-30P,# P`/X&`0.0!@"P`P``$@````L`(P```````P`F```````+`"D`````
M``,`-@``````0 `Y``#W%!9 D+L!'@!P``$````2````4D4Z($Q:.B!&<F%C
M=&EO;G,````"`7$``0```!8````!NY! %A2/T^0,_ @1SY+@1$535 `````>
M`!X,`0````4```!33510`````!X`'PP!````#P```&5P;&5S94!L;F0N8V]M
M```#``80A_\<AP,`!Q"+`0``'@`($ $```!E````5$A%4%)/0DQ%35=)5$A4
M2$E34D]55$E.14E35$A!5$E45T].5%=/4DM)1EE/55=!3E143T1)5DE$14E4
M0EDS+"A/4C<L3U(Y+$]25TA!5$5615(I241.145$04=%3D5224-23P`````"
M`0D0`0```$ "```\`@``*P0``$Q:1G5(!B>A_P`*`0\"%0*H!>L"@P!0`O()
M`@!C: K <V5T,C<&``;#`H,R`\4"`'!R0G$1XG-T96T"@S.W`N0'$P*#-!+,
M%,5]"H _",\)V0* "H$-L0M@;F=X,3 S%% +"A5B`= @7CX+1A11"_(34&\3
MT&/A!4!4:&4@&_$"8!/@8B #\'1H(!U0! `@>0-@=70+@!R0':$=4&$O!4 =
M0!T@`B G'N)R:_$>0&8@>0A@'2 `< 5 @'1O(&1I=FD-L \>P0J/&E\;;V)Y
M(#-H+" H!;$W)* %L3DE)1-W'I%E=@20*2Y@($DG9" >( F (-AA(&<)\ 9Q
M8QW&)E'/'\ =4 20'C-N;R$W(A\_(R\<02<M)* =@Q\`=6SM)I!B') G`6\$
M<!Y #;!Z822@8AWP)F @$00@:.1O< N 9R "$ 7 )P#U`)!M"U!E*1\J+QNZ
M'=9_'H,M5!]C+\($8!/ )J!U2P;0!)!S)E H01Q =?D'0&QY)* N\":S('<P
MCV\QGQNZ-74D4C(DH"21-;\DH !P)I 9<#NT`,!Y+;'^<P-P') <$"AQ!" +
M8!/0CR8Q(34WO1N$(%=E-F#])*!M)' =U@/P-F HX1]%_R_"))$NLD$#-)<H
M83TT'7%_"=$D4A%Q&5 O@B7"']-M_RUP'@`+4"1P0W(U="11)E#K/H8A-44F
MD% <\!&P)*!D2G(^%BAE,%$1L$#*;#O@+@6@;2D^GQNK7SXN"QE+;TSC%L$`
M3Z #`! 0`0````,`$1 `````0 `',"#>+IL_D+L!0 `(,"#>+IL_D+L!'@`]
3``$````%````4D4Z( `````P^@`'
`
end