132 	confess(err("PARSE")) if (grep(!defined($_),@_));
139 	$token.="\t" if ($#_>=0);
140 	$out.=$token.join(',',@_)."\n";
144 	confess(err("ARGNUM")) if ($#_!=0);
145 	my ($label)=@_;
150 	confess(err("ARGNUM")) if ($#_!=0);
151 	my ($file)=@_;
160 	confess(err("ARGNUM")) if ($#_!=0);
161 	S(0xb2b0,@_);
165 	confess(err("ARGNUM")) if ($#_!=0);
166 	S(0xb205,@_);
172 	confess(err("ARGNUM")) if ($#_!=0);
173 	S(0xb27c,@_);
179 	confess(err("ARGNUM")) if ($#_!=1);
180 	RILa(0xc2f,@_);
184 	confess(err("ARGNUM")) if ($#_!=1);
185 	RILa(0xc2e,@_);
189 	confess(err("ARGNUM")) if ($#_!=1);
190 	RXYa(0xe312,@_);
196 	confess(err("ARGNUM")) if ($#_<3||$#_>4);
197 	RIEf(0xec55,@_);
203 	confess(err("ARGNUM")) if ($#_<3||$#_>4);
204 	RIEf(0xec59,@_);
210 	confess(err("ARGNUM")) if ($#_!=1);
211 	RRE(0xb91e,@_);
215 	confess(err("ARGNUM")) if ($#_!=1);
216 	RRE(0xb92e,@_);
220 	confess(err("ARGNUM")) if ($#_!=1);
221 	RRE(0xb92f,@_);
225 	confess(err("ARGNUM")) if ($#_!=1);
226 	RRE(0xb93e,@_);
230 	confess(err("ARGNUM")) if ($#_!=1);
231 	RRE(0xb93f,@_);
237 	confess(err("ARGNUM")) if ($#_!=1);
238 	RRE(0xb92a,@_);
242 	confess(err("ARGNUM")) if ($#_!=1);
243 	RRE(0xb92b,@_);
247 	confess(err("ARGNUM")) if ($#_!=-1);
248 	RRE(0xb92c,@_);
252 	confess(err("ARGNUM")) if ($#_!=2);
253 	RRFb(0xb92d,@_);
259 	ppno(@_);
263 	confess(err("ARGNUM")) if ($#_!=1);
264 	RRE(0xb93c,@_);
270 	confess(err("ARGNUM")) if ($#_!=2);
271 	RRFb(0xb929,@_);
277 	confess(err("ARGNUM")) if ($#_!=1);
278 	RRE(0xb93a,@_);
284 	confess(err("ARGNUM")) if ($#_!=2);
285 	VRV(0xe713,@_);
288 	confess(err("ARGNUM")) if ($#_!=2);
289 	VRV(0xe712,@_);
293 	confess(err("ARGNUM")) if ($#_!=1);
294 	VRIa(0xe744,@_);
297 	vgbm(@_,0);
300 	vgbm(@_,0xffff);
304 	confess(err("ARGNUM")) if ($#_!=3);
305 	VRIb(0xe746,@_);
308 	vgm(@_,0);
311 	vgm(@_,1);
314 	vgm(@_,2);
317 	vgm(@_,3);
321 	confess(err("ARGNUM")) if ($#_<1||$#_>2);
322 	VRX(0xe706,@_);
326 	confess(err("ARGNUM")) if ($#_!=1);
327 	VRRa(0xe756,@_);
331 	confess(err("ARGNUM")) if ($#_!=2);
332 	VRX(0xe705,@_);
335 	vlrep(@_,0);
338 	vlrep(@_,1);
341 	vlrep(@_,2);
344 	vlrep(@_,3);
348 	confess(err("ARGNUM")) if ($#_!=2);
349 	VRX(0xe700,@_);
352 	confess(err("ARGNUM")) if ($#_!=2);
353 	VRX(0xe701,@_);
356 	confess(err("ARGNUM")) if ($#_!=2);
357 	VRX(0xe703,@_);
360 	confess(err("ARGNUM")) if ($#_!=2);
361 	VRX(0xe702,@_);
365 	confess(err("ARGNUM")) if ($#_!=2);
366 	VRIa(0xe740,@_);
369 	confess(err("ARGNUM")) if ($#_!=2);
370 	VRIa(0xe741,@_);
373 	confess(err("ARGNUM")) if ($#_!=2);
374 	VRIa(0xe743,@_);
377 	confess(err("ARGNUM")) if ($#_!=2);
378 	VRIa(0xe742,@_);
382 	confess(err("ARGNUM")) if ($#_!=3);
383 	VRSc(0xe721,@_);
386 	vlgv(@_,0);
389 	vlgv(@_,1);
392 	vlgv(@_,2);
395 	vlgv(@_,3);
399 	confess(err("ARGNUM")) if ($#_!=2);
400 	VRX(0xe704,@_);
403 	vllez(@_,0);
406 	vllez(@_,1);
409 	vllez(@_,2);
412 	vllez(@_,3);
416 	confess(err("ARGNUM")) if ($#_<2||$#_>3);
417 	VRSa(0xe736,@_);
421 	confess(err("ARGNUM")) if ($#_!=2);
422 	VRX(0xe707,@_);
426 	confess(err("ARGNUM")) if ($#_!=3);
427 	VRSb(0xe722,@_);
430 	vlvg(@_,0);
433 	vlvg(@_,1);
436 	vlvg(@_,2);
439 	vlvg(@_,3);
443 	confess(err("ARGNUM")) if ($#_!=2);
444 	VRRf(0xe762,@_);
448 	confess(err("ARGNUM")) if ($#_!=2);
449 	VRSb(0xe737,@_);
453 	confess(err("ARGNUM")) if ($#_!=3);
454 	VRRc(0xe761,@_);
457 	vmrh(@_,0);
460 	vmrh(@_,1);
463 	vmrh(@_,2);
466 	vmrh(@_,3);
470 	confess(err("ARGNUM")) if ($#_!=3);
471 	VRRc(0xe760,@_);
474 	vmrl(@_,0);
477 	vmrl(@_,1);
480 	vmrl(@_,2);
483 	vmrl(@_,3);
487 	confess(err("ARGNUM")) if ($#_!=3);
488 	VRRc(0xe794,@_);
491 	vpk(@_,1);
494 	vpk(@_,2);
497 	vpk(@_,3);
501 	confess(err("ARGNUM")) if ($#_!=4);
502 	VRRb(0xe797,@_);
505 	vpks(@_,1,0);
508 	vpks(@_,2,0);
511 	vpks(@_,3,0);
514 	vpks(@_,1,1);
517 	vpks(@_,2,1);
520 	vpks(@_,3,1);
524 	confess(err("ARGNUM")) if ($#_!=4);
525 	VRRb(0xe795,@_);
528 	vpkls(@_,1,0);
531 	vpkls(@_,2,0);
534 	vpkls(@_,3,0);
537 	vpkls(@_,1,1);
540 	vpkls(@_,2,1);
543 	vpkls(@_,3,1);
547 	confess(err("ARGNUM")) if ($#_!=3);
548 	VRRe(0xe78c,@_);
552 	confess(err("ARGNUM")) if ($#_!=3);
553 	VRRc(0xe784,@_);
557 	confess(err("ARGNUM")) if ($#_!=3);
558 	VRIc(0xe74d,@_);
561 	vrep(@_,0);
564 	vrep(@_,1);
567 	vrep(@_,2);
570 	vrep(@_,3);
574 	confess(err("ARGNUM")) if ($#_!=2);
575 	VRIa(0xe745,@_);
578 	vrepi(@_,0);
581 	vrepi(@_,1);
584 	vrepi(@_,2);
587 	vrepi(@_,3);
591 	confess(err("ARGNUM")) if ($#_!=2);
592 	VRV(0xe71b,@_);
595 	confess(err("ARGNUM")) if ($#_!=2);
596 	VRV(0xe71a,@_);
600 	confess(err("ARGNUM")) if ($#_!=3);
601 	VRRe(0xe78d,@_);
605 	confess(err("ARGNUM")) if ($#_!=2);
606 	VRRa(0xe75f,@_);
609 	vseg(@_,0);
612 	vseg(@_,1);
615 	vseg(@_,2);
619 	confess(err("ARGNUM")) if ($#_<1||$#_>2);
620 	VRX(0xe70e,@_);
624 	confess(err("ARGNUM")) if ($#_!=2);
625 	VRX(0xe708,@_);
628 	confess(err("ARGNUM")) if ($#_!=2);
629 	VRX(0xe709,@_);
632 	confess(err("ARGNUM")) if ($#_!=2);
633 	VRX(0xe70b,@_);
636 	confess(err("ARGNUM")) if ($#_!=2);
637 	VRX(0xe70a,@_);
641 	confess(err("ARGNUM")) if ($#_<2||$#_>3);
642 	VRSa(0xe73e,@_);
646 	confess(err("ARGNUM")) if ($#_!=2);
647 	VRSb(0xe73f,@_);
651 	confess(err("ARGNUM")) if ($#_!=2);
652 	VRRa(0xe7d7,@_);
655 	vuph(@_,0);
658 	vuph(@_,1);
661 	vuph(@_,2);
665 	confess(err("ARGNUM")) if ($#_!=2);
666 	VRRa(0xe7d5,@_);
669 	vuplh(@_,0);
672 	vuplh(@_,1);
675 	vuplh(@_,2);
679 	confess(err("ARGNUM")) if ($#_!=2);
680 	VRRa(0xe7d6,@_);
683 	vupl(@_,0);
686 	vupl(@_,1);
689 	vupl(@_,2);
693 	confess(err("ARGNUM")) if ($#_!=2);
694 	VRRa(0xe7d4,@_);
697 	vupll(@_,0);
700 	vupll(@_,1);
703 	vupll(@_,2);
709 	confess(err("ARGNUM")) if ($#_!=3);
710 	VRRc(0xe7f3,@_);
713 	va(@_,0);
716 	va(@_,1);
719 	va(@_,2);
722 	va(@_,3);
725 	va(@_,4);
729 	confess(err("ARGNUM")) if ($#_!=3);
730 	VRRc(0xe7f1,@_);
733 	vacc(@_,0);
736 	vacc(@_,1);
739 	vacc(@_,2);
742 	vacc(@_,3);
745 	vacc(@_,4);
749 	confess(err("ARGNUM")) if ($#_!=4);
750 	VRRd(0xe7bb,@_);
753 	vac(@_,4);
757 	confess(err("ARGNUM")) if ($#_!=4);
758 	VRRd(0xe7b9,@_);
761 	vaccc(@_,4);
765 	confess(err("ARGNUM")) if ($#_!=2);
766 	VRRc(0xe768,@_);
770 	confess(err("ARGNUM")) if ($#_!=2);
771 	VRRc(0xe769,@_);
775 	confess(err("ARGNUM")) if ($#_!=3);
776 	VRRc(0xe7f2,@_);
779 	vavg(@_,0);
782 	vavg(@_,1);
785 	vavg(@_,2);
788 	vavg(@_,3);
792 	confess(err("ARGNUM")) if ($#_!=3);
793 	VRRc(0xe7f0,@_);
796 	vavgl(@_,0);
799 	vavgl(@_,1);
802 	vavgl(@_,2);
805 	vavgl(@_,3);
809 	confess(err("ARGNUM")) if ($#_!=2);
810 	VRRc(0xe766,@_);
814 	confess(err("ARGNUM")) if ($#_!=2);
815 	VRRa(0xe7db,@_);
818 	vec_(@_,0);
821 	vec_(@_,1);
824 	vec_(@_,2);
827 	vec_(@_,3);
831 	confess(err("ARGNUM")) if ($#_!=2);
832 	VRRa(0xe7d9,@_);
835 	vecl(@_,0);
838 	vecl(@_,1);
841 	vecl(@_,2);
844 	vecl(@_,3);
848 	confess(err("ARGNUM")) if ($#_!=4);
849 	VRRb(0xe7f8,@_);
852 	vceq(@_,0,0);
855 	vceq(@_,1,0);
858 	vceq(@_,2,0);
861 	vceq(@_,3,0);
864 	vceq(@_,0,1);
867 	vceq(@_,1,1);
870 	vceq(@_,2,1);
873 	vceq(@_,3,1);
877 	confess(err("ARGNUM")) if ($#_!=4);
878 	VRRb(0xe7fb,@_);
881 	vch(@_,0,0);
884 	vch(@_,1,0);
887 	vch(@_,2,0);
890 	vch(@_,3,0);
893 	vch(@_,0,1);
896 	vch(@_,1,1);
899 	vch(@_,2,1);
902 	vch(@_,3,1);
906 	confess(err("ARGNUM")) if ($#_!=4);
907 	VRRb(0xe7f9,@_);
910 	vchl(@_,0,0);
913 	vchl(@_,1,0);
916 	vchl(@_,2,0);
919 	vchl(@_,3,0);
922 	vchl(@_,0,1);
925 	vchl(@_,1,1);
928 	vchl(@_,2,1);
931 	vchl(@_,3,1);
935 	confess(err("ARGNUM")) if ($#_!=2);
936 	VRRa(0xe753,@_);
939 	vclz(@_,0);
942 	vclz(@_,1);
945 	vclz(@_,2);
948 	vclz(@_,3);
952 	confess(err("ARGNUM")) if ($#_!=2);
953 	VRRa(0xe752,@_);
956 	vctz(@_,0);
959 	vctz(@_,1);
962 	vctz(@_,2);
965 	vctz(@_,3);
969 	confess(err("ARGNUM")) if ($#_!=2);
970 	VRRc(0xe76d,@_);
974 	confess(err("ARGNUM")) if ($#_!=3);
975 	VRRc(0xe7b4,@_);
978 	vgfm(@_,0);
981 	vgfm(@_,1);
984 	vgfm(@_,2);
987 	vgfm(@_,3);
991 	confess(err("ARGNUM")) if ($#_!=4);
992 	VRRd(0xe7bc,@_);
995 	vgfma(@_,0);
998 	vgfma(@_,1);
1001 	vgfma(@_,2);
1004 	vgfma(@_,3);
1008 	confess(err("ARGNUM")) if ($#_!=2);
1009 	VRRa(0xe7de,@_);
1012 	vlc(@_,0);
1015 	vlc(@_,1);
1018 	vlc(@_,2);
1021 	vlc(@_,3);
1025 	confess(err("ARGNUM")) if ($#_!=2);
1026 	VRRa(0xe7df,@_);
1029 	vlp(@_,0);
1032 	vlp(@_,1);
1035 	vlp(@_,2);
1038 	vlp(@_,3);
1042 	confess(err("ARGNUM")) if ($#_!=3);
1043 	VRRc(0xe7ff,@_);
1046 	vmx(@_,0);
1049 	vmx(@_,1);
1052 	vmx(@_,2);
1055 	vmx(@_,3);
1059 	confess(err("ARGNUM")) if ($#_!=3);
1060 	VRRc(0xe7fd,@_);
1063 	vmxl(@_,0);
1066 	vmxl(@_,1);
1069 	vmxl(@_,2);
1072 	vmxl(@_,3);
1076 	confess(err("ARGNUM")) if ($#_!=3);
1077 	VRRc(0xe7fe,@_);
1080 	vmn(@_,0);
1083 	vmn(@_,1);
1086 	vmn(@_,2);
1089 	vmn(@_,3);
1093 	confess(err("ARGNUM")) if ($#_!=3);
1094 	VRRc(0xe7fc,@_);
1097 	vmnl(@_,0);
1100 	vmnl(@_,1);
1103 	vmnl(@_,2);
1106 	vmnl(@_,3);
1110 	confess(err("ARGNUM")) if ($#_!=4);
1111 	VRRd(0xe7aa,@_);
1114 	vmal(@_,0);
1117 	vmal(@_,1);
1120 	vmal(@_,2);
1124 	confess(err("ARGNUM")) if ($#_!=4);
1125 	VRRd(0xe7ab,@_);
1128 	vmah(@_,0);
1131 	vmah(@_,1);
1134 	vmah(@_,2);
1138 	confess(err("ARGNUM")) if ($#_!=4);
1139 	VRRd(0xe7a9,@_);
1142 	vmalh(@_,0);
1145 	vmalh(@_,1);
1148 	vmalh(@_,2);
1152 	confess(err("ARGNUM")) if ($#_!=4);
1153 	VRRd(0xe7ae,@_);
1156 	vmae(@_,0);
1159 	vmae(@_,1);
1162 	vmae(@_,2);
1166 	confess(err("ARGNUM")) if ($#_!=4);
1167 	VRRd(0xe7ac,@_);
1170 	vmale(@_,0);
1173 	vmale(@_,1);
1176 	vmale(@_,2);
1180 	confess(err("ARGNUM")) if ($#_!=4);
1181 	VRRd(0xe7af,@_);
1184 	vmao(@_,0);
1187 	vmao(@_,1);
1190 	vmao(@_,2);
1194 	confess(err("ARGNUM")) if ($#_!=4);
1195 	VRRd(0xe7ad,@_);
1198 	vmalo(@_,0);
1201 	vmalo(@_,1);
1204 	vmalo(@_,2);
1208 	confess(err("ARGNUM")) if ($#_!=3);
1209 	VRRc(0xe7a3,@_);
1212 	vmh(@_,0);
1215 	vmh(@_,1);
1218 	vmh(@_,2);
1222 	confess(err("ARGNUM")) if ($#_!=3);
1223 	VRRc(0xe7a1,@_);
1226 	vmlh(@_,0);
1229 	vmlh(@_,1);
1232 	vmlh(@_,2);
1236 	confess(err("ARGNUM")) if ($#_!=3);
1237 	VRRc(0xe7a2,@_);
1240 	vml(@_,0);
1243 	vml(@_,1);
1246 	vml(@_,2);
1250 	confess(err("ARGNUM")) if ($#_!=3);
1251 	VRRc(0xe7a6,@_);
1254 	vme(@_,0);
1257 	vme(@_,1);
1260 	vme(@_,2);
1264 	confess(err("ARGNUM")) if ($#_!=3);
1265 	VRRc(0xe7a4,@_);
1268 	vmle(@_,0);
1271 	vmle(@_,1);
1274 	vmle(@_,2);
1278 	confess(err("ARGNUM")) if ($#_!=3);
1279 	VRRc(0xe7a7,@_);
1282 	vmo(@_,0);
1285 	vmo(@_,1);
1288 	vmo(@_,2);
1292 	confess(err("ARGNUM")) if ($#_!=3);
1293 	VRRc(0xe7a5,@_);
1296 	vmlo(@_,0);
1299 	vmlo(@_,1);
1302 	vmlo(@_,2);
1306 	confess(err("ARGNUM")) if ($#_!=2);
1307 	VRRc(0xe76b,@_);
1310 	vno(@_,$_[1]);
1314 	confess(err("ARGNUM")) if ($#_!=2);
1315 	VRRc(0xe76a,@_);
1319 	confess(err("ARGNUM")) if ($#_!=2);
1320 	VRRa(0xe750,@_);
1324 	confess(err("ARGNUM")) if ($#_!=3);
1325 	VRRc(0xe773,@_);
1328 	verllv(@_,0);
1331 	verllv(@_,1);
1334 	verllv(@_,2);
1337 	verllv(@_,3);
1341 	confess(err("ARGNUM")) if ($#_!=3);
1342 	VRSa(0xe733,@_);
1345 	verll(@_,0);
1348 	verll(@_,1);
1351 	verll(@_,2);
1354 	verll(@_,3);
1358 	confess(err("ARGNUM")) if ($#_!=4);
1359 	VRId(0xe772,@_);
1362 	verim(@_,0);
1365 	verim(@_,1);
1368 	verim(@_,2);
1371 	verim(@_,3);
1375 	confess(err("ARGNUM")) if ($#_!=3);
1376 	VRRc(0xe770,@_);
1379 	veslv(@_,0);
1382 	veslv(@_,1);
1385 	veslv(@_,2);
1388 	veslv(@_,3);
1392 	confess(err("ARGNUM")) if ($#_!=3);
1393 	VRSa(0xe730,@_);
1396 	vesl(@_,0);
1399 	vesl(@_,1);
1402 	vesl(@_,2);
1405 	vesl(@_,3);
1409 	confess(err("ARGNUM")) if ($#_!=3);
1410 	VRRc(0xe77a,@_);
1413 	vesrav(@_,0);
1416 	vesrav(@_,1);
1419 	vesrav(@_,2);
1422 	vesrav(@_,3);
1426 	confess(err("ARGNUM")) if ($#_!=3);
1427 	VRSa(0xe73a,@_);
1430 	vesra(@_,0);
1433 	vesra(@_,1);
1436 	vesra(@_,2);
1439 	vesra(@_,3);
1443 	confess(err("ARGNUM")) if ($#_!=3);
1444 	VRRc(0xe778,@_);
1447 	vesrlv(@_,0);
1450 	vesrlv(@_,1);
1453 	vesrlv(@_,2);
1456 	vesrlv(@_,3);
1460 	confess(err("ARGNUM")) if ($#_!=3);
1461 	VRSa(0xe738,@_);
1464 	vesrl(@_,0);
1467 	vesrl(@_,1);
1470 	vesrl(@_,2);
1473 	vesrl(@_,3);
1477 	confess(err("ARGNUM")) if ($#_!=2);
1478 	VRRc(0xe774,@_);
1482 	confess(err("ARGNUM")) if ($#_!=2);
1483 	VRRc(0xe775,@_);
1487 	confess(err("ARGNUM")) if ($#_!=3);
1488 	VRId(0xe777,@_);
1492 	confess(err("ARGNUM")) if ($#_!=2);
1493 	VRRc(0xe77e,@_);
1497 	confess(err("ARGNUM")) if ($#_!=2);
1498 	VRRc(0xe77f,@_);
1502 	confess(err("ARGNUM")) if ($#_!=2);
1503 	VRRc(0xe77c,@_);
1507 	confess(err("ARGNUM")) if ($#_!=2);
1508 	VRRc(0xe77d,@_);
1512 	confess(err("ARGNUM")) if ($#_!=3);
1513 	VRRc(0xe7f7,@_);
1516 	vs(@_,0);
1519 	vs(@_,1);
1522 	vs(@_,2);
1525 	vs(@_,3);
1528 	vs(@_,4);
1532 	confess(err("ARGNUM")) if ($#_!=3);
1533 	VRRc(0xe7f5,@_);
1536 	vscbi(@_,0);
1539 	vscbi(@_,1);
1542 	vscbi(@_,2);
1545 	vscbi(@_,3);
1548 	vscbi(@_,4);
1552 	confess(err("ARGNUM")) if ($#_!=4);
1553 	VRRd(0xe7bf,@_);
1556 	vsbi(@_,4);
1560 	confess(err("ARGNUM")) if ($#_!=4);
1561 	VRRd(0xe7bd,@_);
1564 	vsbcbi(@_,4);
1568 	confess(err("ARGNUM")) if ($#_!=3);
1569 	VRRc(0xe765,@_);
1572 	vsumg(@_,1);
1575 	vsumg(@_,2);
1579 	confess(err("ARGNUM")) if ($#_!=3);
1580 	VRRc(0xe767,@_);
1583 	vsumq(@_,2);
1586 	vsumq(@_,3);
1590 	confess(err("ARGNUM")) if ($#_!=3);
1591 	VRRc(0xe764,@_);
1594 	vsum(@_,0);
1597 	vsum(@_,1);
1601 	confess(err("ARGNUM")) if ($#_!=1);
1602 	VRRa(0xe7d8,@_);
1608 	confess(err("ARGNUM")) if ($#_<3||$#_>4);
1609 	VRRb(0xe782,@_);
1612 	vfae(@_[0..2],0,$_[3]);
1615 	vfae(@_[0..2],1,$_[3]);
1618 	vfae(@_[0..2],2,$_[3]);
1621 	$_[3]=0 if (!defined($_[3]));
1622 	vfae(@_[0..2],0,0x1|$_[3]);
1625 	$_[3]=0 if (!defined($_[3]));
1626 	vfae(@_[0..2],1,0x1|$_[3]);
1629 	$_[3]=0 if (!defined($_[3]));
1630 	vfae(@_[0..2],2,0x1|$_[3]);
1633 	$_[3]=0 if (!defined($_[3]));
1634 	vfae(@_[0..2],0,0x2|$_[3]);
1637 	$_[3]=0 if (!defined($_[3]));
1638 	vfae(@_[0..2],1,0x2|$_[3]);
1641 	$_[3]=0 if (!defined($_[3]));
1642 	vfae(@_[0..2],2,0x2|$_[3]);
1645 	$_[3]=0 if (!defined($_[3]));
1646 	vfae(@_[0..2],0,0x3|$_[3]);
1649 	$_[3]=0 if (!defined($_[3]));
1650 	vfae(@_[0..2],1,0x3|$_[3]);
1653 	$_[3]=0 if (!defined($_[3]));
1654 	vfae(@_[0..2],2,0x3|$_[3]);
1658 	confess(err("ARGNUM")) if ($#_<3||$#_>4);
1659 	VRRb(0xe780,@_);
1662 	vfee(@_[0..2],0,$_[3]);
1665 	vfee(@_[0..2],1,$_[3]);
1668 	vfee(@_[0..2],2,$_[3]);
1671 	vfee(@_,0,1);
1674 	vfee(@_,1,1);
1677 	vfee(@_,2,1);
1680 	vfee(@_,0,2);
1683 	vfee(@_,1,2);
1686 	vfee(@_,2,2);
1689 	vfee(@_,0,3);
1692 	vfee(@_,1,3);
1695 	vfee(@_,2,3);
1699 	confess(err("ARGNUM")) if ($#_<3||$#_>4);
1700 	VRRb(0xe781,@_);
1703 	vfene(@_[0..2],0,$_[3]);
1706 	vfene(@_[0..2],1,$_[3]);
1709 	vfene(@_[0..2],2,$_[3]);
1712 	vfene(@_,0,1);
1715 	vfene(@_,1,1);
1718 	vfene(@_,2,1);
1721 	vfene(@_,0,2);
1724 	vfene(@_,1,2);
1727 	vfene(@_,2,2);
1730 	vfene(@_,0,3);
1733 	vfene(@_,1,3);
1736 	vfene(@_,2,3);
1740 	confess(err("ARGNUM")) if ($#_<2||$#_>3);
1741 	VRRa(0xe75c,@_[0..2],0,$_[3]);
1744 	vistr(@_[0..1],0,$_[2]);
1747 	vistr(@_[0..1],1,$_[2]);
1750 	vistr(@_[0..1],2,$_[2]);
1753 	vistr(@_,0,1);
1756 	vistr(@_,1,1);
1759 	vistr(@_,2,1);
1763 	confess(err("ARGNUM")) if ($#_<4||$#_>5);
1764 	VRRd(0xe78a,@_);
1767 	vstrc(@_[0..3],0,$_[4]);
1770 	vstrc(@_[0..3],1,$_[4]);
1773 	vstrc(@_[0..3],2,$_[4]);
1776 	$_[4]=0 if (!defined($_[4]));
1777 	vstrc(@_[0..3],0,0x1|$_[4]);
1780 	$_[4]=0 if (!defined($_[4]));
1781 	vstrc(@_[0..3],1,0x1|$_[4]);
1784 	$_[4]=0 if (!defined($_[4]));
1785 	vstrc(@_[0..3],2,0x1|$_[4]);
1788 	$_[4]=0 if (!defined($_[4]));
1789 	vstrc(@_[0..3],0,0x2|$_[4]);
1792 	$_[4]=0 if (!defined($_[4]));
1793 	vstrc(@_[0..3],1,0x2|$_[4]);
1796 	$_[4]=0 if (!defined($_[4]));
1797 	vstrc(@_[0..3],2,0x2|$_[4]);
1800 	$_[4]=0 if (!defined($_[4]));
1801 	vstrc(@_[0..3],0,0x3|$_[4]);
1804 	$_[4]=0 if (!defined($_[4]));
1805 	vstrc(@_[0..3],1,0x3|$_[4]);
1808 	$_[4]=0 if (!defined($_[4]));
1809 	vstrc(@_[0..3],2,0x3|$_[4]);
1815 	confess(err("ARGNUM")) if ($#_!=4);
1816 	VRRc(0xe7e3,@_);
1819 	vfa(@_,3,0);
1822 	vfa(@_,3,8);
1826 	confess(err("ARGNUM")) if ($#_!=3);
1827 	VRRa(0xe7cb,@_);
1830 	wfc(@_,3,0);
1834 	confess(err("ARGNUM")) if ($#_!=3);
1835 	VRRa(0xe7ca,@_);
1838 	wfk(@_,2,0);
1841 	wfk(@_,3,0);
1844 	wfk(@_,4,0);
1848 	confess(err("ARGNUM")) if ($#_!=5);
1849 	VRRc(0xe7e8,@_);
1852 	vfce(@_,3,0,0);
1855 	vfce(@_,3,0,1);
1858 	vfce(@_,3,8,0);
1861 	vfce(@_,3,8,1);
1865 	confess(err("ARGNUM")) if ($#_!=5);
1866 	VRRc(0xe7eb,@_);
1869 	vfch(@_,3,0,0);
1872 	vfch(@_,3,0,1);
1875 	vfch(@_,3,8,0);
1878 	vfch(@_,3,8,1);
1882 	confess(err("ARGNUM")) if ($#_!=5);
1883 	VRRc(0xe7ea,@_);
1886 	vfche(@_,3,0,0);
1889 	vfche(@_,3,0,1);
1892 	vfche(@_,3,8,0);
1895 	vfche(@_,3,8,1);
1899 	confess(err("ARGNUM")) if ($#_!=4);
1900 	VRRa(0xe7c3,@_);
1903 	vcdg(@_[0..1],3,@_[2..3]);
1906 	vcdg(@_[0..1],3,0x8|$_[2],$_[3]);
1910 	confess(err("ARGNUM")) if ($#_!=4);
1911 	VRRa(0xe7c1,@_);
1914 	vcdlg(@_[0..1],3,@_[2..3]);
1917 	vcdlg(@_[0..1],3,0x8|$_[2],$_[3]);
1921 	confess(err("ARGNUM")) if ($#_!=4);
1922 	VRRa(0xe7c2,@_);
1925 	vcgd(@_[0..1],3,@_[2..3]);
1928 	vcgd(@_[0..1],3,0x8|$_[2],$_[3]);
1932 	confess(err("ARGNUM")) if ($#_!=4);
1933 	VRRa(0xe7c0,@_);
1936 	vclgd(@_[0..1],3,@_[2..3]);
1939 	vclgd(@_[0..1],3,0x8|$_[2],$_[3]);
1943 	confess(err("ARGNUM")) if ($#_!=4);
1944 	VRRc(0xe7e5,@_);
1947 	vfd(@_,3,0);
1950 	vfd(@_,3,8);
1954 	confess(err("ARGNUM")) if ($#_!=4);
1955 	VRRa(0xe7c7,@_);
1958 	vfi(@_[0..1],3,@_[2..3]);
1961 	vfi(@_[0..1],3,0x8|$_[2],$_[3]);
1965 	confess(err("ARGNUM")) if ($#_!=3);
1966 	VRRa(0xe7c4,@_);
1969 	vlde(@_,2,0);
1972 	vlde(@_,2,8);
1976 	confess(err("ARGNUM")) if ($#_!=4);
1977 	VRRa(0xe7c5,@_);
1980 	vled(@_[0..1],3,@_[2..3]);
1983 	vled(@_[0..1],3,0x8|$_[2],$_[3]);
1987 	confess(err("ARGNUM")) if ($#_!=4);
1988 	VRRc(0xe7e7,@_);
1991 	vfm(@_,3,0);
1994 	vfm(@_,3,8);
1998 	confess(err("ARGNUM")) if ($#_!=5);
1999 	VRRe(0xe78f,@_);
2002 	vfma(@_,0,3);
2005 	vfma(@_,8,3);
2009 	confess(err("ARGNUM")) if ($#_!=5);
2010 	VRRe(0xe78e,@_);
2013 	vfms(@_,0,3);
2016 	vfms(@_,8,3);
2020 	confess(err("ARGNUM")) if ($#_!=4);
2021 	VRRa(0xe7cc,@_);
2024 	vfpso(@_[0..1],3,0,$_[2]);
2027 	vfpso(@_[0..1],3,8,$_[2]);
2030 	vfpso(@_,3,0,0);
2033 	vfpso(@_,3,8,0);
2036 	vfpso(@_,3,0,1);
2039 	vfpso(@_,3,8,1);
2042 	vfpso(@_,3,0,2);
2045 	vfpso(@_,3,8,2);
2049 	confess(err("ARGNUM")) if ($#_!=3);
2050 	VRRa(0xe7ce,@_);
2053 	vfsq(@_,3,0);
2056 	vfsq(@_,3,8);
2060 	confess(err("ARGNUM")) if ($#_!=4);
2061 	VRRc(0xe7e2,@_);
2064 	vfs(@_,3,0);
2067 	vfs(@_,3,8);
2071 	confess(err("ARGNUM")) if ($#_!=4);
2072 	VRIe(0xe74a,@_);
2075 	vftci(@_,3,0);
2078 	vftci(@_,3,8);
2084 	confess(err("ARGNUM")) if ($#_!=2);
2085 	VRRc(0xe785,@_);
2089 	vllez(@_,6);
2095 	confess(err("ARGNUM")) if ($#_!=5);
2096 	VRRd(0xe7b8,@_);
2099 	vmsl(@_[0..3],3,$_[4]);
2103 	confess(err("ARGNUM")) if ($#_!=2);
2104 	VRRc(0xe76c,@_);
2108 	confess(err("ARGNUM")) if ($#_!=2);
2109 	VRRc(0xe76e,@_);
2113 	confess(err("ARGNUM")) if ($#_!=2);
2114 	VRRc(0xe76f,@_);
2118 	vpopct(@_,0);
2121 	vpopct(@_,1);
2124 	vpopct(@_,2);
2127 	vpopct(@_,3);
2133 	vfa(@_,2,0);
2136 	vfa(@_,2,8);
2139 	vfa(@_,4,8);
2143 	wfc(@_,2,0);
2146 	wfc(@_,4,0);
2150 	vfce(@_,2,0,0);
2153 	vfce(@_,2,0,1);
2156 	vfce(@_,2,8,0);
2159 	vfce(@_,2,8,1);
2162 	vfce(@_,4,8,0);
2165 	vfce(@_,4,8,1);
2169 	vfch(@_,2,0,0);
2172 	vfch(@_,2,0,1);
2175 	vfch(@_,2,8,0);
2178 	vfch(@_,2,8,1);
2181 	vfch(@_,4,8,0);
2184 	vfch(@_,4,8,1);
2188 	vfche(@_,2,0,0);
2191 	vfche(@_,2,0,1);
2194 	vfche(@_,2,8,0);
2197 	vfche(@_,2,8,1);
2200 	vfche(@_,4,8,0);
2203 	vfche(@_,4,8,1);
2207 	vfd(@_,2,0);
2210 	vfd(@_,2,8);
2213 	vfd(@_,4,8);
2217 	vfi(@_[0..1],2,@_[2..3]);
2220 	vfi(@_[0..1],2,0x8|$_[2],$_[3]);
2223 	vfi(@_[0..1],4,0x8|$_[2],$_[3]);
2227 	vlde(@_);
2230 	vfll(@_,2,0);
2233 	vfll(@_,2,8);
2236 	vfll(@_,3,8);
2240 	vled(@_);
2243 	vflr(@_[0..1],3,@_[2..3]);
2246 	vflr(@_[0..1],3,0x8|$_[2],$_[3]);
2249 	vflr(@_[0..1],4,0x8|$_[2],$_[3]);
2253 	confess(err("ARGNUM")) if ($#_!=5);
2254 	VRRc(0xe7ef,@_);
2257 	vfmax(@_[0..2],2,0,$_[3]);
2260 	vfmax(@_[0..2],3,0,$_[3]);
2263 	vfmax(@_[0..2],2,8,$_[3]);
2266 	vfmax(@_[0..2],3,8,$_[3]);
2269 	vfmax(@_[0..2],4,8,$_[3]);
2273 	confess(err("ARGNUM")) if ($#_!=5);
2274 	VRRc(0xe7ee,@_);
2277 	vfmin(@_[0..2],2,0,$_[5]);
2280 	vfmin(@_[0..2],3,0,$_[5]);
2283 	vfmin(@_[0..2],2,8,$_[5]);
2286 	vfmin(@_[0..2],3,8,$_[5]);
2289 	vfmin(@_[0..2],4,8,$_[5]);
2293 	vfm(@_,2,0);
2296 	vfm(@_,2,8);
2299 	vfm(@_,4,8);
2303 	vfma(@_,0,2);
2306 	vfma(@_,8,2);
2309 	vfma(@_,8,4);
2313 	vfms(@_,0,2);
2316 	vfms(@_,8,2);
2319 	vfms(@_,8,4);
2323 	confess(err("ARGNUM")) if ($#_!=5);
2324 	VRRe(0xe79f,@_);
2327 	vfnma(@_,0,2);
2330 	vfnma(@_,0,3);
2333 	vfnma(@_,8,2);
2336 	vfnma(@_,8,3);
2339 	vfnma(@_,8,4);
2343 	confess(err("ARGNUM")) if ($#_!=5);
2344 	VRRe(0xe79e,@_);
2347 	vfnms(@_,0,2);
2350 	vfnms(@_,0,3);
2353 	vfnms(@_,8,2);
2356 	vfnms(@_,8,3);
2359 	vfnms(@_,8,4);
2363 	vfpso(@_[0..1],2,0,$_[2]);
2366 	vfpso(@_[0..1],2,8,$_[2]);
2369 	vfpso(@_,2,0,0);
2372 	vfpso(@_,2,8,0);
2375 	vfpso(@_,2,0,1);
2378 	vfpso(@_,2,8,1);
2381 	vfpso(@_,2,0,2);
2384 	vfpso(@_,2,8,2);
2387 	vfpso(@_[0..1],4,0,$_[2]);
2390 	vfpso(@_[0..1],4,8,$_[2]);
2393 	vfpso(@_,4,0,0);
2396 	vfpso(@_,4,8,0);
2399 	vfpso(@_,4,0,1);
2402 	vfpso(@_,4,8,1);
2405 	vfpso(@_,4,0,2);
2408 	vfpso(@_,4,8,2);
2412 	vfsq(@_,2,0);
2415 	vfsq(@_,2,8);
2418 	vfsq(@_,4,8);
2422 	vfs(@_,2,0);
2425 	vfs(@_,2,8);
2428 	vfs(@_,4,8);
2432 	vftci(@_,2,0);
2435 	vftci(@_,2,8);
2438 	vftci(@_,4,8);
2444 	confess(err("ARGNUM")) if ($#_!=2);
2445 	VRSd(0xe637,@_);
2449 	confess(err("ARGNUM")) if ($#_!=2);
2450 	VSI(0xe635,@_);
2454 	confess(err("ARGNUM")) if ($#_!=2);
2455 	VRSd(0xe63f,@_);
2459 	confess(err("ARGNUM")) if ($#_!=2);
2460 	VSI(0xe63d,@_);
2464 	confess(err("ARGNUM")) if ($#_!=4);
2465 	VRIf(0xe671,@_);
2469 	confess(err("ARGNUM")) if ($#_!=2);
2470 	VRRh(0xe677,@_);
2474 	confess(err("ARGNUM")) if ($#_!=2);
2475 	VRRi(0xe650,@_);
2479 	confess(err("ARGNUM")) if ($#_!=2);
2480 	VRRi(0xe652,@_);
2484 	confess(err("ARGNUM")) if ($#_!=3);
2485 	VRIi(0xe658,@_);
2489 	confess(err("ARGNUM")) if ($#_!=3);
2490 	VRIi(0xe65a,@_);
2494 	confess(err("ARGNUM")) if ($#_!=4);
2495 	VRIf(0xe67a,@_);
2499 	confess(err("ARGNUM")) if ($#_!=2);
2500 	VRIh(0xe649,@_);
2504 	confess(err("ARGNUM")) if ($#_!=4);
2505 	VRIf(0xe678,@_);
2509 	confess(err("ARGNUM")) if ($#_!=4);
2510 	VRIf(0xe679,@_);
2514 	confess(err("ARGNUM")) if ($#_!=2);
2515 	VSI(0xe634,@_);
2519 	confess(err("ARGNUM")) if ($#_!=4);
2520 	VRIg(0xe65b,@_);
2524 	confess(err("ARGNUM")) if ($#_!=4);
2525 	VRIf(0xe67b,@_);
2529 	confess(err("ARGNUM")) if ($#_!=4);
2530 	VRIf(0xe67e,@_);
2534 	confess(err("ARGNUM")) if ($#_!=4);
2535 	VRIg(0xe659,@_);
2539 	confess(err("ARGNUM")) if ($#_!=4);
2540 	VRIf(0xe673,@_);
2544 	confess(err("ARGNUM")) if ($#_!=0);
2545 	VRRg(0xe65f,@_);
2549 	confess(err("ARGNUM")) if ($#_!=2);
2550 	VSI(0xe63c,@_);
2558 	confess(err("ARGNUM")) if ($#_<4||5<$#_);
2559 	my $ops=join(',',@_[1..$#_]);
2574 	confess(err("ARGNUM")) if ($#_!=2);
2575 	my $ops=join(',',@_[1..$#_]);
2588 	confess(err("ARGNUM")) if ($#_<0||2<$#_);
2589 	my $ops=join(',',@_[1..$#_]);
2602 	confess(err("ARGNUM")) if ($#_<3||4<$#_);
2603 	my $ops=join(',',@_[1..$#_]);
2615 	confess(err("ARGNUM")) if ($#_!=2);
2616 	my $ops=join(',',@_[1..$#_]);
2629 	confess(err("ARGNUM")) if ($#_<0||1<$#_);
2630 	my $ops=join(',',@_[1..$#_]);
2640 	confess(err("ARGNUM")) if ($#_<2||3<$#_);
2641 	my $ops=join(',',@_[1..$#_]);
2655 	confess(err("ARGNUM")) if ($#_!=4);
2656 	my $ops=join(',',@_[1..$#_]);
2670 	confess(err("ARGNUM")) if ($#_!=4);
2671 	my $ops=join(',',@_[1..$#_]);
2685 	confess(err("ARGNUM")) if ($#_<4||$#_>5);
2686 	my $ops=join(',',@_[1..$#_]);
2700 	confess(err("ARGNUM")) if ($#_!=5);
2701 	my $ops=join(',',@_[1..$#_]);
2715 	confess(err("ARGNUM")) if ($#_!=5);
2716 	my $ops=join(',',@_[1..$#_]);
2730 	confess(err("ARGNUM")) if ($#_!=5);
2731 	my $ops=join(',',@_[1..$#_]);
2745 	confess(err("ARGNUM")) if ($#_!=3);
2746 	my $ops=join(',',@_[1..$#_]);
2760 	confess(err("ARGNUM")) if ($#_!=4);
2761 	my $ops=join(',',@_[1..$#_]);
2775 	confess(err("ARGNUM")) if ($#_<2||5<$#_);
2776 	my $ops=join(',',@_[1..$#_]);
2790 	confess(err("ARGNUM")) if ($#_<3||5<$#_);
2791 	my $ops=join(',',@_[1..$#_]);
2805 	confess(err("ARGNUM")) if ($#_<3||6<$#_);
2806 	my $ops=join(',',@_[1..$#_]);
2820 	confess(err("ARGNUM")) if ($#_<4||6<$#_);
2821 	my $ops=join(',',@_[1..$#_]);
2835 	confess(err("ARGNUM")) if ($#_<4||6<$#_);
2836 	my $ops=join(',',@_[1..$#_]);
2850 	confess(err("ARGNUM")) if ($#_!=3);
2851 	my $ops=join(',',@_[1..$#_]);
2865 	confess(err("ARGNUM")) if ($#_!=1);
2866 	my $ops=join(',',@_[1..$#_]);
2879 	confess(err("ARGNUM")) if ($#_<2||$#_>3);
2880 	my $ops=join(',',@_[1..$#_]);
2894 	confess(err("ARGNUM")) if ($#_!=3);
2895 	my $ops=join(',',@_[1..$#_]);
2909 	confess(err("ARGNUM")) if ($#_<3||$#_>4);
2910 	my $ops=join(',',@_[1..$#_]);
2924 	confess(err("ARGNUM")) if ($#_<3||$#_>4);
2925 	my $ops=join(',',@_[1..$#_]);
2939 	confess(err("ARGNUM")) if ($#_!=4);
2940 	my $ops=join(',',@_[1..$#_]);
2954 	confess(err("ARGNUM")) if ($#_!=3);
2955 	my $ops=join(',',@_[1..$#_]);
2969 	confess(err("ARGNUM")) if ($#_<2||$#_>3);
2970 	my $ops=join(',',@_[1..$#_]);
2984 	confess(err("ARGNUM")) if ($#_<2||$#_>3);
2985 	my $ops=join(',',@_[1..$#_]);
2999 	confess(err("ARGNUM")) if ($#_!=3);
3000 	my $ops=join(',',@_[1..$#_]);
3018 	confess(err("ARGNUM")) if ($#_!=0);
3036 	confess(err("ARGNUM")) if ($#_!=0);
3054 	confess(err("ARGNUM")) if ($#_!=1);
3065 	confess(err("ARGNUM")) if ($#_!=0);
3077 	confess(err("ARGNUM")) if ($#_!=0);
3100 	confess(err("ARGNUM")) if ($#_!=0);
3126 	confess(err("ARGNUM")) if ($#_!=0);
3152 	confess(err("ARGNUM")) if ($#_<0||3<$#_);
3155 	$rxb|=0x08 if (defined($_[0])&&($_[0]&0x10));
3156 	$rxb|=0x04 if (defined($_[1])&&($_[1]&0x10));
3157 	$rxb|=0x02 if (defined($_[2])&&($_[2]&0x10));
3158 	$rxb|=0x01 if (defined($_[3])&&($_[3]&0x10));
3170 	confess($ERR{ARGNUM}) if ($#_!=0);
3172 	return $ERR{$_[0]};

Last Index update Wed Nov 13 10:05:04 UTC 2024

Dedicated to & Maintained by Room-11