#!/bin/sh  
# \
exec oagtclsh "$0" "$@"

set auto_path [linsert $auto_path 0  /usr/local/oag/apps/lib/$env(HOST_ARCH)]
set auto_path [linsert $auto_path 0 /usr/local/oag/lib_patch/$env(HOST_ARCH)]

#APSStandardSetup
set pv $argv

if [catch {exec caput $pv.set 0
    exec cavput -list=$pv=1e-9 -deltaMode } result] {
    puts stderr "Error changing $pv: $result"
    exit 1
}

exit 0
