# the windows in here were for debugging skew etc.
# not all that important anymore
toplevel .t
wm geometry .t 600x710+0+0
wm title .t "Image Display"
frame .t.f -width 600 -height 710
pack .t.f

canvas .t.f.c -xscrollcommand ".t.f.xscroller set" -yscrollcommand ".t.f.yscroller set" -width 700 -height 700 -background gray -xscrollincrement 40 -yscrollincrement 40

scrollbar .t.f.xscroller -command ".t.f.c xview" -orient horizontal
scrollbar .t.f.yscroller -command ".t.f.c yview"
pack .t.f.xscroller -side bottom -fill x
pack .t.f.c .t.f.yscroller -side left -fill y
# .t.f.c create bitmap 100 100 -bitmap @/amd/nfs/cochise/home/ee/cs169/fa95/class/cs169-ab/tif/test
toplevel .histogram
wm title .histogram "Skew Projections"
wm geometry .histogram 500x800+620+0
canvas .histogram.c -width 800 -height 800
pack .histogram.c