Mercurial > repos > public > sbplib
view find_elements.m @ 797:5cf9fdf4c98f feature/poroelastic
Merge with feature/grids and bugfix bcSetup
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Thu, 26 Jul 2018 10:53:05 -0700 |
parents | 48b6fb693025 |
children |
line wrap: on
line source
% I = find_elements(a,b) % Finds the index of elements a in b. % a and b have to be in the same order. function I = find_elements(a,b) I = []; j = 1; for i = 1:length(a) while b(j) ~= a(i) j = j + 1; end I(end+1) = j; j = j+1; end assert(length(I) == length(a),'Expected %d but got %d elements',length(a),length(I)) end