#!/bin/sh -f

export TCLLIBPATH="none /usr/lib"; \
export PATH="none":"/usr/sbin/i86":$PATH; \
exec ibis "$@" <<EOF

set argv0 ibdiagnet
package require ibdiagnet

EOF