Annotation of researchv10dc/vol2/index/tools/topic, revision 1.1

1.1     ! root        1: # NOTICE-NOT TO BE DISCLOSED OUTSIDE BELL SYS EXCEPT UNDER WRITTEN AGRMT
        !             2: L=/usr/lib/style
        !             3: M=/usr/vol2/index/tools
        !             4: N=/usr/vol2/index/tools
        !             5: mflag=-ms
        !             6: mlflag=-ml
        !             7: number=40
        !             8: for i in $*
        !             9:        do case $i in
        !            10:                -mm) mflag=-mm;shift;continue;;
        !            11:                -ms) mflag=-ms;shift;continue;;
        !            12:                -ml|-li) mlflag=-ml;shift;continue;;
        !            13:                +li) mlflag=;shift;continue;;
        !            14:                -ver) echo $0 version 2.0: 2.0;exit;;
        !            15:                -flags) echo $0 \[-flags\] \[-ver\] \[file ...\];exit;;
        !            16:                -*) echo unknown topic flag $i;exit;;
        !            17:                *) if test ! \( -r $i -o -r $i.tex \)
        !            18:                   then echo Can\'t find the file $i\; try specifying a more complete pathname.; exit
        !            19:                   fi
        !            20:        esac
        !            21: done
        !            22: if test -s $1.tex
        !            23: then
        !            24: awk -f $N/doinp.awk $1.tex|awk -f $M/top2.awk |$N/detex|$L/style1|$L/style2|$M/adj_noun -T|sed -f $M/top.sed|sort|uniq -c|sed "/^   1/d"|sort -nr
        !            25: else
        !            26: awk -f $M/top2.awk $*|$M/deroff -i $mflag $mlflag|$L/style1|$L/style2|$M/adj_noun -T|sed -f $M/top.sed|sort|uniq -c|sed "/^   1/d"|sort -nr
        !            27: #|sed -n "1,${number}p" 
        !            28: fi

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.