%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% .m script of web demo "Sphere Detector"
% Written for GNU Octave
%
% INSTITUTE OF TELECOMMUNICATIONS
% University of Stuttgart
% www.inue-uni-stuttgart.de
% author: Johannes Pfeiffer
% date: 2016/05/15
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [ ] = anim_fun( N_tx , Modulation , SNR , Radius , ...
    New_Random , Plot_full_tree , Display_distances , ...
    Display_info_text , Tree_shape , Order_en , fileformat , ...
	webdemo_en , N_frames , filename )
% calculation and visualization of one sphere detector search tree 
%
% anim_fun(3, 'QPSK', 20, Inf, true, true, false, true, 'regular', true, 'portrait', false, 20, 'tree')
%
% JPF - 2016/05/15
%

if nargin < 1
    % use default values:
    N_tx        = 3;
    Modulation  = 'QPSK';
    SNR         = 20;
    Radius      = Inf;
	New_Random 	= false;
    Plot_full_tree    = true;
    Display_distances = false;
    Display_info_text = true;
	Tree_shape	= 'regular';
    Order_en	= true;
    fileformat	= 'portrait';
    webdemo_en  = false;
    N_frames    = 20;
    filename    = 'tree_anim';
    
end


sphere_tree_anim_fun(N_tx, Modulation, SNR, Radius, New_Random, ...
Plot_full_tree, Display_distances, Display_info_text, Tree_shape, ...
Order_en, fileformat, webdemo_en, N_frames, filename);

clf;


end




