#!/bin/csh -f

# @(#)psicon	1.1	12/15/92

# Generate a postscript version of an icon to stdout.  Uses the interface
# facet and the bw_patterns technology file.

if (!($?PTOLEMY)) then
	setenv PTOLEMY ~ptolemy
endif
if (!($?OCTTOOLS)) then
	setenv OCTTOOLS $PTOLEMY
endif

set path = ( ~ptolemy/octtools/bin.$ARCH $path )
oct2ps -p -=T ~ptolemy/lib/bw_patterns -f interface $*\:schematic:interface
