Mercurial > repos > public > sbplib

annotate kroneckerDelta.m @ 1252:8fc2f9a4c882 feature/poroelastic

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add (temporary) fix for e-s , w-n, and x-x couplings
author Martin Almquist <malmquist@stanford.edu>
date Tue, 07 Jan 2020 12:49:09 -0800
parents b189bc409cdb
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
662
b189bc409cdb Add helper function for kronecker delta.
Martin Almquist <malmquist@stanford.edu>
parents:
diff changeset
1 function d = kroneckerDelta(i,j)
b189bc409cdb Add helper function for kronecker delta.
Martin Almquist <malmquist@stanford.edu>
parents:
diff changeset
2
b189bc409cdb Add helper function for kronecker delta.
Martin Almquist <malmquist@stanford.edu>
parents:
diff changeset
3 d = 0;
b189bc409cdb Add helper function for kronecker delta.
Martin Almquist <malmquist@stanford.edu>
parents:
diff changeset
4 if i==j
b189bc409cdb Add helper function for kronecker delta.
Martin Almquist <malmquist@stanford.edu>
parents:
diff changeset
5 d = 1;
b189bc409cdb Add helper function for kronecker delta.
Martin Almquist <malmquist@stanford.edu>
parents:
diff changeset
6 end