0001 fprintf('***************************************************************\n') 0002 fprintf('************************ Puma 560 *****************************\n') 0003 fprintf('***************************************************************\n') 0004 clear 0005 puma560 0006 puma560akb 0007 rdh = p560; 0008 rmdh = p560m; 0009 0010 check1 0011 0012 fprintf('\n***************************************************************\n') 0013 fprintf('********************** Stanford arm ***************************\n') 0014 fprintf('***************************************************************\n') 0015 0016 clear 0017 stanford 0018 stanfordm 0019 rdh = stan; 0020 rdhm = stanm; 0021 0022 check1