#!/bin/sh
#
# The main script for laying out the induced poset on cells.
# For more information, read the README.
#
# SYNTAX: squash <filename>
#
# Customize these paths if necessary

AWK=/usr/bin/gawk
MAPLE=/usr/local/bin/maple

##############

${AWK} -f scrape.awk $1 | \
  /bin/cat - covers.mpl | \
  ${MAPLE} -q | \
  ${AWK} '/digraph/ { sub("some_poset","name_of_graph",$0) }
    /node/ { printf "size=\"6.5,10.0\"; center=true\n" }
    /./ { if ( match($0,"withposets") == 0 ) print $0 }'