function viewmat
global Ex
Cmat=[''];
disp('Select Material')
Cmat=getmatv2;
if Cmat==['']
return
end
loadline=['load -force materials/',Cmat,' matprops matname plythick'];
eval(loadline);
while Ex==0;
disp(sprintf('	Material Name:			%s	(in file: %s)',matname,Cmat))
disp(sprintf('\n	E in fibre direction:		%.2fGPa\n	E in transverse direction:	%.2fGPa\n	Poissons Ratio:			%.2f\n	Shear Modulus:			%.2fGPa',matprops))
disp(sprintf('	Ply thickness:			%.3fmm\n',plythick))
disp('		(b)ack\n		(e)xit')
userin=input('>>','s');

if userin=='b'
return
elseif userin=='e'
Ex=1;
return
else continue
end
end