figure(2); clf
subplot(1,2,1);
axis off
title('Odd Mode Shapes');
movie(Modd,[1 2])
subplot(1,2,2);
axis off
title('Even Mode Shapes');
movie(Meven,[1 2]);

subplot(1,2,1);
axis off
title('Odd Mode Shapes');
movie(Modd,1)
subplot(1,2,2);
axis off
title('Even Mode Shapes');
movie(Meven,1);
fprintf('Note, to REPLAY either movie, use the following commands\n\n');
fprintf('  movie(Meven,2)\n  movie(Modd,2)\n');
fprintf('\nType:\n  help movie\nfor more info on playing movies...\n');
fprintf('\n\n(ctr-c to break this movie run now...)\n');