#! /bin/csh -f
# Last edited on 2025-05-01 18:56:34 by stolfi

set usage = "$0 file1.frq file2.frq ... > join.cmp"

# Merges two or more files produced by compute-freqs 
# WARNING: assumes the word field ($3) does not contain blanks.

if ( $#argv == 0 ) then
  echo "usage: ${usage}"; exit 1
endif

set path = ( ${STOLFIHOME}/voynich/work $path )

# ??? Sort fields are strange...
join-freqs $* \
  | max-freqs \
  | sort +0.0 -0.2r +0.0 -0.7nr \
  | sed -e 's/^\(..\).......\(.*\)$/\1\2/g'