vb_reduce_vivid

 Reduce vertex points in vivid data
 V0 = vb_reduce_vivid(Coord,Nvivid)
 
 --- Output
 V0     : Reduced vertex
 --- Input
 Nvivid : Reduced number of points in vivid data
 Coord  : Vivid vertex coordinate
 Coord : Left / Right /Front    head coordinate
  'reduce_VRML'-File
        .LV   / .RV   / .FV   : 3D-Coordinate   : [Npoint 3]  [mm]
        .LF   / .RF   / .FF   : Patch index     : [Npatch Nnode]

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function    V0 = vb_reduce_vivid(Coord, Nvivid)
0002 % Reduce vertex points in vivid data
0003 % V0 = vb_reduce_vivid(Coord,Nvivid)
0004 %
0005 % --- Output
0006 % V0     : Reduced vertex
0007 % --- Input
0008 % Nvivid : Reduced number of points in vivid data
0009 % Coord  : Vivid vertex coordinate
0010 % Coord : Left / Right /Front    head coordinate
0011 %  'reduce_VRML'-File
0012 %        .LV   / .RV   / .FV   : 3D-Coordinate   : [Npoint 3]  [mm]
0013 %        .LF   / .RF   / .FF   : Patch index     : [Npatch Nnode]
0014 %
0015 % Copyright (C) 2011, ATR All Rights Reserved.
0016 % License : New BSD License(see VBMEG_LICENSE.txt)
0017 
0018 % Reduce vertex points in vivid data
0019 [FL, VL] = reducepatch(Coord.LF, Coord.LV, Nvivid);
0020 [FR, VR] = reducepatch(Coord.RF, Coord.RV, Nvivid);
0021 
0022 V0 = [VL; VR];
0023 
0024 if isfield(Coord,'FF')
0025     [FF, VF] = vb_reducepatch(Coord.FF, Coord.FV, Nvivid);
0026     V0 = [V0; VF];
0027 end