Return to getdist CVS log

Up to [Research Unix] / researchv10dc / vol2 / index / tools

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

1.1     ! root        1: if test -s $2
        !             2: then
        !             3: FILE=$2
        !             4: else
        !             5: FILE=../$2
        !             6: fi
        !             7: awk "
        !             8: /^\.$1 /       {
        !             9:        if(\$0 ~ /\"/){
        !            10:                n=split(\$0,a,\"\\\"\")
        !            11:                term = a[2]
        !            12:        }
        !            13:        else{ term = \$2
        !            14:                if(NF == 2){
        !            15:                        getline
        !            16:                        if(\$0 !~ /^\./)
        !            17:                                term = term \" \" \$1
        !            18:                }
        !            19:        }
        !            20:        print term
        !            21: }" $FILE

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