Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!cs.utexas.edu!sun-barr!newstop!sun!grapevine!koreth@panarthea.ebay.sun.com From: koreth@panarthea.ebay.sun.com (Steven Grimm) Newsgroups: comp.binaries.atari.st Subject: v08i002: undoub -- Remove duplicate lines from files Keywords: arc, uue Message-ID: <34441@grapevine.uucp> Date: 3 Oct 89 21:14:13 GMT Sender: news@grapevine.EBay Reply-To: BD05@DKAUNI2.Bitnet (Roland Waldi) Lines: 228 Approved: koreth@panarthea.ebay.sun.com Submitted-by: BD05@DKAUNI2.Bitnet (Roland Waldi) Posting-number: Volume 8, Issue 2 Archive-name: undoub This is a very special utility, which I posted earlier within BITNET. I use it when I merge two files containing data tables: I load both tables into my editor, then sort the whole file to get the same order I had before for each of them, and then I remove the double-entries with UNDOUB. Thus I can merge table-files and get rid of redundant information, which has been in both original files before. You may have a different application for it, anyway: UNDOUB reads a file and removes all lines from it, which are identical to their predecessor. As I learned from Steve Grimm, this is the same that UNIX 'uniq' does. So feel free to rename it to UNIQ.TTP, if you are unix fan! If you have use for it, enjoy it! R. Waldi table !"#$%&'()*+,-./0123456789:;<=>? @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ begin 644 undoub.arc M&@A53D1/54(N34%. #_:@$ $$30;3,>K$! ,59P0>5)%" @0=LK(F9/Fz MC1L0,5S @-$"QXT7,6(T4 "$@(Q>4!(><,FC!LR(*Z$84,F#0L00HC J $"y M" @B2X($3"+#A9 D5)P4H;)Q(YPZ2$&4-'H5LX"M.N+0,"Q6 ;;\>P<0%BB!003(RD**J@SIPP9YH"'A!Pv M8$$0<>>Z"=.F#.DQ;^#DD9/F#!HZ3CD&;DW08!JWN'7S]@T6Q9 4$'-8! %2u M)$F3*%6R3.-B-14TE.'(>7-&<1L0;<*$%$/9=!DR+Y.G>:_W) BI+?WR%E.Gt M,#D!5I*!RDM(.ME)W6<6/F'#\FY P"0m ML#&M2X"&RR^L @ "H#22R1J8C6X!A#8(%[3-.*CZ+UMI)LAI76;@!D" PV\Hl M@.BNX 6*F+K_T9I,PA"41V!$Z(XY.0"SRZ6!I%^OJP"RT?M-)@ !E^V7GASLk M4?'>@>R)<=D40/@ !@D!,'./W) H2 L%[B9#?2)$D"<04*KD+(1**P\f M&!GH?#Q,RD^EJ&#*@!1%@.'*#P7\8,!\^GTJZ >F&(LK:%@ !]VPNB1@RV5"e M'+&?:I-E(.(C!C8FQU2E63$9!NP8*^&D^)26Q+O:C/;# =>]Z\QE3'P# #A.d M?!2;%0.-=Y@4KAS&H0#$_4/B#\59)4!I SC1Q&A@$&RP; EWAP###D, ,0 2c M0T!Q:8R"S(G($ T'Q;(\4B0@1 0@)0 ( (@7//)LMMAT 0VDOa MO.L!%8_$R8^3=)6FP;L,C!:$.__8X94;M#%,6^V_w M*\^3'J>!]TS%<*5Q0NI \!X)CYT 3G>U(+05! ^ # '[QX#EU\(I'C066 +N1#$N.BM\E80!"C&5/ t M&""S@PW$-@. 0]8T \T<.)3:B#<84# 1C?8@(UJ0,(PH#$($D3(!379$S1*s M:(8,TK$?8#"#!G 'BX8A0#IW^L<_.M,/,DRF )R@VYY\<4@PR("-9G ?+ +Qr M!@3 )1( 889,)&,%@E!T!HH[,RTP\W4-*2NO !][# .*+.n M;(X<(S#2=K!_4&-?P1Q()=^@@%M.A@"@H!L2^$>-^9 !;XC1!3_D(2\ E*FDm M4J@*"*YXF,E00 *C^2@98@J 2AKSE,J4P0:IT2,J*F610$@!%!"9@NXPH)8Yl MZ X$^F$&-0[DHVKX*!H^R@:W L ''V"I;/XACWT)P17_T(<0^" ,!C! =R@@7?6R-T0(@*]\ 8 "Z7H6",RE G9YP-PN=)<&ZA4O $)$g MA=8!8 'HM6][8Z+?^=87.O<]3(7YZU_*\8.Y2'@N!@6 #N9"0<1G$@ WF/L f M%%,.&LR=PV:TQMPE/-<#S$69/-X@@2D0=@J.G(_9)J,/27269J!!U3A4IRF_4[WRD $@&3"%(, B"&R0@!0(2S(?[8821';"D07@!>8>d M8<808.X=F,S<,#P7"3Z CCQ*-Q],$#E,CP#R81IJ*C>H([J%/8)B&?NC($$6c M I(] &5K8MGY<&(R^7#'D0/@#^9RX+D*Z$&(R-#A -"#N0%XK@L2NUA -M;1b MO(/T$1CM6/N9@1SS 06F3;%I6S#7 <]E0X[Y^@8P^)BO@C8S $B!:4!PI0)\.!76+&U9@6(;IV0Q)=Y$,+X%(T ^;C"DPKR:"TAC65S3$?66!:!IL6z M G.G\%PNS,<6F.; LUT=;:8&=0.X2&)3O8V"+@% %Y/!ASW"#89Q[\87"4?'y M9=#MZD8_]H=F8/=NA)'P?SD1 -Y@KA2>F\'Y&"/AWWI$GFOBB1\KF@/I/D3]x M?BB"BA]#&H\- @0 06@;>",A'MAXK.VN;HAw MD/'Y2"/A1.@L%9@KAN=B0-0 *,.%USOA < 7[&;P+P\@\"1Q&A4%6-9R3;K\v M938L4F1EA@!@:\,_?"3\-X\8,U_=&H!"\@,%\['&9.[!#3%!QQ]XU2O"BH-Mu M73P !73CSB &@@ W&,"N8/# #UQ=&A],!@)JN PLB0E?-4IRE7:5O'1U$P 4t M"#T#[IA5KQ?G%Y6CT!O+PFK1WJ2M[_&0<@(/.>L"M I [ X3!AZ5JD&)"=X T1A-A\7]Lr M\J,_3+\LCXK7W%^ZAF,A]X #)H $8& !,+ "XU1V6O,\ * "EV$-7"$>"R" q M." """ -/P$ !4 +H]0&V)!_0?4/KD W)O %DC<0AB-'"." 61=\M?)Y>*)]p M,)" "Q@B$' &Y:& !C 9#> &X+(&X_0#"OA!NN /9B-;,9A]L"<<)YB"N7$.o M 0 !+&B#"E!V=<*$ X$)+C !GK * /!Y"GB%(5(\5F"%$R8 Y<2$=H"&[C4Qn M%B,$IT"$-7$:R, \!_ "/$B'1J@!(L!+S?$/:SB#8 $ K &__ 'XS0FJ10-m M8.@ %,( 0J@4#/ &'% : 6"#!$ $^@$,XE.$IZ%%CW "Q.$ )@"&YB2$)"42)'*$+#" !EX&-VF@ j M# (#4$ =:*+AS%.R^2.$#!.# "&D% !G &I&",) ("4R %DZ!W ) [JB.i MP\@#;O@=9R #!3E._@B0 ID ;#>0XJ0 9X !(# !9H.*L""$$B!L$YD 'C)Ah MVD<%S^,/7' 9LT4TN[B(A(B08]A> 9!?$E"+,1&2(QDBVB<"8 !/"MAC0' #g MQ$$ #:D (?F0 0D(.8DR3WA_(3-.4P 9)'4>!#!] - &&'"4Y"$"D&8V(*!Sf M2@D()!E:>&.4@"22@$ Q(&0(HP&%(" QI44 P %R0$0P &)C %0S .@D &e M^D %0P #<,D'"HF @RD $N, U+"! @ 9& XJ (4G"7XA"9X* (QJ"3[S $d M2" $A!"8$-!>ZD@(^B$$(" ( 3, _P"%-&,;\) Y-A,6=6%6)( !)@ !Q*,&c M"& $@& $@8 P 'Z $@J";1B (1C ("" ,PBD)@Q )J/D- ? !0,$[& /b MU* V9W0._P ,52,"M D!X2 (YR (RRF<,$"5ET6:-@ !Z# $F7D $C,0WN "a M$1 .AW .AX QX">*1 3E^4(0* #$8 .1: ,?""?9S 0P& )16 -?+ 40F (z MGNE6'S .@> +@E &!F &"H +AB &!B %0< )A% )AR .CR .E+ 7Z$ "F1@!y ML0 %9^(HKY&F>S/D!Z0F@2,">[@F?"2HQ9 ">-6&?^*F?_.F?x M0BJ@!&J@"*J@1& )$?H/UE $*" 2$ $*G 2% $,D PE ,@@D,Q^ ,Q$ ,w MQ8 $XB($GBD$A8 #!Z # A NR(!-TJI9G5.]B -5<,"XFD(YV (u M"& ,Z*F>2, (0( #[DD$R'"D+C*A3)J?^]F?0/J?!!"@ UJ@!VJK>7H(,@ !t MXN (*DH"!F #)$4 9E,$;D !%\0+A\ &Y%< +'"G ^ " N"LS H#D: $AW &s M' #T H 1: U*_(!;@ !X/ *B3H+0( _$ 9R 1' (U' (6*6I4?"6<:D4r M=&E.@>"HO*>7?.F7@)FFA&E4AME>B'D&BKF!W_&8D3F98" .Q, '_B 4)*8(q MEQF?_Y .G"D$':L1GPD#H @!1A\$=2R5=9@ ""N, +)M*<9(F_&,/H($+E[%!]M "2 o MD.@#W'$>TD5C[XHR_F &+O"T+7!B]A"V9AM0.[49H$$(G:4 <6NUNG!760LXn M6]NU#H W?PM(O>AJY:!!U^D*T."=4. $9O,> 1, M^4%+W %XX0I"D $UYF=m ML>&440@,L'D80A (($!U!! T8( !X@ (XA )J;NZK1L)QO4(6-I4^N />B![k M\M V,,"")!"J_*,/+: $% ,W4R$.0I# !"!X^J!>^F \VQL70G (RT0!7 $#4O!8!R!W%"!*@= &[A#%8" &f M<\(/-@!(9;Q'@X Y?C0><<$Y*P(#+H)06L"3!D $C!.4L"5X80_:04/=LP/e M>+S$9@ !62P7EP,()@ $%+ -9L /$]3&;YP3>L1'CZ8P$ #A3!&9;17_& ;d MF2A'#!!=BJP]^",&=2)J2PO!BY ]XB0'QF/+^','9T !NKPB8:"#(& 5D(!!c M 6 $=&0/JN!'Z;B.9J "%G@KI0,#*G"# # $&0!U#"!EF.!&*B! ]&!'_ASb M"N#-&;B!XGS&"C#,Z[@GA<4*RBP$:C!.T>4/$*" CH(_*Q!08(>8'SO/#AV&\'BNCY?17.1OE^0$#3W/WX$Ty M;R:(JSS/ZTS,9@(#-5 C01T3[%S,) ()4 3^VU-< &x M]V # " !EC-&KZB= %!6=*',> ,!DV$/@J M-2%T_O FCR!YTX7*,,#*T258w M@&4/?\57 ^4=@54U>7<_)(E>C#7)?I18WD$%$[TS9X "C9T N3S0(=( O=S8v M%BG0XL0 9D#3@24=ZL4/98+7&K!*7KPS>V+/E"T49D!@W9%J^A"\W8##\* U%A( 4- CRW3Dp M4M CTJ9GD]$/V& L#@X$P< 5!)!*XF,5QS$HJC :*4#?=^(= 3$FX"W>HRL#o M!U .HML8]@ -P0 "@+#AOMT&/^?FQ,W=AJ.:UTC$_T- P"L <\$@"S-68#E#Oj M&';OXZ3OPPBU@.0 6C/,SK[&4J0 C;1>;^ !<2L/#8]2ZR4^S#<< J(!QL(Ni MTRZXU2X@!&"YVTX 70 ,$Q8 JX<*PHPGQ0P&PX@ HHH*#0^%0&4<]?$?<\VYh M-V\5]Z(ELM"6_^_@#<[% />)"X+&L&(H#T2L_T3N](4F^X]: 'g M50^/QV+IS,4$'c M*V^55T6(&)#\WU<_QB0/]$"4@0!OZ[O$*!8W4=."" #8,R1!MG-?)(7@%(H7E(DH5.<5@!2:QS4 #P &X@%($/ 4C B.F@4-S_8!6J:E@F<-&+I!V #Gx M, (B,+V4@0!YB"6O/ !<@D&*( H5-=J=($.8LD++:848" >@ 0!3\&(X*A9w M@@ "'W 9^EX7@$1U* ,'8& $QV8-ZF4-XQ#A_X -B2LKXX25ZF4-XQ#A_X -v M3@\!XZ4 #A8$H:5>UC .$?X/V.#T$.!@B_&/2:E>UF &M-"*8]U2WH!&5&A6u MW/$=XU1.8&< XV36$%"^9DT!Z4M[H<2^RE 5"$ DT$/1G#R*?];_^ -W7O?8/X. -Y$'G]F -:X%5U@ & C FAV(JU4_Fr M C F%!.WX!"WXK!3=#$9] -F.( U'2Z);0J&R0.B%0;Q#*(VH$&R0.B,>.>5-@,%BPP ,- &LSE'4+#( ) #;^ +2"][['8.::3*+2 Rl MX:LY) %6+ (*28%,"_8C@0!F@!..NA/^%,"9H ._H0_)5!( L ""!5=[,#Wk M*(,.T64.'1 B(/ /[^!/^-,"L=PH_\ .".5/^*/'"- !2_P/[X!0W_L/\!"Wj M\( X)*!:S:$.60P/_H0_+F#0"/6]_P /<0L/B", JM4<+\H_\.!/^,,&L=PHi M_V ." 5.9>(!&H $A] "(D,;B$(&9R !B/(&^H,H> !?B%('%JU>YI#PX@L$h MHPLCN*,Y40N..Z5_T&$.+*T+^V %5 X=YM!Z5F$FJT@YJ70-JC00I( H8V#0g M^[T['"+8CK1S5+ (>V((B#('488[FK.VZX4%B\ #T($.!VC']. _], A@NU(f M.W=")93P_$,/5.8-]HTH9: _B&(&\(4H9V &$B6^804%Y7N^,9&^F9&^F5&^e M.Z5_T($.+"U4&( I$ %B]!P8R+8CK1SC&7Q^,#AZB!,CJ!>[& K/ =ZO#Hd M"" )>\<)0;!H>.=(>O<_^*!W__ .\_/P]/ &5 ,=b M\##?#B,!A=0/K% UO<-8%L\/*D77_N!!<1N.;13]0. /_@!4<1N. ( #[P%>a M_N /4+A3;UUY_V ,[P&%._76E=<-1P8 J,!<#4 G-<@"x M]: !O5T/&G#V/0$, %135M$ K)%PLH ?5E%3%I-PI-!9=E#K=%)3%C,9Z /w MF=<=&D GW[4MGU0/&M#;]: !9]\3P;!SI=$ K)%P9H ?5E%3%I-PV0(?U!T7v MGU0/&M#;]: !9]\3P;!S),T:"4<#8K(IA?0/%'#V/;'T60E$(:(!@_AZ#"(*0&= ,[."329D(!RR0%%P58_-!]#N!Cs M7IM"UM#&61B, " .WSX0V@ &OB>XPB*"I?$#B\<%QF(WT^]+; ",KS<0JB""r M:XT!2EA( " );;Q:7MOPB T$8, &)P4 ^)Y*#\\/;: $C=-]#F!< R%)&-_\q M/[#6^& LT^]+U?]Z2H!5J !!+M!]#F V[(L*QC40DA0)@,4/)G#?JPU04[P(p M7;P-/N:UW??OCF Y*!7DP& W,]_&8\01L&@; )"].FI6+6!C_+ G @ !&U!(o M<6%1>Z)0VE!(R( 8\01O'L. )"].FI6>S*B%Z4(V=._'#(!$A!.@: Bn M0;"@_Z .NFP!X30(9G.7 R$ 8\01G%LU/5*I?U%(E,*[YP V:NC2[ G4US+m M$U!(@;T 9D,Z R$ 8\01O'L. T"%(K-R#+ G4US+$\ !1C40# !S_(A1U!(l M_^ .$)"/G(<[>^+M1+TG M"**\6[YY!&++AR#$ "(?+R%@$!S_(A1U!(,4$"k M2R %B\ !$U!(_^ .EK,G J!2-I_Q03 9]2 $404$K >,KV< 36@:G L&4B8Rj MBSQ.TE$:#< :DU$/"O!L>.=(G+,R%C,9]" /CC=W9I5"*\6YIRO8CL0Y*V,5i M!# 9],!9R+]E/E83*<0-4'BZ@NU(G+,R5E$ DT$/EN!X "W"$('_M(%A#MS_,/<$!_W0%LIC^%+6!C@F7I(C@9\B .2EA(f M & *>T()_H0_Y#00-C3Y !8^K B / &0& Y%J\/4ML<\C I^C I?97Q0# 9e M\P ,QK+RJ?3P.@Z,KS<0J(!5J! -EE[CP2$1%Y/Q0# 9\Z (QC+]Q"$ K4>(d M=,#I"&4YNP4&-:P(EF,VBS!I#E &*$,&I8,[F^P QK"!DL1'=3SY !8^B"Uc MS2$/DZ(/D])7&0\$DS$/*& L*Y]*#Z_C,OAZH=Q,T6#I,X_T8\01!O/7 = /b M7C $[- /4,,5&R !7'$'$L 5&R !7&$&$L 5&R !7)$%$L 5." !7 $U7+$!a M$L 5<" !7&$$$L 54R !7 $U7-$"$L 56" !7-$"$L 54,,54,,54,,54,,5z M4,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,5y M4,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,5x M4,,54,,54,,54,,54,,54,,54,,54*/H0\ ._$ /$L 5&R !7&$&$L 5&R !w M7)$%$L 5." !7 $%$L 5&R !7 $'$L 54,,502 !7!$&$L 54,,54,,54,,5v M4,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,54,,5u M4,,54,,54,,54,,54,,54,,54,,54,,54,,54B !7'$%$L 5&R !7!$'$J#Ht M0\ ._, .$L 5&R !7&$&$L 5&R !7)$%$L 54,,54*/H0Z",%\@5Q2P#BBX"s M7%',,L 5"2 #_+!Y(L 5Q2P#BBX"7%',,J#H(L 5Q2P#_! Z<#!0C=G5q M*< & : ##9P";! /F /Z) ";! 0F /X) ";'#,]H -*< & : $]L -?WT p M]F -0W"X05 6!B "R! $9>$!(H ,05 688$,05 6)" "R! $9:$"(H ,05 6o M$B "R! $9<$ (H ,*1 BQ:S,?PT ]: !?PT ]2 2=; !13 0TDH'9< C9I &n M;% &XV$T9: ##: U$%3D $3U %AD4"5T " Y$$;@ '=4 '(& &:< &97 [m M ]$ "C 0=P )3 '"@ )3 '"M!<91 &9 ")4 &C)$&;E & ")3 #9"!1 [$!2S 0&U & S$$3^ $.C 005 %6* # S'W5* # P$$f M)- 0!< IZE@<\- 0!B ' ! & ' ' # $3^ $.C 005 %6* # S'W5* ##:$ e 3)4 & ]$ "M 0!2 !@ )]@H: ' 'd c end