tobias
/
MCFM-10.4
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
22 Commits
1 Branch
0 Tags
77 MiB
 
 
 
 
 
 
Tree: fc39d4149e
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'fc39d4149e'
${ noResults }
MCFM-10.4/lib/handyG/checks/test-muoneNP.f90

1751 lines
141 KiB
Raw Blame History

MODULE gtestmuoneNP
contains
FUNCTION ARGS(w,z)
use globals, only: prec
implicit none
complex(kind=prec), parameter :: zero = ( 0., 0.)
complex(kind=prec), parameter :: one = ( 1., 0.)
complex(kind=prec), parameter :: mone = (-1., 0.)
complex(kind=prec), parameter :: im = ( 0., 1.)
complex(kind=prec), parameter :: mim = ( 0.,-1.)
complex(kind=prec), parameter :: deg60 = (0.5,0.8660254038)
complex(kind=prec), parameter :: degm60 = (0.5,-0.8660254038)
complex(kind=prec) :: w,z
complex(kind=prec) :: args(1733,5)
args = 1.e15
args(1,1:2) = (/ zero, z /)
args(2,1:2) = (/ one, w /)
args(3,1:2) = (/ z**2, w /)
args(4,1:2) = (/ (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(5,1:2) = (/ (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(6,1:3) = (/ mone, zero, z /)
args(7,1:3) = (/ zero, zero, z /)
args(8,1:3) = (/ one, zero, z /)
args(9,1:3) = (/ one, one, w /)
args(10,1:3) = (/ one, z**2, w /)
args(11,1:3) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(12,1:3) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(13,1:3) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(14,1:3) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(15,1:3) = (/ z**2, one, w /)
args(16,1:3) = (/ z**2, z**2, w /)
args(17,1:2) = (/ mone, z /)
args(18,1:2) = (/ one, z /)
args(19,1:3) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(20,1:3) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(21,1:3) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(22,1:3) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(23,1:3) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(24,1:3) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(25,1:3) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(26,1:3) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(27,1:4) = (/ mone, mone, zero, z /)
args(28,1:4) = (/ mone, zero, zero, z /)
args(29,1:4) = (/ mone, one, zero, z /)
args(30,1:4) = (/ zero, mone, zero, z /)
args(31,1:4) = (/ zero, zero, zero, z /)
args(32,1:4) = (/ zero, one, zero, z /)
args(33,1:4) = (/ one, mone, zero, z /)
args(34,1:4) = (/ one, zero, zero, z /)
args(35,1:4) = (/ one, one, zero, z /)
args(36,1:4) = (/ one, one, one, w /)
args(37,1:4) = (/ one, one, z**2, w /)
args(38,1:4) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(39,1:4) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(40,1:4) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(41,1:4) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(42,1:4) = (/ one, z**2, one, w /)
args(43,1:4) = (/ one, z**2, z**2, w /)
args(44,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(45,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(46,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(47,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(48,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(49,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(50,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(51,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(52,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(53,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(54,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(55,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(56,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(57,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(58,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(59,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(60,1:4) = (/ z**2, one, one, w /)
args(61,1:4) = (/ z**2, one, z**2, w /)
args(62,1:4) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(63,1:4) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(64,1:4) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(65,1:4) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(66,1:4) = (/ z**2, z**2, one, w /)
args(67,1:4) = (/ z**2, z**2, z**2, w /)
args(68,1:3) = (/ mone, mone, z /)
args(69,1:3) = (/ mone, one, z /)
args(70,1:3) = (/ zero, mone, z /)
args(71,1:3) = (/ zero, one, z /)
args(72,1:3) = (/ one, mone, z /)
args(73,1:3) = (/ one, one, z /)
args(74,1:4) = (/ one, one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(75,1:4) = (/ one, one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(76,1:4) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(77,1:4) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(78,1:4) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(79,1:4) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(80,1:4) = (/ one, z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(81,1:4) = (/ one, z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(82,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(83,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(84,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(85,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(86,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(87,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(88,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(89,1:4) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(90,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(91,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(92,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(93,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(94,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(95,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(96,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(97,1:4) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(98,1:4) = (/ z**2, one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(99,1:4) = (/ z**2, one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(100,1:4) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(101,1:4) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(102,1:4) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(103,1:4) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(104,1:4) = (/ z**2, z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(105,1:4) = (/ z**2, z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(106,1:5) = (/ mone, mone, mone, zero, z /)
args(107,1:5) = (/ mone, mone, zero, zero, z /)
args(108,1:5) = (/ mone, mone, one, zero, z /)
args(109,1:5) = (/ mone, zero, mone, zero, z /)
args(110,1:5) = (/ mone, zero, zero, zero, z /)
args(111,1:5) = (/ mone, zero, one, zero, z /)
args(112,1:5) = (/ mone, one, mone, zero, z /)
args(113,1:5) = (/ mone, one, zero, zero, z /)
args(114,1:5) = (/ mone, one, one, zero, z /)
args(115,1:5) = (/ zero, mone, mone, zero, z /)
args(116,1:5) = (/ zero, mone, zero, zero, z /)
args(117,1:5) = (/ zero, mone, one, zero, z /)
args(118,1:5) = (/ zero, zero, mone, zero, z /)
args(119,1:5) = (/ zero, zero, zero, zero, z /)
args(120,1:5) = (/ zero, zero, one, zero, z /)
args(121,1:5) = (/ zero, one, mone, zero, z /)
args(122,1:5) = (/ zero, one, zero, zero, z /)
args(123,1:5) = (/ zero, one, one, zero, z /)
args(124,1:5) = (/ one, mone, mone, zero, z /)
args(125,1:5) = (/ one, mone, zero, zero, z /)
args(126,1:5) = (/ one, mone, one, zero, z /)
args(127,1:5) = (/ one, zero, mone, zero, z /)
args(128,1:5) = (/ one, zero, zero, zero, z /)
args(129,1:5) = (/ one, zero, one, zero, z /)
args(130,1:5) = (/ one, one, mone, zero, z /)
args(131,1:5) = (/ one, one, zero, zero, z /)
args(132,1:5) = (/ one, one, one, zero, z /)
args(133,1:5) = (/ one, one, one, one, w /)
args(134,1:5) = (/ one, one, one, z**2, w /)
args(135,1:5) = (/ one, one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(136,1:5) = (/ one, one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(137,1:5) = (/ one, one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(138,1:5) = (/ one, one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(139,1:5) = (/ one, one, z**2, one, w /)
args(140,1:5) = (/ one, one, z**2, z**2, w /)
args(141,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(142,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(143,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(144,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(145,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(146,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(147,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(148,1:5) = (/ one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(149,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(150,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(151,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(152,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(153,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(154,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(155,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(156,1:5) = (/ one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(157,1:5) = (/ one, z**2, one, one, w /)
args(158,1:5) = (/ one, z**2, one, z**2, w /)
args(159,1:5) = (/ one, z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(160,1:5) = (/ one, z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(161,1:5) = (/ one, z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(162,1:5) = (/ one, z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(163,1:5) = (/ one, z**2, z**2, one, w /)
args(164,1:5) = (/ one, z**2, z**2, z**2, w /)
args(165,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, one, one, w /)
args(166,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, one, z**2, w /)
args(167,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(168,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(169,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(170,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(171,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, one, w /)
args(172,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, z**2, w /)
args(173,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(174,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(175,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(176,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(177,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(178,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(179,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(180,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(181,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(182,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(183,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(184,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(185,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(186,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(187,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(188,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(189,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, one, w /)
args(190,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, z**2, w /)
args(191,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(192,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(193,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(194,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(195,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, one, w /)
args(196,1:5) = (/ (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, z**2, w /)
args(197,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, one, one, w /)
args(198,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, one, z**2, w /)
args(199,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(200,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(201,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(202,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(203,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, one, w /)
args(204,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, z**2, w /)
args(205,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(206,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(207,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(208,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(209,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(210,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(211,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(212,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(213,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(214,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(215,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(216,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(217,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(218,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(219,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(220,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(221,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, one, w /)
args(222,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, z**2, w /)
args(223,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(224,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(225,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(226,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(227,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, one, w /)
args(228,1:5) = (/ (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, z**2, w /)
args(229,1:5) = (/ z**2, one, one, one, w /)
args(230,1:5) = (/ z**2, one, one, z**2, w /)
args(231,1:5) = (/ z**2, one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(232,1:5) = (/ z**2, one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(233,1:5) = (/ z**2, one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(234,1:5) = (/ z**2, one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(235,1:5) = (/ z**2, one, z**2, one, w /)
args(236,1:5) = (/ z**2, one, z**2, z**2, w /)
args(237,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(238,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(239,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(240,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(241,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(242,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(243,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(244,1:5) = (/ z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(245,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(246,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(247,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(248,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(249,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(250,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(251,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(252,1:5) = (/ z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(253,1:5) = (/ z**2, z**2, one, one, w /)
args(254,1:5) = (/ z**2, z**2, one, z**2, w /)
args(255,1:5) = (/ z**2, z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(256,1:5) = (/ z**2, z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(257,1:5) = (/ z**2, z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(258,1:5) = (/ z**2, z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(259,1:5) = (/ z**2, z**2, z**2, one, w /)
args(260,1:5) = (/ z**2, z**2, z**2, z**2, w /)
args(261,1:2) = (/ zero, w /)
args(262,1:2) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(263,1:2) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(264,1:3) = (/ zero, zero, w /)
args(265,1:3) = (/ zero, one, w /)
args(266,1:3) = (/ zero, z**2, w /)
args(267,1:3) = (/ one, zero, w /)
args(268,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(269,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(270,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(271,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(272,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(273,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(274,1:3) = (/ z**2, zero, w /)
args(275,1:3) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(276,1:3) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(277,1:3) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(278,1:3) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(279,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(280,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(281,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(282,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(283,1:3) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(284,1:3) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(285,1:4) = (/ zero, zero, zero, w /)
args(286,1:4) = (/ zero, zero, one, w /)
args(287,1:4) = (/ zero, zero, z**2, w /)
args(288,1:4) = (/ zero, one, zero, w /)
args(289,1:4) = (/ zero, one, one, w /)
args(290,1:4) = (/ zero, one, z**2, w /)
args(291,1:4) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(292,1:4) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(293,1:4) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(294,1:4) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(295,1:4) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(296,1:4) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(297,1:4) = (/ zero, z**2, zero, w /)
args(298,1:4) = (/ zero, z**2, one, w /)
args(299,1:4) = (/ zero, z**2, z**2, w /)
args(300,1:4) = (/ one, zero, zero, w /)
args(301,1:4) = (/ one, zero, one, w /)
args(302,1:4) = (/ one, zero, z**2, w /)
args(303,1:4) = (/ one, one, zero, w /)
args(304,1:4) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(305,1:4) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(306,1:4) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(307,1:4) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(308,1:4) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(309,1:4) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(310,1:4) = (/ one, z**2, zero, w /)
args(311,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(312,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(313,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(314,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(315,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(316,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(317,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(318,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(319,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(320,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(321,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(322,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(323,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(324,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(325,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(326,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(327,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(328,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(329,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(330,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(331,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(332,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(333,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(334,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(335,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(336,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(337,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(338,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(339,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(340,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(341,1:4) = (/ z**2, zero, zero, w /)
args(342,1:4) = (/ z**2, zero, one, w /)
args(343,1:4) = (/ z**2, zero, z**2, w /)
args(344,1:4) = (/ z**2, one, zero, w /)
args(345,1:4) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(346,1:4) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(347,1:4) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(348,1:4) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(349,1:4) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(350,1:4) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(351,1:4) = (/ z**2, z**2, zero, w /)
args(352,1:5) = (/ zero, zero, zero, zero, w /)
args(353,1:5) = (/ zero, zero, zero, one, w /)
args(354,1:5) = (/ zero, zero, zero, z**2, w /)
args(355,1:5) = (/ zero, zero, one, zero, w /)
args(356,1:5) = (/ zero, zero, one, one, w /)
args(357,1:5) = (/ zero, zero, one, z**2, w /)
args(358,1:5) = (/ zero, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(359,1:5) = (/ zero, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(360,1:5) = (/ zero, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(361,1:5) = (/ zero, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(362,1:5) = (/ zero, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(363,1:5) = (/ zero, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(364,1:5) = (/ zero, zero, z**2, zero, w /)
args(365,1:5) = (/ zero, zero, z**2, one, w /)
args(366,1:5) = (/ zero, zero, z**2, z**2, w /)
args(367,1:5) = (/ zero, one, zero, zero, w /)
args(368,1:5) = (/ zero, one, zero, one, w /)
args(369,1:5) = (/ zero, one, zero, z**2, w /)
args(370,1:5) = (/ zero, one, one, zero, w /)
args(371,1:5) = (/ zero, one, one, one, w /)
args(372,1:5) = (/ zero, one, one, z**2, w /)
args(373,1:5) = (/ zero, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(374,1:5) = (/ zero, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(375,1:5) = (/ zero, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(376,1:5) = (/ zero, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(377,1:5) = (/ zero, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(378,1:5) = (/ zero, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(379,1:5) = (/ zero, one, z**2, zero, w /)
args(380,1:5) = (/ zero, one, z**2, one, w /)
args(381,1:5) = (/ zero, one, z**2, z**2, w /)
args(382,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(383,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(384,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(385,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(386,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(387,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(388,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(389,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(390,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(391,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(392,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(393,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(394,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(395,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(396,1:5) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(397,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(398,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(399,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(400,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(401,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(402,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(403,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(404,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(405,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(406,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(407,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(408,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(409,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(410,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(411,1:5) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(412,1:5) = (/ zero, z**2, zero, zero, w /)
args(413,1:5) = (/ zero, z**2, zero, one, w /)
args(414,1:5) = (/ zero, z**2, zero, z**2, w /)
args(415,1:5) = (/ zero, z**2, one, zero, w /)
args(416,1:5) = (/ zero, z**2, one, one, w /)
args(417,1:5) = (/ zero, z**2, one, z**2, w /)
args(418,1:5) = (/ zero, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(419,1:5) = (/ zero, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(420,1:5) = (/ zero, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(421,1:5) = (/ zero, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(422,1:5) = (/ zero, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(423,1:5) = (/ zero, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(424,1:5) = (/ zero, z**2, z**2, zero, w /)
args(425,1:5) = (/ zero, z**2, z**2, one, w /)
args(426,1:5) = (/ zero, z**2, z**2, z**2, w /)
args(427,1:5) = (/ one, zero, zero, zero, w /)
args(428,1:5) = (/ one, zero, zero, one, w /)
args(429,1:5) = (/ one, zero, zero, z**2, w /)
args(430,1:5) = (/ one, zero, one, zero, w /)
args(431,1:5) = (/ one, zero, one, one, w /)
args(432,1:5) = (/ one, zero, one, z**2, w /)
args(433,1:5) = (/ one, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(434,1:5) = (/ one, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(435,1:5) = (/ one, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(436,1:5) = (/ one, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(437,1:5) = (/ one, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(438,1:5) = (/ one, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(439,1:5) = (/ one, zero, z**2, zero, w /)
args(440,1:5) = (/ one, zero, z**2, one, w /)
args(441,1:5) = (/ one, zero, z**2, z**2, w /)
args(442,1:5) = (/ one, one, zero, zero, w /)
args(443,1:5) = (/ one, one, zero, one, w /)
args(444,1:5) = (/ one, one, zero, z**2, w /)
args(445,1:5) = (/ one, one, one, zero, w /)
args(446,1:5) = (/ one, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(447,1:5) = (/ one, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(448,1:5) = (/ one, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(449,1:5) = (/ one, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(450,1:5) = (/ one, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(451,1:5) = (/ one, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(452,1:5) = (/ one, one, z**2, zero, w /)
args(453,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(454,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(455,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(456,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(457,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(458,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(459,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(460,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(461,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(462,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(463,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(464,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(465,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(466,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(467,1:5) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(468,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(469,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(470,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(471,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(472,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(473,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(474,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(475,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(476,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(477,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(478,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(479,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(480,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(481,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(482,1:5) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(483,1:5) = (/ one, z**2, zero, zero, w /)
args(484,1:5) = (/ one, z**2, zero, one, w /)
args(485,1:5) = (/ one, z**2, zero, z**2, w /)
args(486,1:5) = (/ one, z**2, one, zero, w /)
args(487,1:5) = (/ one, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(488,1:5) = (/ one, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(489,1:5) = (/ one, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(490,1:5) = (/ one, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(491,1:5) = (/ one, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(492,1:5) = (/ one, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(493,1:5) = (/ one, z**2, z**2, zero, w /)
args(494,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, zero, w /)
args(495,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, one, w /)
args(496,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, z**2, w /)
args(497,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, zero, w /)
args(498,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, one, w /)
args(499,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, z**2, w /)
args(500,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(501,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(502,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(503,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(504,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(505,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(506,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, zero, w /)
args(507,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, one, w /)
args(508,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, z**2, w /)
args(509,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, zero, w /)
args(510,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, one, w /)
args(511,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, z**2, w /)
args(512,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, zero, w /)
args(513,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, one, w /)
args(514,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, z**2, w /)
args(515,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(516,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(517,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(518,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(519,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(520,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(521,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, zero, w /)
args(522,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, one, w /)
args(523,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, z**2, w /)
args(524,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(525,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(526,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(527,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(528,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(529,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(530,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(531,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(532,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(533,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(534,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(535,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(536,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(537,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(538,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(539,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(540,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(541,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(542,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(543,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(544,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(545,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(546,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(547,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(548,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(549,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(550,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(551,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(552,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(553,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(554,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, zero, w /)
args(555,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, one, w /)
args(556,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, z**2, w /)
args(557,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, zero, w /)
args(558,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, one, w /)
args(559,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, z**2, w /)
args(560,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(561,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(562,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(563,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(564,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(565,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(566,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, zero, w /)
args(567,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, one, w /)
args(568,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, z**2, w /)
args(569,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, zero, w /)
args(570,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, one, w /)
args(571,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, z**2, w /)
args(572,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, zero, w /)
args(573,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, one, w /)
args(574,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, z**2, w /)
args(575,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(576,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(577,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(578,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(579,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(580,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(581,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, zero, w /)
args(582,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, one, w /)
args(583,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, z**2, w /)
args(584,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, zero, w /)
args(585,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, one, w /)
args(586,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, z**2, w /)
args(587,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, zero, w /)
args(588,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, one, w /)
args(589,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, z**2, w /)
args(590,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(591,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(592,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(593,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(594,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(595,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(596,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, zero, w /)
args(597,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, one, w /)
args(598,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, z**2, w /)
args(599,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(600,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(601,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(602,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(603,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(604,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(605,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(606,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(607,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(608,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(609,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(610,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(611,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(612,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(613,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(614,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(615,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(616,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(617,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(618,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(619,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(620,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(621,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(622,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(623,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(624,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(625,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(626,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(627,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(628,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(629,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, zero, w /)
args(630,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, one, w /)
args(631,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, z**2, w /)
args(632,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, zero, w /)
args(633,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, one, w /)
args(634,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, z**2, w /)
args(635,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(636,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(637,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(638,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(639,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(640,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(641,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, zero, w /)
args(642,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, one, w /)
args(643,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, z**2, w /)
args(644,1:5) = (/ z**2, zero, zero, zero, w /)
args(645,1:5) = (/ z**2, zero, zero, one, w /)
args(646,1:5) = (/ z**2, zero, zero, z**2, w /)
args(647,1:5) = (/ z**2, zero, one, zero, w /)
args(648,1:5) = (/ z**2, zero, one, one, w /)
args(649,1:5) = (/ z**2, zero, one, z**2, w /)
args(650,1:5) = (/ z**2, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(651,1:5) = (/ z**2, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(652,1:5) = (/ z**2, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(653,1:5) = (/ z**2, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(654,1:5) = (/ z**2, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(655,1:5) = (/ z**2, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(656,1:5) = (/ z**2, zero, z**2, zero, w /)
args(657,1:5) = (/ z**2, zero, z**2, one, w /)
args(658,1:5) = (/ z**2, zero, z**2, z**2, w /)
args(659,1:5) = (/ z**2, one, zero, zero, w /)
args(660,1:5) = (/ z**2, one, zero, one, w /)
args(661,1:5) = (/ z**2, one, zero, z**2, w /)
args(662,1:5) = (/ z**2, one, one, zero, w /)
args(663,1:5) = (/ z**2, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(664,1:5) = (/ z**2, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(665,1:5) = (/ z**2, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(666,1:5) = (/ z**2, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(667,1:5) = (/ z**2, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(668,1:5) = (/ z**2, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(669,1:5) = (/ z**2, one, z**2, zero, w /)
args(670,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(671,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(672,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(673,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(674,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(675,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(676,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(677,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(678,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(679,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(680,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(681,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(682,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(683,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(684,1:5) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(685,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(686,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(687,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(688,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(689,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(690,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(691,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(692,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(693,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(694,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(695,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(696,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(697,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(698,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(699,1:5) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(700,1:5) = (/ z**2, z**2, zero, zero, w /)
args(701,1:5) = (/ z**2, z**2, zero, one, w /)
args(702,1:5) = (/ z**2, z**2, zero, z**2, w /)
args(703,1:5) = (/ z**2, z**2, one, zero, w /)
args(704,1:5) = (/ z**2, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(705,1:5) = (/ z**2, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(706,1:5) = (/ z**2, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(707,1:5) = (/ z**2, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(708,1:5) = (/ z**2, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(709,1:5) = (/ z**2, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(710,1:5) = (/ z**2, z**2, z**2, zero, w /)
args(711,1:4) = (/ zero, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(712,1:4) = (/ zero, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(713,1:4) = (/ zero, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(714,1:4) = (/ zero, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(715,1:4) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(716,1:4) = (/ zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(717,1:4) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(718,1:4) = (/ zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(719,1:4) = (/ zero, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(720,1:4) = (/ zero, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(721,1:4) = (/ one, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(722,1:4) = (/ one, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(723,1:4) = (/ one, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(724,1:4) = (/ one, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(725,1:4) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(726,1:4) = (/ one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(727,1:4) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(728,1:4) = (/ one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(729,1:4) = (/ one, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(730,1:4) = (/ one, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(731,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(732,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(733,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(734,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(735,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(736,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(737,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(738,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(739,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(740,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(741,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(742,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(743,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(744,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(745,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(746,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(747,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(748,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(749,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(750,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(751,1:4) = (/ z**2, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(752,1:4) = (/ z**2, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(753,1:4) = (/ z**2, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(754,1:4) = (/ z**2, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(755,1:4) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(756,1:4) = (/ z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(757,1:4) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(758,1:4) = (/ z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(759,1:4) = (/ z**2, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(760,1:4) = (/ z**2, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(761,1:2) = (/ mone, w /)
args(762,1:4) = (/ mone, zero, zero, w /)
args(763,1:4) = (/ mone, zero, one, w /)
args(764,1:3) = (/ mone, mone, w /)
args(765,1:3) = (/ mone, zero, w /)
args(766,1:3) = (/ mone, one, w /)
args(767,1:3) = (/ zero, mone, w /)
args(768,1:3) = (/ one, mone, w /)
args(769,1:5) = (/ mone, mone, zero, zero, w /)
args(770,1:5) = (/ mone, mone, zero, one, w /)
args(771,1:5) = (/ mone, zero, zero, zero, w /)
args(772,1:5) = (/ mone, zero, zero, one, w /)
args(773,1:5) = (/ mone, zero, one, zero, w /)
args(774,1:5) = (/ mone, zero, one, one, w /)
args(775,1:5) = (/ mone, one, zero, zero, w /)
args(776,1:5) = (/ mone, one, zero, one, w /)
args(777,1:5) = (/ zero, mone, zero, zero, w /)
args(778,1:5) = (/ zero, mone, zero, one, w /)
args(779,1:5) = (/ one, mone, zero, zero, w /)
args(780,1:5) = (/ one, mone, zero, one, w /)
args(781,1:2) = (/ mim, z /)
args(782,1:2) = (/ im, z /)
args(783,1:2) = (/ (3 - Sqrt(5 - 4*z**2))/2., w /)
args(784,1:2) = (/ (3 + Sqrt(5 - 4*z**2))/2., w /)
args(785,1:3) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, w /)
args(786,1:3) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, w /)
args(787,1:3) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, w /)
args(788,1:3) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, w /)
args(789,1:4) = (/ mim, zero, zero, z /)
args(790,1:4) = (/ im, zero, zero, z /)
args(791,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, one, w /)
args(792,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(793,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(794,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(795,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, one, w /)
args(796,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(797,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(798,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(799,1:3) = (/ zero, mim, z /)
args(800,1:3) = (/ zero, im, z /)
args(801,1:3) = (/ mim, zero, z /)
args(802,1:3) = (/ im, zero, z /)
args(803,1:3) = (/ one, (3 - Sqrt(5 - 4*z**2))/2., w /)
args(804,1:3) = (/ one, (3 + Sqrt(5 - 4*z**2))/2., w /)
args(805,1:3) = (/ z**2, (3 - Sqrt(5 - 4*z**2))/2., w /)
args(806,1:3) = (/ z**2, (3 + Sqrt(5 - 4*z**2))/2., w /)
args(807,1:4) = (/ one, (3 - Sqrt(5 - 4*z**2))/2., one, w /)
args(808,1:4) = (/ one, (3 - Sqrt(5 - 4*z**2))/2., z**2, w /)
args(809,1:4) = (/ one, (3 + Sqrt(5 - 4*z**2))/2., one, w /)
args(810,1:4) = (/ one, (3 + Sqrt(5 - 4*z**2))/2., z**2, w /)
args(811,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(812,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(813,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(814,1:4) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(815,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(816,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(817,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(818,1:4) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(819,1:4) = (/ z**2, (3 - Sqrt(5 - 4*z**2))/2., one, w /)
args(820,1:4) = (/ z**2, (3 - Sqrt(5 - 4*z**2))/2., z**2, w /)
args(821,1:4) = (/ z**2, (3 + Sqrt(5 - 4*z**2))/2., one, w /)
args(822,1:4) = (/ z**2, (3 + Sqrt(5 - 4*z**2))/2., z**2, w /)
args(823,1:5) = (/ zero, mim, zero, zero, z /)
args(824,1:5) = (/ zero, im, zero, zero, z /)
args(825,1:5) = (/ mim, zero, mone, zero, z /)
args(826,1:5) = (/ mim, zero, zero, zero, z /)
args(827,1:5) = (/ mim, zero, one, zero, z /)
args(828,1:5) = (/ im, zero, mone, zero, z /)
args(829,1:5) = (/ im, zero, zero, zero, z /)
args(830,1:5) = (/ im, zero, one, zero, z /)
args(831,1:5) = (/ one, (3 - Sqrt(5 - 4*z**2))/2., one, one, w /)
args(832,1:5) = (/ one, (3 - Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(833,1:5) = (/ one, (3 - Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(834,1:5) = (/ one, (3 - Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(835,1:5) = (/ one, (3 + Sqrt(5 - 4*z**2))/2., one, one, w /)
args(836,1:5) = (/ one, (3 + Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(837,1:5) = (/ one, (3 + Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(838,1:5) = (/ one, (3 + Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(839,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, one, one, w /)
args(840,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, one, z**2, w /)
args(841,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(842,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(843,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(844,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(845,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, z**2, one, w /)
args(846,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., one, z**2, z**2, w /)
args(847,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, one, one, w /)
args(848,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, one, z**2, w /)
args(849,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(850,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(851,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(852,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(853,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, z**2, one, w /)
args(854,1:5) = (/ (3 - Sqrt(5 - 4*z**2))/2., z**2, z**2, z**2, w /)
args(855,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, one, one, w /)
args(856,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, one, z**2, w /)
args(857,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(858,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(859,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(860,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(861,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, z**2, one, w /)
args(862,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., one, z**2, z**2, w /)
args(863,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, one, one, w /)
args(864,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, one, z**2, w /)
args(865,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(866,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(867,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(868,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(869,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, z**2, one, w /)
args(870,1:5) = (/ (3 + Sqrt(5 - 4*z**2))/2., z**2, z**2, z**2, w /)
args(871,1:5) = (/ z**2, (3 - Sqrt(5 - 4*z**2))/2., one, one, w /)
args(872,1:5) = (/ z**2, (3 - Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(873,1:5) = (/ z**2, (3 - Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(874,1:5) = (/ z**2, (3 - Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(875,1:5) = (/ z**2, (3 + Sqrt(5 - 4*z**2))/2., one, one, w /)
args(876,1:5) = (/ z**2, (3 + Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(877,1:5) = (/ z**2, (3 + Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(878,1:5) = (/ z**2, (3 + Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(879,1:2) = (/ -z, w /)
args(880,1:2) = (/ z, w /)
args(881,1:3) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(882,1:3) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(883,1:3) = (/ -z, zero, w /)
args(884,1:3) = (/ -z, one, w /)
args(885,1:3) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(886,1:3) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(887,1:3) = (/ -z, z**2, w /)
args(888,1:3) = (/ z, zero, w /)
args(889,1:3) = (/ z, one, w /)
args(890,1:3) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(891,1:3) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(892,1:3) = (/ z, z**2, w /)
args(893,1:4) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(894,1:4) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(895,1:4) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(896,1:4) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(897,1:4) = (/ -z, zero, zero, w /)
args(898,1:4) = (/ -z, zero, z**2, w /)
args(899,1:4) = (/ -z, one, zero, w /)
args(900,1:4) = (/ -z, one, one, w /)
args(901,1:4) = (/ -z, one, z**2, w /)
args(902,1:4) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(903,1:4) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(904,1:4) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(905,1:4) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(906,1:4) = (/ -z, z**2, zero, w /)
args(907,1:4) = (/ -z, z**2, z**2, w /)
args(908,1:4) = (/ z, zero, zero, w /)
args(909,1:4) = (/ z, zero, z**2, w /)
args(910,1:4) = (/ z, one, zero, w /)
args(911,1:4) = (/ z, one, one, w /)
args(912,1:4) = (/ z, one, z**2, w /)
args(913,1:4) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(914,1:4) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(915,1:4) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(916,1:4) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(917,1:4) = (/ z, z**2, zero, w /)
args(918,1:4) = (/ z, z**2, z**2, w /)
args(919,1:3) = (/ zero, -z, w /)
args(920,1:3) = (/ zero, z, w /)
args(921,1:3) = (/ one, -z, w /)
args(922,1:3) = (/ one, z, w /)
args(923,1:3) = (/ -z, -z, w /)
args(924,1:3) = (/ -z, z, w /)
args(925,1:3) = (/ z, -z, w /)
args(926,1:3) = (/ z, z, w /)
args(927,1:3) = (/ -z, mone, w /)
args(928,1:3) = (/ z, mone, w /)
args(929,1:4) = (/ zero, zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(930,1:4) = (/ zero, zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(931,1:4) = (/ zero, one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(932,1:4) = (/ zero, one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(933,1:4) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(934,1:4) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(935,1:4) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(936,1:4) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(937,1:4) = (/ zero, -z, zero, w /)
args(938,1:4) = (/ zero, -z, one, w /)
args(939,1:4) = (/ zero, -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(940,1:4) = (/ zero, -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(941,1:4) = (/ zero, -z, z**2, w /)
args(942,1:4) = (/ zero, z, zero, w /)
args(943,1:4) = (/ zero, z, one, w /)
args(944,1:4) = (/ zero, z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(945,1:4) = (/ zero, z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(946,1:4) = (/ zero, z, z**2, w /)
args(947,1:4) = (/ zero, z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(948,1:4) = (/ zero, z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(949,1:4) = (/ one, zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(950,1:4) = (/ one, zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(951,1:4) = (/ one, -z, zero, w /)
args(952,1:4) = (/ one, -z, one, w /)
args(953,1:4) = (/ one, -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(954,1:4) = (/ one, -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(955,1:4) = (/ one, -z, z**2, w /)
args(956,1:4) = (/ one, z, zero, w /)
args(957,1:4) = (/ one, z, one, w /)
args(958,1:4) = (/ one, z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(959,1:4) = (/ one, z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(960,1:4) = (/ one, z, z**2, w /)
args(961,1:4) = (/ -z, zero, one, w /)
args(962,1:4) = (/ -z, zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(963,1:4) = (/ -z, zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(964,1:4) = (/ -z, one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(965,1:4) = (/ -z, one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(966,1:4) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(967,1:4) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(968,1:4) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(969,1:4) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(970,1:4) = (/ -z, -z, zero, w /)
args(971,1:4) = (/ -z, -z, one, w /)
args(972,1:4) = (/ -z, -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(973,1:4) = (/ -z, -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(974,1:4) = (/ -z, -z, z**2, w /)
args(975,1:4) = (/ -z, z, zero, w /)
args(976,1:4) = (/ -z, z, one, w /)
args(977,1:4) = (/ -z, z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(978,1:4) = (/ -z, z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(979,1:4) = (/ -z, z, z**2, w /)
args(980,1:4) = (/ -z, z**2, one, w /)
args(981,1:4) = (/ -z, z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(982,1:4) = (/ -z, z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(983,1:4) = (/ z, zero, one, w /)
args(984,1:4) = (/ z, zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(985,1:4) = (/ z, zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(986,1:4) = (/ z, one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(987,1:4) = (/ z, one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(988,1:4) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(989,1:4) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(990,1:4) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(991,1:4) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(992,1:4) = (/ z, -z, zero, w /)
args(993,1:4) = (/ z, -z, one, w /)
args(994,1:4) = (/ z, -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(995,1:4) = (/ z, -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(996,1:4) = (/ z, -z, z**2, w /)
args(997,1:4) = (/ z, z, zero, w /)
args(998,1:4) = (/ z, z, one, w /)
args(999,1:4) = (/ z, z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1000,1:4) = (/ z, z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1001,1:4) = (/ z, z, z**2, w /)
args(1002,1:4) = (/ z, z**2, one, w /)
args(1003,1:4) = (/ z, z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1004,1:4) = (/ z, z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1005,1:5) = (/ zero, zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1006,1:5) = (/ zero, zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1007,1:5) = (/ zero, zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1008,1:5) = (/ zero, zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1009,1:5) = (/ zero, one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1010,1:5) = (/ zero, one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1011,1:5) = (/ zero, one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1012,1:5) = (/ zero, one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1013,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(1014,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(1015,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1016,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1017,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1018,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1019,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(1020,1:5) = (/ zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(1021,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(1022,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(1023,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1024,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1025,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1026,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1027,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(1028,1:5) = (/ zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(1029,1:5) = (/ zero, -z, zero, zero, w /)
args(1030,1:5) = (/ zero, -z, zero, z**2, w /)
args(1031,1:5) = (/ zero, -z, one, zero, w /)
args(1032,1:5) = (/ zero, -z, one, one, w /)
args(1033,1:5) = (/ zero, -z, one, z**2, w /)
args(1034,1:5) = (/ zero, -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1035,1:5) = (/ zero, -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1036,1:5) = (/ zero, -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1037,1:5) = (/ zero, -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1038,1:5) = (/ zero, -z, z**2, zero, w /)
args(1039,1:5) = (/ zero, -z, z**2, z**2, w /)
args(1040,1:5) = (/ zero, z, zero, zero, w /)
args(1041,1:5) = (/ zero, z, zero, z**2, w /)
args(1042,1:5) = (/ zero, z, one, zero, w /)
args(1043,1:5) = (/ zero, z, one, one, w /)
args(1044,1:5) = (/ zero, z, one, z**2, w /)
args(1045,1:5) = (/ zero, z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1046,1:5) = (/ zero, z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1047,1:5) = (/ zero, z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1048,1:5) = (/ zero, z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1049,1:5) = (/ zero, z, z**2, zero, w /)
args(1050,1:5) = (/ zero, z, z**2, z**2, w /)
args(1051,1:5) = (/ zero, z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1052,1:5) = (/ zero, z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1053,1:5) = (/ zero, z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1054,1:5) = (/ zero, z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1055,1:5) = (/ one, zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1056,1:5) = (/ one, zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1057,1:5) = (/ one, zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1058,1:5) = (/ one, zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1059,1:5) = (/ one, -z, zero, zero, w /)
args(1060,1:5) = (/ one, -z, zero, z**2, w /)
args(1061,1:5) = (/ one, -z, one, zero, w /)
args(1062,1:5) = (/ one, -z, one, one, w /)
args(1063,1:5) = (/ one, -z, one, z**2, w /)
args(1064,1:5) = (/ one, -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1065,1:5) = (/ one, -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1066,1:5) = (/ one, -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1067,1:5) = (/ one, -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1068,1:5) = (/ one, -z, z**2, zero, w /)
args(1069,1:5) = (/ one, -z, z**2, z**2, w /)
args(1070,1:5) = (/ one, z, zero, zero, w /)
args(1071,1:5) = (/ one, z, zero, z**2, w /)
args(1072,1:5) = (/ one, z, one, zero, w /)
args(1073,1:5) = (/ one, z, one, one, w /)
args(1074,1:5) = (/ one, z, one, z**2, w /)
args(1075,1:5) = (/ one, z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1076,1:5) = (/ one, z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1077,1:5) = (/ one, z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1078,1:5) = (/ one, z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1079,1:5) = (/ one, z, z**2, zero, w /)
args(1080,1:5) = (/ one, z, z**2, z**2, w /)
args(1081,1:5) = (/ -z, mone, zero, zero, w /)
args(1082,1:5) = (/ -z, mone, zero, one, w /)
args(1083,1:5) = (/ -z, zero, zero, zero, w /)
args(1084,1:5) = (/ -z, zero, zero, one, w /)
args(1085,1:5) = (/ -z, zero, zero, z**2, w /)
args(1086,1:5) = (/ -z, zero, one, zero, w /)
args(1087,1:5) = (/ -z, zero, one, one, w /)
args(1088,1:5) = (/ -z, zero, one, z**2, w /)
args(1089,1:5) = (/ -z, zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1090,1:5) = (/ -z, zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1091,1:5) = (/ -z, zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1092,1:5) = (/ -z, zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1093,1:5) = (/ -z, zero, z**2, zero, w /)
args(1094,1:5) = (/ -z, zero, z**2, one, w /)
args(1095,1:5) = (/ -z, zero, z**2, z**2, w /)
args(1096,1:5) = (/ -z, one, zero, zero, w /)
args(1097,1:5) = (/ -z, one, zero, one, w /)
args(1098,1:5) = (/ -z, one, zero, z**2, w /)
args(1099,1:5) = (/ -z, one, one, zero, w /)
args(1100,1:5) = (/ -z, one, one, one, w /)
args(1101,1:5) = (/ -z, one, one, z**2, w /)
args(1102,1:5) = (/ -z, one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1103,1:5) = (/ -z, one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1104,1:5) = (/ -z, one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1105,1:5) = (/ -z, one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1106,1:5) = (/ -z, one, z**2, zero, w /)
args(1107,1:5) = (/ -z, one, z**2, one, w /)
args(1108,1:5) = (/ -z, one, z**2, z**2, w /)
args(1109,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(1110,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(1111,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1112,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1113,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1114,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1115,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(1116,1:5) = (/ -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(1117,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(1118,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(1119,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1120,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1121,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1122,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1123,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(1124,1:5) = (/ -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(1125,1:5) = (/ -z, -z, zero, zero, w /)
args(1126,1:5) = (/ -z, -z, zero, z**2, w /)
args(1127,1:5) = (/ -z, -z, one, zero, w /)
args(1128,1:5) = (/ -z, -z, one, one, w /)
args(1129,1:5) = (/ -z, -z, one, z**2, w /)
args(1130,1:5) = (/ -z, -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1131,1:5) = (/ -z, -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1132,1:5) = (/ -z, -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1133,1:5) = (/ -z, -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1134,1:5) = (/ -z, -z, z**2, zero, w /)
args(1135,1:5) = (/ -z, -z, z**2, z**2, w /)
args(1136,1:5) = (/ -z, z, zero, zero, w /)
args(1137,1:5) = (/ -z, z, zero, z**2, w /)
args(1138,1:5) = (/ -z, z, one, zero, w /)
args(1139,1:5) = (/ -z, z, one, one, w /)
args(1140,1:5) = (/ -z, z, one, z**2, w /)
args(1141,1:5) = (/ -z, z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1142,1:5) = (/ -z, z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1143,1:5) = (/ -z, z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1144,1:5) = (/ -z, z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1145,1:5) = (/ -z, z, z**2, zero, w /)
args(1146,1:5) = (/ -z, z, z**2, z**2, w /)
args(1147,1:5) = (/ -z, z**2, zero, zero, w /)
args(1148,1:5) = (/ -z, z**2, zero, one, w /)
args(1149,1:5) = (/ -z, z**2, one, zero, w /)
args(1150,1:5) = (/ -z, z**2, one, one, w /)
args(1151,1:5) = (/ -z, z**2, one, z**2, w /)
args(1152,1:5) = (/ -z, z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1153,1:5) = (/ -z, z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1154,1:5) = (/ -z, z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1155,1:5) = (/ -z, z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1156,1:5) = (/ -z, z**2, z**2, one, w /)
args(1157,1:5) = (/ -z, z**2, z**2, z**2, w /)
args(1158,1:5) = (/ z, mone, zero, zero, w /)
args(1159,1:5) = (/ z, mone, zero, one, w /)
args(1160,1:5) = (/ z, zero, zero, zero, w /)
args(1161,1:5) = (/ z, zero, zero, one, w /)
args(1162,1:5) = (/ z, zero, zero, z**2, w /)
args(1163,1:5) = (/ z, zero, one, zero, w /)
args(1164,1:5) = (/ z, zero, one, one, w /)
args(1165,1:5) = (/ z, zero, one, z**2, w /)
args(1166,1:5) = (/ z, zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1167,1:5) = (/ z, zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1168,1:5) = (/ z, zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1169,1:5) = (/ z, zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1170,1:5) = (/ z, zero, z**2, zero, w /)
args(1171,1:5) = (/ z, zero, z**2, one, w /)
args(1172,1:5) = (/ z, zero, z**2, z**2, w /)
args(1173,1:5) = (/ z, one, zero, zero, w /)
args(1174,1:5) = (/ z, one, zero, one, w /)
args(1175,1:5) = (/ z, one, zero, z**2, w /)
args(1176,1:5) = (/ z, one, one, zero, w /)
args(1177,1:5) = (/ z, one, one, one, w /)
args(1178,1:5) = (/ z, one, one, z**2, w /)
args(1179,1:5) = (/ z, one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1180,1:5) = (/ z, one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1181,1:5) = (/ z, one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1182,1:5) = (/ z, one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1183,1:5) = (/ z, one, z**2, zero, w /)
args(1184,1:5) = (/ z, one, z**2, one, w /)
args(1185,1:5) = (/ z, one, z**2, z**2, w /)
args(1186,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(1187,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(1188,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1189,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1190,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1191,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1192,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(1193,1:5) = (/ z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(1194,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., one, one, w /)
args(1195,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., one, z**2, w /)
args(1196,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1197,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1198,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1199,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1200,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, one, w /)
args(1201,1:5) = (/ z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, z**2, w /)
args(1202,1:5) = (/ z, -z, zero, zero, w /)
args(1203,1:5) = (/ z, -z, zero, z**2, w /)
args(1204,1:5) = (/ z, -z, one, zero, w /)
args(1205,1:5) = (/ z, -z, one, one, w /)
args(1206,1:5) = (/ z, -z, one, z**2, w /)
args(1207,1:5) = (/ z, -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1208,1:5) = (/ z, -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1209,1:5) = (/ z, -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1210,1:5) = (/ z, -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1211,1:5) = (/ z, -z, z**2, zero, w /)
args(1212,1:5) = (/ z, -z, z**2, z**2, w /)
args(1213,1:5) = (/ z, z, zero, zero, w /)
args(1214,1:5) = (/ z, z, zero, z**2, w /)
args(1215,1:5) = (/ z, z, one, zero, w /)
args(1216,1:5) = (/ z, z, one, one, w /)
args(1217,1:5) = (/ z, z, one, z**2, w /)
args(1218,1:5) = (/ z, z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1219,1:5) = (/ z, z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1220,1:5) = (/ z, z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1221,1:5) = (/ z, z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1222,1:5) = (/ z, z, z**2, zero, w /)
args(1223,1:5) = (/ z, z, z**2, z**2, w /)
args(1224,1:5) = (/ z, z**2, zero, zero, w /)
args(1225,1:5) = (/ z, z**2, zero, one, w /)
args(1226,1:5) = (/ z, z**2, one, zero, w /)
args(1227,1:5) = (/ z, z**2, one, one, w /)
args(1228,1:5) = (/ z, z**2, one, z**2, w /)
args(1229,1:5) = (/ z, z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1230,1:5) = (/ z, z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1231,1:5) = (/ z, z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1232,1:5) = (/ z, z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1233,1:5) = (/ z, z**2, z**2, one, w /)
args(1234,1:5) = (/ z, z**2, z**2, z**2, w /)
args(1235,1:3) = (/ z**2, -z, w /)
args(1236,1:3) = (/ z**2, z, w /)
args(1237,1:4) = (/ z**2, zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1238,1:4) = (/ z**2, zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1239,1:4) = (/ z**2, -z, zero, w /)
args(1240,1:4) = (/ z**2, -z, one, w /)
args(1241,1:4) = (/ z**2, -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1242,1:4) = (/ z**2, -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1243,1:4) = (/ z**2, -z, z**2, w /)
args(1244,1:4) = (/ z**2, z, zero, w /)
args(1245,1:4) = (/ z**2, z, one, w /)
args(1246,1:4) = (/ z**2, z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1247,1:4) = (/ z**2, z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1248,1:4) = (/ z**2, z, z**2, w /)
args(1249,1:5) = (/ -z, z**2, zero, z**2, w /)
args(1250,1:5) = (/ -z, z**2, z**2, zero, w /)
args(1251,1:5) = (/ z, z**2, zero, z**2, w /)
args(1252,1:5) = (/ z, z**2, z**2, zero, w /)
args(1253,1:5) = (/ z**2, zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1254,1:5) = (/ z**2, zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1255,1:5) = (/ z**2, zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1256,1:5) = (/ z**2, zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1257,1:5) = (/ z**2, -z, zero, zero, w /)
args(1258,1:5) = (/ z**2, -z, zero, z**2, w /)
args(1259,1:5) = (/ z**2, -z, one, zero, w /)
args(1260,1:5) = (/ z**2, -z, one, one, w /)
args(1261,1:5) = (/ z**2, -z, one, z**2, w /)
args(1262,1:5) = (/ z**2, -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1263,1:5) = (/ z**2, -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1264,1:5) = (/ z**2, -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1265,1:5) = (/ z**2, -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1266,1:5) = (/ z**2, -z, z**2, zero, w /)
args(1267,1:5) = (/ z**2, -z, z**2, z**2, w /)
args(1268,1:5) = (/ z**2, z, zero, zero, w /)
args(1269,1:5) = (/ z**2, z, zero, z**2, w /)
args(1270,1:5) = (/ z**2, z, one, zero, w /)
args(1271,1:5) = (/ z**2, z, one, one, w /)
args(1272,1:5) = (/ z**2, z, one, z**2, w /)
args(1273,1:5) = (/ z**2, z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1274,1:5) = (/ z**2, z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1275,1:5) = (/ z**2, z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1276,1:5) = (/ z**2, z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1277,1:5) = (/ z**2, z, z**2, zero, w /)
args(1278,1:5) = (/ z**2, z, z**2, z**2, w /)
args(1279,1:3) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1280,1:3) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1281,1:3) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1282,1:3) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1283,1:4) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1284,1:4) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1285,1:4) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1286,1:4) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1287,1:4) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1288,1:4) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1289,1:4) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1290,1:4) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1291,1:4) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1292,1:4) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1293,1:4) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1294,1:4) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1295,1:4) = (/ zero, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1296,1:4) = (/ zero, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1297,1:4) = (/ zero, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1298,1:4) = (/ zero, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1299,1:4) = (/ -z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1300,1:4) = (/ -z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1301,1:4) = (/ -z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1302,1:4) = (/ -z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1303,1:4) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1304,1:4) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1305,1:4) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1306,1:4) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1307,1:4) = (/ -z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1308,1:4) = (/ -z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1309,1:4) = (/ -z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1310,1:4) = (/ -z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1311,1:4) = (/ -z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1312,1:4) = (/ -z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1313,1:4) = (/ z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1314,1:4) = (/ z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1315,1:4) = (/ z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1316,1:4) = (/ z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1317,1:4) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1318,1:4) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1319,1:4) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1320,1:4) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1321,1:4) = (/ z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1322,1:4) = (/ z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1323,1:4) = (/ z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1324,1:4) = (/ z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1325,1:4) = (/ z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1326,1:4) = (/ z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1327,1:4) = (/ z**2, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1328,1:4) = (/ z**2, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1329,1:4) = (/ z**2, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1330,1:4) = (/ z**2, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1331,1:5) = (/ zero, -z, zero, one, w /)
args(1332,1:5) = (/ zero, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1333,1:5) = (/ zero, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1334,1:5) = (/ zero, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1335,1:5) = (/ zero, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1336,1:5) = (/ zero, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1337,1:5) = (/ zero, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1338,1:5) = (/ zero, z, zero, one, w /)
args(1339,1:5) = (/ zero, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1340,1:5) = (/ zero, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1341,1:5) = (/ zero, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1342,1:5) = (/ zero, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1343,1:5) = (/ zero, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1344,1:5) = (/ zero, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1345,1:5) = (/ -z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1346,1:5) = (/ -z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1347,1:5) = (/ -z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1348,1:5) = (/ -z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1349,1:5) = (/ -z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1350,1:5) = (/ -z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1351,1:5) = (/ -z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1352,1:5) = (/ -z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1353,1:5) = (/ -z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1354,1:5) = (/ -z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1355,1:5) = (/ -z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1356,1:5) = (/ -z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1357,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(1358,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(1359,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(1360,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(1361,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(1362,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(1363,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1364,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1365,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1366,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1367,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1368,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1369,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(1370,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(1371,1:5) = (/ -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(1372,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(1373,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(1374,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(1375,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(1376,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(1377,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(1378,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1379,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1380,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1381,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1382,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1383,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1384,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(1385,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(1386,1:5) = (/ -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(1387,1:5) = (/ -z, -z, zero, one, w /)
args(1388,1:5) = (/ -z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1389,1:5) = (/ -z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1390,1:5) = (/ -z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1391,1:5) = (/ -z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1392,1:5) = (/ -z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1393,1:5) = (/ -z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1394,1:5) = (/ -z, z, zero, one, w /)
args(1395,1:5) = (/ -z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1396,1:5) = (/ -z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1397,1:5) = (/ -z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1398,1:5) = (/ -z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1399,1:5) = (/ -z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1400,1:5) = (/ -z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1401,1:5) = (/ -z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1402,1:5) = (/ -z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1403,1:5) = (/ -z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1404,1:5) = (/ -z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1405,1:5) = (/ -z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1406,1:5) = (/ -z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1407,1:5) = (/ z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1408,1:5) = (/ z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1409,1:5) = (/ z, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1410,1:5) = (/ z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1411,1:5) = (/ z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1412,1:5) = (/ z, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1413,1:5) = (/ z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1414,1:5) = (/ z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1415,1:5) = (/ z, one, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1416,1:5) = (/ z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1417,1:5) = (/ z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1418,1:5) = (/ z, one, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1419,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(1420,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(1421,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(1422,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(1423,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(1424,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(1425,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1426,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1427,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1428,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1429,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1430,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1431,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(1432,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(1433,1:5) = (/ z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(1434,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, zero, w /)
args(1435,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, one, w /)
args(1436,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, z**2, w /)
args(1437,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, zero, w /)
args(1438,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, one, w /)
args(1439,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, z**2, w /)
args(1440,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1441,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1442,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1443,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1444,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1445,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1446,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, zero, w /)
args(1447,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, one, w /)
args(1448,1:5) = (/ z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, z**2, w /)
args(1449,1:5) = (/ z, -z, zero, one, w /)
args(1450,1:5) = (/ z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1451,1:5) = (/ z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1452,1:5) = (/ z, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1453,1:5) = (/ z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1454,1:5) = (/ z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1455,1:5) = (/ z, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1456,1:5) = (/ z, z, zero, one, w /)
args(1457,1:5) = (/ z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1458,1:5) = (/ z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1459,1:5) = (/ z, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1460,1:5) = (/ z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1461,1:5) = (/ z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1462,1:5) = (/ z, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1463,1:5) = (/ z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1464,1:5) = (/ z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1465,1:5) = (/ z, z**2, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1466,1:5) = (/ z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1467,1:5) = (/ z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1468,1:5) = (/ z, z**2, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1469,1:5) = (/ z**2, -z, zero, one, w /)
args(1470,1:5) = (/ z**2, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1471,1:5) = (/ z**2, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1472,1:5) = (/ z**2, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1473,1:5) = (/ z**2, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1474,1:5) = (/ z**2, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1475,1:5) = (/ z**2, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1476,1:5) = (/ z**2, z, zero, one, w /)
args(1477,1:5) = (/ z**2, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1478,1:5) = (/ z**2, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1479,1:5) = (/ z**2, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1480,1:5) = (/ z**2, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1481,1:5) = (/ z**2, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1482,1:5) = (/ z**2, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1483,1:5) = (/ one, -z, zero, one, w /)
args(1484,1:5) = (/ one, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1485,1:5) = (/ one, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1486,1:5) = (/ one, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1487,1:5) = (/ one, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1488,1:5) = (/ one, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1489,1:5) = (/ one, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1490,1:5) = (/ one, z, zero, one, w /)
args(1491,1:5) = (/ one, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1492,1:5) = (/ one, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1493,1:5) = (/ one, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1494,1:5) = (/ one, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1495,1:5) = (/ one, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1496,1:5) = (/ one, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1497,1:4) = (/ one, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1498,1:4) = (/ one, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1499,1:4) = (/ one, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1500,1:4) = (/ one, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1501,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., w /)
args(1502,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., w /)
args(1503,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., w /)
args(1504,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., w /)
args(1505,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, w /)
args(1506,1:3) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, w /)
args(1507,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, w /)
args(1508,1:3) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, w /)
args(1509,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1510,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1511,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1512,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1513,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., one, w /)
args(1514,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., z**2, w /)
args(1515,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., one, w /)
args(1516,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., z**2, w /)
args(1517,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, zero, w /)
args(1518,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1519,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1520,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, w /)
args(1521,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, zero, w /)
args(1522,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1523,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1524,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, w /)
args(1525,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1526,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1527,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1528,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1529,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1530,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1531,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., one, w /)
args(1532,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., z**2, w /)
args(1533,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., one, w /)
args(1534,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., z**2, w /)
args(1535,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, zero, w /)
args(1536,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1537,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1538,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, w /)
args(1539,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, zero, w /)
args(1540,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1541,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1542,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, w /)
args(1543,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1544,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1545,1:5) = (/ zero, -z, z**2, one, w /)
args(1546,1:5) = (/ zero, z, z**2, one, w /)
args(1547,1:5) = (/ one, -z, z**2, one, w /)
args(1548,1:5) = (/ one, z, z**2, one, w /)
args(1549,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1550,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1551,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1552,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1553,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1554,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1555,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1556,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1557,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., one, one, w /)
args(1558,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(1559,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(1560,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(1561,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., one, one, w /)
args(1562,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(1563,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(1564,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(1565,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, zero, one, w /)
args(1566,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, zero, z**2, w /)
args(1567,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1568,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1569,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1570,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1571,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1572,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1573,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1574,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1575,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1576,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1577,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, zero, w /)
args(1578,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, one, w /)
args(1579,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, z**2, w /)
args(1580,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, zero, one, w /)
args(1581,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, zero, z**2, w /)
args(1582,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1583,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1584,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1585,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1586,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1587,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1588,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1589,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1590,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1591,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1592,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, zero, w /)
args(1593,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, one, w /)
args(1594,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, z**2, w /)
args(1595,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1596,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1597,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1598,1:5) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1599,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1600,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1601,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1602,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1603,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1604,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1605,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1606,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1607,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., one, one, w /)
args(1608,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(1609,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(1610,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 - Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(1611,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., one, one, w /)
args(1612,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., one, z**2, w /)
args(1613,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., z**2, one, w /)
args(1614,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), (3 + Sqrt(5 - 4*z**2))/2., z**2, z**2, w /)
args(1615,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, zero, one, w /)
args(1616,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, zero, z**2, w /)
args(1617,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1618,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1619,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1620,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1621,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1622,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1623,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1624,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1625,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1626,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1627,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, zero, w /)
args(1628,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, one, w /)
args(1629,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, z**2, z**2, w /)
args(1630,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, zero, one, w /)
args(1631,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, zero, z**2, w /)
args(1632,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1633,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1634,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1635,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1636,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1637,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1638,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1639,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1640,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1641,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1642,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, zero, w /)
args(1643,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, one, w /)
args(1644,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, z**2, z**2, w /)
args(1645,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1646,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1647,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1648,1:5) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1649,1:5) = (/ -z, -z, z**2, one, w /)
args(1650,1:5) = (/ -z, z, z**2, one, w /)
args(1651,1:5) = (/ z, -z, z**2, one, w /)
args(1652,1:5) = (/ z, z, z**2, one, w /)
args(1653,1:5) = (/ z**2, -z, z**2, one, w /)
args(1654,1:5) = (/ z**2, z, z**2, one, w /)
args(1655,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1656,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1657,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1658,1:4) = (/ (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1659,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1660,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1661,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1662,1:4) = (/ (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1663,1:3) = (/ mone, -z, w /)
args(1664,1:3) = (/ mone, z, w /)
args(1665,1:4) = (/ mone, zero, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1666,1:4) = (/ mone, zero, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1667,1:4) = (/ mone, zero, z**2, w /)
args(1668,1:4) = (/ mone, -z, zero, w /)
args(1669,1:4) = (/ mone, -z, one, w /)
args(1670,1:4) = (/ mone, -z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1671,1:4) = (/ mone, -z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1672,1:4) = (/ mone, -z, z**2, w /)
args(1673,1:4) = (/ mone, z, zero, w /)
args(1674,1:4) = (/ mone, z, one, w /)
args(1675,1:4) = (/ mone, z, (1 - Sqrt(-3 + 4*z**2))/2., w /)
args(1676,1:4) = (/ mone, z, (1 + Sqrt(-3 + 4*z**2))/2., w /)
args(1677,1:4) = (/ mone, z, z**2, w /)
args(1678,1:5) = (/ mone, zero, zero, z**2, w /)
args(1679,1:5) = (/ mone, zero, one, z**2, w /)
args(1680,1:5) = (/ mone, zero, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1681,1:5) = (/ mone, zero, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1682,1:5) = (/ mone, zero, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1683,1:5) = (/ mone, zero, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1684,1:5) = (/ mone, zero, z**2, zero, w /)
args(1685,1:5) = (/ mone, zero, z**2, z**2, w /)
args(1686,1:5) = (/ mone, -z, zero, zero, w /)
args(1687,1:5) = (/ mone, -z, zero, z**2, w /)
args(1688,1:5) = (/ mone, -z, one, zero, w /)
args(1689,1:5) = (/ mone, -z, one, one, w /)
args(1690,1:5) = (/ mone, -z, one, z**2, w /)
args(1691,1:5) = (/ mone, -z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1692,1:5) = (/ mone, -z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1693,1:5) = (/ mone, -z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1694,1:5) = (/ mone, -z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1695,1:5) = (/ mone, -z, z**2, zero, w /)
args(1696,1:5) = (/ mone, -z, z**2, z**2, w /)
args(1697,1:5) = (/ mone, z, zero, zero, w /)
args(1698,1:5) = (/ mone, z, zero, z**2, w /)
args(1699,1:5) = (/ mone, z, one, zero, w /)
args(1700,1:5) = (/ mone, z, one, one, w /)
args(1701,1:5) = (/ mone, z, one, z**2, w /)
args(1702,1:5) = (/ mone, z, (1 - Sqrt(-3 + 4*z**2))/2., one, w /)
args(1703,1:5) = (/ mone, z, (1 - Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1704,1:5) = (/ mone, z, (1 + Sqrt(-3 + 4*z**2))/2., one, w /)
args(1705,1:5) = (/ mone, z, (1 + Sqrt(-3 + 4*z**2))/2., z**2, w /)
args(1706,1:5) = (/ mone, z, z**2, zero, w /)
args(1707,1:5) = (/ mone, z, z**2, z**2, w /)
args(1708,1:4) = (/ mone, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1709,1:4) = (/ mone, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1710,1:4) = (/ mone, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1711,1:4) = (/ mone, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1712,1:4) = (/ mone, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1713,1:4) = (/ mone, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), w /)
args(1714,1:5) = (/ mone, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1715,1:5) = (/ mone, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1716,1:5) = (/ mone, zero, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1717,1:5) = (/ mone, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1718,1:5) = (/ mone, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1719,1:5) = (/ mone, zero, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1720,1:5) = (/ mone, -z, zero, one, w /)
args(1721,1:5) = (/ mone, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1722,1:5) = (/ mone, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1723,1:5) = (/ mone, -z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1724,1:5) = (/ mone, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1725,1:5) = (/ mone, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1726,1:5) = (/ mone, -z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1727,1:5) = (/ mone, z, zero, one, w /)
args(1728,1:5) = (/ mone, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1729,1:5) = (/ mone, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1730,1:5) = (/ mone, z, (z**2 - Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
args(1731,1:5) = (/ mone, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), zero, w /)
args(1732,1:5) = (/ mone, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), one, w /)
args(1733,1:5) = (/ mone, z, (z**2 + Sqrt(4*z**2 - 3*z**4))/(2.*(-1 + z**2)), z**2, w /)
END FUNCTION
END MODULE