function vis_trajgui(trajStruct,arg)
% VIS_TRAJGUI subfuntion for SOM_TRAJECTORY
%
% This function is the actual GUI called by SOM_TRAJECTORY
% function.
%
% See also SOM_TRAJECTORY.
% Contributed code to SOM Toolbox 2.0, February 11th, 2000 by Juha Parhankangas
% Copyright (c) by Juha Parhankangas.
% http://www.cis.hut.fi/projects/somtoolbox/
% Version 2.0beta juha 180699
if nargin == 1
sM_h=trajStruct.figure;
if size(trajStruct.bmus,1) ~= 1 & size(trajStruct.bmus,2) ~= 1
fuzzy_traj(trajStruct,[]);
return;
end
if size(trajStruct.bmus,1) == 1 | size(trajStruct.bmus,2) == 1
udata.bmus = trajStruct.bmus;
udata.a_h=[findobj(get(sM_h,'Children'),'Tag','Uplane');...
findobj(get(sM_h,'Children'),'Tag','Cplane')];
udata.sM_h=trajStruct.figure;
udata.traj=[];
data1 = trajStruct.primary_data;
if ~isempty(trajStruct.primary_names)
names=trajStruct.primary_names;
else
for i=1:size(data1,2)
names{i,1}=sprintf('Var%d',i);
end
end
udata.lattice=trajStruct.lattice;
form = 0.7*vis_patch(udata.lattice);
udata.msize = trajStruct.msize;
%%%%%%%%%%%%%%%%%%%%%%%%
%
% forming a patch object, which is placed above every component plane
%