Watch this Author's files
Thank you for your sharing work.
I met the following problem. It seems that function lapack can't be found.
Is this subroutine needs additional toolbox?
Undefined function 'lapack' for input arguments of type 'char'.
Error in Sandia_3D_method (line 287)
U = lapack('SPPTRF','L',Ntot,H,0);