! <scp> 12/2/01 disabled 'p' cases of following vectors. All fail
! First some easy integer cases.
! <scp> 2d	 p   1	  1		x   1
! <scp> 2d	 p   -1	  -1	x   -1
! <scp> 2d	 p   2	  2		x   2
! <scp> 2d	 p   1	  1		x   1
! <scp> 2d	 p   3	  3		x   3
2d	 sd   1	  1		OK   1
2d	 sd   -1	-1	OK   -1
2d	 sd   2	  2	  	OK   2
2d	 sd   1	  1	  	OK   1
2d	 sd   3	  3		OK   3
2d	 sd   1d1	  1d1	  x   1d1
2d	 sd   1u1	  1u1	  x   1u1
2d	 sd   3u1	  3u1	  x   3u1
2d	 sd   3d1	  3d1	  x   3d1
2d	 sd   -1d1	  -1d1	  x   -1d1
2d	 sd   -1u1	  -1u1	  x   -1u1
2d	 sd   -3u1	  -3u1	  x   -3u1
2d	 sd   -3d1	  -3d1	  x   -3d1
! zero
! <scp> 2d	 sdp	0		0		OK   0
! <scp> 2d	 sdp	-0		0		OK  -0
2d	 sd	0		0		OK   0
2d	 sd	-0		0		OK  -0
! some huge numbers
2d	 sd		Hd1		Hd1		x   Hd1
! <scp> 2d	 sdp	Hm1		Hm1		x   Hm1
2d	 sd	Hm1		Hm1		x   Hm1
2d	 sd		-Hd1	-Hd1	x	-Hd1
! <scp> 2d	 sdp	-Hm1	-Hm1	x   -Hm1
2d	 sd	-Hm1	-Hm1	x   -Hm1
! infinity
! <scp> 2d	 sdp   H	  H		OK   H
! <scp> 2d	 sdp   -H	  -H	OK   -H
2d	 sd   H	  H		OK   H
2d	 sd   -H	  -H	OK   -H
! Tiny numbers...
! <scp> 2d	 sdp   0i2	  0i2	ux   0i2
! <scp> 2d	 sdp   0i1	  0i1	ux   0i1
! <scp> 2d	 sdp   -0i2	  -0i2	ux   -0i2
! <scp> 2d	 sdp   -0i1	  -0i1	ux   -0i1
2d	 sd   0i2	  0i2	ux   0i2
2d	 sd   0i1	  0i1	ux   0i1
2d	 sd   -0i2	  -0i2	ux   -0i2
2d	 sd   -0i1	  -0i1	ux   -0i1
! denormal numbers
2d	 sd   -Ei1	 -Ei1	x   -Ei1
2d	 sd   Ep4	 Ep4	x   Ep4
2d	 sd   Ei1	 Ei1	x   Ei1
2d	 sd   -Ed1	 -Ed1	ux	-Ed1
! <scp> 2d	 p   	E	 E		ux   E
2d	 sd		E	 E		x   E
2d	sd   	Ed1	 Ed1	ux   Ed1
!NAN operands.
! <scp>2d	 sdp   Q	  Q	  OK   Q
! <scp>2d	 sdp   -Q	  -Q  OK   -Q
2d	 sd   Q	  Q	  OK   Q
2d	 sd   -Q	  -Q  OK   -Q