Re: [Groff] grog Feedback Requested.

[Ralph Corderoy]

Hi,

> Below is my current version of grog.

How embarassing.  Please use this one.


Ralph.


begin 775 grog.sh
M(address@hidden)I;B]S:`H*(R!G<F]G("TM(&=U97-S(&]P=&EO;G,@9F]R(&=R;V9F
M(&-O;6UA;F0N"B,@3&EK92!D;V-T>7!E(&EN($ME<FYI9VAA;B`F(%!I:V4L
M(%5N:7@@4')O9W)A;6UI;F<@16YV:7)O;FUE;G0L('!P"B,@,address@hidden"@IP
M<F]G;address@hidden;64@)#!@"G0]+W1M<"\D<')O9VYA;64N)"0*"G-O
M96QI;3U`9T!S;V5L:6T*"F]P=',]"F1E8G5G/3`*96YD;6%C/2(address@hidden
M*2(*<W`])&5N9&UA8PH*9F]R(&%R9PID;PH@("address@hidden)&%R9R(@:6X*
M("`@("TM*0H@("`@("`@('-H:69T"B`@("`@("address@hidden)E86L*("`@("`@("`[
M.PH@("address@hidden,I"B`@("`@("`@<W`]"B`@("`@("`@;W!T<STB)&]P=',@+4,B
M"B`@("`@("`@<VAI9G0*("`@("`@("`[.PH@("address@hidden)S:6]N*0H@
M("`@("`@(&5C:&\@)T=.52!G<F]G("AG<address@hidden<VEO;B!`5D524TE/
M3D`G"B`@("`@("address@hidden"`P"B`@("`@("address@hidden("`@("TM:&5L<"D*("`@
M("`@("!C870@/#Q%"G5S86=E.B`D<')O9VYA;address@hidden&EO;G,N+BY=(%MF
M:6QE<RXN+ET*=VAE<F4@;W!T:6]N<R!A<F4Z"B`@("`M=B`@<')I;address@hidden
M<VEO;B!A;address@hidden"X*("`@("UH("!P<F]V:61E('1H:7,@:&5L<"X*("`@
M("U#("!E;F%B;&address@hidden<&%T:6)I;&ET>2!M;V1E+"!I;F-L=61I;F<@<&QA
M8VEN9R`M0R!I;B!O=71P=70N"B`@("address@hidden(&]T:&5R(&]P=&EO;G,@
M87)E('!R969I>&5D('1O('1H92!O=71P=70N"address@hidden@+2<@;65A
M;G,@<W1A;F1A<F0@:6YP=70N("!I9B!N;R!F:6QE<R!A<address@hidden@<W1A
M;F1A<F0*:6YP=70@:7,@<F5A9"X*10H@("`@("`@(&5X:70@,`H@("`@("`@
M(#L["B`@("`M9"D*("`@("`@("!D96)U9STQ"B`@("`@("`@<VAI9G0*("`@
M("`@("`[.PH@("address@hidden("`@("`@("!B<F5A:PH@("`@("`@(#L["B`@("`M
M*BD*("`@("`@("!O<'1S/2(D;W!T<R`D87)G(@H@("`@("`@('-H:69T"B`@
M("`@("address@hidden("`@("HI"B`@("`@("address@hidden)E86L*("`@("`@("`[.PH@("`@
M97-A8PID;VYE"@IP870])PHO7EPN5%-^+R`Z('1B;`HO7EPN4%,H6S`M.2`N
M/%TN*BD_)"address@hidden:6,*+UY<address@hidden<6X*+UY<+E(address@hidden
M<@HO7EPN7%M^+R`Z(')E9F5R7W-T87)T"B]>7"Y<77XO(#H@<F5F97)?96YD
M"B]>7"Y'4WXO(address@hidden)N"B]>7"Y',7XO(address@hidden)A<`HO7EPN04Q$?GXO(#H@
M;6%C<F]M;VT*+UY<+D9!34E,67Y^+R`Z(&UA8W)O;6]M"B]>7"Y&04U^?B\@
M.B!M86-R;VUO;address@hidden;VUO;address@hidden
M86-R;VUO;address@hidden;VUO;0HO7EPN3D574$%'17Y^+R`Z
M(&UA8W)O;6]M"B]>7"Y004=%?GXO(#H@;6%C<F]M;VT*+UY<+E!!4$52?GXO
M(#H@;6%C<F]M;VT*+UY<+E!47U-)address@hidden;VUO;0HO7EPN4U!^
address@hidden;VUO;0HO7EPN5%]-05)'address@hidden;VUO;0HO7EPN
M4"1^+R`Z(&UA8W)O;6T*+UY<+E!(address@hidden;VUM"B]>7"Y307XO(#H@
M;6%C<F]M;0HO7EPN3$E^+R`Z(&UA8W)O;6T*+UY<address@hidden;VUE
M"B]>7"YN<'XO(#H@;6%C<F]M90HO7EPN:7!^+R`Z(&UA8W)O;64*+UY<+FQP
address@hidden;VUE"B]>7"YS:'XO(#H@;6%C<F]M90HO7EPN4TA^+R`Z(&1O
M=%-("B]>7"Y42'XO(address@hidden&address@hidden<address@hidden;VUS"B]>7"Y,
M4'XO(#H@;6%C<F]M<PHO7EPN25!^+R`Z(&UA8W)O;7,*+UY<address@hidden
M86-R;VUS"B]>7"Y$9'XO(#H@;6%C<F]M9&]C"B]>7"Y4<'XO(#H@;6%C<F]M
M9&]C7V]L9`HO7EPN1'!^+R`Z(&UA8W)O;61O8U]O;&0*+UY<address@hidden
M86-R;VUD;V-?;VQD"B]>7"Y#>'XO(#H@;6%C<F]M9&]C7V]L9`HO7EPN0VQ^
M+R`Z(&UA8W)O;61O8U]O;&0*)PH*<G5L93TG"address@hidden@.B`M=`HQ(#H@
M<&EC(address@hidden,B`Z(&5Q;B`Z("UE"C,@.B!R969E<B!\?"!R969E<E]S=&%R
M="`F)B!R969E<E]E;address@hidden@HT(address@hidden)N(address@hidden<*-2`Z(&address@hidden
M1PHV(#H@;6%C<F]M;address@hidden;6]M"address@hidden;VUM(address@hidden"address@hidden
M86-R;VUE(address@hidden"address@hidden;W132"`F)B!D;W142"`Z("UM86X*-B`Z(&1O
M=%-(('Q\(&UA8W)O;7,@.B`M;7,*-B`Z(&UA8W)O;61O8R`F)B!M86-R;VUD
M;V-?;VQD(address@hidden;V,M;VQD"address@hidden;VUD;V,@.B`M;61O8PHG"@IC
M870@/#Q%('P*0D5'24X@>PH@("address@hidden&5B=6<@/2`D9&5B=6<*("`@(&D@/2`P
M"B1P870*("`@(&YU;7!A="`](&D*("`@(&D@/2`P"B1R=6QE"B`@("!N=6UR
M=6QE(#T@:0I]"@I%3D0@>PH@("`@<')I;G0@(B$O7EPN+R![(&YE>'address@hidden(*
M"B`@("!F;W(@*&D@/2`P.R!I(#P@;G5M<&%T.R!I*RLI('L*("`@("`@("!P
M<FEN="!R95MI72P@(GLB+"!C;W5N=&5R6VE=("(K*R(*("`@("`@("!I9B`H
M9&5B=6<I('L*("`@("`@("`@("`@<')I;G0@(G`B(&D@(BLK(@H@("`@("`@
M('T*("`@("`@("!P<FEN="`B;F5X="!](@H@("address@hidden("`@('!R:6YT(")%
M3D0@>R(*("`@(&EF("AD96)U9RD@>PH@("`@("`@(&9O<B`H:2`](#`[(&D@
M/"!N=6UP870[(&DK*RD@>PH@("`@("`@("`@("!P<FEN="`B<')I;address@hidden"(B
M(')E6VE=(")<(BP@<"(@:2P@(BL@,"(*("`@("`@("!]"B`@("`@("`@<')I
M;G0@(G!R:6YT(%PB7"(B"B`@("`@("address@hidden("AI(#T@,#L@:2`\(&YU;7!A
M=#L@:2LK*2!["B`@("`@("`@("`@(&EF("AC;W5N=&5R6VE=(&EN(&1U<"D@
M>PH@("`@("`@("`@("`@("address@hidden&EN=64*("`@("`@("`@("address@hidden@("`@
M("`@("`@("!D=7!;8V]U;G1E<EMI75T@/2`Q"B`@("`@("`@("`@('!R:6YT
M(")P<FEN="!<(B(@8V]U;G1E<EMI72`B7"(L("(@8V]U;G1E<EMI72P@(BL@
M,"(*("`@("`@("!]"B`@("`@("`@<')I;G0@(G!R:6YT(%PB7"(B"B`@("!]
M"B`@("!F;W(@*&D@/2`P.R!I(#P@;G5M<G5L93L@:2LK*2!["B`@("`@("`@
M:address@hidden'-E=%MI72`]/2!L87-T*2!["B`@("`@("`@("`@('!R:6YT(")E;'-E
M(@H@("`@("`@('T*("`@("`@("!L87-T(#T@<V5T6VE="B`@("`@("`@<')I
M;G0@(FEF("@B(')U;&5;:5T@(BD@>R!O(#T@;R!<(B`B(&]P=%MI72`B7"(B
M"B`@("`@("`@:address@hidden&1E8G5G*2!["B`@("`@("`@("`@('!R:6YT(")P<FEN
M="!<(B(@<G5L95MI72P@(FEM<&QI97,B+"!O<'1;:5T@(EPB(@H@("`@("`@
M('T*("`@("`@("!P<FEN="`B?2(*("`@('T*("`@(&EF("AD96)U9RD@>PH@
M("`@("`@('!R:6YT(")P<FEN="!<(EPB(@H@("address@hidden("`@('!R:6YT(")P
M<FEN="!<(F=R;V9F7"(L(&\L(&]P=',L(&9I;&5S(@H@("`@<')I;G0@(GTB
M"GT*10IA=VL@)PH@("address@hidden'24X@>PH@("`@("`@($93(#T@(B`Z("(*("`@
M('T*("`@($Y&(#T](#(@>PH@("`@("`@(&=S=6(H+WY^+RP@(B<B)&5N9&UA
M8R(G(BP@)#$I"B`@("`@("address@hidden@O?B\L("(G(B1S<"(G(BP@)#$I"B`@
M("`@("address@hidden@O6UQ<(ETO+"`B7%Q<7"8B+"`D,2D*("`@("`@("`D,"`]
M(")R95MI72`](%PB(B`D,2`B7"([(&-O=6YT97);:5T@/2!<(B(@)#(@(EPB
M.R!I*RLB"B`@("!]"B`@("!.1B`]/2`S('L*("`@("`@("`D,"`](")S971;
M:5T@/2!<(B(@)#$@(EPB.R!R=6QE6VE=(address@hidden"(B("0R(")<(CL@;W!T6VE=
M(address@hidden"(B("0S(")<(CL@:2LK(@H@("address@hidden@("`@,0HG(#XD="YA=VLQ"@IA
address@hidden@)'0N87=K,2`\+V1E=B]N=6QL(#XD="YA=VLR"@address@hidden@)'0N
M87=K,B!O<'1S/2(D;W!T<R(@9FEL97,](B1`(B`B)$`B"@IR;2`D="YA=VLQ
)("1T+F%W:S(*
`
end