
% kpath example file `kpath-demo0'

% To use, read in this file with the `<' command, as in:

%     KnotPlot> <kpath-demo0

reset all     

% Press the function key `F1' to run the demo again
func  1 <kpath-demo0

panel off        % Turn off the control panel during the demo

allocate 800     % Need a bit more space for beads
cyl=1.5 
ncur=10          % Fairly high interpolation
nseg=12          % This is the default anyway
load 4.1         % The standard figure-8 knot from the "basic" directory
                 % This script may not work correctly if you've modified 
                 % the default 4.1 knot.

smart=f          % Don't want KnotPlot to be smart about twist-fixing (i.e. we
                 % want to do it explicitly
atw=t            % Set this parameter to true so curve matches up properly
twfix 111        % Give the surface a twist of 111 and twist-fix

% Write out points to a temporary file on /tmp
kpath /tmp/KPkpath-demo-thing

ncur = 2         % Reset ncur to something reasonable

% Load back the temporary file
load /tmp/KPkpath-demo-thing

load comb 4.1    % Combine this with the original figure-8
mcyl 0 .1        % make cyl-rad of component 0 equal to .1
mcyl 1 1         % make cyl-rad of component 1 equal to 1

% Get rid of the temporary file
!/bin/rm /tmp/KPkpath-demo-thing

panel on         % Turn on the control panel  

% end of  kpath example file `kpath-demo0'
