#!/usr/lib/octave -q

colorbar = [1:100]';
load sample.dat

tk_interp;
tk_cmd("source tk_matrix.tcl");
tk_cmd("set Matrix sample");
tk_cmd("redraw_matrix");
tk_loop;
tk_end;