#!/bin/sh
#--------------------------------*- Tcl -*------------------------------------#
# Arjen Markus
# 08/18/08
#
# A front-end to run x26.tcl directly from the command line with
# a configured location for pltcl.
# Handles all usual plplot command arguments.  See "/opt/local/bin/pltcl -h" for info.
#-----------------------------------------------------------------------------#
#\
exec "/opt/local/bin/pltcl" -f "$0" ${1+"$@"}

#
# This example uses UTF-8 characters, placeddirectly in the source code
#
if { [encoding system] != "utf-8" } {
    if { [package vsatisfies [info patch] 8.5] } {

        source -encoding utf-8 x26.tcl

    } else {

        #
        # Pre-Tcl 8.5
        #
        set infile [open "x26.tcl"]
        set contents [read $infile]
        close $infile
        eval [encoding convertfrom utf-8 \
            [encoding convertto [encoding system] $contents]]
    }
} else {

    #
    # Plain source will do
    #
    source x26.tcl
}

plinit
x26
plend
