Mercurial > repos > public > sbplib
view +time/+rkparameters/rk4.m @ 1227:02dfe3a56742 feature/poroelastic
Add Upwind ElasticAnisotropic schemes. Seem to work really well!
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Sat, 16 Nov 2019 14:26:06 -0800 |
parents | ee4cfb37534d |
children |
line wrap: on
line source
function [a,b,c,s] = rk4() % Butcher tableau for classical RK$ s = 4; a = sparse(s,s); a(2,1) = 1/2; a(3,2) = 1/2; a(4,3) = 1; b = 1/6*[1; 2; 2; 1]; c = [0; 1/2; 1/2; 1]; end