#! ./td_wish
#
# turndial__scale_test - a test program to see how the scale
# and turndial widgets are related.
#
# (c) 1996, Pierre-Louis Bossart (bossart@redhook.llnl.gov)
# Based on the tkTurndial-1.8 copyrighted as follows
# (c) 1995, Marco Beijersbergen (beijersb@rulhm1.leidenuniv.nl)
#
# See the file "license.terms" for information on usage and redistribution,
# and for a DISCLAIMER OF ALL WARRANTIES.

source turndial.tcl

turndial .t -markcolor red -showvalue 1 -label volume -variable foo
scale .s -label volume -variable foo
pack .t .s -side left