Mercurial > repos > public > sbplib

annotate symmetricPart.m @ 1057:ff274c7404cc feature/poroelastic

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
In Elastic2dVariable: copy-paste from feature/getBoundaryOp and fix bugs introduced there.
author Martin Almquist <malmquist@stanford.edu>
date Fri, 25 Jan 2019 15:52:21 -0800
parents f8072bb8d1d1
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
574
f8072bb8d1d1 Add functions for symmetric and skew parts of matrix
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
1 % Returns the symmetric of A
f8072bb8d1d1 Add functions for symmetric and skew parts of matrix
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
2 function S = symmetricPart(A, tol)
f8072bb8d1d1 Add functions for symmetric and skew parts of matrix
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
3 S = 1/2*(A + A');
f8072bb8d1d1 Add functions for symmetric and skew parts of matrix
Jonatan Werpers <jonatan@werpers.com>
parents:
diff changeset
4 end