view symmetricPart.m @ 742:08f3ffe63f48 feature/poroelastic Heimisson2018 elastic1.0

Add metric scale factors to properties in heat and elastic curvilinear
author Martin Almquist <malmquist@stanford.edu>
date Fri, 11 May 2018 13:11:32 -0700
parents f8072bb8d1d1
children
line wrap: on
line source

% Returns the symmetric of A
function S = symmetricPart(A, tol)
    S = 1/2*(A + A');
end