Mercurial > repos > public > sbplib
view yesnoQuestion.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 | 0c166d195f58 |
children |
line wrap: on
line source
function b = yesnoQuestion(question, defaultAnswer) default_arg('defaultAnswer','nodefault'); yesAnswer = {'y','Y','yes','Yes','YES'}; noAnswer = {'n','N','no','No','NO'}; switch defaultAnswer case 'nodefault' optionString = '[y/n]'; case yesAnswer optionString = '[Y/n]'; yesAnswer{end+1} = ''; case noAnswer optionString = '[y/N]'; noAnswer{end+1} = ''; otherwise error('Unrecognized default answer: %s', defaultAnswer); end b = []; while isempty(b) answer = input([question ' ' optionString ': '],'s'); switch answer case yesAnswer b = true; case noAnswer b = false; end end end