0001
0002
0003
0004 rdh = nofriction(rdh, 'coulomb');
0005 rmdh = nofriction(rdh, 'coulomb');
0006
0007
0008 n = 10;
0009
0010 fprintf('************************ normal case *****************************\n')
0011 args = {};
0012 fprintf('DH: ')
0013 check2(rdh, n, args);
0014 fprintf('MDH: ')
0015 check2(rmdh, n, args);
0016
0017 fprintf('************************ no gravity *****************************\n')
0018 args = {[0 0 0]};
0019 fprintf('DH: ')
0020 check2(rdh, n, args);
0021 fprintf('MDH: ')
0022 check2(rmdh, n, args);
0023
0024 fprintf('************************ ext force *****************************\n')
0025 args = {[0 0 9.81], [10 10 10 10 10 10]'};
0026 fprintf('DH: ')
0027 check2(rdh, n, args);
0028 fprintf('MDH: ')
0029 check2(rmdh, n, args);