Skip to main content
. Author manuscript; available in PMC: 2022 Dec 1.
Published in final edited form as: IEEE Trans Ultrason Ferroelectr Freq Control. 2021 Nov 23;68(12):3560–3569. doi: 10.1109/TUFFC.2021.3098501

Algorithm 1.

Matrix-Free Computation of Mu_

procedure Computing p_=Mu_;
p_=[] (initialization by null-vector)
for id = 1 to Nd do
  e_E˜{id}; t_T˜{id}; NN˜{id}
  Rt(e_,:)
  Hu_(R)
  VN.H;J_t=13V(:,3)
  I_=sparse(1,t_,J_,1,Nt)
  p_[p_T,[I(2:Nt)0][0I(1:Nt1)]2]T
end for
return p_
end procedure