function [ ] = Demo( )
% Demonstration Code

% ========== Load Init Image & Sequence of Tracked Point======
data = load('Data\features.txt'); 
% 34th frame is neutral face
startframe = 34;
faceimg = imread('Data\trackface034color.bmp'); 

% ======= First Refine the Shape parameters (do it once for each subject)
vecfile = 'Data\Vecs';  % CANDIDE-3 vectors 
out_shapefile = 'Data\SUVPar.txt' % output shape parameters 
RefineShape(vecfile, data, startframe, out_shapefile, faceimg) 

% ======== Given the Shape parameters, Refine the action unit parameters (do it for
% every frame)
disp = true;

RefineAUV(vecfile, shapefile, data, startframe, endframe, disp)


