find selected area index in current file Copyright (C) 2011, ATR All Rights Reserved. License : New BSD License(see VBMEG_LICENSE.txt)
0001 function [ix_act, jx_act, Lact] = ... 0002 vb_current_area_info_z(Jinfo,ix_area) 0003 % find selected area index in current file 0004 % 0005 % Copyright (C) 2011, ATR All Rights Reserved. 0006 % License : New BSD License(see VBMEG_LICENSE.txt) 0007 0008 Lact =Jinfo.Lact ; 0009 ix_act =Jinfo.ix_act ; 0010 Nact = length(ix_act); 0011 0012 if ~isempty(ix_area), 0013 % Select vertex index 'ix_area' within the active current region 0014 [jx_act, ix_act] = vb_index2indexsub(ix_area, ix_act); 0015 else 0016 jx_act = 1:length(ix_act); 0017 end 0018 0019 if Lact > 1 0020 jx_act = repmat(jx_act(:),1,Lact) ... 0021 + repmat([0:Lact-1]*Nact,length(jx_act),1); 0022 jx_act = jx_act(:); 0023 end