Mercurial > repos > public > sbplib
view fresh_dir.m @ 1295:cb053fabbedc feature/poroelastic
Add displacement BC on normal tangential components, but it is only provably stable if traction bc are used for the other component.
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Thu, 02 Jul 2020 20:05:50 -0700 |
parents | 48b6fb693025 |
children |
line wrap: on
line source
function fresh_dir(dirname) if isdir(dirname) fprintf('Directory %s already exists.\n',dirname); yN = input('Delete its content and continue? [y/N]: ','s'); if strcmp(yN,'y') system(['rm -rf ' dirname]); else error('Can''t use directory.') end end mkdir(dirname); end