ctotal:='((wavefunl ((l1 (ub p2 fme -1) (u p1 fme 1)))) (nfn
1) (nz 0) (nz0 0) (nout 1) (state 0) (nsy 1) (hand 0) (xi 3)
(nauto 0) (escale wm));
 
group:='(((117 117)))$
 
maslist:='nil$
 
ndiagfile:='100$
 
alldiagram:='(((0 a1a0a1 a1a0a2)))$
 
coupling_order_list:='(((g . 4)))$
 
array aa(100),aaaa(100)$
 
rangelist:='nil$
 
gresonance_list:='(((plus p3 p4 p5 p6) (117 p32m (plus p1 p2
)) (116 p32m (plus p1 p2)) (115 p32m (plus p1 p2)) (114 p32m
(plus p1 p2)) (113 p32m (plus p1 p2)) (112 p32m (plus p1 p2)
) (111 p32m (plus p1 p2)) (110 p32m (plus p1 p2)) (109 p32m
(plus p1 p2)) (108 p32m (plus p1 p2)) (107 p32m (plus p1 p2)
) (106 p32m (plus p1 p2)) (105 p32m (plus p1 p2)) (104 p32m
(plus p1 p2)) (103 p32m (plus p1 p2)) (102 p32m (plus p1 p2)
) (101 p32m (plus p1 p2)) (100 p32m (plus p1 p2)) (99 p32m (
plus p1 p2)) (98 p32m (plus p1 p2)) (97 p32m (plus p1 p2)) (
96 p32m (plus p1 p2)) (95 p32m (plus p1 p2)) (94 p32m (plus
p1 p2)) (93 p32m (plus p1 p2)) (92 p32m (plus p1 p2)) (91 
p32m (plus p1 p2)) (90 p32m (plus p1 p2)) (89 p32m (plus p1
p2)) (88 p32m (plus p1 p2)) (87 p32m (plus p1 p2)) (86 p32m
(plus p1 p2)) (85 p32m (plus p1 p2)) (84 p32m (plus p1 p2))
(83 p32m (plus p1 p2)) (82 p32m (plus p1 p2)) (81 p32m (plus
p1 p2)) (80 p32m (plus p1 p2)) (79 p32m (plus p1 p2)) (78 
p32m (plus p1 p2)) (77 p32m (plus p1 p2)) (76 p32m (plus p1
p2)) (75 p32m (plus p1 p2)) (74 p32m (plus p1 p2)) (73 p32m
(plus p1 p2)) (72 p32m (plus p1 p2)) (71 p32m (plus p1 p2))
(70 p32m (plus p1 p2)) (69 p32m (plus p1 p2)) (68 p32m (plus
p1 p2)) (67 p32m (plus p1 p2)) (66 p32m (plus p1 p2)) (65 
p32m (plus p1 p2)) (64 p32m (plus p1 p2)) (63 p32m (plus p1
p2)) (62 p32m (plus p1 p2)) (61 p32m (plus p1 p2)) (60 p32m
(plus p1 p2)) (59 p32m (plus p1 p2)) (58 p32m (plus p1 p2))
(57 p32m (plus p1 p2)) (56 p32m (plus p1 p2)) (55 p32m (plus
p1 p2)) (54 p32m (plus p1 p2)) (53 p32m (plus p1 p2)) (52 
p32m (plus p1 p2)) (51 p32m (plus p1 p2)) (50 p32m (plus p1
p2)) (49 p32m (plus p1 p2)) (48 p32m (plus p1 p2)) (47 p32m
(plus p1 p2)) (46 p32m (plus p1 p2)) (45 p32m (plus p1 p2))
(44 p32m (plus p1 p2)) (43 p32m (plus p1 p2)) (42 p32m (plus
p1 p2)) (41 p32m (plus p1 p2)) (40 p32m (plus p1 p2)) (39 
p32m (plus p1 p2)) (38 p32m (plus p1 p2)) (37 p32m (plus p1
p2)) (36 p32m (plus p1 p2)) (35 p32m (plus p1 p2)) (34 p32m
(plus p1 p2)) (33 p32m (plus p1 p2)) (32 p32m (plus p1 p2))
(31 p32m (plus p1 p2)) (30 p32m (plus p1 p2)) (29 p32m (plus
p1 p2)) (28 p32m (plus p1 p2)) (27 p32m (plus p1 p2)) (26 
p32m (plus p1 p2)) (25 p32m (plus p1 p2)) (24 p32m (plus p1
p2)) (23 p32m (plus p1 p2)) (22 p32m (plus p1 p2)) (21 p32m
(plus p1 p2)) (20 p32m (plus p1 p2)) (19 p32m (plus p1 p2))
(18 p32m (plus p1 p2)) (17 p32m (plus p1 p2)) (16 p32m (plus
p1 p2)) (15 p32m (plus p1 p2)) (14 p32m (plus p1 p2)) (13 
p32m (plus p1 p2)) (12 p32m (plus p1 p2)) (11 p32m (plus p1
p2)) (10 p32m (plus p1 p2)) (9 p32m (plus p1 p2)) (8 p32m (
plus p1 p2)) (7 p32m (plus p1 p2)) (6 p32m (plus p1 p2)) (5
p32m (plus p1 p2)) (4 p32m (plus p1 p2)) (3 p32m (plus p1 p2
)) (2 p32m (plus p1 p2)) (1 p32m (plus p1 p2))) ((plus p4 p5
p6) (102 p31m (plus (minus p4) (minus p5) (minus p6))) (101
p31m (plus (minus p4) (minus p5) (minus p6))) (100 p31m (
plus (minus p4) (minus p5) (minus p6))) (99 p31m (plus (
minus p4) (minus p5) (minus p6))) (98 p31m (plus (minus p4)
(minus p5) (minus p6))) (97 p31m (plus (minus p4) (minus p5)
(minus p6))) (96 p31m (plus (minus p4) (minus p5) (minus p6)
)) (95 p31m (plus (minus p4) (minus p5) (minus p6))) (94 
p31m (plus (minus p4) (minus p5) (minus p6))) (93 p31m (plus
(minus p4) (minus p5) (minus p6))) (92 p31m (plus (minus p4)
(minus p5) (minus p6))) (91 p31m (plus (minus p4) (minus p5)
(minus p6))) (90 p31m (plus (minus p4) (minus p5) (minus p6)
)) (74 p30m (plus (minus p4) (minus p5) (minus p6))) (73 
p30m (plus (minus p4) (minus p5) (minus p6))) (72 p30m (plus
(minus p4) (minus p5) (minus p6))) (71 p30m (plus (minus p4)
(minus p5) (minus p6))) (70 p30m (plus (minus p4) (minus p5)
(minus p6))) (69 p30m (plus (minus p4) (minus p5) (minus p6)
)) (68 p30m (plus (minus p4) (minus p5) (minus p6))) (67 
p30m (plus (minus p4) (minus p5) (minus p6))) (66 p30m (plus
(minus p4) (minus p5) (minus p6))) (65 p30m (plus (minus p4)
(minus p5) (minus p6))) (46 p25m (plus (minus p4) (minus p5)
(minus p6))) (44 p26m (plus (minus p4) (minus p5) (minus p6)
)) (39 p28m (plus (minus p4) (minus p5) (minus p6))) (38 
p28m (plus (minus p4) (minus p5) (minus p6))) (37 p28m (plus
(minus p4) (minus p5) (minus p6))) (36 p28m (plus (minus p4)
(minus p5) (minus p6))) (26 p29m (plus (minus p4) (minus p5)
(minus p6))) (25 p29m (plus (minus p4) (minus p5) (minus p6)
)) (24 p29m (plus (minus p4) (minus p5) (minus p6))) (23 
p29m (plus (minus p4) (minus p5) (minus p6))) (22 p29m (plus
(minus p4) (minus p5) (minus p6))) (21 p29m (plus (minus p4)
(minus p5) (minus p6))) (20 p29m (plus (minus p4) (minus p5)
(minus p6))) (19 p29m (plus (minus p4) (minus p5) (minus p6)
)) (18 p29m (plus (minus p4) (minus p5) (minus p6))) (1 p27m
(plus (minus p4) (minus p5) (minus p6)))) ((plus p5 p6) (117
p23m (plus p5 p6)) (116 p5m (plus p5 p6)) (115 p5m (plus p5
p6)) (114 p8m (plus p5 p6)) (113 p9m (plus p5 p6)) (112 p10m
(plus p5 p6)) (111 p12m (plus p5 p6)) (110 p17m (plus p5 p6)
) (109 p19m (plus p5 p6)) (108 p20m (plus p5 p6)) (107 p3m (
plus p5 p6)) (104 p6m (plus p5 p6)) (103 p16m (plus p5 p6))
(102 p5m (plus p5 p6)) (101 p8m (plus p5 p6)) (100 p9m (plus
p5 p6)) (99 p10m (plus p5 p6)) (98 p12m (plus p5 p6)) (97 
p17m (plus p5 p6)) (96 p19m (plus p5 p6)) (95 p20m (plus p5
p6)) (94 p3m (plus p5 p6)) (91 p6m (plus p5 p6)) (90 p16m (
plus p5 p6)) (87 p6m (plus p5 p6)) (84 p5m (plus p5 p6)) (83
p8m (plus p5 p6)) (82 p9m (plus p5 p6)) (81 p10m (plus p5 p6
)) (80 p12m (plus p5 p6)) (79 p17m (plus p5 p6)) (76 p6m (
plus p5 p6)) (75 p16m (plus p5 p6)) (74 p5m (plus p5 p6)) (
73 p8m (plus p5 p6)) (72 p9m (plus p5 p6)) (71 p10m (plus p5
p6)) (70 p12m (plus p5 p6)) (69 p17m (plus p5 p6)) (66 p6m (
plus p5 p6)) (65 p16m (plus p5 p6)) (64 p5m (plus p5 p6)) (
63 p5m (plus p5 p6)) (62 p5m (plus p5 p6)) (61 p5m (plus p5
p6)) (60 p8m (plus p5 p6)) (59 p8m (plus p5 p6)) (58 p8m (
plus p5 p6)) (57 p9m (plus p5 p6)) (56 p9m (plus p5 p6)) (55
p10m (plus p5 p6)) (54 p10m (plus p5 p6)) (53 p12m (plus p5
p6)) (52 p12m (plus p5 p6)) (51 p17m (plus p5 p6)) (50 p19m
(plus p5 p6)) (49 p20m (plus p5 p6)) (48 p21m (plus p5 p6))
(47 p5m (plus p5 p6)) (46 p5m (plus p5 p6)) (45 p5m (plus p5
p6)) (44 p5m (plus p5 p6)) (43 p5m (plus p5 p6)) (42 p8m (
plus p5 p6)) (39 p5m (plus p5 p6)) (38 p8m (plus p5 p6)) (35
p5m (plus p5 p6)) (34 p8m (plus p5 p6)) (33 p9m (plus p5 p6)
) (32 p10m (plus p5 p6)) (31 p12m (plus p5 p6)) (28 p6m (
plus p5 p6)) (27 p16m (plus p5 p6)) (26 p5m (plus p5 p6)) (
25 p8m (plus p5 p6)) (24 p9m (plus p5 p6)) (23 p10m (plus p5
p6)) (22 p12m (plus p5 p6)) (19 p6m (plus p5 p6)) (18 p16m (
plus p5 p6)) (17 p3m (plus p5 p6)) (14 p6m (plus p5 p6)) (13
p16m (plus p5 p6)) (12 p22m (plus p5 p6)) (11 p6m (plus p5 
p6)) (6 p6m (plus p5 p6)) (3 p6m (plus p5 p6)) (2 p5m (plus
p5 p6)) (1 p5m (plus p5 p6))) ((plus p3 p5 p6) (115 p31m (
plus (minus p1) (minus p2) (minus p4))) (114 p31m (plus (
minus p1) (minus p2) (minus p4))) (113 p31m (plus (minus p1)
(minus p2) (minus p4))) (112 p31m (plus (minus p1) (minus p2
) (minus p4))) (111 p31m (plus (minus p1) (minus p2) (minus
p4))) (110 p31m (plus (minus p1) (minus p2) (minus p4))) (
109 p31m (plus (minus p1) (minus p2) (minus p4))) (108 p31m
(plus (minus p1) (minus p2) (minus p4))) (107 p31m (plus (
minus p1) (minus p2) (minus p4))) (106 p31m (plus (minus p1)
(minus p2) (minus p4))) (105 p31m (plus (minus p1) (minus p2
) (minus p4))) (104 p31m (plus (minus p1) (minus p2) (minus
p4))) (103 p31m (plus (minus p1) (minus p2) (minus p4))) (84
p30m (plus (minus p1) (minus p2) (minus p4))) (83 p30m (plus
(minus p1) (minus p2) (minus p4))) (82 p30m (plus (minus p1)
(minus p2) (minus p4))) (81 p30m (plus (minus p1) (minus p2)
(minus p4))) (80 p30m (plus (minus p1) (minus p2) (minus p4)
)) (79 p30m (plus (minus p1) (minus p2) (minus p4))) (78 
p30m (plus (minus p1) (minus p2) (minus p4))) (77 p30m (plus
(minus p1) (minus p2) (minus p4))) (76 p30m (plus (minus p1)
(minus p2) (minus p4))) (75 p30m (plus (minus p1) (minus p2)
(minus p4))) (47 p25m (plus (minus p1) (minus p2) (minus p4)
)) (45 p26m (plus (minus p1) (minus p2) (minus p4))) (43 
p28m (plus (minus p1) (minus p2) (minus p4))) (42 p28m (plus
(minus p1) (minus p2) (minus p4))) (41 p28m (plus (minus p1)
(minus p2) (minus p4))) (40 p28m (plus (minus p1) (minus p2)
(minus p4))) (35 p29m (plus (minus p1) (minus p2) (minus p4)
)) (34 p29m (plus (minus p1) (minus p2) (minus p4))) (33 
p29m (plus (minus p1) (minus p2) (minus p4))) (32 p29m (plus
(minus p1) (minus p2) (minus p4))) (31 p29m (plus (minus p1)
(minus p2) (minus p4))) (30 p29m (plus (minus p1) (minus p2)
(minus p4))) (29 p29m (plus (minus p1) (minus p2) (minus p4)
)) (28 p29m (plus (minus p1) (minus p2) (minus p4))) (27 
p29m (plus (minus p1) (minus p2) (minus p4))) (2 p27m (plus
(minus p1) (minus p2) (minus p4)))) ((plus p3 p4) (117 p4m (
plus (minus p3) (minus p4))) (116 p14m (plus (minus p3) (
minus p4))) (89 p4m (plus p3 p4)) (88 p4m (plus p3 p4)) (87
p14m (plus (minus p3) (minus p4))) (86 p4m (plus p3 p4)) (85
p4m (plus p3 p4)) (64 p4m (plus (minus p3) (minus p4))) (63
p7m (plus (minus p3) (minus p4))) (62 p13m (plus (minus p3)
(minus p4))) (61 p15m (plus (minus p3) (minus p4))) (60 p4m
(plus (minus p3) (minus p4))) (59 p7m (plus (minus p3) (
minus p4))) (58 p13m (plus (minus p3) (minus p4))) (57 p4m (
plus (minus p3) (minus p4))) (56 p7m (plus (minus p3) (minus
p4))) (55 p4m (plus (minus p3) (minus p4))) (54 p7m (plus (
minus p3) (minus p4))) (53 p4m (plus (minus p3) (minus p4)))
(52 p7m (plus (minus p3) (minus p4))) (51 p4m (plus (minus 
p3) (minus p4))) (50 p4m (plus (minus p3) (minus p4))) (49 
p4m (plus (minus p3) (minus p4))) (48 p4m (plus (minus p3) (
minus p4))) (17 p4m (plus (minus p3) (minus p4))) (14 p4m (
plus (minus p3) (minus p4))) (13 p4m (plus (minus p3) (minus
p4))) (12 p4m (plus (minus p3) (minus p4))) (11 p7m (plus (
minus p3) (minus p4))) (10 p4m (plus p3 p4)) (9 p4m (plus p3
p4)) (8 p4m (plus p3 p4)) (7 p4m (plus p3 p4)) (6 p13m (plus
(minus p3) (minus p4))) (5 p4m (plus p3 p4)) (4 p4m (plus p3
p4)) (3 p15m (plus (minus p3) (minus p4)))) ((plus p3 p4 p6)
(88 p14m (plus p1 p2 p5)) (85 p18m (plus p1 p2 p5)) (9 p11m
(plus p1 p2 p5)) (7 p13m (plus p1 p2 p5)) (4 p15m (plus p1 
p2 p5))) ((plus p3 p4 p5) (89 p14m (plus (minus p1) (minus 
p2) (minus p6))) (86 p18m (plus (minus p1) (minus p2) (minus
p6))) (10 p11m (plus (minus p1) (minus p2) (minus p6))) (8 
p13m (plus (minus p1) (minus p2) (minus p6))) (5 p15m (plus
(minus p1) (minus p2) (minus p6)))) ((plus p3 p6) (105 p24m
(plus p3 p6)) (77 p24m (plus p3 p6)) (40 p24m (plus p3 p6))
(29 p24m (plus p3 p6)) (15 p24m (plus p3 p6))) ((plus p4 p5)
(93 p24m (plus (minus p4) (minus p5))) (68 p24m (plus (minus
p4) (minus p5))) (37 p24m (plus (minus p4) (minus p5))) (21
p24m (plus (minus p4) (minus p5))) (15 p24m (plus (minus p4)
(minus p5)))) ((plus p3 p5) (106 p24m (plus p3 p5)) (78 p24m
(plus p3 p5)) (41 p24m (plus p3 p5)) (30 p24m (plus p3 p5))
(16 p24m (plus p3 p5))) ((plus p4 p6) (92 p24m (plus (minus
p4) (minus p6))) (67 p24m (plus (minus p4) (minus p6))) (36
p24m (plus (minus p4) (minus p6))) (20 p24m (plus (minus p4)
(minus p6))) (16 p24m (plus (minus p4) (minus p6)))))$
 
nsum:='117$
 
nallterm:='117$
 
;end;
 
