Hi, everybody,
after posting this erroneously in the german echo (in english, gasp!), here
it is for you, too: I did 2 btms to put the %@eval function to good use:
XEULER determines the greatest common divisor of 2 positive integers, XSROOT
determines the sqare root of a positive (decimal) number. Perhaps you can use
them (zipped and uuencoded):
begin 600 Xmath.zip
M4$L#!!0````(`(.)B"3\2T7#.P(``,D'```+````6$550TQ)1"Y"5$V]E/]J
MVS`0Q_\/Y!V^*XBU;'AU_N@?`4.[M1NCVPJ+"QTEK$XLVP+IM$E*DSY7'V#[
M8R^Q/O3T.7L;O@4Q0:N$*CMSP
MQ''K,-5*:4(JKH75!CK#`#13$VYLOS<<5@\PN4&S3F4RLWC/!16)2?U^=^UF
M6DH]%Y3C6%,B4YP$.*69*YY:[+R>49HH3BZ1.)*Y-L(5RN[L]7O]7N5MN8.*
M6-A*%+%!O2LR!$PABA`@T*9\,?)2KIW&Z-.'^.BB,66'92+5OH[W16D:WS("VN&9?*C^.ACW`9K(G;(KQ-9G@C&2J]QBS-5I/O8K>P6
M40EDSSSN[#S>6\M^A:`EPG00:AUA[D%0@S!+A&H0&7S!]JLF(*^MO4J@:C4U
MUFNXM'QCKY,YI[1$+^O1>DP+';2?B.]ONM;*5OW'0B24@@T@[/`*5VU>>I)'
M[/,D[VBR2I.M-%,MM<'$",P+@?(`P],NG"VZ=NPLRRLCIFOB1LS=\-EAIHU*
MW&5X$(0'SUDX?L$639G#4A@_8#U8LQZTUE]GPOD^:EIJ&:"TJQRGAG,J?]>^
MEQU?+.W[O5\_MK2^]7NWV-*Z]:SNS*F/P9M'3)P[6-N,:W1#+EELS*N_9/V#
M>H%"T*#>FPLID7+'C1+$_S2T'XSKB[;"B6L.08[G59W)W['VM/^6X]KR/P2[
MKA!VU>M[CV!M,ZYML;YOZS[^K(<`I[2^[K\!4$L#!!0````(`#R)B"1/V^*[
M:`4``$`/```*````6%-23T]4+D)43;U7[V[;-A#_7J#O<"@@S'9M17*S+35F
M($F38,':IHV]H8,A-)1%R41H,J6HQ'FN/L#V82^QO4N!'47JCQTWZP=C^I*(
MO/O=[WYW/-&C$7%Q=0_GKX!@%\UXTS?@Y8P)WQ><*(IZ`6%_%-!%`4E
MI0:9`H&,W5(!HEC&5#U]8H!^HRIG4D#H!P#!P>#HW>4@?/GRP.[&]]`\OW!2
MY/"&,K$@*H'.V?G)!0Q'P_WA#WMA$'SOO^@:+^LY7;`<[DB.0?,B5K+03%`X
MASLED5PJ%2R1,+FA-65A<"EIT^,S(=TOI#(,+6OO9QJ+C$S]UH(PAGJ
MVJOL60J^%\)X##[X4OG@'6*!J6+SF1=&P#6$;CU$%A!`)I'/Y/>WTZ,/%@$C
MP,0&XEJ,P?#@+I$HNH3QKM7+U6;;Z#3HF(JK3M-QMI*N2E<&TRCUD&G6/S
M[;(O?3,L%24YA4)HQH%I2)G.N]N[SY`=>#.AHO*SL=DT[1RM0SP(6USK>N\Q
MV,BPW:D;_?<@W;725WPVFGQ4?7+J\2\+W$$JX6FX\NOCQN9,\UN:77#$/XCK-SUFHKR6@W5-<2Z]J'([=71G!0!';_[
M"!3):W=W:_3+TYI1M22BWIO+Y9)@"N(1J)A:1C0QUTE+
M/"[[IT(:G3K4SWRXVN^_N.KZ6\S^EPHVCVTTZ&CSZ\V>W^ZW0>V*U9^[F0Q_
M5].(BL3.G69B_0M02P$"%``4````"`"#B8@D_$M%PSL"``#)!P``"P``````
M```!`"``````````6$550TQ)1"Y"5$U02P$"%``4````"``\B8@D3]OBNV@%
M``!`#P``"@`````````!`"````!D`@``6%-23T]4+D)435!+!08``````@`"
+`'$```#T!P``````
`
end
Greetings, *Klaus*
--- FIPS/32 v0.99b W95/NT [M]
---------------
* Origin: It doesn't work, but it looks pretty. (2:2426/1005.3)
|