1on list; 2 3 4on errcont; 5 6 7 8% 1.) Example of ordering of objects such as fer,bos,axp; 9axp(bos(f,0,0))*bos(g,3,1)*fer(k,1,0); 10 11 12fer(k,1,0)*bos(g,3,1)*axp(bos(f,0,0)) 13 14%fer(k,1,0)*bos(g,3,1)*axp(bos(f,0,0)); 15 16% 2.) Example of ordering of fer and fer objects 17fer(f,1,2)*fer(f,1,2); 18 19 200 21 22% 0 23fer(f,1,2)*fer(g,2,3); 24 25 26 27-fer(g,2,3)*fer(f,1,2) 28 29% -fer(g,2,3)*fer(f,1,2); 30fer(f,1,2)*fer(f,1,3); 31 32 33 34-fer(f,1,3)*fer(f,1,2) 35 36% - fer(f,1,3)*fer(f,1,2); 37fer(f,1,2)*fer(f,2,2); 38 39 40 41-fer(f,2,2)*fer(f,1,2) 42 43% - fer(f,2,2)*fer(f,1,2); 44 45% 3.) Example of ordering of bos and bos objects; 46bos(f,3,0)*bos(g,0,4); 47 48 49bos(g,0,4)*bos(f,3,0) 50 51%bos(g,0,4)*bos(f,3,0); 52bos(f,3,0)*bos(f,0,0); 53 54 55bos(f,3,0)*bos(f,0,0) 56 57%bos(f,3,0)*bos(f,0,0); 58bos(f,3,2)*bos(f,3,5); 59 60 61bos(f,3,5)*bos(f,3,2) 62 63%bos(f,3,5)*bos(f,3,2); 64 65% 4.) ordering of inverse superfunctions; 66% last index in bos objects denotes powers; 67bos(f,0,3)*bos(k,0,2)*bos(zz,0,3,-1)*bos(k,0,2,-1); 68 69 70bos(zz,0,3,-1)*bos(f,0,3) 71 72%bos(zz,0,3,-1)*bos(f,0,3); 73bos(c,0,3)*bos(b,0,2)*bos(a,0,3,-1)*bos(b,0,2,-1); 74 75 76bos(c,0,3)*bos(a,0,3,-1) 77 78%bos(c,0,3)*bos(a,0,3,-1); 79 80% 5.) Demostration of inverse rule; 81let inverse; 82 83 84bos(f,0,3)**3*bos(k,3,1)**40*bos(f,0,3,-2); 85 86 87bos(k,3,1,40)*bos(f,0,3,1) 88 89%bos(k,3,1,40)*bos(f,0,3,1); 90clearrules inverse; 91 92 93 94 95% 6.) Demonstration of (susy) derivative operators; 96% Up to now we did not decided on the chirality assumption 97% so let us check first the tradicional algebra os susy derivative; 98let trad; 99 100 101 102%first susy derivative 103der(1)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0)); 104 105 106bos(g,3,1)*bos(f,0,3)*axp(bos(h,0,0)) 107 108-fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))*der(1) 109 110+fer(g,2,2)*fer(f,1,2)*axp(bos(h,0,0)) 111 112+fer(h,1,0)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0)) 113 114 115fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*del(1); 116 117 118bos(g,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1)) 119 120+2*fer(g,2,1)*fer(f,1,2)*bos(f,0,2,-3)*axp(fer(k,1,2)*fer(h,2,1)) 121 122+fer(h,2,1)*fer(g,2,1)*bos(k,0,3)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1)) 123 124-fer(k,1,2)*fer(g,2,1)*bos(h,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1)) 125 126-del(1)*fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1)) 127 128sub(del=der,ws); 129 130 131fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*der(1) 132 133 134%second susy derivative 135der(2)*fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0)); 136 137 138bos(kk,0,3)*bos(g,0,4)*axp(bos(f,3,0)) 139 140-fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0))*der(2) 141 142+fer(g,2,3)*fer(f,1,1)*bos(kk,0,3)*axp(bos(f,3,0)) 143 144+fer(kk,2,3)*fer(g,2,3)*axp(bos(f,3,0)) 145 146 147fer(r,2,1)*bos(kk,3,4,-4)*axp(fer(f,1,2)*fer(g,2,1))*del(2); 148 149 150bos(r,0,2)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2)) 151 152+fer(r,2,1)*fer(f,1,2)*bos(kk,3,4,-4)*bos(g,0,2)*axp( - fer(g,2,1)*fer(f,1,2)) 153 154+fer(r,2,1)*fer(g,2,1)*bos(kk,3,4,-4)*bos(f,3,2)*axp( - fer(g,2,1)*fer(f,1,2)) 155 156-4*fer(r,2,1)*fer(kk,1,5)*bos(kk,3,4,-5)*axp( - fer(g,2,1)*fer(f,1,2)) 157 158-del(2)*fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2)) 159 160sub(del=der,ws); 161 162 163fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2))*der(2) 164 165 166%usual derivative; 167d(1)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0)); 168 169 170fer(f,1,3)*bos(g,3,1)*axp(bos(h,0,0)) 171 172+fer(f,1,2)*bos(g,3,2)*axp(bos(h,0,0)) 173 174+fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))*d(1) 175 176+fer(f,1,2)*bos(h,0,1)*bos(g,3,1)*axp(bos(h,0,0)) 177 178fer(g,2,1)*bos(f,0,2,-2)*axp(fer(h,1,2)*fer(k,2,1))*d(2); 179 180 181 182-fer(g,2,2)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2)) 183 184+2*fer(g,2,1)*bos(f,0,3,1)*bos(f,0,2,-3)*axp( - fer(k,2,1)*fer(h,1,2)) 185 186+fer(k,2,2)*fer(h,1,2)*fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2)) 187 188+fer(k,2,1)*fer(h,1,3)*fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2)) 189 190+d(2)*fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2)) 191 192sub(d(2)=d(1),ws); 193 194 195fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2))*d(1) 196 197 198% 7.) the value of action of (susy) derivative; 199 200xxx:=fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)); 201 202 203xxx := fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 204 205yyy:=fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3)); 206 207 208yyy := fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3)) 209 210 211%first susy derivative 212 213pr(1,xxx); 214 215 216bos(k,0,2,-2)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 217 218-fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*axp(fer(h,2,0)*fer(aa,1,3)) 219 220-fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3)) 221 222-2*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 223 224pr(1,yyy); 225 226 227bos(kk,3,1,-3)*bos(g,3,3)*axp(bos(f,0,2,-3)) 228 229+3*fer(g,2,3)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 230 231-3*fer(kk,2,2)*fer(g,2,3)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3)) 232 233 234%second susy2 derivative; 235pr(2,xxx); 236 237 238 239-bos(k,0,2,-2)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 240 241-fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*axp(fer(h,2,0)*fer(aa,1,3)) 242 243+fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3)) 244 245-2*fer(k,2,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 246 247pr(2,yyy); 248 249 250bos(kk,3,1,-3)*bos(g,0,4)*axp(bos(f,0,2,-3)) 251 252+3*fer(g,2,3)*fer(f,2,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 253 254+3*fer(kk,1,2)*fer(g,2,3)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3)) 255 256 257% third susy2 derivative; 258 259pr(3,xxx); 260 261 262 263-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 264 265-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 266 267-fer(f,2,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 268 269-2*fer(f,1,2)*bos(k,3,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 270 271+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3)) 272 273+fer(f,1,2)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3)) 274 275+fer(h,2,0)*bos(k,0,2,-2)*bos(f,3,2)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3)) 276 277-fer(h,2,0)*bos(k,0,2,-2)*bos(f,0,3)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3)) 278 279+fer(h,2,0)*fer(f,1,2)*fer(aa,2,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 280 281+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3) 282 283*axp(fer(h,2,0)*fer(aa,1,3)) 284 285+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4) 286 287*axp(fer(h,2,0)*fer(aa,1,3)) 288 289-fer(h,1,1)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 290 291+2*fer(k,2,2)*bos(k,0,2,-3)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 292 293-2*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,3,0) 294 295*axp(fer(h,2,0)*fer(aa,1,3)) 296 297-2*fer(k,2,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,0,4) 298 299*axp(fer(h,2,0)*fer(aa,1,3)) 300 301-6*fer(k,2,2)*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-4)*axp(fer(h,2,0)*fer(aa,1,3)) 302 303+2*fer(k,1,2)*bos(k,0,2,-3)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 304 305+2*fer(k,1,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,0,1) 306 307*axp(fer(h,2,0)*fer(aa,1,3)) 308 309-2*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,3,3) 310 311*axp(fer(h,2,0)*fer(aa,1,3)) 312 313pr(3,yyy); 314 315 3163*fer(f,2,2)*bos(kk,3,1,-3)*bos(g,3,3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 317 318-3*fer(f,1,2)*bos(kk,3,1,-3)*bos(g,0,4)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 319 320-3*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,3,2)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 321 322+3*fer(g,2,3)*bos(kk,3,1,-4)*bos(kk,0,3)*axp(bos(f,0,2,-3)) 323 324-12*fer(g,2,3)*fer(f,2,2)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-5) 325 326*axp(bos(f,0,2,-3)) 327 328-9*fer(g,2,3)*fer(f,2,2)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-8) 329 330*axp(bos(f,0,2,-3)) 331 332+fer(g,1,4)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3)) 333 334-3*fer(kk,2,2)*bos(kk,3,1,-4)*bos(g,0,4)*axp(bos(f,0,2,-3)) 335 336-9*fer(kk,2,2)*fer(g,2,3)*fer(f,2,2)*bos(kk,3,1,-4)*bos(f,0,2,-4) 337 338*axp(bos(f,0,2,-3)) 339 340-12*fer(kk,2,2)*fer(kk,1,2)*fer(g,2,3)*bos(kk,3,1,-5)*axp(bos(f,0,2,-3)) 341 342-3*fer(kk,1,2)*bos(kk,3,1,-4)*bos(g,3,3)*axp(bos(f,0,2,-3)) 343 344-9*fer(kk,1,2)*fer(g,2,3)*fer(f,1,2)*bos(kk,3,1,-4)*bos(f,0,2,-4) 345 346*axp(bos(f,0,2,-3)) 347 348 349clearrules trad; 350 351 352let chiral; 353 354 355pr(3,xxx); 356 357 358 359-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 360 361-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 362 363-fer(f,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 364 365-2*fer(f,1,2)*bos(k,3,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 366 367+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3)) 368 369+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3)) 370 371+fer(h,2,0)*fer(f,1,2)*fer(aa,1,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 372 373+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3) 374 375*axp(fer(h,2,0)*fer(aa,1,3)) 376 377+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4) 378 379*axp(fer(h,2,0)*fer(aa,1,3)) 380 381-2*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,3,0) 382 383*axp(fer(h,2,0)*fer(aa,1,3)) 384 385-6*fer(k,2,2)*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-4)*axp(fer(h,2,0)*fer(aa,1,3)) 386 387+2*fer(k,1,2)*bos(k,0,2,-3)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 388 389+2*fer(k,1,2)*bos(k,0,2,-3)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 390 391-2*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,3,3) 392 393*axp(fer(h,2,0)*fer(aa,1,3)) 394 395-2*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,0,4) 396 397*axp(fer(h,2,0)*fer(aa,1,3)) 398 399clearrules chiral; 400 401 402let chiral1; 403 404 405pr(3,xxx); 406 407 408( 409 410 -fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 411 412 -fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 413 414 +fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 415 416 +fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 417 418 -2*fer(f,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 419 420 -4*fer(f,1,2)*bos(k,3,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 421 422 +fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3)) 423 424 +fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3)) 425 426 -fer(f,1,2)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3)) 427 428 -fer(f,1,2)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3)) 429 430 -2*fer(h,2,1)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 431 432 +2*fer(h,2,0)*fer(f,1,2)*fer(aa,1,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 433 434 +fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3) 435 436 *axp(fer(h,2,0)*fer(aa,1,3)) 437 438 +fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4) 439 440 *axp(fer(h,2,0)*fer(aa,1,3)) 441 442 -fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,3,3) 443 444 *axp(fer(h,2,0)*fer(aa,1,3)) 445 446 -fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4) 447 448 *axp(fer(h,2,0)*fer(aa,1,3)) 449 450 -4*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,3,0) 451 452 *axp(fer(h,2,0)*fer(aa,1,3)) 453 454 +4*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,0,1) 455 456 *axp(fer(h,2,0)*fer(aa,1,3)) 457 458 -24*fer(k,2,2)*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-4)*axp(fer(h,2,0)*fer(aa,1,3)) 459 460 +4*fer(k,1,2)*bos(k,0,2,-3)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 461 462 +4*fer(k,1,2)*bos(k,0,2,-3)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 463 464 -4*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,3,3) 465 466 *axp(fer(h,2,0)*fer(aa,1,3)) 467 468 -4*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,0,4) 469 470 *axp(fer(h,2,0)*fer(aa,1,3)))/2 471 472 473clearrules chiral1; 474 475 476let trad; 477 478 479% usual derivative 480pg(1,xxx); 481 482 483fer(f,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 484 485-2*fer(f,1,2)*bos(k,0,3,1)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 486 487-fer(h,2,1)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 488 489-fer(h,2,0)*fer(f,1,2)*fer(aa,1,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 490 491pg(3,yyy); 492 493 494fer(g,2,6)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3)) 495 496-9*fer(g,2,5)*bos(kk,3,2,1)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3)) 497 498-9*fer(g,2,5)*bos(kk,3,1,-3)*bos(f,0,3,1)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 499 500-9*fer(g,2,4)*bos(kk,3,3,1)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3)) 501 502+36*fer(g,2,4)*bos(kk,3,2,2)*bos(kk,3,1,-5)*axp(bos(f,0,2,-3)) 503 504+54*fer(g,2,4)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,3,1)*bos(f,0,2,-4) 505 506*axp(bos(f,0,2,-3)) 507 508-9*fer(g,2,4)*bos(kk,3,1,-3)*bos(f,0,4,1)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 509 510+36*fer(g,2,4)*bos(kk,3,1,-3)*bos(f,0,3,2)*bos(f,0,2,-5)*axp(bos(f,0,2,-3)) 511 512+27*fer(g,2,4)*bos(kk,3,1,-3)*bos(f,0,3,2)*bos(f,0,2,-8)*axp(bos(f,0,2,-3)) 513 514-3*fer(g,2,3)*bos(kk,3,4,1)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3)) 515 516+36*fer(g,2,3)*bos(kk,3,3,1)*bos(kk,3,2,1)*bos(kk,3,1,-5)*axp(bos(f,0,2,-3)) 517 518+27*fer(g,2,3)*bos(kk,3,3,1)*bos(kk,3,1,-4)*bos(f,0,3,1)*bos(f,0,2,-4) 519 520*axp(bos(f,0,2,-3)) 521 522-60*fer(g,2,3)*bos(kk,3,2,3)*bos(kk,3,1,-6)*axp(bos(f,0,2,-3)) 523 524-108*fer(g,2,3)*bos(kk,3,2,2)*bos(kk,3,1,-5)*bos(f,0,3,1)*bos(f,0,2,-4) 525 526*axp(bos(f,0,2,-3)) 527 528+27*fer(g,2,3)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,4,1)*bos(f,0,2,-4) 529 530*axp(bos(f,0,2,-3)) 531 532-108*fer(g,2,3)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,3,2)*bos(f,0,2,-5) 533 534*axp(bos(f,0,2,-3)) 535 536-81*fer(g,2,3)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,3,2)*bos(f,0,2,-8) 537 538*axp(bos(f,0,2,-3)) 539 540-3*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,5,1)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 541 542+36*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,4,1)*bos(f,0,3,1)*bos(f,0,2,-5) 543 544*axp(bos(f,0,2,-3)) 545 546+27*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,4,1)*bos(f,0,3,1)*bos(f,0,2,-8) 547 548*axp(bos(f,0,2,-3)) 549 550-60*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,3,3)*bos(f,0,2,-6)*axp(bos(f,0,2,-3)) 551 552-108*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,3,3)*bos(f,0,2,-9)*axp(bos(f,0,2,-3)) 553 554-27*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,3,3)*bos(f,0,2,-12)*axp(bos(f,0,2,-3)) 555 556 557clear xxx,yyy; 558 559 560 561% 8.) 562% And now let us change traditional algebra on the chiral algebra; 563clearrules trad; 564 565 566let chiral; 567 568 569% And now we compute the same derivative but in the chiral 570% representation; 571 572%first susy derivative 573der(1)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0)); 574 575 576 577-fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))*der(1) 578 579+fer(h,1,0)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0)) 580 581 582fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*del(1); 583 584 585bos(g,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1)) 586 587+2*fer(g,2,1)*fer(f,1,2)*bos(f,0,2,-3)*axp(fer(k,1,2)*fer(h,2,1)) 588 589-fer(k,1,2)*fer(g,2,1)*bos(h,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1)) 590 591-del(1)*fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1)) 592 593sub(del=der,ws); 594 595 596fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*der(1) 597 598 599%second susy derivative 600der(2)*fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0)); 601 602 603 604-fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0))*der(2) 605 606+fer(g,2,3)*fer(f,2,1)*bos(kk,0,3)*axp(bos(f,3,0)) 607 608+fer(kk,2,3)*fer(g,2,3)*axp(bos(f,3,0)) 609 610 611fer(r,2,1)*bos(kk,3,4,-4)*axp(fer(f,1,2)*fer(g,2,1))*del(2); 612 613 614fer(r,2,1)*fer(g,2,1)*bos(kk,3,4,-4)*bos(f,3,2)*axp( - fer(g,2,1)*fer(f,1,2)) 615 616+fer(r,2,1)*fer(g,2,1)*bos(kk,3,4,-4)*bos(f,0,3)*axp( - fer(g,2,1)*fer(f,1,2)) 617 618-4*fer(r,2,1)*fer(kk,2,5)*bos(kk,3,4,-5)*axp( - fer(g,2,1)*fer(f,1,2)) 619 620-del(2)*fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2)) 621 622sub(del=der,ws); 623 624 625fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2))*der(2) 626 627; 628 629 630 631% 9.) the value of action of (susy) derivative; 632 633xxx:=fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)); 634 635 636xxx := fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3)) 637 638yyy:=fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3)); 639 640 641yyy := fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3)) 642 643 644%first susy derivative 645 646pr(1,xxx); 647 648 649 650-fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*axp(fer(h,2,0)*fer(aa,1,3)) 651 652-2*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 653 654pr(1,yyy); 655 656 657bos(kk,3,1,-3)*bos(g,3,3)*axp(bos(f,0,2,-3)) 658 659+3*fer(g,2,3)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 660 661 662%second susy2 derivative; 663pr(2,xxx); 664 665 666 667-bos(k,0,2,-2)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3)) 668 669-bos(k,0,2,-2)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3)) 670 671+fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3)) 672 673+fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3)) 674 675-2*fer(k,2,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3)) 676 677pr(2,yyy); 678 679 6803*fer(g,2,3)*fer(f,2,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3)) 681 682+3*fer(kk,2,2)*fer(g,2,3)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3)) 683 684 685clear xxx,yyy; 686 687 688% We return back to the traditional algebra; 689 690clearrules chiral; 691 692 693let trad; 694 695 696 697% 10.) The components of super-objects; 698 699xxx:=fer(f,2,3)*bos(g,3,2,2); 700 701 702xxx := fer(f,2,3)*bos(g,3,2,2) 703 704 705% all components; 706fpart(xxx); 707 708 709{gras(ff2,3)*fun(g1,2,2), 710 711 fun(g1,2,2)*fun(f1,3) 712 713 +2*gras(g2,3)*gras(ff2,3)*fun(g1,2,1), 714 715 fun(g1,2,2)*fun(f0,4) 716 717 -2*gras(g1,3)*gras(ff2,3)*fun(g1,2,1), 718 719 gras(ff1,4)*fun(g1,2,2) 720 721 -2*gras(ff2,3)*fun(g1,2,1)*fun(g0,3,1) 722 723 +2*gras(g1,3)*fun(g1,2,1)*fun(f1,3) 724 725 +2*gras(g2,3)*fun(g1,2,1)*fun(f0,4) 726 727 -2*gras(g2,3)*gras(g1,3)*gras(ff2,3)} 728 729 730%bosonic sector; 731bpart(xxx); 732 733 734{0,fun(g1,2,2)*fun(f1,3),fun(g1,2,2)*fun(f0,4),0} 735 736 737%the given component 738bf_part(xxx,0); 739 740 741gras(ff2,3)*fun(g1,2,2) 742 743 744%the given component in the bosonic sector; 745 746b_part(xxx,0); 747 748 7490 750 751b_part(xxx,1); 752 753 754fun(g1,2,2)*fun(f1,3) 755 756 757 758 759clear zzz; 760 761 762clearrules trad; 763 764 765let chiral; 766 767 768zzz:=bos(f,3,1,-1)*bos(g,0,1,2); 769 770 771zzz := bos(g,0,1,2)*bos(f,3,1,-1) 772 773b_part(zzz,0); 774 775 776fun(g0,1,2)*fun(f1,1,f0,2,-1) 777 778b_part(zzz,3); 779 780 781( 782 783 -fun(g0,1,2)*fun(f0,3,1)*fun(f1,1,f0,2,-2) 784 785 +2*fun(g0,1,2)*fun(f1,2,1)*fun(f1,1,f0,2,-2) 786 787 +8*fun(g1,1,1)*fun(g0,1,1)*fun(f1,1,f0,2,-1))/4 788 789clearrules chiral; 790 791 792let chiral1; 793 794 795b_part(zzz,0); 796 797 798(fun(g0,1,2)*fun(f1,1,-1))/2 799 800b_part(zzz,3); 801 802 803( 804 805 -fun(g0,1,2)*fun(f1,1,-2)*fun(f0,3,1) 806 807 +8*fun(g1,1,1)*fun(g0,1,1)*fun(f1,1,-1))/8 808 809clearrules chiral1; 810 811 812let trad; 813 814 815 816%11 matrix represenattion of operators; 817lax:=der(1)*der(2)+bos(u,0,0); 818 819 820lax := bos(u,0,0) 821 822 +der(1)*der(2) 823 824 825macierz(lax,b,b); 826 827 828mat((fun(u0,0),0,0,1), 829 830 (0,0,0,0), 831 832 (0,0,0,0), 833 834 (fun(u1,0) 835 836 2 837 -d(1) ,0,0,fun(u0,0))) 838 839 840macierz(lax,f,b); 841 842 843mat((0,0,0,0), 844 845 (fun(u0,0),0,0,d(1)), 846 847 ( 848 849 -d(1),0,0,fun(u0,0)), 850 851 (0,0,0,0)) 852 853 854macierz(lax,b,f); 855 856 857mat((fun(u0,0),0,0,1), 858 859 (gras(uu1,0),fun(u0,0),d(1),0), 860 861 (gras(uu2,0), 862 863 -d(1),fun(u0,0),0), 864 865 (fun(u1,0) 866 867 2 868 -d(1) , 869 870 -gras(uu2,0),gras(uu1,0),fun(u0,0))) 871 872 873macierz(lax,f,f); 874 875 876mat((0,fun(u0,0),1,0), 877 878 (fun(u0,0),gras(uu1,0),0,d(1)), 879 880 ( 881 882 -d(1),gras(uu2,0),0,fun(u0,0)), 883 884 ( 885 886 -gras(uu2,0),fun(u1,0) 887 888 2 889 -d(1) ,fun(u0,0),gras(uu1,0))) 890 891 892 893% 12.) Demonstration of chirality properties; 894clearrules trad; 895 896 897let chiral; 898 899 900b_chiral:={f0}; 901 902 903b_chiral := {f0} 904 905b_antychiral:={f1}; 906 907 908b_antychiral := {f1} 909 910f_chiral:={f2}; 911 912 913f_chiral := {f2} 914 915f_antychiral:={f3}; 916 917 918f_antychiral := {f3} 919 920for k:=0:3 do write fer(f0,k,0); 921 922 923fer(f0,0,0) 924 9250 926 927fer(f0,2,0) 928 929fer(f0,3,0) 930 931for k:=0:3 do write fer(f1,k,0); 932 933 934fer(f1,0,0) 935 936fer(f1,1,0) 937 9380 939 940fer(f1,3,0) 941 942for k:=0:3 do write fer(f2,k,0); 943 944 945fer(f2,0,0) 946 947fer(f2,1,0) 948 949fer(f2,2,0) 950 951 952-fer(f2,0,1) 953 954for k:=0:3 do write fer(f3,k,0); 955 956 957fer(f3,0,0) 958 959fer(f3,1,0) 960 961fer(f3,2,0) 962 9630 964 965for k:=0:3 do write bos(f1,k,0); 966 967 968bos(f1,0,0) 969 970bos(f1,1,0) 971 972bos(f1,2,0) 973 9740 975 976for k:=0:3 do write bos(f2,k,0); 977 978 979bos(f2,0,0) 980 9810 982 983bos(f2,2,0) 984 985bos(f2,3,0) 986 987for k:=0:3 do write bos(f2,k,0); 988 989 990bos(f2,0,0) 991 9920 993 994bos(f2,2,0) 995 996bos(f2,3,0) 997 998for k:=0:3 do write bos(f3,k,0); 999 1000 1001bos(f3,0,0) 1002 1003bos(f3,1,0) 1004 10050 1006 1007bos(f3,3,0) 1008 1009 1010% 13.) Integrations; 1011 1012d(-1)*xxx; 1013 1014 1015***** introduce the precision e.g. give the value of ww > 0 1016 1017 1018%we have to declare ww; 1019ww:=2; 1020 1021 1022ww := 2 1023 1024 1025d(-1)*xxx; 1026 1027 1028 1029 6 1030-2*fer(f,2,4)*bos(g,3,4,2)*d(-1) 1031 1032 5 1033+4*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,3,1)*d(-1) 1034 1035 4 1036-2*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,2,1)*d(-1) 1037 1038 4 1039-2*fer(f,2,4)*bos(g,3,3,2)*d(-1) 1040 1041 3 1042+4*fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1)*d(-1) 1043 1044 2 1045-fer(f,2,4)*bos(g,3,2,2)*d(-1) 1046 1047 2 1048-2*fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1)*d(-1) 1049 1050+fer(f,2,3)*bos(g,3,2,2)*d(-1) 1051 1052xxx*d(-2); 1053 1054 1055 4 10562*d(-2) *fer(f,2,5)*bos(g,3,3,1)*bos(g,3,2,1) 1057 1058 3 1059+4*d(-2) *fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1) 1060 1061 2 1062+d(-2) *fer(f,2,4)*bos(g,3,2,2) 1063 1064 2 1065+2*d(-2) *fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1) 1066 1067+d(-2)*fer(f,2,3)*bos(g,3,2,2) 1068 1069d(-3)*xxx; 1070 1071 1072d(-3)*fer(f,2,3)*bos(g,3,2,2) 1073 1074 1075ww:=4; 1076 1077 1078ww := 4 1079 1080d(-1)**5:=0; 1081 1082 1083 5 1084d(-1) := 0 1085d(-2)**5:=0; 1086 1087 1088 5 1089d(-2) := 0 1090 1091 1092d(-1)*yyy; 1093 1094 1095yyy*d(-1) 1096 1097yyy*d(-2); 1098 1099 1100yyy*d(-2) 1101 1102 1103clear d(-1)**5,d(-2)**5; 1104 1105 1106 1107 1108on list; 1109 1110 1111 1112% 14.) The accelerations of integrations; 1113 1114clear ww; 1115 1116 1117ww:=3; 1118 1119 1120ww := 3 1121 1122let drr; 1123 1124 1125let cutoff; 1126 1127 1128cut:=4; 1129 1130 1131cut := 4 1132 1133d(-1)*xxx; 1134 1135 1136 1137-fer(f,2,6)*bos(g,3,2,2)*dr(-4) 1138 1139-6*fer(f,2,5)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-4) 1140 1141+fer(f,2,5)*bos(g,3,2,2)*dr(-3) 1142 1143-6*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-4) 1144 1145-6*fer(f,2,4)*bos(g,3,3,2)*dr(-4) 1146 1147+4*fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-3) 1148 1149-fer(f,2,4)*bos(g,3,2,2)*dr(-2) 1150 1151-2*fer(f,2,3)*bos(g,3,5,1)*bos(g,3,2,1)*dr(-4) 1152 1153-6*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,3,1)*dr(-4) 1154 1155+2*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-3) 1156 1157+2*fer(f,2,3)*bos(g,3,3,2)*dr(-3) 1158 1159-2*fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-2) 1160 1161+fer(f,2,3)*bos(g,3,2,2)*dr(-1) 1162 1163d(-1)**2*yyy; 1164 1165 1166yyy*dr(-2) 1167 1168clear ww,cut; 1169 1170 1171ww:=4; 1172 1173 1174ww := 4 1175 1176cut:=5; 1177 1178 1179cut := 5 1180 1181d(-1)**3*yyy; 1182 1183 1184yyy*dr(-3) 1185 1186d(-1)*xxx; 1187 1188 1189fer(f,2,7)*bos(g,3,2,2)*dr(-5) 1190 1191+8*fer(f,2,6)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-5) 1192 1193-fer(f,2,6)*bos(g,3,2,2)*dr(-4) 1194 1195+12*fer(f,2,5)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-5) 1196 1197+12*fer(f,2,5)*bos(g,3,3,2)*dr(-5) 1198 1199-6*fer(f,2,5)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-4) 1200 1201+fer(f,2,5)*bos(g,3,2,2)*dr(-3) 1202 1203+8*fer(f,2,4)*bos(g,3,5,1)*bos(g,3,2,1)*dr(-5) 1204 1205+24*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,3,1)*dr(-5) 1206 1207-6*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-4) 1208 1209-6*fer(f,2,4)*bos(g,3,3,2)*dr(-4) 1210 1211+4*fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-3) 1212 1213-fer(f,2,4)*bos(g,3,2,2)*dr(-2) 1214 1215+2*fer(f,2,3)*bos(g,3,6,1)*bos(g,3,2,1)*dr(-5) 1216 1217+8*fer(f,2,3)*bos(g,3,5,1)*bos(g,3,3,1)*dr(-5) 1218 1219-2*fer(f,2,3)*bos(g,3,5,1)*bos(g,3,2,1)*dr(-4) 1220 1221+6*fer(f,2,3)*bos(g,3,4,2)*dr(-5) 1222 1223-6*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,3,1)*dr(-4) 1224 1225+2*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-3) 1226 1227+2*fer(f,2,3)*bos(g,3,3,2)*dr(-3) 1228 1229-2*fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-2) 1230 1231+fer(f,2,3)*bos(g,3,2,2)*dr(-1) 1232 1233 1234clearrules cutoff; 1235 1236clearrules drr; 1237 1238 1239clear cut,ww; 1240 1241 1242 1243% it is possible to use directly accelerated integrations oprators dr; 1244ww:=4; 1245 1246 1247ww := 4 1248 1249dr(-2)*fer(f,1,2)*bos(kk,0,2); 1250 1251 1252630*fer(f,1,6)*bos(kk,0,6)*dr(-10) 1253 1254-280*fer(f,1,6)*bos(kk,0,5)*dr(-9) 1255 1256+105*fer(f,1,6)*bos(kk,0,4)*dr(-8) 1257 1258-30*fer(f,1,6)*bos(kk,0,3)*dr(-7) 1259 1260+5*fer(f,1,6)*bos(kk,0,2)*dr(-6) 1261 1262-280*fer(f,1,5)*bos(kk,0,6)*dr(-9) 1263 1264+140*fer(f,1,5)*bos(kk,0,5)*dr(-8) 1265 1266-60*fer(f,1,5)*bos(kk,0,4)*dr(-7) 1267 1268+20*fer(f,1,5)*bos(kk,0,3)*dr(-6) 1269 1270-4*fer(f,1,5)*bos(kk,0,2)*dr(-5) 1271 1272+105*fer(f,1,4)*bos(kk,0,6)*dr(-8) 1273 1274-60*fer(f,1,4)*bos(kk,0,5)*dr(-7) 1275 1276+30*fer(f,1,4)*bos(kk,0,4)*dr(-6) 1277 1278-12*fer(f,1,4)*bos(kk,0,3)*dr(-5) 1279 1280+3*fer(f,1,4)*bos(kk,0,2)*dr(-4) 1281 1282-30*fer(f,1,3)*bos(kk,0,6)*dr(-7) 1283 1284+20*fer(f,1,3)*bos(kk,0,5)*dr(-6) 1285 1286-12*fer(f,1,3)*bos(kk,0,4)*dr(-5) 1287 1288+6*fer(f,1,3)*bos(kk,0,3)*dr(-4) 1289 1290-2*fer(f,1,3)*bos(kk,0,2)*dr(-3) 1291 1292+5*fer(f,1,2)*bos(kk,0,6)*dr(-6) 1293 1294-4*fer(f,1,2)*bos(kk,0,5)*dr(-5) 1295 1296+3*fer(f,1,2)*bos(kk,0,4)*dr(-4) 1297 1298-2*fer(f,1,2)*bos(kk,0,3)*dr(-3) 1299 1300+fer(f,1,2)*bos(kk,0,2)*dr(-2) 1301 1302 1303on time; 1304 1305 1306 1307showtime; 1308 1309 1310 1311 1312 1313dr(-3)*bos(g,3,1)*bos(ff,3,2); 1314 1315 13163150*bos(g,3,5)*bos(ff,3,6)*dr(-11) 1317 1318-1260*bos(g,3,5)*bos(ff,3,5)*dr(-10) 1319 1320+420*bos(g,3,5)*bos(ff,3,4)*dr(-9) 1321 1322-105*bos(g,3,5)*bos(ff,3,3)*dr(-8) 1323 1324+15*bos(g,3,5)*bos(ff,3,2)*dr(-7) 1325 1326-1260*bos(g,3,4)*bos(ff,3,6)*dr(-10) 1327 1328+560*bos(g,3,4)*bos(ff,3,5)*dr(-9) 1329 1330-210*bos(g,3,4)*bos(ff,3,4)*dr(-8) 1331 1332+60*bos(g,3,4)*bos(ff,3,3)*dr(-7) 1333 1334-10*bos(g,3,4)*bos(ff,3,2)*dr(-6) 1335 1336+420*bos(g,3,3)*bos(ff,3,6)*dr(-9) 1337 1338-210*bos(g,3,3)*bos(ff,3,5)*dr(-8) 1339 1340+90*bos(g,3,3)*bos(ff,3,4)*dr(-7) 1341 1342-30*bos(g,3,3)*bos(ff,3,3)*dr(-6) 1343 1344+6*bos(g,3,3)*bos(ff,3,2)*dr(-5) 1345 1346-105*bos(g,3,2)*bos(ff,3,6)*dr(-8) 1347 1348+60*bos(g,3,2)*bos(ff,3,5)*dr(-7) 1349 1350-30*bos(g,3,2)*bos(ff,3,4)*dr(-6) 1351 1352+12*bos(g,3,2)*bos(ff,3,3)*dr(-5) 1353 1354-3*bos(g,3,2)*bos(ff,3,2)*dr(-4) 1355 1356+15*bos(g,3,1)*bos(ff,3,6)*dr(-7) 1357 1358-10*bos(g,3,1)*bos(ff,3,5)*dr(-6) 1359 1360+6*bos(g,3,1)*bos(ff,3,4)*dr(-5) 1361 1362-3*bos(g,3,1)*bos(ff,3,3)*dr(-4) 1363 1364+bos(g,3,1)*bos(ff,3,2)*dr(-3) 1365 1366 1367 1368showtime; 1369 1370 1371 1372 1373%if you try usual integration 1374 1375d(-1)**3*bos(g,3,1)*bos(ff,3,2); 1376 1377 1378 1379 48 1380-bos(g,3,10)*bos(ff,3,38)*d(-1) 1381 1382 47 1383+12*bos(g,3,10)*bos(ff,3,37)*d(-1) 1384 1385 46 1386-78*bos(g,3,10)*bos(ff,3,36)*d(-1) 1387 1388 45 1389+364*bos(g,3,10)*bos(ff,3,35)*d(-1) 1390 1391 44 1392-1353*bos(g,3,10)*bos(ff,3,34)*d(-1) 1393 1394 43 1395+4224*bos(g,3,10)*bos(ff,3,33)*d(-1) 1396 1397 42 1398-11440*bos(g,3,10)*bos(ff,3,32)*d(-1) 1399 1400 41 1401+27456*bos(g,3,10)*bos(ff,3,31)*d(-1) 1402 1403 40 1404-59268*bos(g,3,10)*bos(ff,3,30)*d(-1) 1405 1406 39 1407+116336*bos(g,3,10)*bos(ff,3,29)*d(-1) 1408 1409 38 1410-209352*bos(g,3,10)*bos(ff,3,28)*d(-1) 1411 1412 37 1413+347568*bos(g,3,10)*bos(ff,3,27)*d(-1) 1414 1415 36 1416-534964*bos(g,3,10)*bos(ff,3,26)*d(-1) 1417 1418 35 1419+766272*bos(g,3,10)*bos(ff,3,25)*d(-1) 1420 1421 34 1422-1024464*bos(g,3,10)*bos(ff,3,24)*d(-1) 1423 1424 33 1425+1281280*bos(g,3,10)*bos(ff,3,23)*d(-1) 1426 1427 32 1428-1501566*bos(g,3,10)*bos(ff,3,22)*d(-1) 1429 1430 31 1431+1650792*bos(g,3,10)*bos(ff,3,21)*d(-1) 1432 1433 30 1434-1703636*bos(g,3,10)*bos(ff,3,20)*d(-1) 1435 1436 29 1437+1650792*bos(g,3,10)*bos(ff,3,19)*d(-1) 1438 1439 28 1440-1501566*bos(g,3,10)*bos(ff,3,18)*d(-1) 1441 1442 27 1443+1281280*bos(g,3,10)*bos(ff,3,17)*d(-1) 1444 1445 26 1446-1024464*bos(g,3,10)*bos(ff,3,16)*d(-1) 1447 1448 25 1449+766272*bos(g,3,10)*bos(ff,3,15)*d(-1) 1450 1451 24 1452-534964*bos(g,3,10)*bos(ff,3,14)*d(-1) 1453 1454 23 1455+347568*bos(g,3,10)*bos(ff,3,13)*d(-1) 1456 1457 22 1458-209352*bos(g,3,10)*bos(ff,3,12)*d(-1) 1459 1460 21 1461+116336*bos(g,3,10)*bos(ff,3,11)*d(-1) 1462 1463 20 1464-59268*bos(g,3,10)*bos(ff,3,10)*d(-1) 1465 1466 19 1467+27456*bos(g,3,10)*bos(ff,3,9)*d(-1) 1468 1469 18 1470-11440*bos(g,3,10)*bos(ff,3,8)*d(-1) 1471 1472 17 1473+4224*bos(g,3,10)*bos(ff,3,7)*d(-1) 1474 1475 16 1476-1353*bos(g,3,10)*bos(ff,3,6)*d(-1) 1477 1478 15 1479+364*bos(g,3,10)*bos(ff,3,5)*d(-1) 1480 1481 14 1482-78*bos(g,3,10)*bos(ff,3,4)*d(-1) 1483 1484 13 1485+12*bos(g,3,10)*bos(ff,3,3)*d(-1) 1486 1487 12 1488-bos(g,3,10)*bos(ff,3,2)*d(-1) 1489 1490 44 1491-3*bos(g,3,9)*bos(ff,3,35)*d(-1) 1492 1493 43 1494+33*bos(g,3,9)*bos(ff,3,34)*d(-1) 1495 1496 42 1497-198*bos(g,3,9)*bos(ff,3,33)*d(-1) 1498 1499 41 1500+858*bos(g,3,9)*bos(ff,3,32)*d(-1) 1501 1502 40 1503-2970*bos(g,3,9)*bos(ff,3,31)*d(-1) 1504 1505 39 1506+8646*bos(g,3,9)*bos(ff,3,30)*d(-1) 1507 1508 38 1509-21846*bos(g,3,9)*bos(ff,3,29)*d(-1) 1510 1511 37 1512+48906*bos(g,3,9)*bos(ff,3,28)*d(-1) 1513 1514 36 1515-98406*bos(g,3,9)*bos(ff,3,27)*d(-1) 1516 1517 35 1518+179850*bos(g,3,9)*bos(ff,3,26)*d(-1) 1519 1520 34 1521-300894*bos(g,3,9)*bos(ff,3,25)*d(-1) 1522 1523 33 1524+463554*bos(g,3,9)*bos(ff,3,24)*d(-1) 1525 1526 32 1527-660594*bos(g,3,9)*bos(ff,3,23)*d(-1) 1528 1529 31 1530+873774*bos(g,3,9)*bos(ff,3,22)*d(-1) 1531 1532 30 1533-1075470*bos(g,3,9)*bos(ff,3,21)*d(-1) 1534 1535 29 1536+1234002*bos(g,3,9)*bos(ff,3,20)*d(-1) 1537 1538 28 1539-1321452*bos(g,3,9)*bos(ff,3,19)*d(-1) 1540 1541 27 1542+1321452*bos(g,3,9)*bos(ff,3,18)*d(-1) 1543 1544 26 1545-1234002*bos(g,3,9)*bos(ff,3,17)*d(-1) 1546 1547 25 1548+1075470*bos(g,3,9)*bos(ff,3,16)*d(-1) 1549 1550 24 1551-873774*bos(g,3,9)*bos(ff,3,15)*d(-1) 1552 1553 23 1554+660594*bos(g,3,9)*bos(ff,3,14)*d(-1) 1555 1556 22 1557-463554*bos(g,3,9)*bos(ff,3,13)*d(-1) 1558 1559 21 1560+300894*bos(g,3,9)*bos(ff,3,12)*d(-1) 1561 1562 20 1563-179850*bos(g,3,9)*bos(ff,3,11)*d(-1) 1564 1565 19 1566+98406*bos(g,3,9)*bos(ff,3,10)*d(-1) 1567 1568 18 1569-48906*bos(g,3,9)*bos(ff,3,9)*d(-1) 1570 1571 17 1572+21846*bos(g,3,9)*bos(ff,3,8)*d(-1) 1573 1574 16 1575-8646*bos(g,3,9)*bos(ff,3,7)*d(-1) 1576 1577 15 1578+2970*bos(g,3,9)*bos(ff,3,6)*d(-1) 1579 1580 14 1581-858*bos(g,3,9)*bos(ff,3,5)*d(-1) 1582 1583 13 1584+198*bos(g,3,9)*bos(ff,3,4)*d(-1) 1585 1586 12 1587-33*bos(g,3,9)*bos(ff,3,3)*d(-1) 1588 1589 11 1590+3*bos(g,3,9)*bos(ff,3,2)*d(-1) 1591 1592 40 1593-6*bos(g,3,8)*bos(ff,3,32)*d(-1) 1594 1595 39 1596+60*bos(g,3,8)*bos(ff,3,31)*d(-1) 1597 1598 38 1599-330*bos(g,3,8)*bos(ff,3,30)*d(-1) 1600 1601 37 1602+1320*bos(g,3,8)*bos(ff,3,29)*d(-1) 1603 1604 36 1605-4230*bos(g,3,8)*bos(ff,3,28)*d(-1) 1606 1607 35 1608+11412*bos(g,3,8)*bos(ff,3,27)*d(-1) 1609 1610 34 1611-26730*bos(g,3,8)*bos(ff,3,26)*d(-1) 1612 1613 33 1614+55440*bos(g,3,8)*bos(ff,3,25)*d(-1) 1615 1616 32 1617-103230*bos(g,3,8)*bos(ff,3,24)*d(-1) 1618 1619 31 1620+174300*bos(g,3,8)*bos(ff,3,23)*d(-1) 1621 1622 30 1623-268818*bos(g,3,8)*bos(ff,3,22)*d(-1) 1624 1625 29 1626+380760*bos(g,3,8)*bos(ff,3,21)*d(-1) 1627 1628 28 1629-497310*bos(g,3,8)*bos(ff,3,20)*d(-1) 1630 1631 27 1632+600660*bos(g,3,8)*bos(ff,3,19)*d(-1) 1633 1634 26 1635-672210*bos(g,3,8)*bos(ff,3,18)*d(-1) 1636 1637 25 1638+697824*bos(g,3,8)*bos(ff,3,17)*d(-1) 1639 1640 24 1641-672210*bos(g,3,8)*bos(ff,3,16)*d(-1) 1642 1643 23 1644+600660*bos(g,3,8)*bos(ff,3,15)*d(-1) 1645 1646 22 1647-497310*bos(g,3,8)*bos(ff,3,14)*d(-1) 1648 1649 21 1650+380760*bos(g,3,8)*bos(ff,3,13)*d(-1) 1651 1652 20 1653-268818*bos(g,3,8)*bos(ff,3,12)*d(-1) 1654 1655 19 1656+174300*bos(g,3,8)*bos(ff,3,11)*d(-1) 1657 1658 18 1659-103230*bos(g,3,8)*bos(ff,3,10)*d(-1) 1660 1661 17 1662+55440*bos(g,3,8)*bos(ff,3,9)*d(-1) 1663 1664 16 1665-26730*bos(g,3,8)*bos(ff,3,8)*d(-1) 1666 1667 15 1668+11412*bos(g,3,8)*bos(ff,3,7)*d(-1) 1669 1670 14 1671-4230*bos(g,3,8)*bos(ff,3,6)*d(-1) 1672 1673 13 1674+1320*bos(g,3,8)*bos(ff,3,5)*d(-1) 1675 1676 12 1677-330*bos(g,3,8)*bos(ff,3,4)*d(-1) 1678 1679 11 1680+60*bos(g,3,8)*bos(ff,3,3)*d(-1) 1681 1682 10 1683-6*bos(g,3,8)*bos(ff,3,2)*d(-1) 1684 1685 36 1686-10*bos(g,3,7)*bos(ff,3,29)*d(-1) 1687 1688 35 1689+90*bos(g,3,7)*bos(ff,3,28)*d(-1) 1690 1691 34 1692-450*bos(g,3,7)*bos(ff,3,27)*d(-1) 1693 1694 33 1695+1650*bos(g,3,7)*bos(ff,3,26)*d(-1) 1696 1697 32 1698-4860*bos(g,3,7)*bos(ff,3,25)*d(-1) 1699 1700 31 1701+12060*bos(g,3,7)*bos(ff,3,24)*d(-1) 1702 1703 30 1704-25980*bos(g,3,7)*bos(ff,3,23)*d(-1) 1705 1706 29 1707+49500*bos(g,3,7)*bos(ff,3,22)*d(-1) 1708 1709 28 1710-84510*bos(g,3,7)*bos(ff,3,21)*d(-1) 1711 1712 27 1713+130510*bos(g,3,7)*bos(ff,3,20)*d(-1) 1714 1715 26 1716-183510*bos(g,3,7)*bos(ff,3,19)*d(-1) 1717 1718 25 1719+236070*bos(g,3,7)*bos(ff,3,18)*d(-1) 1720 1721 24 1722-278760*bos(g,3,7)*bos(ff,3,17)*d(-1) 1723 1724 23 1725+302760*bos(g,3,7)*bos(ff,3,16)*d(-1) 1726 1727 22 1728-302760*bos(g,3,7)*bos(ff,3,15)*d(-1) 1729 1730 21 1731+278760*bos(g,3,7)*bos(ff,3,14)*d(-1) 1732 1733 20 1734-236070*bos(g,3,7)*bos(ff,3,13)*d(-1) 1735 1736 19 1737+183510*bos(g,3,7)*bos(ff,3,12)*d(-1) 1738 1739 18 1740-130510*bos(g,3,7)*bos(ff,3,11)*d(-1) 1741 1742 17 1743+84510*bos(g,3,7)*bos(ff,3,10)*d(-1) 1744 1745 16 1746-49500*bos(g,3,7)*bos(ff,3,9)*d(-1) 1747 1748 15 1749+25980*bos(g,3,7)*bos(ff,3,8)*d(-1) 1750 1751 14 1752-12060*bos(g,3,7)*bos(ff,3,7)*d(-1) 1753 1754 13 1755+4860*bos(g,3,7)*bos(ff,3,6)*d(-1) 1756 1757 12 1758-1650*bos(g,3,7)*bos(ff,3,5)*d(-1) 1759 1760 11 1761+450*bos(g,3,7)*bos(ff,3,4)*d(-1) 1762 1763 10 1764-90*bos(g,3,7)*bos(ff,3,3)*d(-1) 1765 1766 9 1767+10*bos(g,3,7)*bos(ff,3,2)*d(-1) 1768 1769 32 1770-12*bos(g,3,6)*bos(ff,3,26)*d(-1) 1771 1772 31 1773+96*bos(g,3,6)*bos(ff,3,25)*d(-1) 1774 1775 30 1776-432*bos(g,3,6)*bos(ff,3,24)*d(-1) 1777 1778 29 1779+1440*bos(g,3,6)*bos(ff,3,23)*d(-1) 1780 1781 28 1782-3864*bos(g,3,6)*bos(ff,3,22)*d(-1) 1783 1784 27 1785+8736*bos(g,3,6)*bos(ff,3,21)*d(-1) 1786 1787 26 1788-17136*bos(g,3,6)*bos(ff,3,20)*d(-1) 1789 1790 25 1791+29664*bos(g,3,6)*bos(ff,3,19)*d(-1) 1792 1793 24 1794-45876*bos(g,3,6)*bos(ff,3,18)*d(-1) 1795 1796 23 1797+63936*bos(g,3,6)*bos(ff,3,17)*d(-1) 1798 1799 22 1800-80736*bos(g,3,6)*bos(ff,3,16)*d(-1) 1801 1802 21 1803+92736*bos(g,3,6)*bos(ff,3,15)*d(-1) 1804 1805 20 1806-97104*bos(g,3,6)*bos(ff,3,14)*d(-1) 1807 1808 19 1809+92736*bos(g,3,6)*bos(ff,3,13)*d(-1) 1810 1811 18 1812-80736*bos(g,3,6)*bos(ff,3,12)*d(-1) 1813 1814 17 1815+63936*bos(g,3,6)*bos(ff,3,11)*d(-1) 1816 1817 16 1818-45876*bos(g,3,6)*bos(ff,3,10)*d(-1) 1819 1820 15 1821+29664*bos(g,3,6)*bos(ff,3,9)*d(-1) 1822 1823 14 1824-17136*bos(g,3,6)*bos(ff,3,8)*d(-1) 1825 1826 13 1827+8736*bos(g,3,6)*bos(ff,3,7)*d(-1) 1828 1829 12 1830-3864*bos(g,3,6)*bos(ff,3,6)*d(-1) 1831 1832 11 1833+1440*bos(g,3,6)*bos(ff,3,5)*d(-1) 1834 1835 10 1836-432*bos(g,3,6)*bos(ff,3,4)*d(-1) 1837 1838 9 1839+96*bos(g,3,6)*bos(ff,3,3)*d(-1) 1840 1841 8 1842-12*bos(g,3,6)*bos(ff,3,2)*d(-1) 1843 1844 28 1845-12*bos(g,3,5)*bos(ff,3,23)*d(-1) 1846 1847 27 1848+84*bos(g,3,5)*bos(ff,3,22)*d(-1) 1849 1850 26 1851-336*bos(g,3,5)*bos(ff,3,21)*d(-1) 1852 1853 25 1854+1008*bos(g,3,5)*bos(ff,3,20)*d(-1) 1855 1856 24 1857-2436*bos(g,3,5)*bos(ff,3,19)*d(-1) 1858 1859 23 1860+4956*bos(g,3,5)*bos(ff,3,18)*d(-1) 1861 1862 22 1863-8736*bos(g,3,5)*bos(ff,3,17)*d(-1) 1864 1865 21 1866+13536*bos(g,3,5)*bos(ff,3,16)*d(-1) 1867 1868 20 1869-18648*bos(g,3,5)*bos(ff,3,15)*d(-1) 1870 1871 19 1872+23016*bos(g,3,5)*bos(ff,3,14)*d(-1) 1873 1874 18 1875-25536*bos(g,3,5)*bos(ff,3,13)*d(-1) 1876 1877 17 1878+25536*bos(g,3,5)*bos(ff,3,12)*d(-1) 1879 1880 16 1881-23016*bos(g,3,5)*bos(ff,3,11)*d(-1) 1882 1883 15 1884+18648*bos(g,3,5)*bos(ff,3,10)*d(-1) 1885 1886 14 1887-13536*bos(g,3,5)*bos(ff,3,9)*d(-1) 1888 1889 13 1890+8736*bos(g,3,5)*bos(ff,3,8)*d(-1) 1891 1892 12 1893-4956*bos(g,3,5)*bos(ff,3,7)*d(-1) 1894 1895 11 1896+2436*bos(g,3,5)*bos(ff,3,6)*d(-1) 1897 1898 10 1899-1008*bos(g,3,5)*bos(ff,3,5)*d(-1) 1900 1901 9 1902+336*bos(g,3,5)*bos(ff,3,4)*d(-1) 1903 1904 8 1905-84*bos(g,3,5)*bos(ff,3,3)*d(-1) 1906 1907 7 1908+12*bos(g,3,5)*bos(ff,3,2)*d(-1) 1909 1910 24 1911-10*bos(g,3,4)*bos(ff,3,20)*d(-1) 1912 1913 23 1914+60*bos(g,3,4)*bos(ff,3,19)*d(-1) 1915 1916 22 1917-210*bos(g,3,4)*bos(ff,3,18)*d(-1) 1918 1919 21 1920+560*bos(g,3,4)*bos(ff,3,17)*d(-1) 1921 1922 20 1923-1200*bos(g,3,4)*bos(ff,3,16)*d(-1) 1924 1925 19 1926+2160*bos(g,3,4)*bos(ff,3,15)*d(-1) 1927 1928 18 1929-3360*bos(g,3,4)*bos(ff,3,14)*d(-1) 1930 1931 17 1932+4560*bos(g,3,4)*bos(ff,3,13)*d(-1) 1933 1934 16 1935-5460*bos(g,3,4)*bos(ff,3,12)*d(-1) 1936 1937 15 1938+5800*bos(g,3,4)*bos(ff,3,11)*d(-1) 1939 1940 14 1941-5460*bos(g,3,4)*bos(ff,3,10)*d(-1) 1942 1943 13 1944+4560*bos(g,3,4)*bos(ff,3,9)*d(-1) 1945 1946 12 1947-3360*bos(g,3,4)*bos(ff,3,8)*d(-1) 1948 1949 11 1950+2160*bos(g,3,4)*bos(ff,3,7)*d(-1) 1951 1952 10 1953-1200*bos(g,3,4)*bos(ff,3,6)*d(-1) 1954 1955 9 1956+560*bos(g,3,4)*bos(ff,3,5)*d(-1) 1957 1958 8 1959-210*bos(g,3,4)*bos(ff,3,4)*d(-1) 1960 1961 7 1962+60*bos(g,3,4)*bos(ff,3,3)*d(-1) 1963 1964 6 1965-10*bos(g,3,4)*bos(ff,3,2)*d(-1) 1966 1967 20 1968-6*bos(g,3,3)*bos(ff,3,17)*d(-1) 1969 1970 19 1971+30*bos(g,3,3)*bos(ff,3,16)*d(-1) 1972 1973 18 1974-90*bos(g,3,3)*bos(ff,3,15)*d(-1) 1975 1976 17 1977+210*bos(g,3,3)*bos(ff,3,14)*d(-1) 1978 1979 16 1980-390*bos(g,3,3)*bos(ff,3,13)*d(-1) 1981 1982 15 1983+606*bos(g,3,3)*bos(ff,3,12)*d(-1) 1984 1985 14 1986-810*bos(g,3,3)*bos(ff,3,11)*d(-1) 1987 1988 13 1989+930*bos(g,3,3)*bos(ff,3,10)*d(-1) 1990 1991 12 1992-930*bos(g,3,3)*bos(ff,3,9)*d(-1) 1993 1994 11 1995+810*bos(g,3,3)*bos(ff,3,8)*d(-1) 1996 1997 10 1998-606*bos(g,3,3)*bos(ff,3,7)*d(-1) 1999 2000 9 2001+390*bos(g,3,3)*bos(ff,3,6)*d(-1) 2002 2003 8 2004-210*bos(g,3,3)*bos(ff,3,5)*d(-1) 2005 2006 7 2007+90*bos(g,3,3)*bos(ff,3,4)*d(-1) 2008 2009 6 2010-30*bos(g,3,3)*bos(ff,3,3)*d(-1) 2011 2012 5 2013+6*bos(g,3,3)*bos(ff,3,2)*d(-1) 2014 2015 16 2016-3*bos(g,3,2)*bos(ff,3,14)*d(-1) 2017 2018 15 2019+12*bos(g,3,2)*bos(ff,3,13)*d(-1) 2020 2021 14 2022-30*bos(g,3,2)*bos(ff,3,12)*d(-1) 2023 2024 13 2025+60*bos(g,3,2)*bos(ff,3,11)*d(-1) 2026 2027 12 2028-93*bos(g,3,2)*bos(ff,3,10)*d(-1) 2029 2030 11 2031+120*bos(g,3,2)*bos(ff,3,9)*d(-1) 2032 2033 10 2034-132*bos(g,3,2)*bos(ff,3,8)*d(-1) 2035 2036 9 2037+120*bos(g,3,2)*bos(ff,3,7)*d(-1) 2038 2039 8 2040-93*bos(g,3,2)*bos(ff,3,6)*d(-1) 2041 2042 7 2043+60*bos(g,3,2)*bos(ff,3,5)*d(-1) 2044 2045 6 2046-30*bos(g,3,2)*bos(ff,3,4)*d(-1) 2047 2048 5 2049+12*bos(g,3,2)*bos(ff,3,3)*d(-1) 2050 2051 4 2052-3*bos(g,3,2)*bos(ff,3,2)*d(-1) 2053 2054 12 2055-bos(g,3,1)*bos(ff,3,11)*d(-1) 2056 2057 11 2058+3*bos(g,3,1)*bos(ff,3,10)*d(-1) 2059 2060 10 2061-6*bos(g,3,1)*bos(ff,3,9)*d(-1) 2062 2063 9 2064+10*bos(g,3,1)*bos(ff,3,8)*d(-1) 2065 2066 8 2067-12*bos(g,3,1)*bos(ff,3,7)*d(-1) 2068 2069 7 2070+12*bos(g,3,1)*bos(ff,3,6)*d(-1) 2071 2072 6 2073-10*bos(g,3,1)*bos(ff,3,5)*d(-1) 2074 2075 5 2076+6*bos(g,3,1)*bos(ff,3,4)*d(-1) 2077 2078 4 2079-3*bos(g,3,1)*bos(ff,3,3)*d(-1) 2080 2081 3 2082+bos(g,3,1)*bos(ff,3,2)*d(-1) 2083 2084 2085 2086showtime; 2087 2088 2089 2090 2091 2092% then the time - diffrences is evident. In this example d(-1) 2093% integration is 10 times slower then dr integrations. 2094 2095off time; 2096 2097 2098 2099let cutoff; 2100 2101 2102cut:=5; 2103 2104 2105cut := 5 2106 2107dr(-2)*fer(f,1,2)*bos(aa,0,1); 2108 2109 2110 2111-4*fer(f,1,5)*bos(aa,0,1)*dr(-5) 2112 2113-12*fer(f,1,4)*bos(aa,0,2)*dr(-5) 2114 2115+3*fer(f,1,4)*bos(aa,0,1)*dr(-4) 2116 2117-12*fer(f,1,3)*bos(aa,0,3)*dr(-5) 2118 2119+6*fer(f,1,3)*bos(aa,0,2)*dr(-4) 2120 2121-2*fer(f,1,3)*bos(aa,0,1)*dr(-3) 2122 2123-4*fer(f,1,2)*bos(aa,0,4)*dr(-5) 2124 2125+3*fer(f,1,2)*bos(aa,0,3)*dr(-4) 2126 2127-2*fer(f,1,2)*bos(aa,0,2)*dr(-3) 2128 2129+fer(f,1,2)*bos(aa,0,1)*dr(-2) 2130 2131dr(-3)*bos(g,3,1)*bos(bb,0,3); 2132 2133 21346*bos(g,3,3)*bos(bb,0,3)*dr(-5) 2135 2136+12*bos(g,3,2)*bos(bb,0,4)*dr(-5) 2137 2138-3*bos(g,3,2)*bos(bb,0,3)*dr(-4) 2139 2140+6*bos(g,3,1)*bos(bb,0,5)*dr(-5) 2141 2142-3*bos(g,3,1)*bos(bb,0,4)*dr(-4) 2143 2144+bos(g,3,1)*bos(bb,0,3)*dr(-3) 2145 2146clear ww,cut; 2147 2148 2149ww:=6; 2150 2151 2152ww := 6 2153 2154cut:=7; 2155 2156 2157cut := 7 2158 2159dr(-3)*fer(k,2,3)*bos(h,0,2); 2160 2161 216215*fer(k,2,7)*bos(h,0,2)*dr(-7) 2163 2164+60*fer(k,2,6)*bos(h,0,3)*dr(-7) 2165 2166-10*fer(k,2,6)*bos(h,0,2)*dr(-6) 2167 2168+90*fer(k,2,5)*bos(h,0,4)*dr(-7) 2169 2170-30*fer(k,2,5)*bos(h,0,3)*dr(-6) 2171 2172+6*fer(k,2,5)*bos(h,0,2)*dr(-5) 2173 2174+60*fer(k,2,4)*bos(h,0,5)*dr(-7) 2175 2176-30*fer(k,2,4)*bos(h,0,4)*dr(-6) 2177 2178+12*fer(k,2,4)*bos(h,0,3)*dr(-5) 2179 2180-3*fer(k,2,4)*bos(h,0,2)*dr(-4) 2181 2182+15*fer(k,2,3)*bos(h,0,6)*dr(-7) 2183 2184-10*fer(k,2,3)*bos(h,0,5)*dr(-6) 2185 2186+6*fer(k,2,3)*bos(h,0,4)*dr(-5) 2187 2188-3*fer(k,2,3)*bos(h,0,3)*dr(-4) 2189 2190+fer(k,2,3)*bos(h,0,2)*dr(-3) 2191 2192dr(-4)*bos(h,0,3)*bos(k,0,2); 2193 2194 2195 2196-20*bos(k,0,5)*bos(h,0,3)*dr(-7) 2197 2198-60*bos(k,0,4)*bos(h,0,4)*dr(-7) 2199 2200+10*bos(k,0,4)*bos(h,0,3)*dr(-6) 2201 2202-60*bos(k,0,3)*bos(h,0,5)*dr(-7) 2203 2204+20*bos(k,0,3)*bos(h,0,4)*dr(-6) 2205 2206-4*bos(k,0,3)*bos(h,0,3)*dr(-5) 2207 2208-20*bos(k,0,2)*bos(h,0,6)*dr(-7) 2209 2210+10*bos(k,0,2)*bos(h,0,5)*dr(-6) 2211 2212-4*bos(k,0,2)*bos(h,0,4)*dr(-5) 2213 2214+bos(k,0,2)*bos(h,0,3)*dr(-4) 2215 2216 2217clear ww,cut; 2218 2219 2220clearrules cutoff; 2221 2222 2223 2224% 15.) The combinations 2225 2226%the combinations of dim 7 constructed from fields of 2227% the 2 ,3 dimensions, free parameters are numerated by "a"; 2228 2229w_comb({{f,2,b},{g,3,b}},7,a,b); 2230 2231 2232a1*bos(f,3,4) 2233 2234+a2*bos(f,3,2)*bos(f,0,0) 2235 2236+a3*bos(f,3,1)*bos(f,3,0) 2237 2238+a4*bos(f,3,1)*bos(f,0,1) 2239 2240+a5*bos(f,3,0)*bos(f,0,2) 2241 2242 2 2243+a6*bos(f,3,0)*bos(f,0,0) 2244 2245+a7*bos(f,0,5) 2246 2247+a8*bos(f,0,3)*bos(f,0,0) 2248 2249+a9*bos(f,0,2)*bos(f,0,1) 2250 2251 2 2252+a10*bos(f,0,1)*bos(f,0,0) 2253 2254+a11*bos(g,3,3) 2255 2256+a12*bos(g,3,1)*bos(f,0,0) 2257 2258+a13*bos(g,3,0)*bos(f,3,0) 2259 2260+a14*bos(g,3,0)*bos(f,0,1) 2261 2262+a15*bos(g,3,0)*bos(g,0,0) 2263 2264+a16*bos(g,0,4) 2265 2266+a17*bos(g,0,2)*bos(f,0,0) 2267 2268+a18*bos(g,0,1)*bos(f,3,0) 2269 2270+a19*bos(g,0,1)*bos(f,0,1) 2271 2272+a20*bos(g,0,1)*bos(g,0,0) 2273 2274+a21*bos(g,0,0)*bos(f,3,1) 2275 2276+a22*bos(g,0,0)*bos(f,0,2) 2277 2278 2 2279+a23*bos(g,0,0)*bos(f,0,0) 2280 2281+a24*fer(f,2,2)*fer(f,2,0) 2282 2283+a25*fer(f,2,2)*fer(f,1,0) 2284 2285+a26*fer(f,2,1)*fer(f,1,1) 2286 2287+a27*fer(f,2,0)*fer(f,1,2) 2288 2289+a28*fer(f,2,0)*fer(f,1,0)*bos(f,0,0) 2290 2291+a29*fer(f,1,2)*fer(f,1,0) 2292 2293+a30*fer(g,2,1)*fer(f,2,0) 2294 2295+a31*fer(g,2,1)*fer(f,1,0) 2296 2297+a32*fer(g,2,0)*fer(f,2,1) 2298 2299+a33*fer(g,2,0)*fer(f,1,1) 2300 2301+a34*fer(g,2,0)*fer(g,1,0) 2302 2303+a35*fer(g,1,1)*fer(f,2,0) 2304 2305+a36*fer(g,1,1)*fer(f,1,0) 2306 2307+a37*fer(g,1,0)*fer(f,2,1) 2308 2309+a38*fer(g,1,0)*fer(f,1,1) 2310 2311w_comb({{f,2,f},{g,3,f}},4,s,f); 2312 2313 2314s1*fer(f,3,1) 2315 2316+s2*fer(f,0,2) 2317 2318+s3*fer(g,3,0) 2319 2320+s4*fer(g,0,1) 2321 2322 2323% and now compute the last example but withouth the (susy)divergence 2324%terms; 2325 2326fcomb({{f,2,b},{g,3,b}},5,c,b); 2327 2328 2329c(1)*bos(f,3,0)*bos(f,0,0) 2330 2331+c(2)*bos(f,0,1)*bos(f,0,0) 2332 2333+c(3)*bos(g,0,0)*bos(f,0,0) 2334 2335fcomb({{f,1,f}},4,r,f); 2336 2337 2338 2 2339r(1)*fer(f,0,0)*bos(f,2,0) 2340 2341+r(2)*fer(f,0,0)*bos(f,2,0)*bos(f,1,0) 2342 2343 2 2344+r(3)*fer(f,0,0)*bos(f,1,0) 2345 2346 2347 2348% 16.) The element of pseudo - susy -differential algebra; 2349 2350pse_ele(2,{{f,2,b}},c); 2351 2352 2353*** c already defined as operator 2354 2355c(2)*bos(f,0,0) 2356 2357 2 2358+c(0)*d(1) 2359 2360+c(1)*d(1)*der(1)*der(2) 2361 2362pse_ele(3,{{f,2,b}},c); 2363 2364 2365*** c already defined as operator 2366 2367c(2)*bos(f,3,0) 2368 2369+c(3)*bos(f,0,1) 2370 2371+c(4)*bos(f,0,0)*d(1) 2372 2373+c(5)*bos(f,0,0)*der(1)*der(2) 2374 2375 3 2376+c(0)*d(1) 2377 2378 2 2379+c(1)*d(1) *der(1)*der(2) 2380 2381+c(6)*fer(f,2,0)*der(2) 2382 2383+c(7)*fer(f,2,0)*der(1) 2384 2385+c(8)*fer(f,1,0)*der(2) 2386 2387+c(9)*fer(f,1,0)*der(1) 2388 2389pse_ele(4,{{f,2,b}},c); 2390 2391 2392*** c already defined as operator 2393 2394c(2)*bos(f,3,1) 2395 2396+bos(f,3,0)*(d(1)*c(3) 2397 2398 +der(1)*der(2)*c(4)) 2399 2400+c(5)*bos(f,0,2) 2401 2402+bos(f,0,1)*(d(1)*c(6) 2403 2404 +der(1)*der(2)*c(7)) 2405 2406 2 2407+c(8)*bos(f,0,0) 2408 2409 2 2410+bos(f,0,0)*(d(1) *c(9) 2411 2412 +d(1)*der(1)*der(2)*c(10)) 2413 2414+fer(f,2,1)*(der(2)*c(11) 2415 2416 +der(1)*c(12)) 2417 2418+fer(f,2,0)*(d(1)*der(2)*c(13) 2419 2420 +d(1)*der(1)*c(14)) 2421 2422+fer(f,1,1)*(der(2)*c(15) 2423 2424 +der(1)*c(16)) 2425 2426+fer(f,1,0)*(d(1)*der(2)*c(17) 2427 2428 +d(1)*der(1)*c(18)) 2429 2430 4 2431+d(1) *c(0) 2432 2433 3 2434+d(1) *der(1)*der(2)*c(1) 2435 2436pse_ele(3,{{f,1,b},{g,2,b}},r); 2437 2438 2439*** r already defined as operator 2440 2441r(2)*bos(f,3,1) 2442 2443+r(3)*bos(f,3,0)*bos(f,0,0) 2444 2445+bos(f,3,0)*(d(1)*r(4) 2446 2447 +der(1)*der(2)*r(5)) 2448 2449+r(6)*bos(f,0,2) 2450 2451+r(7)*bos(f,0,1)*bos(f,0,0) 2452 2453+bos(f,0,1)*(d(1)*r(8) 2454 2455 +der(1)*der(2)*r(9)) 2456 2457 3 2458+r(10)*bos(f,0,0) 2459 2460 2 2461+bos(f,0,0) *(d(1)*r(11) 2462 2463 +der(1)*der(2)*r(12)) 2464 2465 2 2466+bos(f,0,0)*(d(1) *r(13) 2467 2468 +d(1)*der(1)*der(2)*r(14)) 2469 2470+r(15)*bos(g,3,0) 2471 2472+r(16)*bos(g,0,1) 2473 2474+r(17)*bos(g,0,0)*bos(f,0,0) 2475 2476+bos(g,0,0)*(d(1)*r(18) 2477 2478 +der(1)*der(2)*r(19)) 2479 2480+fer(f,2,1)*(der(2)*r(20) 2481 2482 +der(1)*r(21)) 2483 2484+fer(f,2,0)*bos(f,0,0)*(der(2)*r(22) 2485 2486 +der(1)*r(23)) 2487 2488+r(26)*fer(f,2,0)*fer(f,1,0) 2489 2490+fer(f,2,0)*(d(1)*der(2)*r(24) 2491 2492 +d(1)*der(1)*r(25)) 2493 2494+fer(f,1,1)*(der(2)*r(27) 2495 2496 +der(1)*r(28)) 2497 2498+fer(f,1,0)*bos(f,0,0)*(der(2)*r(29) 2499 2500 +der(1)*r(30)) 2501 2502+fer(f,1,0)*(d(1)*der(2)*r(31) 2503 2504 +d(1)*der(1)*r(32)) 2505 2506+fer(g,2,0)*(der(2)*r(33) 2507 2508 +der(1)*r(34)) 2509 2510+fer(g,1,0)*(der(2)*r(35) 2511 2512 +der(1)*r(36)) 2513 2514 3 2515+d(1) *r(0) 2516 2517 2 2518+d(1) *der(1)*der(2)*r(1) 2519 2520 2521% The components of the elements of pseudo - susy - differential algebra; 2522 2523xxx:=pse_ele(2,{{f,1,b},{g,2,b}},r); 2524 2525 2526*** r already defined as operator 2527 2528xxx := r(2)*bos(f,3,0) 2529 2530 +r(3)*bos(f,0,1) 2531 2532 2 2533 +r(4)*bos(f,0,0) 2534 2535 +r(5)*bos(f,0,0)*d(1) 2536 2537 +r(6)*bos(f,0,0)*der(1)*der(2) 2538 2539 +r(7)*bos(g,0,0) 2540 2541 2 2542 +r(0)*d(1) 2543 2544 +r(1)*d(1)*der(1)*der(2) 2545 2546 +r(8)*fer(f,2,0)*der(2) 2547 2548 +r(9)*fer(f,2,0)*der(1) 2549 2550 +r(10)*fer(f,1,0)*der(2) 2551 2552 +r(11)*fer(f,1,0)*der(1) 2553 2554 2555for k:=0:3 do write s_part(xxx,k); 2556 2557 2558r(2)*bos(f,3,0) 2559 2560+r(3)*bos(f,0,1) 2561 2562 2 2563+r(4)*bos(f,0,0) 2564 2565+r(5)*bos(f,0,0)*d(1) 2566 2567+r(7)*bos(g,0,0) 2568 2569 2 2570+r(0)*d(1) 2571 2572r(9)*fer(f,2,0) 2573 2574+r(11)*fer(f,1,0) 2575 2576r(8)*fer(f,2,0) 2577 2578+r(10)*fer(f,1,0) 2579 2580r(6)*bos(f,0,0) 2581 2582+r(1)*d(1) 2583 2584 2585for k:=0:2 do write d_part(xxx,k); 2586 2587 2588r(2)*bos(f,3,0) 2589 2590+r(3)*bos(f,0,1) 2591 2592 2 2593+r(4)*bos(f,0,0) 2594 2595+r(6)*bos(f,0,0)*der(1)*der(2) 2596 2597+r(7)*bos(g,0,0) 2598 2599+r(8)*fer(f,2,0)*der(2) 2600 2601+r(9)*fer(f,2,0)*der(1) 2602 2603+r(10)*fer(f,1,0)*der(2) 2604 2605+r(11)*fer(f,1,0)*der(1) 2606 2607r(5)*bos(f,0,0) 2608 2609+r(1)*der(1)*der(2) 2610 2611r(0) 2612 2613 2614for k:=0:2 do for l:=0:3 do write sd_part(xxx,l,k); 2615 2616 2617r(2)*bos(f,3,0) 2618 2619+r(3)*bos(f,0,1) 2620 2621 2 2622+r(4)*bos(f,0,0) 2623 2624+r(7)*bos(g,0,0) 2625 2626r(9)*fer(f,2,0) 2627 2628+r(11)*fer(f,1,0) 2629 2630r(8)*fer(f,2,0) 2631 2632+r(10)*fer(f,1,0) 2633 2634r(6)*bos(f,0,0) 2635 2636r(5)*bos(f,0,0) 2637 26380 2639 26400 2641 2642r(1) 2643 2644r(0) 2645 26460 2647 26480 2649 26500 2651 2652 2653clear xxx; 2654 2655 2656 2657% 17.) Projection onto invariant subspace; 2658 2659xxx:= 2660w_comb({{f,1,b}},2,a,b)*d(1)+ 2661w_comb({{f,1,b}},3,b,b)*der(1)*der(2)+ 2662w_comb({{f,1,b}},5/2,c,b)*der(1)+ 2663w_comb({{f,1,b}},3,ee,b)*d(1)^2+ 2664w_comb({{f,1,b}},7/2,fe,b)*d(1)*der(2)+ 2665w_comb({{f,1,b}},3,g,b)*der(1)*der(2)*d(1); 2666 2667 2668 2 2669xxx := bos(f,3,1)*(d(1) *ee1 2670 2671 +d(1)*der(1)*der(2)*g1 2672 2673 +der(1)*der(2)*b1) 2674 2675 2 2676 +bos(f,3,0)*bos(f,0,0)*(d(1) *ee2 2677 2678 +d(1)*der(1)*der(2)*g2 2679 2680 +der(1)*der(2)*b2) 2681 2682 +a1*bos(f,3,0)*d(1) 2683 2684 2 2685 +bos(f,0,2)*(d(1) *ee3 2686 2687 +d(1)*der(1)*der(2)*g3 2688 2689 +der(1)*der(2)*b3) 2690 2691 2 2692 +bos(f,0,1)*bos(f,0,0)*(d(1) *ee4 2693 2694 +d(1)*der(1)*der(2)*g4 2695 2696 +der(1)*der(2)*b4) 2697 2698 +a2*bos(f,0,1)*d(1) 2699 2700 3 2 2701 +bos(f,0,0) *(d(1) *ee5 2702 2703 +d(1)*der(1)*der(2)*g5 2704 2705 +der(1)*der(2)*b5) 2706 2707 2 2708 +a3*bos(f,0,0) *d(1) 2709 2710 2 2711 +fer(f,2,0)*fer(f,1,0)*(d(1) *ee6 2712 2713 +d(1)*der(1)*der(2)*g6 2714 2715 +der(1)*der(2)*b6) 2716 2717 2718for k:=0:2 do write rzut(xxx,k); 2719 2720 2721 2 2722bos(f,3,1)*(d(1) *ee1 2723 2724 +d(1)*der(1)*der(2)*g1 2725 2726 +der(1)*der(2)*b1) 2727 2728 2 2729+bos(f,3,0)*bos(f,0,0)*(d(1) *ee2 2730 2731 +d(1)*der(1)*der(2)*g2 2732 2733 +der(1)*der(2)*b2) 2734 2735+a1*bos(f,3,0)*d(1) 2736 2737 2 2738+bos(f,0,2)*(d(1) *ee3 2739 2740 +d(1)*der(1)*der(2)*g3 2741 2742 +der(1)*der(2)*b3) 2743 2744 2 2745+bos(f,0,1)*bos(f,0,0)*(d(1) *ee4 2746 2747 +d(1)*der(1)*der(2)*g4 2748 2749 +der(1)*der(2)*b4) 2750 2751+a2*bos(f,0,1)*d(1) 2752 2753 3 2 2754+bos(f,0,0) *(d(1) *ee5 2755 2756 +d(1)*der(1)*der(2)*g5 2757 2758 +der(1)*der(2)*b5) 2759 2760 2 2761+a3*bos(f,0,0) *d(1) 2762 2763 2 2764+fer(f,2,0)*fer(f,1,0)*(d(1) *ee6 2765 2766 +d(1)*der(1)*der(2)*g6 2767 2768 +der(1)*der(2)*b6) 2769 2770 2 2771bos(f,3,1)*(d(1) *ee1 2772 2773 +d(1)*der(1)*der(2)*g1 2774 2775 +der(1)*der(2)*b1) 2776 2777 2 2778+bos(f,3,0)*bos(f,0,0)*(d(1) *ee2 2779 2780 +d(1)*der(1)*der(2)*g2 2781 2782 +der(1)*der(2)*b2) 2783 2784+a1*bos(f,3,0)*d(1) 2785 2786 2 2787+bos(f,0,2)*(d(1) *ee3 2788 2789 +d(1)*der(1)*der(2)*g3 2790 2791 +der(1)*der(2)*b3) 2792 2793 2 2794+bos(f,0,1)*bos(f,0,0)*(d(1) *ee4 2795 2796 +d(1)*der(1)*der(2)*g4 2797 2798 +der(1)*der(2)*b4) 2799 2800+a2*bos(f,0,1)*d(1) 2801 2802 3 2 2803+bos(f,0,0) *(d(1) *ee5 2804 2805 +d(1)*der(1)*der(2)*g5 2806 2807 +der(1)*der(2)*b5) 2808 2809 2 2810+a3*bos(f,0,0) *d(1) 2811 2812 2 2813+fer(f,2,0)*fer(f,1,0)*(d(1) *ee6 2814 2815 +d(1)*der(1)*der(2)*g6 2816 2817 +der(1)*der(2)*b6) 2818 2819 2 2820bos(f,3,1)*(d(1) *ee1 2821 2822 +d(1)*der(1)*der(2)*g1 2823 2824 +der(1)*der(2)*b1) 2825 2826 2 2827+bos(f,3,0)*bos(f,0,0)*(d(1) *ee2 2828 2829 +d(1)*der(1)*der(2)*g2 2830 2831 +der(1)*der(2)*b2) 2832 2833 2 2834+bos(f,0,2)*(d(1) *ee3 2835 2836 +d(1)*der(1)*der(2)*g3 2837 2838 +der(1)*der(2)*b3) 2839 2840 2 2841+bos(f,0,1)*bos(f,0,0)*(d(1) *ee4 2842 2843 +d(1)*der(1)*der(2)*g4 2844 2845 +der(1)*der(2)*b4) 2846 2847 3 2 2848+bos(f,0,0) *(d(1) *ee5 2849 2850 +d(1)*der(1)*der(2)*g5 2851 2852 +der(1)*der(2)*b5) 2853 2854 2 2855+fer(f,2,0)*fer(f,1,0)*(d(1) *ee6 2856 2857 +d(1)*der(1)*der(2)*g6 2858 2859 +der(1)*der(2)*b6) 2860 2861 2862clear xxx; 2863 2864 2865 2866% 18.) Test for the adjoint operators; 2867 2868cp(der(1)); 2869 2870 2871*** d not found 2872 2873*** der not found 2874 2875*** del not found 2876 2877 2878-der(1) 2879 2880cp(der(1)*der(2)); 2881 2882 2883d(1) 2884 2885+der(1)*der(2) 2886 2887clearrules trad; 2888 2889 2890let chiral1; 2891 2892 2893cp(der(3)); 2894 2895 2896*** d not found 2897 2898*** der not found 2899 2900*** del not found 2901 2902der(3) 2903 2904cp(der(1)*d(1)); 2905 2906 2907d(1)*der(1) 2908 2909clearrules chiral1; 2910 2911 2912let trad; 2913 2914 2915cp(d(1)); 2916 2917 2918*** d not found 2919 2920*** der not found 2921 2922*** del not found 2923 2924 2925-d(1) 2926 2927cp(d(2)); 2928 2929 2930*** d not found 2931 2932*** der not found 2933 2934*** del not found 2935 2936 2937-d(2) 2938 2939as:=fer(f,1,0)*d(-3)*fer(g,2,0)+fer(h,1,2)*d(-3)*fer(kk,2,1); 2940 2941 2942as := fer(f,1,0)*d(-3)*fer(g,2,0) 2943 2944 +fer(h,1,2)*d(-3)*fer(kk,2,1) 2945 2946cp(as); 2947 2948 2949*** d not found 2950 2951*** der not found 2952 2953*** del not found 2954 2955fer(g,2,0)*d(-3)*fer(f,1,0) 2956 2957+fer(kk,2,1)*d(-3)*fer(h,1,2) 2958 2959cp(as*as); 2960 2961 2962*** d not found 2963 2964*** der not found 2965 2966*** del not found 2967 2968 2969-fer(g,2,0)*(d(-3)*fer(g,2,0)*fer(f,1,0)*d(-3)*fer(f,1,0) 2970 2971 +d(-3)*fer(kk,2,1)*fer(f,1,0)*d(-3)*fer(h,1,2)) 2972 2973+fer(kk,2,1)*(d(-3)*fer(h,1,2)*fer(g,2,0)*d(-3)*fer(f,1,0) 2974 2975 -d(-3)*fer(kk,2,1)*fer(h,1,2)*d(-3)*fer(h,1,2)) 2976 2977 2978as:=fer(f,1,0); 2979 2980 2981as := fer(f,1,0) 2982 2983cp(as); 2984 2985 2986fer(f,1,0) 2987 2988cp(ws); 2989 2990 2991fer(f,1,0) 2992 2993 2994clear as; 2995 2996 2997 2998as:=bos(f,0,0); 2999 3000 3001as := bos(f,0,0) 3002 3003as1:=as*der(1); 3004 3005 3006as1 := bos(f,0,0)*der(1) 3007 3008cp(as1); 3009 3010 3011 3012-bos(f,0,0)*der(1) 3013 3014-fer(f,1,0) 3015 3016cp(ws); 3017 3018 3019*** d not found 3020 3021*** der not found 3022 3023*** del not found 3024 3025bos(f,0,0)*der(1) 3026 3027cp(as1)+der(1)*as; 3028 3029 30300 3031 3032 3033as2:=as*der(1)*der(2); 3034 3035 3036as2 := bos(f,0,0)*der(1)*der(2) 3037 3038cp(as2); 3039 3040 3041bos(f,3,0) 3042 3043+bos(f,0,0)*der(1)*der(2) 3044 3045-fer(f,2,0)*der(1) 3046 3047+fer(f,1,0)*der(2) 3048 3049cp(ws); 3050 3051 3052*** d not found 3053 3054*** der not found 3055 3056*** del not found 3057 3058bos(f,0,0)*der(1)*der(2) 3059 3060cp(as2) - der(1)*der(2)*as; 3061 3062 30630 3064 3065 3066 3067clear as; 3068 3069 3070as:=mat((fer(f,1,0)*der(1),bos(g,0,0)*d(-3)*bos(h,0,0)), 3071(fer(h,2,1),fer(h,1,2)*d(-3)*fer(k,2,3))); 3072 3073 3074 [fer(f,1,0)*der(1) bos(g,0,0)*d(-3)*bos(h,0,0)] 3075as := [ ] 3076 [ fer(h,2,1) fer(h,1,2)*d(-3)*fer(k,2,3)] 3077 3078 3079cp(as); 3080 3081 3082*** fer(h,2,1) not found 3083 3084mat((bos(f,0,1) 3085 3086 -fer(f,1,0)*der(1),fer(h,2,1)), 3087 3088 ( 3089 3090 -bos(h,0,0)*d(-3)*bos(g,0,0),fer(k,2,3)*d(-3)*fer(h,1,2))) 3091 3092 3093clear as; 3094 3095 3096 3097 3098% 19.) Analog of coeff 3099 3100xxx:=pse_ele(2,{{f,1,b}},a); 3101 3102 3103xxx := a(2)*bos(f,3,0) 3104 3105 +a(3)*bos(f,0,1) 3106 3107 2 3108 +a(4)*bos(f,0,0) 3109 3110 +a(5)*bos(f,0,0)*d(1) 3111 3112 +a(6)*bos(f,0,0)*der(1)*der(2) 3113 3114 2 3115 +a(0)*d(1) 3116 3117 +a(1)*d(1)*der(1)*der(2) 3118 3119 +a(7)*fer(f,2,0)*der(2) 3120 3121 +a(8)*fer(f,2,0)*der(1) 3122 3123 +a(9)*fer(f,1,0)*der(2) 3124 3125 +a(10)*fer(f,1,0)*der(1) 3126 3127yyy:=lyst(xxx); 3128 3129 3130yyy := {a(2)*bos(f,3,0), 3131 3132 a(3)*bos(f,0,1), 3133 3134 2 3135 a(4)*bos(f,0,0) , 3136 3137 a(5)*bos(f,0,0)*d(1), 3138 3139 a(6)*bos(f,0,0)*der(1)*der(2), 3140 3141 2 3142 a(0)*d(1) , 3143 3144 a(1)*d(1)*der(1)*der(2), 3145 3146 a(7)*fer(f,2,0)*der(2), 3147 3148 a(8)*fer(f,2,0)*der(1), 3149 3150 a(9)*fer(f,1,0)*der(2), 3151 3152 a(10)*fer(f,1,0)*der(1)} 3153 3154zzz:=lyst1(xxx); 3155 3156 3157zzz := {a(2), 3158 3159 a(3), 3160 3161 a(4), 3162 3163 a(5)*d(1), 3164 3165 a(6)*der(1)*der(2), 3166 3167 2 3168 a(0)*d(1) , 3169 3170 a(1)*d(1)*der(1)*der(2), 3171 3172 a(7)*der(2), 3173 3174 a(8)*der(1), 3175 3176 a(9)*der(2), 3177 3178 a(10)*der(1)} 3179 3180yyy:=lyst2(xxx); 3181 3182 3183yyy := {a(2), 3184 3185 a(3), 3186 3187 a(4), 3188 3189 a(5), 3190 3191 a(6), 3192 3193 a(0), 3194 3195 a(1), 3196 3197 a(7), 3198 3199 a(8), 3200 3201 a(9), 3202 3203 a(10)} 3204 3205clear xxx,yyy,zzz; 3206 3207 3208 3209% 20.) Simplifications; 3210 3211% we would like to compute third generalizations of the SUSY KdV 3212% equation 3213% example from Z.Popowicz Phys.Lett.A.174 (1993) p.87 3214 3215lax:=d(1)+d(-3)*der(1)*der(2)*bos(u,0,0); 3216 3217 3218lax := d(1) 3219 3220 +d(-3)*bos(u,3,0) 3221 3222 +d(-3)*bos(u,0,0)*der(1)*der(2) 3223 3224 -d(-3)*fer(u,2,0)*der(1) 3225 3226 +d(-3)*fer(u,1,0)*der(2) 3227 3228lb2:=lax^2; 3229 3230 3231lb2 := bos(u,3,0) 3232 3233 +bos(u,0,0)*der(1)*der(2) 3234 3235 -fer(u,2,0)*der(1) 3236 3237 +fer(u,1,0)*der(2) 3238 3239 2 3240 +d(1) 3241 3242 +d(-3)*bos(u,3,0)*d(1) 3243 3244 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0) 3245 3246 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2) 3247 3248 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1) 3249 3250 +d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2) 3251 3252 +d(-3)*bos(u,0,0)*d(1)*der(1)*der(2) 3253 3254 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2) 3255 3256 -2*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1) 3257 3258 2 3259 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1) 3260 3261 -d(-3)*fer(u,2,0)*d(1)*der(1) 3262 3263 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 3264 3265 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(1)*der(2) 3266 3267 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 3268 3269 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(1) 3270 3271 +d(-3)*fer(u,1,0)*d(1)*der(2) 3272 3273 -d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*der(1) 3274 3275 -d(-3)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(1)*der(1) 3276 3277 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1) 3278 3279 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*d(1) 3280 3281la2:=chan(lb2); 3282 3283 3284la2 := 2*bos(u,3,0) 3285 3286 2 3287 -bos(u,0,0) 3288 3289 +2*bos(u,0,0)*der(1)*der(2) 3290 3291 -2*fer(u,2,0)*der(1) 3292 3293 +2*fer(u,1,0)*der(2) 3294 3295 2 3296 +d(1) 3297 3298 -d(-3)*bos(u,3,1) 3299 3300 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0) 3301 3302 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2) 3303 3304 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1) 3305 3306 +d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2) 3307 3308 +d(-3)*bos(u,0,1)*bos(u,0,0) 3309 3310 -d(-3)*bos(u,0,1)*der(1)*der(2) 3311 3312 +d(-3)*fer(u,2,1)*der(1) 3313 3314 -d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 3315 3316 -d(-3)*fer(u,1,1)*der(2) 3317 3318 -d(-3)*fer(u,1,0)*bos(u,0,0)*der(1) 3319 3320lb3:=lax*la2; 3321 3322 3323lb3 := bos(u,3,1) 3324 3325 +bos(u,3,0)*(2*d(1) 3326 3327 +d(-3)*bos(u,3,0) 3328 3329 +d(-3)*bos(u,0,0)*der(1)*der(2) 3330 3331 -d(-3)*fer(u,2,0)*der(1) 3332 3333 +d(-3)*fer(u,1,0)*der(2)) 3334 3335 -bos(u,0,1)*bos(u,0,0) 3336 3337 +bos(u,0,1)*der(1)*der(2) 3338 3339 2 3340 -bos(u,0,0) *d(1) 3341 3342 +2*bos(u,0,0)*d(1)*der(1)*der(2) 3343 3344 -fer(u,2,1)*der(1) 3345 3346 -fer(u,2,0)*bos(u,0,0)*der(2) 3347 3348 -2*fer(u,2,0)*d(1)*der(1) 3349 3350 +fer(u,1,1)*der(2) 3351 3352 -fer(u,1,0)*bos(u,0,0)*der(1) 3353 3354 +2*fer(u,1,0)*d(1)*der(2) 3355 3356 3 3357 +d(1) 3358 3359 2 3360 +2*d(-3)*bos(u,3,0) 3361 3362 2 3363 -3*d(-3)*bos(u,3,0)*bos(u,0,0) 3364 3365 +2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(1)*der(2) 3366 3367 2 3368 +d(-3)*bos(u,3,0)*d(1) 3369 3370 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1) 3371 3372 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0) 3373 3374 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2) 3375 3376 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1) 3377 3378 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2) 3379 3380 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 3381 3382 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(1)*der(2) 3383 3384 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*der(1) 3385 3386 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 3387 3388 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*der(2) 3389 3390 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1) 3391 3392 -2*d(-3)*bos(u,0,2)*bos(u,0,0) 3393 3394 -4*d(-3)*bos(u,0,1)*bos(u,0,0)*d(1) 3395 3396 3 3397 -d(-3)*bos(u,0,0) *der(1)*der(2) 3398 3399 2 2 3400 -2*d(-3)*bos(u,0,0) *d(1) 3401 3402 2 3403 +d(-3)*bos(u,0,0)*d(1) *der(1)*der(2) 3404 3405 +d(-3)*bos(u,0,0)*d(-3)*bos(u,3,1)*bos(u,0,0) 3406 3407 +d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 3408 3409 +2*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1) 3410 3411 -d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2) 3412 3413 -2*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*d(1) 3414 3415 2 3416 -d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) 3417 3418 +d(-3)*bos(u,0,0)*d(-3)*bos(u,0,3) 3419 3420 +2*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(1) 3421 3422 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,3,0) 3423 3424 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,0)*der(1)*der(2) 3425 3426 +d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*der(1) 3427 3428 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,1,0)*der(2) 3429 3430 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(1)*der(2) 3431 3432 2 3433 +d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1) 3434 3435 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*fer(u,1,0) 3436 3437 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*der(1) 3438 3439 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(1)*der(1) 3440 3441 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,1) 3442 3443 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,0)*d(1) 3444 3445 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)*der(1) 3446 3447 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,1) 3448 3449 -2*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(1) 3450 3451 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)*der(2) 3452 3453 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*d(1)*der(2) 3454 3455 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,1) 3456 3457 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*d(1) 3458 3459 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)*der(2) 3460 3461 +2*d(-3)*fer(u,2,1)*fer(u,2,0) 3462 3463 -2*d(-3)*fer(u,2,0)*bos(u,3,0)*der(1) 3464 3465 -2*d(-3)*fer(u,2,0)*bos(u,0,1)*der(2) 3466 3467 2 3468 +3*d(-3)*fer(u,2,0)*bos(u,0,0) *der(1) 3469 3470 -2*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)*der(2) 3471 3472 +6*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 3473 3474 2 3475 -d(-3)*fer(u,2,0)*d(1) *der(1) 3476 3477 +d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 3478 3479 -d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 3480 3481 -d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)*der(2) 3482 3483 -d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 3484 3485 -d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(1) 3486 3487 +d(-3)*fer(u,2,0)*d(-3)*bos(u,0,2)*der(2) 3488 3489 +d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*d(1)*der(2) 3490 3491 +d(-3)*fer(u,2,0)*d(-3)*fer(u,2,2) 3492 3493 +d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(1) 3494 3495 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,3,0) 3496 3497 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*der(1)*der(2) 3498 3499 +d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*der(1) 3500 3501 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,0)*der(2) 3502 3503 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(1)*der(2) 3504 3505 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(2) 3506 3507 -d(-3)*fer(u,2,0)*d(-3)*fer(u,1,1)*bos(u,0,0) 3508 3509 -d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 3510 3511 -d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 3512 3513 +2*d(-3)*fer(u,1,1)*fer(u,1,0) 3514 3515 +2*d(-3)*fer(u,1,0)*bos(u,3,0)*der(2) 3516 3517 -2*d(-3)*fer(u,1,0)*bos(u,0,1)*der(1) 3518 3519 2 3520 -3*d(-3)*fer(u,1,0)*bos(u,0,0) *der(2) 3521 3522 -2*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)*der(1) 3523 3524 2 3525 +d(-3)*fer(u,1,0)*d(1) *der(2) 3526 3527 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(1) 3528 3529 -d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(1) 3530 3531 -d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)*der(1) 3532 3533 -d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1) 3534 3535 -d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(1) 3536 3537 +d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*der(1) 3538 3539 +d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1)*der(1) 3540 3541 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0) 3542 3543 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1) 3544 3545 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1) 3546 3547 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(1) 3548 3549 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2) 3550 3551 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(1) 3552 3553 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0) 3554 3555 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(1)*der(2) 3556 3557 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*der(1) 3558 3559 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*der(2) 3560 3561 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1)*der(2) 3562 3563la3:=chan(lb3); 3564 3565 3566la3 := bos(u,3,0)*(3*d(1) 3567 3568 +d(-3)*bos(u,3,0) 3569 3570 +d(-3)*bos(u,0,0)*der(1)*der(2) 3571 3572 -d(-3)*fer(u,2,0)*der(1) 3573 3574 +d(-3)*fer(u,1,0)*der(2)) 3575 3576 2 3577 -3*bos(u,0,0) *d(1) 3578 3579 +3*bos(u,0,0)*d(1)*der(1)*der(2) 3580 3581 -3*fer(u,2,0)*bos(u,0,0)*der(2) 3582 3583 -3*fer(u,2,0)*d(1)*der(1) 3584 3585 -3*fer(u,1,0)*bos(u,0,0)*der(1) 3586 3587 +3*fer(u,1,0)*d(1)*der(2) 3588 3589 3 3590 +d(1) 3591 3592 +d(-3)*bos(u,3,2) 3593 3594 2 3595 +2*d(-3)*bos(u,3,0) 3596 3597 2 3598 -2*d(-3)*bos(u,3,0)*bos(u,0,0) 3599 3600 +2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(1)*der(2) 3601 3602 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1) 3603 3604 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0) 3605 3606 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2) 3607 3608 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1) 3609 3610 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2) 3611 3612 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 3613 3614 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(1)*der(2) 3615 3616 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*der(1) 3617 3618 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 3619 3620 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*der(2) 3621 3622 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1) 3623 3624 -2*d(-3)*bos(u,0,2)*bos(u,0,0) 3625 3626 +d(-3)*bos(u,0,2)*der(1)*der(2) 3627 3628 2 3629 -d(-3)*bos(u,0,1) 3630 3631 3 3632 -d(-3)*bos(u,0,0) *der(1)*der(2) 3633 3634 -d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 3635 3636 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,3,0) 3637 3638 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,0)*der(1)*der(2) 3639 3640 +d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*der(1) 3641 3642 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,1,0)*der(2) 3643 3644 -d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(1)*der(2) 3645 3646 +d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*der(1) 3647 3648 -d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*der(2) 3649 3650 -d(-3)*fer(u,2,2)*der(1) 3651 3652 +2*d(-3)*fer(u,2,1)*bos(u,0,0)*der(2) 3653 3654 +d(-3)*fer(u,2,1)*fer(u,2,0) 3655 3656 -2*d(-3)*fer(u,2,0)*bos(u,3,0)*der(1) 3657 3658 +d(-3)*fer(u,2,0)*bos(u,0,1)*der(2) 3659 3660 2 3661 +2*d(-3)*fer(u,2,0)*bos(u,0,0) *der(1) 3662 3663 +2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 3664 3665 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,3,0) 3666 3667 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*der(1)*der(2) 3668 3669 +d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*der(1) 3670 3671 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,0)*der(2) 3672 3673 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 3674 3675 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(1)*der(2) 3676 3677 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(2) 3678 3679 +d(-3)*fer(u,1,2)*der(2) 3680 3681 +2*d(-3)*fer(u,1,1)*bos(u,0,0)*der(1) 3682 3683 +d(-3)*fer(u,1,1)*fer(u,1,0) 3684 3685 +2*d(-3)*fer(u,1,0)*bos(u,3,0)*der(2) 3686 3687 +d(-3)*fer(u,1,0)*bos(u,0,1)*der(1) 3688 3689 2 3690 -2*d(-3)*fer(u,1,0)*bos(u,0,0) *der(2) 3691 3692 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(1) 3693 3694 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0) 3695 3696 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(1)*der(2) 3697 3698 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*der(1) 3699 3700 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*der(2) 3701 3702 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0) 3703 3704 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1)*der(2) 3705 3706lax3:=rzut(la3,1); 3707 3708 3709lax3 := 3*bos(u,3,0)*d(1) 3710 3711 2 3712 -3*bos(u,0,0) *d(1) 3713 3714 +3*bos(u,0,0)*d(1)*der(1)*der(2) 3715 3716 -3*fer(u,2,0)*bos(u,0,0)*der(2) 3717 3718 -3*fer(u,2,0)*d(1)*der(1) 3719 3720 -3*fer(u,1,0)*bos(u,0,0)*der(1) 3721 3722 +3*fer(u,1,0)*d(1)*der(2) 3723 3724 3 3725 +d(1) 3726 3727comm:=lax*lax3 - lax3*lax; 3728 3729 3730comm := 3731 3732 -bos(u,3,2) 3733 3734 +bos(u,3,1)*d(1) 3735 3736 2 3737 -3*bos(u,3,0) 3738 3739 2 3740 +3*bos(u,3,0)*bos(u,0,0) 3741 3742 -3*bos(u,3,0)*bos(u,0,0)*der(1)*der(2) 3743 3744 2 3745 -bos(u,3,0)*d(1) 3746 3747 +3*bos(u,0,2)*bos(u,0,0) 3748 3749 -bos(u,0,2)*der(1)*der(2) 3750 3751 +bos(u,0,1)*d(1)*der(1)*der(2) 3752 3753 3 3754 +3*bos(u,0,0) *der(1)*der(2) 3755 3756 2 2 3757 +3*bos(u,0,0) *d(1) 3758 3759 2 3760 -bos(u,0,0)*d(1) *der(1)*der(2) 3761 3762 +fer(u,2,2)*der(1) 3763 3764 -3*fer(u,2,1)*bos(u,0,0)*der(2) 3765 3766 -3*fer(u,2,1)*fer(u,2,0) 3767 3768 -fer(u,2,1)*d(1)*der(1) 3769 3770 +3*fer(u,2,0)*bos(u,3,0)*der(1) 3771 3772 2 3773 -3*fer(u,2,0)*bos(u,0,0) *der(1) 3774 3775 +3*fer(u,2,0)*bos(u,0,0)*(d(1)*der(2) 3776 3777 -d(-3)*bos(u,0,1)*der(1) 3778 3779 -d(-3)*bos(u,0,0)*d(1)*der(1) 3780 3781 -d(-3)*fer(u,1,1) 3782 3783 -d(-3)*fer(u,1,0)*d(1)) 3784 3785 2 3786 +fer(u,2,0)*d(1) *der(1) 3787 3788 -fer(u,1,2)*der(2) 3789 3790 -3*fer(u,1,1)*bos(u,0,0)*der(1) 3791 3792 -3*fer(u,1,1)*fer(u,1,0) 3793 3794 +fer(u,1,1)*d(1)*der(2) 3795 3796 -3*fer(u,1,0)*bos(u,3,0)*der(2) 3797 3798 2 3799 +3*fer(u,1,0)*bos(u,0,0) *der(2) 3800 3801 +3*fer(u,1,0)*bos(u,0,0)*(d(1)*der(1) 3802 3803 +d(-3)*bos(u,0,1)*der(2) 3804 3805 +d(-3)*bos(u,0,0)*d(1)*der(2) 3806 3807 +d(-3)*fer(u,2,1) 3808 3809 +d(-3)*fer(u,2,0)*d(1)) 3810 3811 2 3812 -fer(u,1,0)*d(1) *der(2) 3813 3814 2 3815 +3*d(-3)*bos(u,3,0) *d(1) 3816 3817 2 3818 -3*d(-3)*bos(u,3,0)*bos(u,0,0) *d(1) 3819 3820 +3*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1)*der(1)*der(2) 3821 3822 3 3823 +d(-3)*bos(u,3,0)*d(1) 3824 3825 -3*d(-3)*bos(u,0,2)*bos(u,0,0)*d(1) 3826 3827 2 3828 -6*d(-3)*bos(u,0,1)*bos(u,0,0) *der(1)*der(2) 3829 3830 2 3831 -6*d(-3)*bos(u,0,1)*bos(u,0,0)*d(1) 3832 3833 3 3834 -3*d(-3)*bos(u,0,0) *d(1)*der(1)*der(2) 3835 3836 2 3 3837 -3*d(-3)*bos(u,0,0) *d(1) 3838 3839 3 3840 +d(-3)*bos(u,0,0)*d(1) *der(1)*der(2) 3841 3842 2 3843 +3*d(-3)*fer(u,2,1)*bos(u,0,0) *der(1) 3844 3845 +3*d(-3)*fer(u,2,1)*fer(u,2,0)*d(1) 3846 3847 -3*d(-3)*fer(u,2,0)*bos(u,3,0)*d(1)*der(1) 3848 3849 +6*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(1) 3850 3851 -3*d(-3)*fer(u,2,0)*bos(u,0,1)*d(1)*der(2) 3852 3853 2 3854 +6*d(-3)*fer(u,2,0)*bos(u,0,0) *d(1)*der(1) 3855 3856 2 3857 -3*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1) *der(2) 3858 3859 +6*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(1) 3860 3861 3 3862 -d(-3)*fer(u,2,0)*d(1) *der(1) 3863 3864 2 3865 -3*d(-3)*fer(u,1,1)*bos(u,0,0) *der(2) 3866 3867 +3*d(-3)*fer(u,1,1)*fer(u,1,0)*d(1) 3868 3869 +3*d(-3)*fer(u,1,0)*bos(u,3,0)*d(1)*der(2) 3870 3871 -6*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*der(2) 3872 3873 -3*d(-3)*fer(u,1,0)*bos(u,0,1)*d(1)*der(1) 3874 3875 2 3876 -6*d(-3)*fer(u,1,0)*bos(u,0,0) *d(1)*der(2) 3877 3878 2 3879 -3*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) *der(1) 3880 3881 3 3882 +d(-3)*fer(u,1,0)*d(1) *der(2) 3883 3884com:=chan(comm); 3885 3886 3887com := 3888 3889 -d(-3)*bos(u,3,3) 3890 3891 -6*d(-3)*bos(u,3,1)*bos(u,3,0) 3892 3893 2 3894 +3*d(-3)*bos(u,3,1)*bos(u,0,0) 3895 3896 -3*d(-3)*bos(u,3,1)*bos(u,0,0)*der(1)*der(2) 3897 3898 +6*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0) 3899 3900 -3*d(-3)*bos(u,3,0)*bos(u,0,1)*der(1)*der(2) 3901 3902 +3*d(-3)*bos(u,0,3)*bos(u,0,0) 3903 3904 -d(-3)*bos(u,0,3)*der(1)*der(2) 3905 3906 +3*d(-3)*bos(u,0,2)*bos(u,0,1) 3907 3908 2 3909 +3*d(-3)*bos(u,0,1)*bos(u,0,0) *der(1)*der(2) 3910 3911 +d(-3)*fer(u,2,3)*der(1) 3912 3913 -3*d(-3)*fer(u,2,2)*bos(u,0,0)*der(2) 3914 3915 -3*d(-3)*fer(u,2,2)*fer(u,2,0) 3916 3917 +3*d(-3)*fer(u,2,1)*bos(u,3,0)*der(1) 3918 3919 -3*d(-3)*fer(u,2,1)*bos(u,0,1)*der(2) 3920 3921 2 3922 -3*d(-3)*fer(u,2,1)*bos(u,0,0) *der(1) 3923 3924 -6*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0) 3925 3926 +3*d(-3)*fer(u,2,0)*bos(u,3,1)*der(1) 3927 3928 -6*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(1) 3929 3930 -6*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0) 3931 3932 -6*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1) 3933 3934 -d(-3)*fer(u,1,3)*der(2) 3935 3936 -3*d(-3)*fer(u,1,2)*bos(u,0,0)*der(1) 3937 3938 -3*d(-3)*fer(u,1,2)*fer(u,1,0) 3939 3940 -3*d(-3)*fer(u,1,1)*bos(u,3,0)*der(2) 3941 3942 -3*d(-3)*fer(u,1,1)*bos(u,0,1)*der(1) 3943 3944 2 3945 +3*d(-3)*fer(u,1,1)*bos(u,0,0) *der(2) 3946 3947 -3*d(-3)*fer(u,1,0)*bos(u,3,1)*der(2) 3948 3949 +6*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*der(2) 3950 3951result:=sub(der=del,com); 3952 3953 3954result := 3955 3956 -3*del(1)*del(2)*d(-3)*bos(u,3,1)*bos(u,0,0) 3957 3958 -3*del(1)*del(2)*d(-3)*bos(u,3,0)*bos(u,0,1) 3959 3960 -del(1)*del(2)*d(-3)*bos(u,0,3) 3961 3962 2 3963 +3*del(1)*del(2)*d(-3)*bos(u,0,1)*bos(u,0,0) 3964 3965%the equation is 3966equ:=sub(del(1)=1,del(2)=1,d(-3)=1,result); 3967 3968 3969equ := 3970 3971 -3*bos(u,3,1)*bos(u,0,0) 3972 3973 -3*bos(u,3,0)*bos(u,0,1) 3974 3975 -bos(u,0,3) 3976 3977 2 3978 +3*bos(u,0,1)*bos(u,0,0) 3979 3980 3981clear lax,lb2,la2,lb3,la3,lax3,comm,com,result; 3982 3983 3984 3985% we now compute the same but starting from 3986% different realizations of susy algebra 3987% 3988clearrules trad; 3989 3990 3991let chiral1; 3992 3993 3994lax:=d(1)+d(-3)*del(3)*bos(u,0,0); 3995 3996 3997lax := d(1) 3998 3999 +del(3)*d(-3)*bos(u,0,0) 4000 4001la2:=chan(lax^2); 4002 4003 4004la2 := bos(u,0,1)*d(-3)*bos(u,0,0) 4005 4006 2 4007 +bos(u,0,0) 4008 4009 2 4010 +d(1) 4011 4012 +2*del(3)*bos(u,0,0) 4013 4014 +del(3)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 4015 4016 -del(3)*d(-3)*bos(u,0,1) 4017 4018 +2*del(2)*fer(u,1,0)*d(-3)*bos(u,0,0) 4019 4020 +2*del(1)*fer(u,2,0)*d(-3)*bos(u,0,0) 4021 4022la3:=rzut(chan(lax*la2),0); 4023 4024 4025la3 := 6*bos(u,0,1)*bos(u,0,0) 4026 4027 2 4028 +3*bos(u,0,0) *d(1) 4029 4030 3 4031 +d(1) 4032 4033 +3*del(3)*bos(u,0,0)*d(1) 4034 4035 +6*del(2)*fer(u,1,0)*bos(u,0,0) 4036 4037 +6*del(1)*fer(u,2,0)*bos(u,0,0) 4038 4039com:=chan(lax*la3-la3*lax); 4040 4041 4042com := 4043 4044 -3*del(3)*d(-3)*bos(u,3,1)*bos(u,0,0) 4045 4046 -3*del(3)*d(-3)*bos(u,3,0)*bos(u,0,1) 4047 4048 -del(3)*d(-3)*bos(u,0,3) 4049 4050 2 4051 -3*del(3)*d(-3)*bos(u,0,1)*bos(u,0,0) 4052 4053equ_chiral1:=sub(d(-3)=1,del(3)=1,com); 4054 4055 4056equ_chiral1 := 4057 4058 -3*bos(u,3,1)*bos(u,0,0) 4059 4060 -3*bos(u,3,0)*bos(u,0,1) 4061 4062 -bos(u,0,3) 4063 4064 2 4065 -3*bos(u,0,1)*bos(u,0,0) 4066 4067clear lax,lb2,la2,lb3,la3,lax3,lax,comm,com,result; 4068 4069 4070clearrules chiral1; 4071 4072 4073let trad; 4074 4075 4076 4077% 21.) Conservation laws; 4078% we would like to check the conservations laws for our third 4079%generalization of susy kdv equation; 4080% 4081 4082ham:=fcomb({{u,1,b}},3,a,b); 4083 4084 4085*** a already defined as operator 4086 4087ham := a(1)*bos(u,3,0)*bos(u,0,0) 4088 4089 3 4090 +a(2)*bos(u,0,0) 4091 4092 4093conserv:=dot_ham({{u,equ}},ham); 4094 4095 4096conserv := 4097 4098 -a(1)*bos(u,3,3)*bos(u,0,0) 4099 4100 -9*a(1)*bos(u,3,1)*bos(u,3,0)*bos(u,0,0) 4101 4102 3 4103 +3*bos(u,3,1)*bos(u,0,0) *( 4104 4105 -3*a(2) 4106 4107 +a(1)) 4108 4109 2 4110 -3*a(1)*bos(u,3,0) *bos(u,0,1) 4111 4112 -a(1)*bos(u,3,0)*bos(u,0,3) 4113 4114 2 4115 +9*bos(u,3,0)*bos(u,0,1)*bos(u,0,0) *( 4116 4117 -a(2) 4118 4119 +a(1)) 4120 4121 2 4122 +3*bos(u,0,3)*bos(u,0,0) *( 4123 4124 -a(2) 4125 4126 +a(1)) 4127 4128 +3*a(1)*(bos(u,0,2)*bos(u,0,1)*bos(u,0,0)) 4129 4130 4 4131 +9*a(2)*(bos(u,0,1)*bos(u,0,0) ) 4132 4133 -3*a(1)*fer(u,2,2)*fer(u,2,0)*bos(u,0,0) 4134 4135 2 4136 -6*a(1)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0) 4137 4138 2 4139 -6*a(1)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0) 4140 4141 -6*a(1)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0) 4142 4143 -3*a(1)*fer(u,1,2)*fer(u,1,0)*bos(u,0,0) 4144 4145% we check now on susy-divergence behaviour; 4146% 4147az:=war(conserv,u); 4148 4149 4150az := {12*(3*a(2) 4151 4152 +a(1)), 4153 4154 6*(3*a(2) 4155 4156 +a(1)), 4157 4158 12*( 4159 4160 -3*a(2) 4161 4162 -a(1)), 4163 4164 12*( 4165 4166 -3*a(2) 4167 4168 -a(1)), 4169 4170 12*( 4171 4172 -3*a(2) 4173 4174 -a(1))} 4175 4176solve(az); 4177 4178 4179Unknowns: {a(2),a(1)} 4180 4181{{a(2)=( 4182 4183 -arbcomplex(1))/3,a(1)=arbcomplex(1)}} 4184 4185clear equ,ha,conserv,az; 4186 4187 4188 4189% 22.) The residue of Lax operator 4190% we would like to find conservation laws for Lax susy KdV 4191% equation considered in the previous example 4192% 4193lax:=d(1)-d(-3)*del(1)*der(2)*bos(u,0,0); 4194 4195 4196lax := d(1) 4197 4198 -del(1)*d(-3)*bos(u,0,0)*der(2) 4199 4200 -del(1)*d(-3)*fer(u,2,0) 4201 4202lb2:=lax^2; 4203 4204 4205lb2 := 4206 4207 -bos(u,0,0)*(d(-3)*bos(u,0,1) 4208 4209 +d(-3)*bos(u,0,0)*d(1)) 4210 4211 -fer(u,2,0)*(d(-3)*bos(u,0,0)*der(2) 4212 4213 +d(-3)*fer(u,2,0)) 4214 4215 2 4216 +d(1) 4217 4218 -del(1)*bos(u,0,0)*der(2) 4219 4220 -del(1)*fer(u,2,0) 4221 4222 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4223 4224 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4225 4226 -del(1)*d(-3)*bos(u,0,0)*d(1)*der(2) 4227 4228 -del(1)*d(-3)*fer(u,2,0)*d(1) 4229 4230 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1) 4231 4232 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(1) 4233 4234la2:=chan(lb2); 4235 4236 4237la2 := 4238 4239 2 4240 -bos(u,0,0) 4241 4242 -fer(u,2,0)*(d(-3)*bos(u,0,0)*der(2) 4243 4244 +d(-3)*fer(u,2,0)) 4245 4246 2 4247 +d(1) 4248 4249 -2*del(1)*bos(u,0,0)*der(2) 4250 4251 -2*del(1)*fer(u,2,0) 4252 4253 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4254 4255 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4256 4257 +del(1)*d(-3)*bos(u,0,1)*der(2) 4258 4259 +del(1)*d(-3)*fer(u,2,1) 4260 4261 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) 4262 4263lb4:=la2^2; 4264 4265 4266lb4 := 4267 4268 2 4269 -2*bos(u,3,0)*bos(u,0,0) 4270 4271 +2*bos(u,3,0)*bos(u,0,0)*(d(-3)*bos(u,0,1) 4272 4273 +d(-3)*bos(u,0,0)*d(1)) 4274 4275 -4*bos(u,0,2)*bos(u,0,0) 4276 4277 2 4278 -4*bos(u,0,1) 4279 4280 -12*bos(u,0,1)*bos(u,0,0)*d(1) 4281 4282 +bos(u,0,1)*( 4283 4284 -d(-3)*bos(u,3,0)*bos(u,0,0) 4285 4286 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 4287 4288 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) 4289 4290 +d(-3)*bos(u,0,2) 4291 4292 +d(-3)*bos(u,0,1)*d(1) 4293 4294 +d(-3)*fer(u,2,0)*fer(u,1,0) 4295 4296 -d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 4297 4298 -d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4299 4300 -d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 4301 4302 4 4303 +bos(u,0,0) 4304 4305 2 2 4306 -6*bos(u,0,0) *d(1) 4307 4308 -fer(u,2,2)*(d(-3)*bos(u,0,0)*der(2) 4309 4310 +d(-3)*fer(u,2,0)) 4311 4312 -4*fer(u,2,1)*bos(u,0,0)*der(2) 4313 4314 -fer(u,2,1)*fer(u,2,0) 4315 4316 +fer(u,2,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4317 4318 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4319 4320 +d(-3)*bos(u,0,1)*der(2) 4321 4322 +d(-3)*fer(u,2,1) 4323 4324 +d(-3)*fer(u,1,0)*bos(u,0,0)) 4325 4326 +2*fer(u,2,0)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2) 4327 4328 +d(-3)*fer(u,2,0)) 4329 4330 -3*fer(u,2,0)*bos(u,0,1)*der(2) 4331 4332 2 4333 +fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2) 4334 4335 +d(-3)*fer(u,2,0)) 4336 4337 -5*fer(u,2,0)*bos(u,0,0)*d(1)*der(2) 4338 4339 +6*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 4340 4341 +fer(u,2,0)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 4342 4343 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4344 4345 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4346 4347 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 4348 4349 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 4350 4351 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4352 4353 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 4354 4355 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 4356 4357 3 4358 +d(-3)*bos(u,0,0) *der(2) 4359 4360 2 4361 -d(-3)*bos(u,0,0)*d(1) *der(2) 4362 4363 +2*d(-3)*fer(u,2,0)*bos(u,3,0) 4364 4365 2 4366 +3*d(-3)*fer(u,2,0)*bos(u,0,0) 4367 4368 -d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 4369 4370 -d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1) 4371 4372 2 4373 -d(-3)*fer(u,2,0)*d(1) 4374 4375 +2*d(-3)*fer(u,1,0)*bos(u,0,1) 4376 4377 +2*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 4378 4379 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 4380 4381 -d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 4382 4383 -d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) 4384 4385 -d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2) 4386 4387 -d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1) 4388 4389 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4390 4391 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 4392 4393 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4394 4395 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 4396 4397 -2*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2) 4398 4399 +d(-3)*fer(u,2,0)) 4400 4401 2 4402 -4*fer(u,1,0)*bos(u,0,0) *der(2) 4403 4404 +fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4405 4406 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4407 4408 +d(-3)*bos(u,0,1)*der(2) 4409 4410 +d(-3)*fer(u,2,1) 4411 4412 +d(-3)*fer(u,1,0)*bos(u,0,0)) 4413 4414 4 4415 +d(1) 4416 4417 +del(1)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2) 4418 4419 +del(1)*bos(u,3,1)*d(-3)*fer(u,2,0) 4420 4421 +5*del(1)*bos(u,3,0)*bos(u,0,0)*der(2) 4422 4423 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4424 4425 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4426 4427 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 4428 4429 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,1) 4430 4431 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4432 4433 -del(1)*bos(u,0,2)*der(2) 4434 4435 +2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 4436 4437 +2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 4438 4439 -3*del(1)*bos(u,0,1)*d(1)*der(2) 4440 4441 3 4442 +4*del(1)*bos(u,0,0) *der(2) 4443 4444 2 4445 -del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4446 4447 2 4448 -del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4449 4450 2 4451 -del(1)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2) 4452 4453 2 4454 -del(1)*bos(u,0,0) *d(-3)*fer(u,2,1) 4455 4456 2 4457 -del(1)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 4458 4459 2 4460 -4*del(1)*bos(u,0,0)*d(1) *der(2) 4461 4462 -del(1)*fer(u,2,2) 4463 4464 -3*del(1)*fer(u,2,1)*d(1) 4465 4466 +5*del(1)*fer(u,2,0)*bos(u,3,0) 4467 4468 2 4469 +8*del(1)*fer(u,2,0)*bos(u,0,0) 4470 4471 -2*del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 4472 4473 -2*del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1) 4474 4475 2 4476 -4*del(1)*fer(u,2,0)*d(1) 4477 4478 +2*del(1)*fer(u,2,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 4479 4480 2 4481 +2*del(1)*fer(u,2,0)*d(-3)*bos(u,0,0) *d(1) 4482 4483 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 4484 4485 -del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 4486 4487 -del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 4488 4489 *d(1) 4490 4491 -del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2) 4492 4493 -del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1) 4494 4495 -del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4496 4497 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 4498 4499 *der(2) 4500 4501 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4502 4503 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 4504 4505 +2*del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 4506 4507 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 4508 4509 *der(2) 4510 4511 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4512 4513 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 4514 4515 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 4516 4517 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4518 4519 +del(1)*fer(u,1,1)*bos(u,0,0) 4520 4521 +5*del(1)*fer(u,1,0)*bos(u,0,1) 4522 4523 +5*del(1)*fer(u,1,0)*bos(u,0,0)*d(1) 4524 4525 +2*del(1)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 4526 4527 -2*del(1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 4528 4529 -2*del(1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) 4530 4531 -2*del(1)*fer(u,1,0)*d(-3)*bos(u,0,2) 4532 4533 -2*del(1)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1) 4534 4535 -2*del(1)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4536 4537 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 4538 4539 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4540 4541 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 4542 4543 -2*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2) 4544 4545 +del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4546 4547 +del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4548 4549 +del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2) 4550 4551 +del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1) 4552 4553 +del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 4554 4555 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 4556 4557 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3) 4558 4559 *bos(u,0,0)*der(2) 4560 4561 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3) 4562 4563 *fer(u,2,0) 4564 4565 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 4566 4567 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 4568 4569 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4570 4571 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 4572 4573 *der(2) 4574 4575 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 4576 4577 3 4578 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2) 4579 4580 2 4581 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) *der(2) 4582 4583 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 4584 4585 2 4586 -3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 4587 4588 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 4589 4590 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 4591 4592 *d(1) 4593 4594 2 4595 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(1) 4596 4597 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 4598 4599 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 4600 4601 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 4602 4603 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3) 4604 4605 *bos(u,0,1) 4606 4607 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3) 4608 4609 *bos(u,0,0)*d(1) 4610 4611 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2) 4612 4613 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1) 4614 4615 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4616 4617 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3) 4618 4619 *bos(u,0,0)*der(2) 4620 4621 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3) 4622 4623 *fer(u,2,0) 4624 4625 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4626 4627 *der(2) 4628 4629 2 4630 -del(1)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2) 4631 4632 2 4633 -del(1)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0) 4634 4635 2 4636 -3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2) 4637 4638 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 4639 4640 *der(2) 4641 4642 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4643 4644 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 4645 4646 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 4647 4648 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4649 4650 2 4651 +del(1)*d(-3)*bos(u,0,1)*d(1) *der(2) 4652 4653 2 4654 -del(1)*d(-3)*fer(u,2,1)*bos(u,0,0) 4655 4656 -del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2) 4657 4658 -del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0) 4659 4660 2 4661 +del(1)*d(-3)*fer(u,2,1)*d(1) 4662 4663 -2*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 4664 4665 2 4666 -2*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0) *d(1) 4667 4668 -del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 4669 4670 +del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3) 4671 4672 *bos(u,0,1) 4673 4674 +del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3) 4675 4676 *bos(u,0,0)*d(1) 4677 4678 +del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2) 4679 4680 +del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1) 4681 4682 +del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4683 4684 -del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3) 4685 4686 *bos(u,0,0)*der(2) 4687 4688 -del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3) 4689 4690 *fer(u,2,0) 4691 4692 -del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4693 4694 *der(2) 4695 4696 -2*del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 4697 4698 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3) 4699 4700 *bos(u,0,0)*der(2) 4701 4702 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3) 4703 4704 *fer(u,2,0) 4705 4706 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 4707 4708 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 4709 4710 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4711 4712 -2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,1) 4713 4714 -4*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 4715 4716 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1) 4717 4718 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(1) 4719 4720 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 4721 4722 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0) 4723 4724 -2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,1) 4725 4726 -2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,0)*d(1) 4727 4728 -del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0) 4729 4730 +del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 4731 4732 +del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) 4733 4734 +del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2) 4735 4736 +del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)*d(1) 4737 4738 +del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0) 4739 4740 -del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 4741 4742 -del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4743 4744 -del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 4745 4746 3 4747 -del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) 4748 4749 2 4750 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 4751 4752kxk^3:=0; 4753 4754 4755 3 4756kxk := 0 4757 4758la4:=chan(lb4); 4759 4760 4761la4 := 4762 4763 -4*bos(u,0,2)*bos(u,0,0) 4764 4765 2 4766 -3*bos(u,0,1) 4767 4768 -12*bos(u,0,1)*bos(u,0,0)*d(1) 4769 4770 +bos(u,0,1)*(d(-3)*fer(u,2,0)*fer(u,1,0) 4771 4772 -d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 4773 4774 -d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4775 4776 -d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 4777 4778 4 4779 +bos(u,0,0) 4780 4781 2 2 4782 -6*bos(u,0,0) *d(1) 4783 4784 -fer(u,2,2)*(d(-3)*bos(u,0,0)*der(2) 4785 4786 +d(-3)*fer(u,2,0)) 4787 4788 -4*fer(u,2,1)*bos(u,0,0)*der(2) 4789 4790 -2*fer(u,2,1)*fer(u,2,0) 4791 4792 +fer(u,2,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4793 4794 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4795 4796 +d(-3)*bos(u,0,1)*der(2) 4797 4798 +d(-3)*fer(u,2,1) 4799 4800 +d(-3)*fer(u,1,0)*bos(u,0,0)) 4801 4802 +2*fer(u,2,0)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2) 4803 4804 +d(-3)*fer(u,2,0)) 4805 4806 -2*fer(u,2,0)*bos(u,0,1)*der(2) 4807 4808 2 4809 +fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2) 4810 4811 +d(-3)*fer(u,2,0)) 4812 4813 -6*fer(u,2,0)*bos(u,0,0)*d(1)*der(2) 4814 4815 +8*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 4816 4817 +fer(u,2,0)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 4818 4819 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4820 4821 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4822 4823 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 4824 4825 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 4826 4827 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4828 4829 -d(-3)*bos(u,0,2)*der(2) 4830 4831 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 4832 4833 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 4834 4835 3 4836 +d(-3)*bos(u,0,0) *der(2) 4837 4838 -d(-3)*fer(u,2,2) 4839 4840 +2*d(-3)*fer(u,2,0)*bos(u,3,0) 4841 4842 2 4843 +2*d(-3)*fer(u,2,0)*bos(u,0,0) 4844 4845 -2*d(-3)*fer(u,1,1)*bos(u,0,0) 4846 4847 -d(-3)*fer(u,1,0)*bos(u,0,1) 4848 4849 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4850 4851 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 4852 4853 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4854 4855 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 4856 4857 -2*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2) 4858 4859 +d(-3)*fer(u,2,0)) 4860 4861 2 4862 -4*fer(u,1,0)*bos(u,0,0) *der(2) 4863 4864 +fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4865 4866 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4867 4868 +d(-3)*bos(u,0,1)*der(2) 4869 4870 +d(-3)*fer(u,2,1) 4871 4872 +d(-3)*fer(u,1,0)*bos(u,0,0)) 4873 4874 4 4875 +d(1) 4876 4877 +del(1)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2) 4878 4879 +del(1)*bos(u,3,1)*d(-3)*fer(u,2,0) 4880 4881 +6*del(1)*bos(u,3,0)*bos(u,0,0)*der(2) 4882 4883 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4884 4885 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4886 4887 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 4888 4889 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,1) 4890 4891 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4892 4893 -2*del(1)*bos(u,0,2)*der(2) 4894 4895 +2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 4896 4897 +2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 4898 4899 -2*del(1)*bos(u,0,1)*d(1)*der(2) 4900 4901 3 4902 +4*del(1)*bos(u,0,0) *der(2) 4903 4904 2 4905 -del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4906 4907 2 4908 -del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4909 4910 2 4911 -del(1)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2) 4912 4913 2 4914 -del(1)*bos(u,0,0) *d(-3)*fer(u,2,1) 4915 4916 2 4917 -del(1)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 4918 4919 2 4920 -4*del(1)*bos(u,0,0)*d(1) *der(2) 4921 4922 -2*del(1)*fer(u,2,2) 4923 4924 -2*del(1)*fer(u,2,1)*d(1) 4925 4926 +6*del(1)*fer(u,2,0)*bos(u,3,0) 4927 4928 2 4929 +8*del(1)*fer(u,2,0)*bos(u,0,0) 4930 4931 2 4932 -4*del(1)*fer(u,2,0)*d(1) 4933 4934 -3*del(1)*fer(u,2,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 4935 4936 -del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4937 4938 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 4939 4940 *der(2) 4941 4942 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4943 4944 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 4945 4946 +2*del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 4947 4948 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 4949 4950 *der(2) 4951 4952 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4953 4954 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 4955 4956 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 4957 4958 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 4959 4960 -2*del(1)*fer(u,1,1)*bos(u,0,0) 4961 4962 +2*del(1)*fer(u,1,0)*bos(u,0,1) 4963 4964 +6*del(1)*fer(u,1,0)*bos(u,0,0)*d(1) 4965 4966 -2*del(1)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 4967 4968 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 4969 4970 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 4971 4972 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 4973 4974 -3*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2) 4975 4976 +del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 4977 4978 +del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 4979 4980 +del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2) 4981 4982 +del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1) 4983 4984 +del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 4985 4986 -2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2) 4987 4988 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 4989 4990 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3) 4991 4992 *bos(u,0,0)*der(2) 4993 4994 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3) 4995 4996 *fer(u,2,0) 4997 4998 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 4999 5000 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 5001 5002 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5003 5004 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2) 5005 5006 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 5007 5008 *der(2) 5009 5010 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 5011 5012 3 5013 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2) 5014 5015 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2) 5016 5017 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 5018 5019 2 5020 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 5021 5022 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0) 5023 5024 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 5025 5026 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5027 5028 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3) 5029 5030 *bos(u,0,0)*der(2) 5031 5032 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3) 5033 5034 *fer(u,2,0) 5035 5036 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5037 5038 *der(2) 5039 5040 +del(1)*d(-3)*bos(u,0,3)*der(2) 5041 5042 2 5043 -del(1)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2) 5044 5045 2 5046 -del(1)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0) 5047 5048 2 5049 -3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2) 5050 5051 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 5052 5053 *der(2) 5054 5055 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5056 5057 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 5058 5059 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 5060 5061 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5062 5063 +del(1)*d(-3)*fer(u,2,3) 5064 5065 -2*del(1)*d(-3)*fer(u,2,1)*bos(u,3,0) 5066 5067 2 5068 -3*del(1)*d(-3)*fer(u,2,1)*bos(u,0,0) 5069 5070 -del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2) 5071 5072 -del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0) 5073 5074 +3*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 5075 5076 +del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5077 5078 -del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3) 5079 5080 *bos(u,0,0)*der(2) 5081 5082 -del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3) 5083 5084 *fer(u,2,0) 5085 5086 -del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5087 5088 *der(2) 5089 5090 -2*del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 5091 5092 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3) 5093 5094 *bos(u,0,0)*der(2) 5095 5096 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3) 5097 5098 *fer(u,2,0) 5099 5100 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 5101 5102 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 5103 5104 +del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5105 5106 -3*del(1)*d(-3)*fer(u,2,0)*bos(u,3,1) 5107 5108 -3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 5109 5110 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5111 5112 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0) 5113 5114 +3*del(1)*d(-3)*fer(u,1,2)*bos(u,0,0) 5115 5116 +3*del(1)*d(-3)*fer(u,1,1)*bos(u,0,1) 5117 5118 +del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0) 5119 5120 -del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 5121 5122 -del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 5123 5124 -del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 5125 5126 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 5127 5128 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,2) 5129 5130 3 5131 -del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) 5132 5133lc4:=sub(kxk=1,qq=-3,sub(d(-3)=kxk*d(qq),la4)); 5134 5135 5136lc4 := 5137 5138 -4*bos(u,0,2)*bos(u,0,0) 5139 5140 2 5141 -3*bos(u,0,1) 5142 5143 -12*bos(u,0,1)*bos(u,0,0)*d(1) 5144 5145 +bos(u,0,1)*(d(-3)*fer(u,2,0)*fer(u,1,0) 5146 5147 -d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 5148 5149 -d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 5150 5151 -d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 5152 5153 4 5154 +bos(u,0,0) 5155 5156 2 2 5157 -6*bos(u,0,0) *d(1) 5158 5159 -fer(u,2,2)*(d(-3)*bos(u,0,0)*der(2) 5160 5161 +d(-3)*fer(u,2,0)) 5162 5163 -4*fer(u,2,1)*bos(u,0,0)*der(2) 5164 5165 -2*fer(u,2,1)*fer(u,2,0) 5166 5167 +fer(u,2,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5168 5169 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5170 5171 +d(-3)*bos(u,0,1)*der(2) 5172 5173 +d(-3)*fer(u,2,1) 5174 5175 +d(-3)*fer(u,1,0)*bos(u,0,0)) 5176 5177 +2*fer(u,2,0)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2) 5178 5179 +d(-3)*fer(u,2,0)) 5180 5181 -2*fer(u,2,0)*bos(u,0,1)*der(2) 5182 5183 2 5184 +fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2) 5185 5186 +d(-3)*fer(u,2,0)) 5187 5188 -6*fer(u,2,0)*bos(u,0,0)*d(1)*der(2) 5189 5190 +8*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 5191 5192 +fer(u,2,0)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 5193 5194 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 5195 5196 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 5197 5198 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5199 5200 -d(-3)*bos(u,0,2)*der(2) 5201 5202 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5203 5204 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 5205 5206 3 5207 +d(-3)*bos(u,0,0) *der(2) 5208 5209 -d(-3)*fer(u,2,2) 5210 5211 +2*d(-3)*fer(u,2,0)*bos(u,3,0) 5212 5213 2 5214 +2*d(-3)*fer(u,2,0)*bos(u,0,0) 5215 5216 -2*d(-3)*fer(u,1,1)*bos(u,0,0) 5217 5218 -d(-3)*fer(u,1,0)*bos(u,0,1) 5219 5220 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5221 5222 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 5223 5224 -2*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2) 5225 5226 +d(-3)*fer(u,2,0)) 5227 5228 2 5229 -4*fer(u,1,0)*bos(u,0,0) *der(2) 5230 5231 +fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5232 5233 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5234 5235 +d(-3)*bos(u,0,1)*der(2) 5236 5237 +d(-3)*fer(u,2,1) 5238 5239 +d(-3)*fer(u,1,0)*bos(u,0,0)) 5240 5241 4 5242 +d(1) 5243 5244 +del(1)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2) 5245 5246 +del(1)*bos(u,3,1)*d(-3)*fer(u,2,0) 5247 5248 +6*del(1)*bos(u,3,0)*bos(u,0,0)*der(2) 5249 5250 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5251 5252 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5253 5254 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 5255 5256 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,1) 5257 5258 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5259 5260 -2*del(1)*bos(u,0,2)*der(2) 5261 5262 +2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5263 5264 +2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 5265 5266 -2*del(1)*bos(u,0,1)*d(1)*der(2) 5267 5268 3 5269 +4*del(1)*bos(u,0,0) *der(2) 5270 5271 2 5272 -del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5273 5274 2 5275 -del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5276 5277 2 5278 -del(1)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2) 5279 5280 2 5281 -del(1)*bos(u,0,0) *d(-3)*fer(u,2,1) 5282 5283 2 5284 -del(1)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 5285 5286 2 5287 -4*del(1)*bos(u,0,0)*d(1) *der(2) 5288 5289 -2*del(1)*fer(u,2,2) 5290 5291 -2*del(1)*fer(u,2,1)*d(1) 5292 5293 +6*del(1)*fer(u,2,0)*bos(u,3,0) 5294 5295 2 5296 +8*del(1)*fer(u,2,0)*bos(u,0,0) 5297 5298 2 5299 -4*del(1)*fer(u,2,0)*d(1) 5300 5301 -3*del(1)*fer(u,2,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 5302 5303 -del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5304 5305 +del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 5306 5307 +2*del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 5308 5309 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 5310 5311 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 5312 5313 -del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5314 5315 -2*del(1)*fer(u,1,1)*bos(u,0,0) 5316 5317 +2*del(1)*fer(u,1,0)*bos(u,0,1) 5318 5319 +6*del(1)*fer(u,1,0)*bos(u,0,0)*d(1) 5320 5321 -2*del(1)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5322 5323 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 5324 5325 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 5326 5327 +2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 5328 5329 -3*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2) 5330 5331 +del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2) 5332 5333 +del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1) 5334 5335 +del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 5336 5337 -2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2) 5338 5339 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 5340 5341 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2) 5342 5343 3 5344 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2) 5345 5346 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2) 5347 5348 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 5349 5350 2 5351 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 5352 5353 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0) 5354 5355 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 5356 5357 +del(1)*d(-3)*bos(u,0,3)*der(2) 5358 5359 2 5360 -del(1)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2) 5361 5362 2 5363 -del(1)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0) 5364 5365 2 5366 -3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2) 5367 5368 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 5369 5370 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 5371 5372 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5373 5374 +del(1)*d(-3)*fer(u,2,3) 5375 5376 -2*del(1)*d(-3)*fer(u,2,1)*bos(u,3,0) 5377 5378 2 5379 -3*del(1)*d(-3)*fer(u,2,1)*bos(u,0,0) 5380 5381 -del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2) 5382 5383 -del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0) 5384 5385 +3*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 5386 5387 -2*del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 5388 5389 -3*del(1)*d(-3)*fer(u,2,0)*bos(u,3,1) 5390 5391 -3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 5392 5393 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5394 5395 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0) 5396 5397 +3*del(1)*d(-3)*fer(u,1,2)*bos(u,0,0) 5398 5399 +3*del(1)*d(-3)*fer(u,1,1)*bos(u,0,1) 5400 5401 +del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0) 5402 5403 -del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 5404 5405 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 5406 5407 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,2) 5408 5409 3 5410 -del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) 5411 5412lb5:=lax*lc4; 5413 5414 5415 2 5416lb5 := 2*bos(u,3,1)*bos(u,0,0) 5417 5418 +bos(u,3,1)*bos(u,0,0)*(d(-3)*bos(u,0,1) 5419 5420 +d(-3)*bos(u,0,0)*d(1)) 5421 5422 +4*bos(u,3,0)*bos(u,0,1)*bos(u,0,0) 5423 5424 +2*bos(u,3,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*bos(u,0,0) 5425 5426 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 5427 5428 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) 5429 5430 -d(-3)*bos(u,0,2) 5431 5432 -d(-3)*bos(u,0,1)*d(1)) 5433 5434 -6*bos(u,0,3)*bos(u,0,0) 5435 5436 -10*bos(u,0,2)*bos(u,0,1) 5437 5438 -20*bos(u,0,2)*bos(u,0,0)*d(1) 5439 5440 +bos(u,0,2)*(d(-3)*fer(u,2,0)*fer(u,1,0) 5441 5442 -d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 5443 5444 -d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 5445 5446 -d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 5447 5448 2 5449 -15*bos(u,0,1) *d(1) 5450 5451 3 5452 +12*bos(u,0,1)*bos(u,0,0) 5453 5454 2 5455 +2*bos(u,0,1)*bos(u,0,0) *(d(-3)*bos(u,0,1) 5456 5457 +d(-3)*bos(u,0,0)*d(1)) 5458 5459 +bos(u,0,1)*bos(u,0,0)*( 5460 5461 2 5462 -30*d(1) 5463 5464 -3*d(-3)*bos(u,0,1)*bos(u,0,0) 5465 5466 -d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5467 5468 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 5469 5470 +2*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 5471 5472 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 5473 5474 -d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 5475 5476 -d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)) 5477 5478 4 5479 +5*bos(u,0,0) *d(1) 5480 5481 3 5482 +bos(u,0,0) *(d(-3)*bos(u,3,0)*bos(u,0,0) 5483 5484 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 5485 5486 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) 5487 5488 -d(-3)*bos(u,0,2) 5489 5490 -d(-3)*bos(u,0,1)*d(1) 5491 5492 -d(-3)*fer(u,2,0)*fer(u,1,0) 5493 5494 +d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 5495 5496 +d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 5497 5498 +d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 5499 5500 2 3 5501 -10*bos(u,0,0) *d(1) 5502 5503 +bos(u,0,0)*( 5504 5505 -3*d(-3)*bos(u,3,2)*bos(u,0,0) 5506 5507 -6*d(-3)*bos(u,3,1)*bos(u,0,1) 5508 5509 -3*d(-3)*bos(u,3,1)*bos(u,0,0)*d(1) 5510 5511 -d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*bos(u,0,0) 5512 5513 +d(-3)*bos(u,3,1)*d(-3)*bos(u,0,2) 5514 5515 +d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*d(1) 5516 5517 2 5518 +2*d(-3)*bos(u,3,0) *bos(u,0,0) 5519 5520 -3*d(-3)*bos(u,3,0)*bos(u,0,2) 5521 5522 -2*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1) 5523 5524 3 5525 +d(-3)*bos(u,3,0)*bos(u,0,0) 5526 5527 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0) 5528 5529 -3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 5530 5531 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1) 5532 5533 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3) 5534 5535 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*d(1) 5536 5537 2 5538 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 5539 5540 3 5541 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *d(1) 5542 5543 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,1,0) 5544 5545 2 5546 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) *der(2) 5547 5548 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*der(2) 5549 5550 +d(-3)*bos(u,0,4) 5551 5552 +d(-3)*bos(u,0,3)*d(1) 5553 5554 2 5555 -3*d(-3)*bos(u,0,2)*bos(u,0,0) 5556 5557 +3*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,1)*bos(u,0,0) 5558 5559 -2*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 5560 5561 2 5562 -3*d(-3)*bos(u,0,1) *bos(u,0,0) 5563 5564 2 5565 -d(-3)*bos(u,0,1) *d(-3)*bos(u,0,1) 5566 5567 2 5568 -d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*d(1) 5569 5570 2 5571 -3*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1) 5572 5573 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 5574 5575 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2) 5576 5577 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1) 5578 5579 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5580 5581 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 5582 5583 +d(-3)*fer(u,2,2)*fer(u,1,0) 5584 5585 -d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0)*der(2) 5586 5587 -d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*fer(u,2,0) 5588 5589 +d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 5590 5591 +d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 5592 5593 +d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5594 5595 +3*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0) 5596 5597 -d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1) 5598 5599 -d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(1) 5600 5601 +d(-3)*fer(u,2,1)*fer(u,1,1) 5602 5603 -d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(2) 5604 5605 -3*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,1)*bos(u,0,0) 5606 5607 -3*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,1) 5608 5609 -2*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1) 5610 5611 +d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5612 5613 +d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*fer(u,2,0) 5614 5615 -d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0)*der(2) 5616 5617 -d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*fer(u,2,0) 5618 5619 -3*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(2) 5620 5621 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1)*der(2) 5622 5623 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,2,1) 5624 5625 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 5626 5627 -2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,3,0) 5628 5629 2 5630 -3*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 5631 5632 +d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 5633 5634 +d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1) 5635 5636 -d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1)*der(2) 5637 5638 -d(-3)*fer(u,1,2)*d(-3)*fer(u,2,1) 5639 5640 -d(-3)*fer(u,1,2)*d(-3)*fer(u,1,0)*bos(u,0,0) 5641 5642 -d(-3)*fer(u,1,1)*bos(u,0,1)*der(2) 5643 5644 +2*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0) 5645 5646 +d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 5647 5648 -d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)*der(2) 5649 5650 3 5651 +d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) *der(2) 5652 5653 -d(-3)*fer(u,1,1)*d(-3)*fer(u,2,2) 5654 5655 +d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,3,0) 5656 5657 2 5658 +2*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 5659 5660 -2*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*bos(u,0,0) 5661 5662 -2*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,1) 5663 5664 -d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 5665 5666 +2*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*der(2) 5667 5668 -d(-3)*fer(u,1,0)*bos(u,0,2)*der(2) 5669 5670 +d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5671 5672 +d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 5673 5674 3 5675 +d(-3)*fer(u,1,0)*bos(u,0,0) *der(2)) 5676 5677 -fer(u,2,3)*(d(-3)*bos(u,0,0)*der(2) 5678 5679 +d(-3)*fer(u,2,0)) 5680 5681 -5*fer(u,2,2)*bos(u,0,0)*der(2) 5682 5683 +fer(u,2,2)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5684 5685 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5686 5687 +d(-3)*bos(u,0,1)*der(2) 5688 5689 +d(-3)*fer(u,2,1) 5690 5691 +d(-3)*fer(u,1,0)*bos(u,0,0)) 5692 5693 +3*fer(u,2,1)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2) 5694 5695 +d(-3)*fer(u,2,0)) 5696 5697 -5*fer(u,2,1)*bos(u,0,1)*der(2) 5698 5699 2 5700 +3*fer(u,2,1)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2) 5701 5702 +d(-3)*fer(u,2,0)) 5703 5704 -10*fer(u,2,1)*bos(u,0,0)*d(1)*der(2) 5705 5706 +10*fer(u,2,1)*fer(u,1,0)*bos(u,0,0) 5707 5708 +fer(u,2,1)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 5709 5710 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2) 5711 5712 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 5713 5714 -d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5715 5716 -d(-3)*bos(u,0,2)*der(2) 5717 5718 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5719 5720 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 5721 5722 3 5723 +d(-3)*bos(u,0,0) *der(2) 5724 5725 -d(-3)*fer(u,2,2) 5726 5727 +2*d(-3)*fer(u,2,0)*bos(u,3,0) 5728 5729 2 5730 +2*d(-3)*fer(u,2,0)*bos(u,0,0) 5731 5732 -2*d(-3)*fer(u,1,1)*bos(u,0,0) 5733 5734 -d(-3)*fer(u,1,0)*bos(u,0,1) 5735 5736 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 5737 5738 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 5739 5740 +3*fer(u,2,0)*bos(u,3,1)*(d(-3)*bos(u,0,0)*der(2) 5741 5742 +d(-3)*fer(u,2,0)) 5743 5744 +10*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*der(2) 5745 5746 +fer(u,2,0)*bos(u,3,0)*( 5747 5748 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5749 5750 -2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5751 5752 -3*d(-3)*bos(u,0,1)*der(2) 5753 5754 -3*d(-3)*fer(u,2,1) 5755 5756 -3*d(-3)*fer(u,1,0)*bos(u,0,0)) 5757 5758 -5*fer(u,2,0)*bos(u,0,2)*der(2) 5759 5760 +7*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2) 5761 5762 +d(-3)*fer(u,2,0)) 5763 5764 -10*fer(u,2,0)*bos(u,0,1)*d(1)*der(2) 5765 5766 3 5767 +10*fer(u,2,0)*bos(u,0,0) *der(2) 5768 5769 2 5770 -3*fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5771 5772 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5773 5774 +d(-3)*bos(u,0,1)*der(2) 5775 5776 +d(-3)*fer(u,2,1) 5777 5778 +d(-3)*fer(u,1,0)*bos(u,0,0)) 5779 5780 +fer(u,2,0)*bos(u,0,0)*( 5781 5782 2 5783 -10*d(1) *der(2) 5784 5785 +d(-3)*bos(u,0,1)*bos(u,0,0)*der(2) 5786 5787 +d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1)*der(2) 5788 5789 +d(-3)*bos(u,0,1)*d(-3)*fer(u,2,1) 5790 5791 +d(-3)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 5792 5793 +d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 5794 5795 +d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 5796 5797 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 5798 5799 +d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 5800 5801 +3*d(-3)*fer(u,2,1)*bos(u,0,0) 5802 5803 +3*d(-3)*fer(u,2,0)*bos(u,0,1) 5804 5805 +2*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1) 5806 5807 +d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 5808 5809 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,2) 5810 5811 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*d(1)) 5812 5813 +10*fer(u,2,0)*fer(u,1,1)*bos(u,0,0) 5814 5815 +10*fer(u,2,0)*fer(u,1,0)*bos(u,0,1) 5816 5817 +20*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(1) 5818 5819 +fer(u,2,0)*fer(u,1,0)*( 5820 5821 -3*d(-3)*fer(u,2,0)*fer(u,1,0) 5822 5823 +2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 5824 5825 +2*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 5826 5827 +3*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)) 5828 5829 +fer(u,2,0)*( 5830 5831 -3*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2) 5832 5833 +d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2) 5834 5835 +d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1) 5836 5837 +d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 5838 5839 -2*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2) 5840 5841 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 5842 5843 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2) 5844 5845 3 5846 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2) 5847 5848 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2) 5849 5850 -2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 5851 5852 2 5853 -2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 5854 5855 +2*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0) 5856 5857 +d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 5858 5859 +d(-3)*bos(u,0,3)*der(2) 5860 5861 2 5862 -d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2) 5863 5864 2 5865 -d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0) 5866 5867 2 5868 -3*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2) 5869 5870 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 5871 5872 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 5873 5874 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 5875 5876 +d(-3)*fer(u,2,3) 5877 5878 -2*d(-3)*fer(u,2,1)*bos(u,3,0) 5879 5880 2 5881 -3*d(-3)*fer(u,2,1)*bos(u,0,0) 5882 5883 -d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2) 5884 5885 -d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0) 5886 5887 +3*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 5888 5889 -2*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 5890 5891 -3*d(-3)*fer(u,2,0)*bos(u,3,1) 5892 5893 -3*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 5894 5895 +d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 5896 5897 +d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0) 5898 5899 +3*d(-3)*fer(u,1,2)*bos(u,0,0) 5900 5901 +3*d(-3)*fer(u,1,1)*bos(u,0,1) 5902 5903 +d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0) 5904 5905 -d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 5906 5907 -2*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 5908 5909 +d(-3)*fer(u,1,0)*bos(u,0,2) 5910 5911 3 5912 -d(-3)*fer(u,1,0)*bos(u,0,0) ) 5913 5914 -3*fer(u,1,2)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2) 5915 5916 +d(-3)*fer(u,2,0)) 5917 5918 -3*fer(u,1,1)*bos(u,0,1)*(d(-3)*bos(u,0,0)*der(2) 5919 5920 +d(-3)*fer(u,2,0)) 5921 5922 2 5923 -10*fer(u,1,1)*bos(u,0,0) *der(2) 5924 5925 +3*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5926 5927 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5928 5929 +d(-3)*bos(u,0,1)*der(2) 5930 5931 +d(-3)*fer(u,2,1) 5932 5933 +d(-3)*fer(u,1,0)*bos(u,0,0)) 5934 5935 +fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2) 5936 5937 +d(-3)*fer(u,2,0)) 5938 5939 -10*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*der(2) 5940 5941 +fer(u,1,0)*bos(u,0,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5942 5943 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5944 5945 +d(-3)*bos(u,0,1)*der(2) 5946 5947 +d(-3)*fer(u,2,1) 5948 5949 +d(-3)*fer(u,1,0)*bos(u,0,0)) 5950 5951 2 5952 -10*fer(u,1,0)*bos(u,0,0) *d(1)*der(2) 5953 5954 +2*fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2) 5955 5956 +d(-3)*bos(u,3,1)*d(-3)*fer(u,2,0) 5957 5958 +d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 5959 5960 +d(-3)*fer(u,2,0)*bos(u,3,0) 5961 5962 +d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1) 5963 5964 +d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*d(1) 5965 5966 +d(-3)*fer(u,1,0)*bos(u,0,1) 5967 5968 +d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)) 5969 5970 5 5971 +d(1) 5972 5973 +del(1)*bos(u,3,2)*d(-3)*bos(u,0,0)*der(2) 5974 5975 +del(1)*bos(u,3,2)*d(-3)*fer(u,2,0) 5976 5977 +4*del(1)*bos(u,3,1)*bos(u,0,0)*der(2) 5978 5979 -2*del(1)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 5980 5981 -2*del(1)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 5982 5983 -del(1)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2) 5984 5985 -del(1)*bos(u,3,1)*d(-3)*fer(u,2,1) 5986 5987 -del(1)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 5988 5989 2 5990 -2*del(1)*bos(u,3,0) *d(-3)*bos(u,0,0)*der(2) 5991 5992 2 5993 -2*del(1)*bos(u,3,0) *d(-3)*fer(u,2,0) 5994 5995 +2*del(1)*bos(u,3,0)*bos(u,0,1)*der(2) 5996 5997 2 5998 -del(1)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0)*der(2) 5999 6000 2 6001 -del(1)*bos(u,3,0)*bos(u,0,0) *d(-3)*fer(u,2,0) 6002 6003 +6*del(1)*bos(u,3,0)*bos(u,0,0)*d(1)*der(2) 6004 6005 -2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 6006 6007 +del(1)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2) 6008 6009 3 6010 -del(1)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2) 6011 6012 +del(1)*bos(u,3,0)*d(-3)*fer(u,2,2) 6013 6014 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 6015 6016 2 6017 -2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 6018 6019 +2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0) 6020 6021 +del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 6022 6023 -del(1)*bos(u,0,3)*der(2) 6024 6025 +2*del(1)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 6026 6027 +2*del(1)*bos(u,0,2)*bos(u,0,0)*d(-3)*fer(u,2,0) 6028 6029 -4*del(1)*bos(u,0,2)*d(1)*der(2) 6030 6031 2 6032 +del(1)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2) 6033 6034 2 6035 +del(1)*bos(u,0,1) *d(-3)*fer(u,2,0) 6036 6037 2 6038 +10*del(1)*bos(u,0,1)*bos(u,0,0) *der(2) 6039 6040 -2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 6041 6042 -2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 6043 6044 -del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 6045 6046 -del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 6047 6048 -del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 6049 6050 2 6051 -6*del(1)*bos(u,0,1)*d(1) *der(2) 6052 6053 3 6054 +4*del(1)*bos(u,0,0) *d(1)*der(2) 6055 6056 3 6057 -4*del(1)*bos(u,0,0)*d(1) *der(2) 6058 6059 -del(1)*fer(u,2,3) 6060 6061 -4*del(1)*fer(u,2,2)*d(1) 6062 6063 +2*del(1)*fer(u,2,1)*bos(u,3,0) 6064 6065 2 6066 +4*del(1)*fer(u,2,1)*bos(u,0,0) 6067 6068 -del(1)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2) 6069 6070 -del(1)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0) 6071 6072 2 6073 -6*del(1)*fer(u,2,1)*d(1) 6074 6075 -del(1)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 6076 6077 +del(1)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 6078 6079 -del(1)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 6080 6081 -del(1)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 6082 6083 -del(1)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 6084 6085 +4*del(1)*fer(u,2,0)*bos(u,3,1) 6086 6087 +6*del(1)*fer(u,2,0)*bos(u,3,0)*d(1) 6088 6089 +12*del(1)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 6090 6091 2 6092 +8*del(1)*fer(u,2,0)*bos(u,0,0) *d(1) 6093 6094 -del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 6095 6096 +del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 6097 6098 +del(1)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 6099 6100 +del(1)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0) 6101 6102 3 6103 -4*del(1)*fer(u,2,0)*d(1) 6104 6105 +del(1)*fer(u,1,2)*bos(u,0,0) 6106 6107 +3*del(1)*fer(u,1,1)*bos(u,0,1) 6108 6109 +4*del(1)*fer(u,1,1)*bos(u,0,0)*d(1) 6110 6111 -2*del(1)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0)*der(2) 6112 6113 -2*del(1)*fer(u,1,1)*fer(u,1,0)*d(-3)*fer(u,2,0) 6114 6115 -del(1)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0) 6116 6117 +2*del(1)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2) 6118 6119 +2*del(1)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 6120 6121 +del(1)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 6122 6123 -4*del(1)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 6124 6125 +3*del(1)*fer(u,1,0)*bos(u,0,2) 6126 6127 +8*del(1)*fer(u,1,0)*bos(u,0,1)*d(1) 6128 6129 3 6130 -2*del(1)*fer(u,1,0)*bos(u,0,0) 6131 6132 2 6133 +6*del(1)*fer(u,1,0)*bos(u,0,0)*d(1) 6134 6135 -del(1)*d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 6136 6137 -del(1)*d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*fer(u,2,0) 6138 6139 2 6140 -2*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0)*der(2) 6141 6142 2 6143 -2*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*fer(u,2,0) 6144 6145 2 6146 -6*del(1)*d(-3)*bos(u,3,0) *bos(u,0,0)*der(2) 6147 6148 2 6149 +2*del(1)*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2) 6150 6151 2 6152 +2*del(1)*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 6153 6154 2 6155 +2*del(1)*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1)*der(2) 6156 6157 2 6158 +2*del(1)*d(-3)*bos(u,3,0) *d(-3)*fer(u,2,1) 6159 6160 2 6161 +2*del(1)*d(-3)*bos(u,3,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 6162 6163 +2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,2)*der(2) 6164 6165 -4*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 6166 6167 -4*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 6168 6169 +2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1)*der(2) 6170 6171 3 6172 -8*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *der(2) 6173 6174 2 6175 +2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 6176 6177 *der(2) 6178 6179 2 6180 +2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 6181 6182 2 6183 +2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2) 6184 6185 2 6186 +2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*fer(u,2,1) 6187 6188 2 6189 +2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 6190 6191 2 6192 +4*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1) *der(2) 6193 6194 +3*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2) 6195 6196 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2) 6197 6198 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1) 6199 6200 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 6201 6202 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2) 6203 6204 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 6205 6206 *der(2) 6207 6208 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2) 6209 6210 3 6211 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2) 6212 6213 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2) 6214 6215 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 6216 6217 2 6218 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 6219 6220 -2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0) 6221 6222 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 6223 6224 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3)*der(2) 6225 6226 2 6227 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2) 6228 6229 2 6230 +del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0) 6231 6232 2 6233 +3*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2) 6234 6235 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 6236 6237 *der(2) 6238 6239 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 6240 6241 -del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0) 6242 6243 *bos(u,0,0) 6244 6245 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,3) 6246 6247 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*bos(u,3,0) 6248 6249 2 6250 +3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*bos(u,0,0) 6251 6252 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 6253 6254 *der(2) 6255 6256 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0) 6257 6258 -3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 6259 6260 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 6261 6262 *der(2) 6263 6264 +3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,1) 6265 6266 +3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 6267 6268 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3) 6269 6270 *bos(u,0,0)*der(2) 6271 6272 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3) 6273 6274 *fer(u,2,0) 6275 6276 -3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,2)*bos(u,0,0) 6277 6278 -3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,1) 6279 6280 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0) 6281 6282 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 6283 6284 *der(2) 6285 6286 +2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 6287 6288 -del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,2) 6289 6290 3 6291 +del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 6292 6293 +del(1)*d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 6294 6295 +del(1)*d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*fer(u,2,0) 6296 6297 2 6298 +8*del(1)*d(-3)*bos(u,0,2)*bos(u,0,0) *der(2) 6299 6300 -del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 6301 6302 *der(2) 6303 6304 -del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 6305 6306 -del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 6307 6308 -del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*fer(u,2,1) 6309 6310 -del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 6311 6312 2 6313 +5*del(1)*d(-3)*bos(u,0,1) *bos(u,0,0)*der(2) 6314 6315 3 6316 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0)*der(2) 6317 6318 3 6319 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*fer(u,2,0) 6320 6321 2 6322 +18*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1)*der(2) 6323 6324 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0) 6325 6326 *der(2) 6327 6328 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,0) 6329 6330 -3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2) 6331 6332 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 6333 6334 *der(2) 6335 6336 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1) 6337 6338 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0) 6339 6340 *bos(u,0,0) 6341 6342 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2)*der(2) 6343 6344 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3) 6345 6346 *bos(u,0,0)*der(2) 6347 6348 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3) 6349 6350 *fer(u,2,0) 6351 6352 3 6353 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) *der(2) 6354 6355 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,2) 6356 6357 -3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,3,0) 6358 6359 2 6360 -2*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 6361 6362 +2*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,1)*bos(u,0,0) 6363 6364 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1) 6365 6366 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 6367 6368 *d(1) 6369 6370 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 6371 6372 +del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0) 6373 6374 *fer(u,1,0) 6375 6376 -del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0) 6377 6378 *bos(u,0,0)*der(2) 6379 6380 5 6381 -del(1)*d(-3)*bos(u,0,0) *der(2) 6382 6383 3 2 6384 +6*del(1)*d(-3)*bos(u,0,0) *d(1) *der(2) 6385 6386 4 6387 -del(1)*d(-3)*bos(u,0,0)*d(1) *der(2) 6388 6389 +2*del(1)*d(-3)*fer(u,2,2)*bos(u,3,0) 6390 6391 2 6392 +4*del(1)*d(-3)*fer(u,2,2)*bos(u,0,0) 6393 6394 -del(1)*d(-3)*fer(u,2,2)*bos(u,0,0)*d(-3)*bos(u,0,1) 6395 6396 -del(1)*d(-3)*fer(u,2,2)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1) 6397 6398 -del(1)*d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2) 6399 6400 -del(1)*d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*fer(u,2,0) 6401 6402 +2*del(1)*d(-3)*fer(u,2,1)*bos(u,3,0)*d(1) 6403 6404 +4*del(1)*d(-3)*fer(u,2,1)*bos(u,0,1)*bos(u,0,0) 6405 6406 2 6407 +8*del(1)*d(-3)*fer(u,2,1)*bos(u,0,0) *d(1) 6408 6409 -del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 6410 6411 +del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 6412 6413 +del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 6414 6415 *d(1) 6416 6417 +del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,2) 6418 6419 +del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1) 6420 6421 -4*del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)*der(2) 6422 6423 +del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 6424 6425 *der(2) 6426 6427 +del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 6428 6429 +del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2) 6430 6431 +del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,1) 6432 6433 +del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 6434 6435 +2*del(1)*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 6436 6437 +2*del(1)*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0) 6438 6439 2 6440 -6*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0) 6441 6442 2 6443 -16*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0) 6444 6445 +2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 6446 6447 +2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1) 6448 6449 2 6450 +4*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(1) 6451 6452 +3*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 6453 6454 +del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0) 6455 6456 *fer(u,1,0) 6457 6458 -del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0) 6459 6460 *bos(u,0,0)*der(2) 6461 6462 -2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 6463 6464 +del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 6465 6466 *der(2) 6467 6468 +del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 6469 6470 +del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0) 6471 6472 *bos(u,0,0) 6473 6474 +10*del(1)*d(-3)*fer(u,2,0)*bos(u,0,2)*bos(u,0,0) 6475 6476 2 6477 +3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1) 6478 6479 +22*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*d(1) 6480 6481 -del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*fer(u,1,0) 6482 6483 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 6484 6485 *der(2) 6486 6487 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 6488 6489 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 6490 6491 4 6492 -5*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0) 6493 6494 3 6495 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0) *d(-3)*bos(u,0,1) 6496 6497 3 6498 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0) *d(-3)*bos(u,0,0)*d(1) 6499 6500 2 2 6501 +12*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0) *d(1) 6502 6503 +2*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,1)*bos(u,0,0) 6504 6505 +3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 6506 6507 +2*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1) 6508 6509 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0) 6510 6511 *bos(u,0,0) 6512 6513 -del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2) 6514 6515 -del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 6516 6517 *d(1) 6518 6519 -del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,3) 6520 6521 -del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(1) 6522 6523 2 6524 +2*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 6525 6526 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3) 6527 6528 *bos(u,0,1) 6529 6530 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3) 6531 6532 *bos(u,0,0)*d(1) 6533 6534 3 6535 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0) *d(1) 6536 6537 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3) 6538 6539 *bos(u,0,0)*der(2) 6540 6541 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3) 6542 6543 *fer(u,2,0) 6544 6545 -del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*fer(u,1,0) 6546 6547 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3) 6548 6549 *bos(u,0,0)*der(2) 6550 6551 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3) 6552 6553 *fer(u,2,0) 6554 6555 2 6556 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0) *der(2) 6557 6558 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1) 6559 6560 *der(2) 6561 6562 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,1) 6563 6564 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0) 6565 6566 *bos(u,0,0) 6567 6568 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*der(2) 6569 6570 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0) 6571 6572 *bos(u,0,0)*der(2) 6573 6574 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0) 6575 6576 *bos(u,3,0) 6577 6578 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0) 6579 6580 *bos(u,0,1) 6581 6582 +del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0) 6583 6584 *bos(u,0,0)*d(1) 6585 6586 +2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2) 6587 6588 +2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 6589 6590 -4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,1)*fer(u,1,0) 6591 6592 +2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*der(2) 6593 6594 +2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0) 6595 6596 2 6597 +8*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) *der(2) 6598 6599 -4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3) 6600 6601 *bos(u,0,0)*der(2) 6602 6603 -4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3) 6604 6605 *fer(u,2,0) 6606 6607 -4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2) 6608 6609 -4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,1) 6610 6611 -4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,1,0) 6612 6613 *bos(u,0,0) 6614 6615 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(2) 6616 6617 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1) 6618 6619 *der(2) 6620 6621 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*fer(u,2,1) 6622 6623 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*fer(u,1,0) 6624 6625 *bos(u,0,0) 6626 6627 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0) 6628 6629 *bos(u,0,0)*der(2) 6630 6631 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0) 6632 6633 *bos(u,3,0) 6634 6635 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0) 6636 6637 *bos(u,0,1) 6638 6639 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0) 6640 6641 *bos(u,0,0)*d(1) 6642 6643 +3*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0) 6644 6645 +3*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1) 6646 6647 +2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1) 6648 6649 +del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0) 6650 6651 *bos(u,0,0) 6652 6653 -del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,2) 6654 6655 -del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 6656 6657 *d(1) 6658 6659 4 6660 -del(1)*d(-3)*fer(u,2,0)*d(1) 6661 6662 -del(1)*d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0)*der(2) 6663 6664 -del(1)*d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*fer(u,2,0) 6665 6666 +2*del(1)*d(-3)*fer(u,1,1)*bos(u,3,0)*bos(u,0,0) 6667 6668 2 6669 -2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,0) *d(-3)*bos(u,0,1) 6670 6671 2 6672 -2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,0) *d(-3)*bos(u,0,0)*d(1) 6673 6674 -4*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)*der(2) 6675 6676 +2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 6677 6678 *der(2) 6679 6680 +2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0) 6681 6682 +2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1)*der(2) 6683 6684 +2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*fer(u,2,1) 6685 6686 +2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 6687 6688 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,1)*bos(u,0,0) 6689 6690 -del(1)*d(-3)*fer(u,1,0)*bos(u,3,1)*d(-3)*bos(u,0,1) 6691 6692 -del(1)*d(-3)*fer(u,1,0)*bos(u,3,1)*d(-3)*bos(u,0,0)*d(1) 6693 6694 -6*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,1) 6695 6696 -6*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*d(1) 6697 6698 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 6699 6700 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 6701 6702 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 6703 6704 *d(1) 6705 6706 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,0,2) 6707 6708 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,0,1)*d(1) 6709 6710 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0) 6711 6712 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 6713 6714 *der(2) 6715 6716 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 6717 6718 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 6719 6720 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,3) 6721 6722 +4*del(1)*d(-3)*fer(u,1,0)*bos(u,0,2)*d(1) 6723 6724 2 6725 -16*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0) 6726 6727 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 6728 6729 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1) 6730 6731 2 6732 +6*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(1) 6733 6734 +3*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 6735 6736 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0) 6737 6738 *fer(u,1,0) 6739 6740 -del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0) 6741 6742 *bos(u,0,0)*der(2) 6743 6744 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2) 6745 6746 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 6747 6748 *der(2) 6749 6750 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1) 6751 6752 +del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0) 6753 6754 *bos(u,0,0) 6755 6756 3 6757 -8*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(1) 6758 6759 2 6760 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*bos(u,0,0) 6761 6762 2 6763 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 6764 6765 2 6766 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 6767 6768 *d(1) 6769 6770 2 6771 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,0,2) 6772 6773 2 6774 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,0,1)*d(1) 6775 6776 2 6777 +2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,2,0)*fer(u,1,0) 6778 6779 2 6780 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 6781 6782 *der(2) 6783 6784 2 6785 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0) 6786 6787 2 6788 -2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)*der(2) 6789 6790 3 6791 +4*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) 6792 6793 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,2)*bos(u,0,0) 6794 6795 +6*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*bos(u,0,1) 6796 6797 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*bos(u,0,0)*d(1) 6798 6799 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*bos(u,0,0) 6800 6801 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,2) 6802 6803 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*d(1) 6804 6805 2 6806 -2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0) *bos(u,0,0) 6807 6808 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,2) 6809 6810 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1) 6811 6812 3 6813 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 6814 6815 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0) 6816 6817 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 6818 6819 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 6820 6821 *d(1) 6822 6823 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3) 6824 6825 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*d(1) 6826 6827 2 6828 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 6829 6830 3 6831 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *d(1) 6832 6833 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,1,0) 6834 6835 2 6836 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 6837 6838 *der(2) 6839 6840 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 6841 6842 *der(2) 6843 6844 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,4) 6845 6846 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,3)*d(1) 6847 6848 2 6849 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*bos(u,0,0) 6850 6851 -3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,1)*bos(u,0,0) 6852 6853 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0) 6854 6855 *der(2) 6856 6857 2 6858 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1) *bos(u,0,0) 6859 6860 2 6861 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,1) 6862 6863 2 6864 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*d(1) 6865 6866 2 6867 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1) 6868 6869 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0) 6870 6871 *bos(u,0,0) 6872 6873 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2) 6874 6875 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 6876 6877 *d(1) 6878 6879 -del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0) 6880 6881 *fer(u,1,0) 6882 6883 +del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0) 6884 6885 *bos(u,0,0)*der(2) 6886 6887 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,2)*fer(u,1,0) 6888 6889 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0) 6890 6891 *der(2) 6892 6893 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*fer(u,2,0) 6894 6895 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 6896 6897 *der(2) 6898 6899 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,2,1) 6900 6901 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,1,0) 6902 6903 *bos(u,0,0) 6904 6905 -3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0) 6906 6907 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1) 6908 6909 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 6910 6911 *d(1) 6912 6913 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,1,1) 6914 6915 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 6916 6917 *der(2) 6918 6919 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,1)*bos(u,0,0) 6920 6921 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,1) 6922 6923 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 6924 6925 *d(1) 6926 6927 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3) 6928 6929 *bos(u,0,0)*der(2) 6930 6931 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3) 6932 6933 *fer(u,2,0) 6934 6935 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0) 6936 6937 *der(2) 6938 6939 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*fer(u,2,0) 6940 6941 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(2) 6942 6943 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1) 6944 6945 *der(2) 6946 6947 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,2,1) 6948 6949 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0) 6950 6951 *bos(u,0,0) 6952 6953 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,3,0) 6954 6955 2 6956 +3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 6957 6958 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3) 6959 6960 *bos(u,0,1) 6961 6962 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3) 6963 6964 *bos(u,0,0)*d(1) 6965 6966 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1)*der(2) 6967 6968 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*fer(u,2,1) 6969 6970 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*fer(u,1,0)*bos(u,0,0) 6971 6972 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1)*der(2) 6973 6974 -2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0) 6975 6976 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0) 6977 6978 *der(2) 6979 6980 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)*der(2) 6981 6982 3 6983 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) *der(2) 6984 6985 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,2) 6986 6987 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,3,0) 6988 6989 2 6990 -2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 6991 6992 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*bos(u,0,0) 6993 6994 +2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,1) 6995 6996 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 6997 6998 *d(1) 6999 7000 -2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*der(2) 7001 7002 +del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2)*der(2) 7003 7004 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3) 7005 7006 *bos(u,0,0)*der(2) 7007 7008 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3) 7009 7010 *fer(u,2,0) 7011 7012 3 7013 -del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) *der(2) 7014 7015lc5:=s_part(lb5,3); 7016 7017 7018lc5 := bos(u,3,2)*d(-3)*bos(u,0,0) 7019 7020 +4*bos(u,3,1)*bos(u,0,0) 7021 7022 +bos(u,3,1)*( 7023 7024 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7025 7026 -d(-3)*bos(u,0,1)) 7027 7028 2 7029 -2*bos(u,3,0) *d(-3)*bos(u,0,0) 7030 7031 +2*bos(u,3,0)*bos(u,0,1) 7032 7033 2 7034 -bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0) 7035 7036 +6*bos(u,3,0)*bos(u,0,0)*d(1) 7037 7038 +bos(u,3,0)*( 7039 7040 -2*d(-3)*bos(u,3,0)*bos(u,0,0) 7041 7042 +d(-3)*bos(u,0,2) 7043 7044 3 7045 -d(-3)*bos(u,0,0) ) 7046 7047 -bos(u,0,3) 7048 7049 +2*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0) 7050 7051 -4*bos(u,0,2)*d(1) 7052 7053 2 7054 +bos(u,0,1) *d(-3)*bos(u,0,0) 7055 7056 2 7057 +10*bos(u,0,1)*bos(u,0,0) 7058 7059 +bos(u,0,1)*bos(u,0,0)*( 7060 7061 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7062 7063 -d(-3)*bos(u,0,1)) 7064 7065 2 7066 -6*bos(u,0,1)*d(1) 7067 7068 3 7069 +4*bos(u,0,0) *d(1) 7070 7071 3 7072 -4*bos(u,0,0)*d(1) 7073 7074 -fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 7075 7076 +fer(u,2,1)*(d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7077 7078 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)) 7079 7080 +fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7081 7082 +fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7083 7084 -2*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0) 7085 7086 +fer(u,1,1)*(2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7087 7088 +d(-3)*fer(u,1,0)*bos(u,0,0)) 7089 7090 -d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0) 7091 7092 2 7093 -2*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0) 7094 7095 2 7096 -6*d(-3)*bos(u,3,0) *bos(u,0,0) 7097 7098 2 7099 +2*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7100 7101 2 7102 +2*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1) 7103 7104 +2*d(-3)*bos(u,3,0)*bos(u,0,2) 7105 7106 -4*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7107 7108 +2*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1) 7109 7110 3 7111 -8*d(-3)*bos(u,3,0)*bos(u,0,0) 7112 7113 2 7114 +2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7115 7116 2 7117 +2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1) 7118 7119 2 7120 +4*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1) 7121 7122 +3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0) 7123 7124 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1) 7125 7126 +2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 7127 7128 +2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7129 7130 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2) 7131 7132 3 7133 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7134 7135 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3) 7136 7137 2 7138 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0) 7139 7140 2 7141 +3*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 7142 7143 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 7144 7145 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 7146 7147 +2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 7148 7149 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7150 7151 +d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 7152 7153 +d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0) 7154 7155 2 7156 +8*d(-3)*bos(u,0,2)*bos(u,0,0) 7157 7158 -d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7159 7160 -d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1) 7161 7162 2 7163 +5*d(-3)*bos(u,0,1) *bos(u,0,0) 7164 7165 3 7166 -d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0) 7167 7168 2 7169 +18*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1) 7170 7171 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0) 7172 7173 -3*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7174 7175 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 7176 7177 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2) 7178 7179 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7180 7181 3 7182 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7183 7184 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7185 7186 5 7187 -d(-3)*bos(u,0,0) 7188 7189 3 2 7190 +6*d(-3)*bos(u,0,0) *d(1) 7191 7192 4 7193 -d(-3)*bos(u,0,0)*d(1) 7194 7195 -d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0) 7196 7197 -4*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0) 7198 7199 +d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7200 7201 +d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1) 7202 7203 +2*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7204 7205 -d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7206 7207 -2*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7208 7209 +d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 7210 7211 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7212 7213 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 7214 7215 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7216 7217 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0) 7218 7219 2 7220 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7221 7222 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1) 7223 7224 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 7225 7226 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7227 7228 +2*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7229 7230 +2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0) 7231 7232 2 7233 +8*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 7234 7235 -4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3) 7236 7237 *bos(u,0,0) 7238 7239 -4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 7240 7241 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 7242 7243 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1) 7244 7245 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7246 7247 -d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0) 7248 7249 -4*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0) 7250 7251 +2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7252 7253 +2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1) 7254 7255 -2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7256 7257 -2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7258 7259 -d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7260 7261 -2*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 7262 7263 +d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 7264 7265 2 7266 -2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7267 7268 2 7269 -2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 7270 7271 2 7272 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7273 7274 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 7275 7276 +2*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0) 7277 7278 +d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7279 7280 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0) 7281 7282 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 7283 7284 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 7285 7286 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7287 7288 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0) 7289 7290 +3*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 7291 7292 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1) 7293 7294 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1) 7295 7296 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1) 7297 7298 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0) 7299 7300 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2) 7301 7302 3 7303 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7304 7305 -2*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 7306 7307 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2) 7308 7309 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7310 7311 3 7312 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7313 7314la5:=lc5-sub(d(-3)=0,lc5); 7315 7316 7317la5 := bos(u,3,2)*d(-3)*bos(u,0,0) 7318 7319 +bos(u,3,1)*( 7320 7321 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7322 7323 -d(-3)*bos(u,0,1)) 7324 7325 2 7326 -2*bos(u,3,0) *d(-3)*bos(u,0,0) 7327 7328 2 7329 -bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0) 7330 7331 +bos(u,3,0)*( 7332 7333 -2*d(-3)*bos(u,3,0)*bos(u,0,0) 7334 7335 +d(-3)*bos(u,0,2) 7336 7337 3 7338 -d(-3)*bos(u,0,0) ) 7339 7340 +2*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0) 7341 7342 2 7343 +bos(u,0,1) *d(-3)*bos(u,0,0) 7344 7345 +bos(u,0,1)*bos(u,0,0)*( 7346 7347 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7348 7349 -d(-3)*bos(u,0,1)) 7350 7351 -fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 7352 7353 +fer(u,2,1)*(d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7354 7355 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)) 7356 7357 +fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7358 7359 +fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7360 7361 -2*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0) 7362 7363 +fer(u,1,1)*(2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7364 7365 +d(-3)*fer(u,1,0)*bos(u,0,0)) 7366 7367 -d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0) 7368 7369 2 7370 -2*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0) 7371 7372 2 7373 -6*d(-3)*bos(u,3,0) *bos(u,0,0) 7374 7375 2 7376 +2*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7377 7378 2 7379 +2*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1) 7380 7381 +2*d(-3)*bos(u,3,0)*bos(u,0,2) 7382 7383 -4*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7384 7385 +2*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1) 7386 7387 3 7388 -8*d(-3)*bos(u,3,0)*bos(u,0,0) 7389 7390 2 7391 +2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7392 7393 2 7394 +2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1) 7395 7396 2 7397 +4*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1) 7398 7399 +3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0) 7400 7401 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1) 7402 7403 +2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 7404 7405 +2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7406 7407 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2) 7408 7409 3 7410 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7411 7412 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3) 7413 7414 2 7415 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0) 7416 7417 2 7418 +3*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 7419 7420 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 7421 7422 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 7423 7424 +2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 7425 7426 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7427 7428 +d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 7429 7430 +d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0) 7431 7432 2 7433 +8*d(-3)*bos(u,0,2)*bos(u,0,0) 7434 7435 -d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7436 7437 -d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1) 7438 7439 2 7440 +5*d(-3)*bos(u,0,1) *bos(u,0,0) 7441 7442 3 7443 -d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0) 7444 7445 2 7446 +18*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1) 7447 7448 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0) 7449 7450 -3*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7451 7452 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 7453 7454 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2) 7455 7456 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7457 7458 3 7459 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7460 7461 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7462 7463 5 7464 -d(-3)*bos(u,0,0) 7465 7466 3 2 7467 +6*d(-3)*bos(u,0,0) *d(1) 7468 7469 4 7470 -d(-3)*bos(u,0,0)*d(1) 7471 7472 -d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0) 7473 7474 -4*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0) 7475 7476 +d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7477 7478 +d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1) 7479 7480 +2*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7481 7482 -d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7483 7484 -2*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7485 7486 +d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 7487 7488 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7489 7490 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 7491 7492 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7493 7494 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0) 7495 7496 2 7497 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7498 7499 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1) 7500 7501 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 7502 7503 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7504 7505 +2*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7506 7507 +2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0) 7508 7509 2 7510 +8*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 7511 7512 -4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3) 7513 7514 *bos(u,0,0) 7515 7516 -4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 7517 7518 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 7519 7520 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1) 7521 7522 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7523 7524 -d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0) 7525 7526 -4*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0) 7527 7528 +2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7529 7530 +2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1) 7531 7532 -2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7533 7534 -2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7535 7536 -d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7537 7538 -2*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 7539 7540 +d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 7541 7542 2 7543 -2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7544 7545 2 7546 -2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 7547 7548 2 7549 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7550 7551 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 7552 7553 +2*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0) 7554 7555 +d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7556 7557 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0) 7558 7559 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 7560 7561 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 7562 7563 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7564 7565 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0) 7566 7567 +3*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 7568 7569 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1) 7570 7571 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1) 7572 7573 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1) 7574 7575 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0) 7576 7577 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2) 7578 7579 3 7580 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7581 7582 -2*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 7583 7584 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2) 7585 7586 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7587 7588 3 7589 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7590 7591ld5:=chan(la5); 7592 7593 7594ld5 := bos(u,3,2)*d(-3)*bos(u,0,0) 7595 7596 -4*bos(u,3,1)*bos(u,0,0) 7597 7598 +bos(u,3,1)*( 7599 7600 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7601 7602 -d(-3)*bos(u,0,1)) 7603 7604 2 7605 -2*bos(u,3,0) *d(-3)*bos(u,0,0) 7606 7607 -2*bos(u,3,0)*bos(u,0,1) 7608 7609 2 7610 -bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0) 7611 7612 +4*bos(u,3,0)*bos(u,0,0)*d(1) 7613 7614 +bos(u,3,0)*( 7615 7616 -2*d(-3)*bos(u,3,0)*bos(u,0,0) 7617 7618 +d(-3)*bos(u,0,2) 7619 7620 3 7621 -d(-3)*bos(u,0,0) ) 7622 7623 +bos(u,0,3) 7624 7625 +2*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0) 7626 7627 -bos(u,0,2)*d(1) 7628 7629 2 7630 +bos(u,0,1) *d(-3)*bos(u,0,0) 7631 7632 +bos(u,0,1)*bos(u,0,0)*( 7633 7634 -2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7635 7636 -d(-3)*bos(u,0,1)) 7637 7638 2 7639 +bos(u,0,1)*d(1) 7640 7641 3 7642 +6*bos(u,0,0) *d(1) 7643 7644 3 7645 -bos(u,0,0)*d(1) 7646 7647 -fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 7648 7649 +fer(u,2,1)*(d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7650 7651 -d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)) 7652 7653 +fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7654 7655 +fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7656 7657 -2*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0) 7658 7659 +fer(u,1,1)*(2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7660 7661 +d(-3)*fer(u,1,0)*bos(u,0,0)) 7662 7663 +4*d(-3)*bos(u,3,2)*bos(u,0,0) 7664 7665 -d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0) 7666 7667 +6*d(-3)*bos(u,3,1)*bos(u,0,1) 7668 7669 2 7670 -2*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0) 7671 7672 2 7673 -6*d(-3)*bos(u,3,0) *bos(u,0,0) 7674 7675 2 7676 +2*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7677 7678 2 7679 +2*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1) 7680 7681 +4*d(-3)*bos(u,3,0)*bos(u,0,2) 7682 7683 -4*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7684 7685 3 7686 -8*d(-3)*bos(u,3,0)*bos(u,0,0) 7687 7688 2 7689 +2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7690 7691 2 7692 +2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1) 7693 7694 +3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0) 7695 7696 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1) 7697 7698 +2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1) 7699 7700 +2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7701 7702 -d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2) 7703 7704 3 7705 +d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7706 7707 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3) 7708 7709 2 7710 +d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0) 7711 7712 2 7713 +3*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 7714 7715 -d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 7716 7717 +d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0) 7718 7719 +2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 7720 7721 -d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7722 7723 +d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 7724 7725 -d(-3)*bos(u,0,4) 7726 7727 +d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0) 7728 7729 2 7730 +8*d(-3)*bos(u,0,2)*bos(u,0,0) 7731 7732 -d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7733 7734 -d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1) 7735 7736 2 7737 +5*d(-3)*bos(u,0,1) *bos(u,0,0) 7738 7739 3 7740 -d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0) 7741 7742 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0) 7743 7744 -3*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7745 7746 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) 7747 7748 +d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2) 7749 7750 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7751 7752 3 7753 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7754 7755 -d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7756 7757 5 7758 -d(-3)*bos(u,0,0) 7759 7760 -d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0) 7761 7762 -4*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0) 7763 7764 +d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7765 7766 +d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1) 7767 7768 +2*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7769 7770 -d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7771 7772 -2*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7773 7774 +d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 7775 7776 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7777 7778 +d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0) 7779 7780 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7781 7782 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0) 7783 7784 2 7785 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7786 7787 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1) 7788 7789 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 7790 7791 +d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7792 7793 +2*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7794 7795 +2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0) 7796 7797 2 7798 +8*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 7799 7800 -4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3) 7801 7802 *bos(u,0,0) 7803 7804 -4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1) 7805 7806 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0) 7807 7808 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1) 7809 7810 +d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0) 7811 7812 -d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0) 7813 7814 -4*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0) 7815 7816 +2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) 7817 7818 +2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1) 7819 7820 -2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7821 7822 -2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7823 7824 -d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7825 7826 -2*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0) 7827 7828 +d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1) 7829 7830 2 7831 -2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7832 7833 2 7834 -2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0) 7835 7836 2 7837 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) 7838 7839 +d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1) 7840 7841 +2*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0) 7842 7843 +d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7844 7845 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0) 7846 7847 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1) 7848 7849 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0) 7850 7851 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0) 7852 7853 +d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0) 7854 7855 +3*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0) 7856 7857 -d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1) 7858 7859 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1) 7860 7861 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1) 7862 7863 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0) 7864 7865 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2) 7866 7867 3 7868 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) 7869 7870 -2*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0) 7871 7872 +d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2) 7873 7874 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) 7875 7876 3 7877 -d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) 7878 7879konserv:=sub(d(-3)=1,d_part(ld5,-1)); 7880 7881 7882konserv := 5*bos(u,3,2)*bos(u,0,0) 7883 7884 +5*bos(u,3,1)*bos(u,0,1) 7885 7886 2 7887 -10*bos(u,3,0) *bos(u,0,0) 7888 7889 +5*bos(u,3,0)*bos(u,0,2) 7890 7891 3 7892 -10*bos(u,3,0)*bos(u,0,0) 7893 7894 -bos(u,0,4) 7895 7896 2 7897 +10*bos(u,0,2)*bos(u,0,0) 7898 7899 2 7900 +5*bos(u,0,1) *bos(u,0,0) 7901 7902 5 7903 -bos(u,0,0) 7904 7905 -5*fer(u,2,1)*fer(u,2,0)*bos(u,0,0) 7906 7907 2 7908 +10*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) 7909 7910 -5*fer(u,1,1)*fer(u,1,0)*bos(u,0,0) 7911 7912clear lax,lb2,la2,lb4,kxk,la4,lc4,lb5,lc5,la5,konserv; 7913 7914 7915 7916%22.) The N=2 SuSy Boussinesq equation 7917% example from Z.Popowicz Phys.LettB.319 (1993) 478-484 7918 7919clearrules trad; 7920 7921 7922let chiral; 7923 7924 7925 7926lax:=del(1)*(d(1)^2+bos(j,0,0)*d(1)+bos(tt,0,0))*der(2); 7927 7928 7929lax := del(1)*bos(j,0,0)*d(1)*der(2) 7930 7931 +del(1)*bos(tt,0,0)*der(2) 7932 7933 2 7934 +del(1)*d(1) *der(2) 7935 7936la2:=del(1)*(d(1)+2*bos(j,0,0)/3)*der(2); 7937 7938 7939la2 := (2*del(1)*bos(j,0,0)*der(2) 7940 7941 +3*del(1)*d(1)*der(2))/3 7942 7943com:=sub(del(1)=1,der(2)=1,lax*la2-la2*lax); 7944 7945 7946com := ( 7947 7948 -2*bos(j,0,3) 7949 7950 -2*bos(j,0,2)*bos(j,0,0) 7951 7952 -3*bos(j,0,2)*d(1) 7953 7954 -2*bos(j,0,1)*bos(j,0,0)*d(1) 7955 7956 +3*bos(tt,0,2) 7957 7958 +2*bos(tt,0,1)*bos(j,0,0) 7959 7960 +6*bos(tt,0,1)*d(1) 7961 7962 -2*bos(tt,0,0)*bos(j,0,1) 7963 7964 -2*fer(j,2,1)*fer(j,1,0) 7965 7966 +2*fer(tt,2,0)*fer(j,1,0) 7967 7968 +2*fer(tt,1,0)*fer(j,2,0))/3 7969 7970operator boss; 7971 7972 7973boss(j,t):=d_part(com,1); 7974 7975 7976boss(j,t) := ( 7977 7978 -3*bos(j,0,2) 7979 7980 -2*bos(j,0,1)*bos(j,0,0) 7981 7982 +6*bos(tt,0,1))/3 7983 7984boss(tt,t):=d_part(com,0); 7985 7986 7987boss(tt,t) := ( 7988 7989 -2*bos(j,0,3) 7990 7991 -2*bos(j,0,2)*bos(j,0,0) 7992 7993 +3*bos(tt,0,2) 7994 7995 +2*bos(tt,0,1)*bos(j,0,0) 7996 7997 -2*bos(tt,0,0)*bos(j,0,1) 7998 7999 -2*fer(j,2,1)*fer(j,1,0) 8000 8001 +2*fer(tt,2,0)*fer(j,1,0) 8002 8003 +2*fer(tt,1,0)*fer(j,2,0))/3 8004 8005 8006% let us shift bos(tt,0,0) to 8007 8008bos(tt,0,0):=bos(tx,0,0)/2+bos(j,0,0)**2/6 + bos(j,0,1)/2; 8009 8010 8011bos(tt,0,0) := (3*bos(j,0,1) 8012 8013 2 8014 +bos(j,0,0) 8015 8016 +3*bos(tx,0,0))/6 8017 8018bos(tt,0,1):=pg(1,bos(tt,0,0)); 8019 8020 8021bos(tt,0,1) := (3*bos(j,0,2) 8022 8023 +2*bos(j,0,1)*bos(j,0,0) 8024 8025 +3*bos(tx,0,1))/6 8026 8027bos(tt,0,2):=pg(1,bos(tt,0,1)); 8028 8029 8030bos(tt,0,2) := (3*bos(j,0,3) 8031 8032 +2*bos(j,0,2)*bos(j,0,0) 8033 8034 2 8035 +2*bos(j,0,1) 8036 8037 +3*bos(tx,0,2))/6 8038 8039fer(tt,1,0):=pr(1,bos(tt,0,0)); 8040 8041 8042fer(tt,1,0) := (3*fer(j,1,1) 8043 8044 +2*fer(j,1,0)*bos(j,0,0) 8045 8046 +3*fer(tx,1,0))/6 8047 8048fer(tt,2,0):=pr(2,bos(tt,0,0)); 8049 8050 8051fer(tt,2,0) := (3*fer(j,2,1) 8052 8053 +2*fer(j,2,0)*bos(j,0,0) 8054 8055 +3*fer(tx,2,0))/6 8056 8057 8058% then the equations of motion are; 8059 8060bos(j,t):=boss(j,t); 8061 8062 8063bos(j,t) := bos(tx,0,1) 8064 8065bos(tx,t):=2*(boss(tt,t) - boss(j,t)*bos(j,0,0)/3- 8066 pg(1,boss(j,t))/2); 8067 8068 8069bos(tx,t) := ( 8070 8071 -3*bos(j,0,3) 8072 8073 2 8074 +2*bos(j,0,1)*bos(j,0,0) 8075 8076 -6*bos(tx,0,0)*bos(j,0,1) 8077 8078 -6*fer(j,2,1)*fer(j,1,0) 8079 8080 -6*fer(j,2,0)*fer(j,1,1) 8081 8082 +6*fer(tx,2,0)*fer(j,1,0) 8083 8084 +6*fer(tx,1,0)*fer(j,2,0))/9 8085 8086 8087clear lax,la2; 8088 8089 8090clearrules chiral; 8091 8092 8093let trad; 8094 8095 8096 8097%23.) the Jacobi identity; 8098% we will find the N=2 susy extension of the Virasoro algebra. 8099% First we found the most general form of the susy-pseudo-differential 8100% element of the dimension two. 8101 8102vira:=pse_ele(2,{{f,1,b}},a); 8103 8104 8105*** a already defined as operator 8106 8107vira := a(2)*bos(f,3,0) 8108 8109 +a(3)*bos(f,0,1) 8110 8111 2 8112 +a(4)*bos(f,0,0) 8113 8114 +a(5)*bos(f,0,0)*d(1) 8115 8116 +a(6)*bos(f,0,0)*der(1)*der(2) 8117 8118 2 8119 +a(0)*d(1) 8120 8121 +a(1)*d(1)*der(1)*der(2) 8122 8123 +a(7)*fer(f,2,0)*der(2) 8124 8125 +a(8)*fer(f,2,0)*der(1) 8126 8127 +a(9)*fer(f,1,0)*der(2) 8128 8129 +a(10)*fer(f,1,0)*der(1) 8130 8131 8132% This vira should be antisymmetrical so we found 8133 8134ewa:=vira+cp(vira); 8135 8136 8137*** d not found 8138 8139*** der not found 8140 8141*** del not found 8142 8143ewa := bos(f,3,0)*( 8144 8145 -a(9) 8146 8147 +a(8) 8148 8149 +a(6) 8150 8151 +2*a(2)) 8152 8153 +bos(f,0,1)*(a(10) 8154 8155 +a(7) 8156 8157 -a(5) 8158 8159 +2*a(3)) 8160 8161 2 8162 +2*a(4)*bos(f,0,0) 8163 8164 +2*a(6)*(bos(f,0,0)*der(1)*der(2)) 8165 8166 -a(6)*fer(f,2,0)*der(1) 8167 8168 +a(6)*fer(f,1,0)*der(2) 8169 8170 2 8171 +2*a(0)*d(1) 8172 8173 8174%we first solve ewa in order to found free coefficients; 8175 8176load_package groebner; 8177 8178 8179adam:=groesolve(sub(der(1)=1,der(2)=1,d(1)=1,lyst1(ewa))); 8180 8181 8182adam := {{a(10)= 8183 8184 -a(7) 8185 8186 +a(5) 8187 8188 -2*a(3), 8189 8190 a(9)=a(8) 8191 8192 +2*a(2), 8193 8194 a(4)=0, 8195 8196 a(0)=0, 8197 8198 a(6)=0}} 8199 8200 8201% we define now the most general antisymmetrical susy-pseudo-symmetrical 8202% element of conformal dimension two. 8203 8204vira:=sub(adam,vira); 8205 8206 8207vira := a(2)*bos(f,3,0) 8208 8209 +a(3)*bos(f,0,1) 8210 8211 +a(5)*bos(f,0,0)*d(1) 8212 8213 +fer(f,2,0)*(der(2)*a(7) 8214 8215 +der(1)*a(8)) 8216 8217 +fer(f,1,0)*(der(2)*a(8) 8218 8219 +2*der(2)*a(2) 8220 8221 -der(1)*a(7) 8222 8223 +der(1)*a(5) 8224 8225 -2*der(1)*a(3)) 8226 8227 +a(1)*d(1)*der(1)*der(2) 8228 8229 8230% we make additional assumption that our Poisson tensor vira should be O(2) 8231% invariant under the change of susy derivatives; 8232 8233dad:=odwa(vira)-vira; 8234 8235 8236dad := fer(f,2,0)*( 8237 8238 -2*der(2)*a(7) 8239 8240 +der(2)*a(5) 8241 8242 -2*der(2)*a(3) 8243 8244 -2*der(1)*a(8) 8245 8246 -2*der(1)*a(2)) 8247 8248 +fer(f,1,0)*( 8249 8250 -2*der(2)*a(8) 8251 8252 -2*der(2)*a(2) 8253 8254 +2*der(1)*a(7) 8255 8256 -der(1)*a(5) 8257 8258 +2*der(1)*a(3)) 8259 8260factor der; 8261 8262 8263wyr1:=sub(der(1)=1,der(2)=1,lyst1(dad)); 8264 8265 8266wyr1 := { 8267 8268 -2*a(7) 8269 8270 +a(5) 8271 8272 -2*a(3), 8273 8274 8275 -2*(a(8) 8276 8277 +a(2)), 8278 8279 8280 -2*(a(8) 8281 8282 +a(2)), 8283 8284 2*a(7) 8285 8286 -a(5) 8287 8288 +2*a(3)} 8289 8290remfac der; 8291 8292 8293*** der not found 8294 8295dad:=groesolve(wyr1); 8296 8297 8298dad := {{a(8)= 8299 8300 -a(2),a(7)=(a(5) 8301 8302 -2*a(3))/2}} 8303 8304vira:=sub(dad,vira); 8305 8306 8307vira := (2*a(2)*bos(f,3,0) 8308 8309 +2*a(3)*bos(f,0,1) 8310 8311 +2*a(5)*(bos(f,0,0)*d(1)) 8312 8313 +fer(f,2,0)*(der(2)*a(5) 8314 8315 -2*der(2)*a(3) 8316 8317 -2*der(1)*a(2)) 8318 8319 +fer(f,1,0)*(2*der(2)*a(2) 8320 8321 +der(1)*a(5) 8322 8323 -2*der(1)*a(3)) 8324 8325 +2*a(1)*(d(1)*der(1)*der(2)))/2 8326 8327% we check wheather it is really O(2) invariant; 8328vira-odwa(vira); 8329 8330 83310 8332 8333% O.K 8334%so 8335%now we check the Jacobi identity 8336 8337jjacob:=fjacob(vira,f); 8338 8339 8340jjacob := (4*a(3)*a(1)*(bos(#c,3,2)*bos(#b,0,0)*bos(#a,0,0)) 8341 8342 +4*a(5)*a(1)*(bos(#c,3,1)*bos(#b,0,1)*bos(#a,0,0)) 8343 8344 -4*a(2)*a(1)*bos(#c,0,3)*bos(#b,0,0)*bos(#a,0,0) 8345 8346 +4*a(5)*a(1)*(bos(#c,0,1)*bos(#b,0,0)*bos(#a,3,1)) 8347 8348 +4*a(3)*a(1)*(bos(#c,0,0)*bos(#b,3,2)*bos(#a,0,0)) 8349 8350 +4*a(5)*a(1)*(bos(#c,0,0)*bos(#b,3,1)*bos(#a,0,1)) 8351 8352 -4*a(2)*a(1)*bos(#c,0,0)*bos(#b,0,3)*bos(#a,0,0) 8353 8354 +4*a(3)*a(1)*(bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,2)) 8355 8356 -4*a(2)*a(1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,3) 8357 8358 +24*a(3)*a(2)*(bos(f,3,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,0)) 8359 8360 2 8361 -4*a(2) *bos(f,3,0)*bos(#c,3,0)*bos(#b,0,0)*bos(#a,0,0) 8362 8363 +4*bos(f,3,0)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,0)*a(2)*(a(5) 8364 8365 +3*a(3)) 8366 8367 2 8368 -4*a(2) *bos(f,3,0)*bos(#c,0,0)*bos(#b,3,0)*bos(#a,0,0) 8369 8370 +4*bos(f,3,0)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,0)*a(2)*(a(5) 8371 8372 +3*a(3)) 8373 8374 2 8375 -4*a(2) *bos(f,3,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,0) 8376 8377 +4*bos(f,3,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,1)*a(2)*(a(5) 8378 8379 +3*a(3)) 8380 8381 2 8382 +12*bos(f,0,2)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,0)*(a(3) 8383 8384 2 8385 -a(2) ) 8386 8387 +4*bos(f,0,1)*bos(#c,3,0)*bos(#b,0,0)*bos(#a,0,0)*a(2)*(a(5) 8388 8389 -a(3)) 8390 8391 +4*bos(f,0,1)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,0)*(2*a(5)*a(3) 8392 8393 2 8394 +a(3) 8395 8396 2 8397 -2*a(2) ) 8398 8399 +4*bos(f,0,1)*bos(#c,0,0)*bos(#b,3,0)*bos(#a,0,0)*a(2)*(a(5) 8400 8401 -a(3)) 8402 8403 +4*bos(f,0,1)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,0)*(2*a(5)*a(3) 8404 8405 2 8406 +a(3) 8407 8408 2 8409 -2*a(2) ) 8410 8411 +4*bos(f,0,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,0)*a(2)*(a(5) 8412 8413 -a(3)) 8414 8415 +4*bos(f,0,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,1)*(2*a(5)*a(3) 8416 8417 2 8418 +a(3) 8419 8420 2 8421 -2*a(2) ) 8422 8423 +4*a(5)*a(2)*(bos(f,0,0)*bos(#c,3,1)*bos(#b,0,0)*bos(#a,0,0)) 8424 8425 +4*a(5)*a(3)*(bos(f,0,0)*bos(#c,0,2)*bos(#b,0,0)*bos(#a,0,0)) 8426 8427 2 8428 +4*a(5) *(bos(f,0,0)*bos(#c,0,1)*bos(#b,0,1)*bos(#a,0,0)) 8429 8430 2 8431 +4*a(5) *(bos(f,0,0)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,1)) 8432 8433 +4*a(5)*a(2)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,3,1)*bos(#a,0,0)) 8434 8435 +4*a(5)*a(3)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,2)*bos(#a,0,0)) 8436 8437 2 8438 +4*a(5) *(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,1)) 8439 8440 +4*a(5)*a(2)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,1)) 8441 8442 +4*a(5)*a(3)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,2)) 8443 8444 +4*a(2)*a(1)*(fer(#b,2,2)*fer(#a,2,0)*bos(#c,0,0)) 8445 8446 +2*fer(#b,2,2)*fer(#a,1,0)*bos(#c,0,0)*a(1)*(a(5) 8447 8448 -2*a(3)) 8449 8450 +2*fer(#b,2,1)*fer(#a,2,0)*bos(f,0,0)*bos(#c,0,0)*a(5)*(a(5) 8451 8452 -2*a(3)) 8453 8454 -4*a(5)*a(2)*fer(#b,2,1)*fer(#a,1,0)*bos(f,0,0)*bos(#c,0,0) 8455 8456 +2*fer(#b,2,0)*fer(#a,2,0)*bos(f,3,0)*bos(#c,0,0)*a(2)*(a(5) 8457 8458 -2*a(3)) 8459 8460 2 8461 +fer(#b,2,0)*fer(#a,2,0)*bos(f,0,1)*bos(#c,0,0)*(a(5) 8462 8463 -2*a(5)*a(3) 8464 8465 2 8466 +4*a(2) ) 8467 8468 2 8469 +fer(#b,2,0)*fer(#a,1,0)*bos(f,3,0)*bos(#c,0,0)*(a(5) 8470 8471 -4*a(5)*a(3) 8472 8473 2 8474 +4*a(3) ) 8475 8476 -4*a(3)*a(2)*fer(#b,2,0)*fer(#a,1,0)*bos(f,0,1)*bos(#c,0,0) 8477 8478 +2*fer(#b,1,2)*fer(#a,2,0)*bos(#c,0,0)*a(1)*( 8479 8480 -a(5) 8481 8482 +2*a(3)) 8483 8484 +4*a(2)*a(1)*(fer(#b,1,2)*fer(#a,1,0)*bos(#c,0,0)) 8485 8486 +4*a(5)*a(2)*(fer(#b,1,1)*fer(#a,2,0)*bos(f,0,0)*bos(#c,0,0)) 8487 8488 +2*fer(#b,1,1)*fer(#a,1,0)*bos(f,0,0)*bos(#c,0,0)*a(5)*(a(5) 8489 8490 -2*a(3)) 8491 8492 +fer(#b,1,0)*fer(#a,2,0)*bos(f,3,0)*bos(#c,0,0)*( 8493 8494 2 8495 -a(5) 8496 8497 +4*a(5)*a(3) 8498 8499 2 8500 -4*a(3) ) 8501 8502 +4*a(3)*a(2)*(fer(#b,1,0)*fer(#a,2,0)*bos(f,0,1)*bos(#c,0,0)) 8503 8504 +2*fer(#b,1,0)*fer(#a,1,0)*bos(f,3,0)*bos(#c,0,0)*a(2)*(a(5) 8505 8506 -2*a(3)) 8507 8508 2 8509 +fer(#b,1,0)*fer(#a,1,0)*bos(f,0,1)*bos(#c,0,0)*(a(5) 8510 8511 -2*a(5)*a(3) 8512 8513 2 8514 +4*a(2) ) 8515 8516 +4*a(2)*a(1)*(fer(#c,2,2)*fer(#b,2,0)*bos(#a,0,0)) 8517 8518 +2*fer(#c,2,2)*fer(#b,1,0)*bos(#a,0,0)*a(1)*(a(5) 8519 8520 -2*a(3)) 8521 8522 +2*fer(#c,2,1)*fer(#b,2,0)*bos(f,0,0)*bos(#a,0,0)*a(5)*(a(5) 8523 8524 -2*a(3)) 8525 8526 -4*a(5)*a(2)*fer(#c,2,1)*fer(#b,1,0)*bos(f,0,0)*bos(#a,0,0) 8527 8528 -4*a(2)*a(1)*fer(#c,2,0)*fer(#a,2,2)*bos(#b,0,0) 8529 8530 +2*fer(#c,2,0)*fer(#a,2,1)*bos(f,0,0)*bos(#b,0,0)*a(5)*( 8531 8532 -a(5) 8533 8534 +2*a(3)) 8535 8536 +2*fer(#c,2,0)*fer(#a,2,0)*bos(f,3,0)*bos(#b,0,0)*a(2)*( 8537 8538 -a(5) 8539 8540 +2*a(3)) 8541 8542 +fer(#c,2,0)*fer(#a,2,0)*bos(f,0,1)*bos(#b,0,0)*( 8543 8544 2 8545 -a(5) 8546 8547 +2*a(5)*a(3) 8548 8549 2 8550 -4*a(2) ) 8551 8552 +2*fer(#c,2,0)*fer(#a,1,2)*bos(#b,0,0)*a(1)*(a(5) 8553 8554 -2*a(3)) 8555 8556 -4*a(5)*a(2)*fer(#c,2,0)*fer(#a,1,1)*bos(f,0,0)*bos(#b,0,0) 8557 8558 2 8559 +fer(#c,2,0)*fer(#a,1,0)*bos(f,3,0)*bos(#b,0,0)*(a(5) 8560 8561 -4*a(5)*a(3) 8562 8563 2 8564 +4*a(3) ) 8565 8566 -4*a(3)*a(2)*fer(#c,2,0)*fer(#a,1,0)*bos(f,0,1)*bos(#b,0,0) 8567 8568 +2*fer(#c,2,0)*fer(#b,2,0)*bos(f,3,0)*bos(#a,0,0)*a(2)*(a(5) 8569 8570 -2*a(3)) 8571 8572 2 8573 +fer(#c,2,0)*fer(#b,2,0)*bos(f,0,1)*bos(#a,0,0)*(a(5) 8574 8575 -2*a(5)*a(3) 8576 8577 2 8578 +4*a(2) ) 8579 8580 2 8581 +fer(#c,2,0)*fer(#b,1,0)*bos(f,3,0)*bos(#a,0,0)*(a(5) 8582 8583 -4*a(5)*a(3) 8584 8585 2 8586 +4*a(3) ) 8587 8588 -4*a(3)*a(2)*fer(#c,2,0)*fer(#b,1,0)*bos(f,0,1)*bos(#a,0,0) 8589 8590 +2*fer(#c,1,2)*fer(#b,2,0)*bos(#a,0,0)*a(1)*( 8591 8592 -a(5) 8593 8594 +2*a(3)) 8595 8596 +4*a(2)*a(1)*(fer(#c,1,2)*fer(#b,1,0)*bos(#a,0,0)) 8597 8598 +4*a(5)*a(2)*(fer(#c,1,1)*fer(#b,2,0)*bos(f,0,0)*bos(#a,0,0)) 8599 8600 +2*fer(#c,1,1)*fer(#b,1,0)*bos(f,0,0)*bos(#a,0,0)*a(5)*(a(5) 8601 8602 -2*a(3)) 8603 8604 +2*fer(#c,1,0)*fer(#a,2,2)*bos(#b,0,0)*a(1)*( 8605 8606 -a(5) 8607 8608 +2*a(3)) 8609 8610 +4*a(5)*a(2)*(fer(#c,1,0)*fer(#a,2,1)*bos(f,0,0)*bos(#b,0,0)) 8611 8612 +fer(#c,1,0)*fer(#a,2,0)*bos(f,3,0)*bos(#b,0,0)*( 8613 8614 2 8615 -a(5) 8616 8617 +4*a(5)*a(3) 8618 8619 2 8620 -4*a(3) ) 8621 8622 +4*a(3)*a(2)*(fer(#c,1,0)*fer(#a,2,0)*bos(f,0,1)*bos(#b,0,0)) 8623 8624 -4*a(2)*a(1)*fer(#c,1,0)*fer(#a,1,2)*bos(#b,0,0) 8625 8626 +2*fer(#c,1,0)*fer(#a,1,1)*bos(f,0,0)*bos(#b,0,0)*a(5)*( 8627 8628 -a(5) 8629 8630 +2*a(3)) 8631 8632 +2*fer(#c,1,0)*fer(#a,1,0)*bos(f,3,0)*bos(#b,0,0)*a(2)*( 8633 8634 -a(5) 8635 8636 +2*a(3)) 8637 8638 +fer(#c,1,0)*fer(#a,1,0)*bos(f,0,1)*bos(#b,0,0)*( 8639 8640 2 8641 -a(5) 8642 8643 +2*a(5)*a(3) 8644 8645 2 8646 -4*a(2) ) 8647 8648 +fer(#c,1,0)*fer(#b,2,0)*bos(f,3,0)*bos(#a,0,0)*( 8649 8650 2 8651 -a(5) 8652 8653 +4*a(5)*a(3) 8654 8655 2 8656 -4*a(3) ) 8657 8658 +4*a(3)*a(2)*(fer(#c,1,0)*fer(#b,2,0)*bos(f,0,1)*bos(#a,0,0)) 8659 8660 +2*fer(#c,1,0)*fer(#b,1,0)*bos(f,3,0)*bos(#a,0,0)*a(2)*(a(5) 8661 8662 -2*a(3)) 8663 8664 2 8665 +fer(#c,1,0)*fer(#b,1,0)*bos(f,0,1)*bos(#a,0,0)*(a(5) 8666 8667 -2*a(5)*a(3) 8668 8669 2 8670 +4*a(2) ) 8671 8672 +4*fer(f,2,1)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3) 8673 8674 2 8675 -2*a(3) 8676 8677 2 8678 +a(2) ) 8679 8680 -12*a(3)*a(2)*fer(f,2,1)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,0) 8681 8682 +4*fer(f,2,1)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3) 8683 8684 2 8685 -2*a(3) 8686 8687 2 8688 +a(2) ) 8689 8690 -12*a(3)*a(2)*fer(f,2,1)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,0) 8691 8692 +4*fer(f,2,1)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3) 8693 8694 2 8695 -2*a(3) 8696 8697 2 8698 +a(2) ) 8699 8700 -12*a(3)*a(2)*fer(f,2,1)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,0) 8701 8702 +2*fer(f,2,0)*fer(#a,2,1)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3) 8703 8704 2 8705 -2*a(3) 8706 8707 2 8708 +2*a(2) ) 8709 8710 +2*fer(f,2,0)*fer(#a,2,0)*bos(#c,0,1)*bos(#b,0,0)*a(5)*(a(5) 8711 8712 -2*a(3)) 8713 8714 +4*fer(f,2,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,3,0)*a(2)*( 8715 8716 -a(5) 8717 8718 +2*a(3)) 8719 8720 2 8721 +fer(f,2,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,1)*(a(5) 8722 8723 2 8724 -4*a(3) 8725 8726 2 8727 +4*a(2) ) 8728 8729 +2*fer(f,2,0)*fer(#a,1,1)*bos(#c,0,0)*bos(#b,0,0)*a(2)*( 8730 8731 -a(5) 8732 8733 -4*a(3)) 8734 8735 -4*a(5)*a(2)*fer(f,2,0)*fer(#a,1,0)*bos(#c,0,1)*bos(#b,0,0) 8736 8737 +fer(f,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,3,0)*( 8738 8739 2 8740 -a(5) 8741 8742 +4*a(5)*a(3) 8743 8744 2 8745 -4*a(3) 8746 8747 2 8748 +4*a(2) ) 8749 8750 -8*a(3)*a(2)*fer(f,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,1) 8751 8752 +2*fer(f,2,0)*fer(#b,2,1)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3) 8753 8754 2 8755 -2*a(3) 8756 8757 2 8758 +2*a(2) ) 8759 8760 +4*fer(f,2,0)*fer(#b,2,0)*bos(#c,3,0)*bos(#a,0,0)*a(2)*( 8761 8762 -a(5) 8763 8764 +2*a(3)) 8765 8766 2 8767 +fer(f,2,0)*fer(#b,2,0)*bos(#c,0,1)*bos(#a,0,0)*(a(5) 8768 8769 2 8770 -4*a(3) 8771 8772 2 8773 +4*a(2) ) 8774 8775 +2*fer(f,2,0)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,1)*a(5)*(a(5) 8776 8777 -2*a(3)) 8778 8779 +2*fer(f,2,0)*fer(#b,1,1)*bos(#c,0,0)*bos(#a,0,0)*a(2)*( 8780 8781 -a(5) 8782 8783 -4*a(3)) 8784 8785 +fer(f,2,0)*fer(#b,1,0)*bos(#c,3,0)*bos(#a,0,0)*( 8786 8787 2 8788 -a(5) 8789 8790 +4*a(5)*a(3) 8791 8792 2 8793 -4*a(3) 8794 8795 2 8796 +4*a(2) ) 8797 8798 -8*a(3)*a(2)*fer(f,2,0)*fer(#b,1,0)*bos(#c,0,1)*bos(#a,0,0) 8799 8800 -4*a(5)*a(2)*fer(f,2,0)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,1) 8801 8802 +2*fer(f,2,0)*fer(#c,2,1)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3) 8803 8804 2 8805 -2*a(3) 8806 8807 2 8808 +2*a(2) ) 8809 8810 +2*fer(f,2,0)*fer(#c,2,0)*bos(#b,0,1)*bos(#a,0,0)*a(5)*(a(5) 8811 8812 -2*a(3)) 8813 8814 +4*fer(f,2,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,3,0)*a(2)*( 8815 8816 -a(5) 8817 8818 +2*a(3)) 8819 8820 2 8821 +fer(f,2,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,1)*(a(5) 8822 8823 2 8824 -4*a(3) 8825 8826 2 8827 +4*a(2) ) 8828 8829 +2*fer(f,2,0)*fer(#c,1,1)*bos(#b,0,0)*bos(#a,0,0)*a(2)*( 8830 8831 -a(5) 8832 8833 -4*a(3)) 8834 8835 -4*a(5)*a(2)*fer(f,2,0)*fer(#c,1,0)*bos(#b,0,1)*bos(#a,0,0) 8836 8837 +fer(f,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,3,0)*( 8838 8839 2 8840 -a(5) 8841 8842 +4*a(5)*a(3) 8843 8844 2 8845 -4*a(3) 8846 8847 2 8848 +4*a(2) ) 8849 8850 -8*a(3)*a(2)*fer(f,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,1) 8851 8852 +12*a(3)*a(2)*(fer(f,1,1)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,0)) 8853 8854 +4*fer(f,1,1)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3) 8855 8856 2 8857 -2*a(3) 8858 8859 2 8860 +a(2) ) 8861 8862 +12*a(3)*a(2)*(fer(f,1,1)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,0)) 8863 8864 +4*fer(f,1,1)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3) 8865 8866 2 8867 -2*a(3) 8868 8869 2 8870 +a(2) ) 8871 8872 +12*a(3)*a(2)*(fer(f,1,1)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,0)) 8873 8874 +4*fer(f,1,1)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3) 8875 8876 2 8877 -2*a(3) 8878 8879 2 8880 +a(2) ) 8881 8882 +2*fer(f,1,0)*fer(#a,2,1)*bos(#c,0,0)*bos(#b,0,0)*a(2)*(a(5) 8883 8884 +4*a(3)) 8885 8886 +4*a(5)*a(2)*(fer(f,1,0)*fer(#a,2,0)*bos(#c,0,1)*bos(#b,0,0)) 8887 8888 2 8889 +fer(f,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,3,0)*(a(5) 8890 8891 -4*a(5)*a(3) 8892 8893 2 8894 +4*a(3) 8895 8896 2 8897 -4*a(2) ) 8898 8899 +8*a(3)*a(2)*(fer(f,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,1)) 8900 8901 +2*fer(f,1,0)*fer(#a,1,1)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3) 8902 8903 2 8904 -2*a(3) 8905 8906 2 8907 +2*a(2) ) 8908 8909 +2*fer(f,1,0)*fer(#a,1,0)*bos(#c,0,1)*bos(#b,0,0)*a(5)*(a(5) 8910 8911 -2*a(3)) 8912 8913 +4*fer(f,1,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,3,0)*a(2)*( 8914 8915 -a(5) 8916 8917 +2*a(3)) 8918 8919 2 8920 +fer(f,1,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,1)*(a(5) 8921 8922 2 8923 -4*a(3) 8924 8925 2 8926 +4*a(2) ) 8927 8928 +2*fer(f,1,0)*fer(#b,2,1)*bos(#c,0,0)*bos(#a,0,0)*a(2)*(a(5) 8929 8930 +4*a(3)) 8931 8932 2 8933 +fer(f,1,0)*fer(#b,2,0)*bos(#c,3,0)*bos(#a,0,0)*(a(5) 8934 8935 -4*a(5)*a(3) 8936 8937 2 8938 +4*a(3) 8939 8940 2 8941 -4*a(2) ) 8942 8943 +8*a(3)*a(2)*(fer(f,1,0)*fer(#b,2,0)*bos(#c,0,1)*bos(#a,0,0)) 8944 8945 +4*a(5)*a(2)*(fer(f,1,0)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,1)) 8946 8947 +2*fer(f,1,0)*fer(#b,1,1)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3) 8948 8949 2 8950 -2*a(3) 8951 8952 2 8953 +2*a(2) ) 8954 8955 +4*fer(f,1,0)*fer(#b,1,0)*bos(#c,3,0)*bos(#a,0,0)*a(2)*( 8956 8957 -a(5) 8958 8959 +2*a(3)) 8960 8961 2 8962 +fer(f,1,0)*fer(#b,1,0)*bos(#c,0,1)*bos(#a,0,0)*(a(5) 8963 8964 2 8965 -4*a(3) 8966 8967 2 8968 +4*a(2) ) 8969 8970 +2*fer(f,1,0)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,1)*a(5)*(a(5) 8971 8972 -2*a(3)) 8973 8974 +2*fer(f,1,0)*fer(#c,2,1)*bos(#b,0,0)*bos(#a,0,0)*a(2)*(a(5) 8975 8976 +4*a(3)) 8977 8978 +4*a(5)*a(2)*(fer(f,1,0)*fer(#c,2,0)*bos(#b,0,1)*bos(#a,0,0)) 8979 8980 2 8981 +fer(f,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,3,0)*(a(5) 8982 8983 -4*a(5)*a(3) 8984 8985 2 8986 +4*a(3) 8987 8988 2 8989 -4*a(2) ) 8990 8991 +8*a(3)*a(2)*(fer(f,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,1)) 8992 8993 +2*fer(f,1,0)*fer(#c,1,1)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3) 8994 8995 2 8996 -2*a(3) 8997 8998 2 8999 +2*a(2) ) 9000 9001 +2*fer(f,1,0)*fer(#c,1,0)*bos(#b,0,1)*bos(#a,0,0)*a(5)*(a(5) 9002 9003 -2*a(3)) 9004 9005 +4*fer(f,1,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,3,0)*a(2)*( 9006 9007 -a(5) 9008 9009 +2*a(3)) 9010 9011 2 9012 +fer(f,1,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,1)*(a(5) 9013 9014 2 9015 -4*a(3) 9016 9017 2 9018 +4*a(2) ))/4 9019 9020 9021% we now check jjacob on the susy-divergence behaviour w.r. to the test 9022% superfunction !#a; 9023 9024az:=war(jjacob,!#a); 9025 9026 9027az := {2*a(1)*(a(5) 9028 9029 -a(3)), 9030 9031 a(1)*(a(5) 9032 9033 -a(3)), 9034 9035 9036 -2*a(2)*a(1), 9037 9038 a(1)*( 9039 9040 -a(5) 9041 9042 +a(3)), 9043 9044 9045 -a(2)*a(1), 9046 9047 2*a(1)*( 9048 9049 -a(5) 9050 9051 +a(3)), 9052 9053 a(2)*a(1), 9054 9055 2*a(2)*a(1), 9056 9057 a(2)*( 9058 9059 -a(5) 9060 9061 +2*a(3)), 9062 9063 a(2)*(a(5) 9064 9065 -2*a(3)), 9066 9067 a(5)*a(2), 9068 9069 9070 2 9071 -2*a(2) , 9072 9073 9074 -a(5)*a(2), 9075 9076 2 9077 2*a(2) , 9078 9079 2*a(5)*a(2), 9080 9081 a(5)*a(2), 9082 9083 9084 -a(5)*a(2), 9085 9086 9087 -2*a(5)*a(2), 9088 9089 2*a(2)*a(1), 9090 9091 a(1)*(a(5) 9092 9093 -a(3)), 9094 9095 2*a(2)*a(1), 9096 9097 9098 -a(5)*a(2), 9099 9100 2*a(2)*a(1), 9101 9102 (a(2)*(a(5) 9103 9104 -2*a(3)))/2, 9105 9106 2 9107 (a(5) 9108 9109 -3*a(5)*a(3) 9110 9111 2 9112 +2*a(3) 9113 9114 2 9115 +4*a(2) )/2, 9116 9117 a(1)*( 9118 9119 -a(5) 9120 9121 +a(3)), 9122 9123 a(5)*a(2), 9124 9125 a(1)*( 9126 9127 -a(5) 9128 9129 +a(3)), 9130 9131 2*a(2)*a(1), 9132 9133 a(5)*a(2), 9134 9135 2*a(2)*a(1), 9136 9137 a(1)*(a(5) 9138 9139 -a(3)), 9140 9141 9142 -a(5)*a(2), 9143 9144 2*a(2)*a(1), 9145 9146 (a(2)*(a(5) 9147 9148 -2*a(3)))/2, 9149 9150 2 9151 (a(5) 9152 9153 -3*a(5)*a(3) 9154 9155 2 9156 +2*a(3) 9157 9158 2 9159 +4*a(2) )/2, 9160 9161 2 9162 a(2) , 9163 9164 a(2)*(a(5) 9165 9166 -a(3)), 9167 9168 9169 2 9170 -a(2) , 9171 9172 a(2)*( 9173 9174 -a(5) 9175 9176 +a(3)), 9177 9178 ( 9179 9180 2 9181 -a(5) 9182 9183 +3*a(5)*a(3) 9184 9185 2 9186 -2*a(3) 9187 9188 2 9189 +2*a(2) )/2, 9190 9191 a(5)*a(2), 9192 9193 (a(2)*(3*a(5) 9194 9195 -4*a(3)))/2, 9196 9197 2 9198 (a(5) 9199 9200 -3*a(5)*a(3) 9201 9202 2 9203 +2*a(3) 9204 9205 2 9206 -2*a(2) )/2, 9207 9208 9209 -a(5)*a(2), 9210 9211 (a(2)*( 9212 9213 -3*a(5) 9214 9215 +4*a(3)))/2, 9216 9217 a(2)*( 9218 9219 -a(5) 9220 9221 +a(3)), 9222 9223 2 9224 a(2) , 9225 9226 a(2)*(a(5) 9227 9228 -a(3)), 9229 9230 9231 2 9232 -a(2) , 9233 9234 9235 -a(5)*a(2), 9236 9237 (a(2)*( 9238 9239 -3*a(5) 9240 9241 +4*a(3)))/2, 9242 9243 ( 9244 9245 2 9246 -a(5) 9247 9248 +3*a(5)*a(3) 9249 9250 2 9251 -2*a(3) 9252 9253 2 9254 +2*a(2) )/2, 9255 9256 a(5)*a(2), 9257 9258 (a(2)*(3*a(5) 9259 9260 -4*a(3)))/2, 9261 9262 2 9263 (a(5) 9264 9265 -3*a(5)*a(3) 9266 9267 2 9268 +2*a(3) 9269 9270 2 9271 -2*a(2) )/2} 9272 9273as:=groesolve(az); 9274 9275 9276as := {{a(1)=0,a(3)=a(5)/2,a(2)=0}, 9277 9278 {a(3)=a(5),a(2)=0,a(1)=arbcomplex(2)}} 9279 9280array ew(3); 9281 9282 9283 9284for k:=1:2 do ew(k):=part(as,k); 9285 9286 9287 9288% as we see we have two different solutions 9289% first give us classical realizations of the Virasoro algebra 9290% (without the center term) which is 9291 9292sub(ew(1),vira); 9293 9294 9295(a(5)*bos(f,0,1) 9296 9297 +2*a(5)*(bos(f,0,0)*d(1)))/2 9298 9299 9300 9301% the second solution give us desired susy generalizations of 9302% Virasoro algebra 9303 9304sub(ew(2),vira); 9305 9306 9307(2*a(5)*bos(f,0,1) 9308 9309 +2*a(5)*(bos(f,0,0)*d(1)) 9310 9311 -a(5)*fer(f,2,0)*der(2) 9312 9313 -a(5)*fer(f,1,0)*der(1) 9314 9315 +2*arbcomplex(2)*(d(1)*der(1)*der(2)))/2 9316 9317 9318% the coefficient "a" could be absorbed by redefinations of 9319% bos(f,0,0) 9320% we check that previous result satisfies the antisymmetric requirements 9321 9322ws + cp(ws); 9323 9324 9325*** d not found 9326 9327*** der not found 9328 9329*** del not found 9330 93310 9332 9333 9334clearrules trad; 9335 9336 9337let chiral1 ; 9338 9339 9340 9341% We check that for chiral1 realization the following operator 9342vira:=der(3)*d(1)+bos(j,0,1)+bos(j,0,0)*d(1)+ 9343 fer(j,1,0)*der(2)+fer(j,2,0)*der(1); 9344 9345 9346vira := bos(j,0,1) 9347 9348 +bos(j,0,0)*d(1) 9349 9350 +fer(j,2,0)*der(1) 9351 9352 +fer(j,1,0)*der(2) 9353 9354 +d(1)*der(3) 9355 9356% satisfy the Jacobi identity; 9357jjacob:=fjacob(vira,j); 9358 9359 9360jjacob := (2*bos(#c,3,2)*bos(#b,0,0)*bos(#a,0,0) 9361 9362 +2*bos(#c,3,1)*bos(#b,0,1)*bos(#a,0,0) 9363 9364 +2*bos(#c,0,1)*bos(#b,0,0)*bos(#a,3,1) 9365 9366 +2*bos(#c,0,0)*bos(#b,3,2)*bos(#a,0,0) 9367 9368 +2*bos(#c,0,0)*bos(#b,3,1)*bos(#a,0,1) 9369 9370 +2*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,2) 9371 9372 +6*bos(j,0,2)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,0) 9373 9374 +6*bos(j,0,1)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,0) 9375 9376 +6*bos(j,0,1)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,0) 9377 9378 +6*bos(j,0,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,1) 9379 9380 +2*bos(j,0,0)*bos(#c,0,2)*bos(#b,0,0)*bos(#a,0,0) 9381 9382 +2*bos(j,0,0)*bos(#c,0,1)*bos(#b,0,1)*bos(#a,0,0) 9383 9384 +2*bos(j,0,0)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,1) 9385 9386 +2*bos(j,0,0)*bos(#c,0,0)*bos(#b,0,2)*bos(#a,0,0) 9387 9388 +2*bos(j,0,0)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,1) 9389 9390 +2*bos(j,0,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,2) 9391 9392 -2*fer(#b,2,2)*fer(#a,1,0)*bos(#c,0,0) 9393 9394 +2*fer(#b,2,1)*fer(#a,1,0)*bos(j,0,0)*bos(#c,0,0) 9395 9396 -fer(#b,2,0)*fer(#a,1,0)*bos(j,3,0)*bos(#c,0,0) 9397 9398 +fer(#b,2,0)*fer(#a,1,0)*bos(j,0,1)*bos(#c,0,0) 9399 9400 +2*fer(#b,1,2)*fer(#a,2,0)*bos(#c,0,0) 9401 9402 +2*fer(#b,1,1)*fer(#a,2,0)*bos(j,0,0)*bos(#c,0,0) 9403 9404 +fer(#b,1,0)*fer(#a,2,0)*bos(j,3,0)*bos(#c,0,0) 9405 9406 +fer(#b,1,0)*fer(#a,2,0)*bos(j,0,1)*bos(#c,0,0) 9407 9408 -2*fer(#c,2,2)*fer(#b,1,0)*bos(#a,0,0) 9409 9410 +2*fer(#c,2,1)*fer(#b,1,0)*bos(j,0,0)*bos(#a,0,0) 9411 9412 -2*fer(#c,2,0)*fer(#a,1,2)*bos(#b,0,0) 9413 9414 -2*fer(#c,2,0)*fer(#a,1,1)*bos(j,0,0)*bos(#b,0,0) 9415 9416 -fer(#c,2,0)*fer(#a,1,0)*bos(j,3,0)*bos(#b,0,0) 9417 9418 -fer(#c,2,0)*fer(#a,1,0)*bos(j,0,1)*bos(#b,0,0) 9419 9420 -fer(#c,2,0)*fer(#b,1,0)*bos(j,3,0)*bos(#a,0,0) 9421 9422 +fer(#c,2,0)*fer(#b,1,0)*bos(j,0,1)*bos(#a,0,0) 9423 9424 +2*fer(#c,1,2)*fer(#b,2,0)*bos(#a,0,0) 9425 9426 +2*fer(#c,1,1)*fer(#b,2,0)*bos(j,0,0)*bos(#a,0,0) 9427 9428 +2*fer(#c,1,0)*fer(#a,2,2)*bos(#b,0,0) 9429 9430 -2*fer(#c,1,0)*fer(#a,2,1)*bos(j,0,0)*bos(#b,0,0) 9431 9432 +fer(#c,1,0)*fer(#a,2,0)*bos(j,3,0)*bos(#b,0,0) 9433 9434 -fer(#c,1,0)*fer(#a,2,0)*bos(j,0,1)*bos(#b,0,0) 9435 9436 +fer(#c,1,0)*fer(#b,2,0)*bos(j,3,0)*bos(#a,0,0) 9437 9438 +fer(#c,1,0)*fer(#b,2,0)*bos(j,0,1)*bos(#a,0,0) 9439 9440 +4*fer(j,2,1)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,0) 9441 9442 +4*fer(j,2,1)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,0) 9443 9444 +4*fer(j,2,1)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,0) 9445 9446 +2*fer(j,2,0)*fer(#a,1,1)*bos(#c,0,0)*bos(#b,0,0) 9447 9448 +2*fer(j,2,0)*fer(#a,1,0)*bos(#c,0,1)*bos(#b,0,0) 9449 9450 +fer(j,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,3,0) 9451 9452 +3*fer(j,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,1) 9453 9454 +2*fer(j,2,0)*fer(#b,1,1)*bos(#c,0,0)*bos(#a,0,0) 9455 9456 +fer(j,2,0)*fer(#b,1,0)*bos(#c,3,0)*bos(#a,0,0) 9457 9458 +3*fer(j,2,0)*fer(#b,1,0)*bos(#c,0,1)*bos(#a,0,0) 9459 9460 +2*fer(j,2,0)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,1) 9461 9462 +2*fer(j,2,0)*fer(#c,1,1)*bos(#b,0,0)*bos(#a,0,0) 9463 9464 +2*fer(j,2,0)*fer(#c,1,0)*bos(#b,0,1)*bos(#a,0,0) 9465 9466 +fer(j,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,3,0) 9467 9468 +3*fer(j,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,1) 9469 9470 +4*fer(j,1,1)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,0) 9471 9472 +4*fer(j,1,1)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,0) 9473 9474 +4*fer(j,1,1)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,0) 9475 9476 +2*fer(j,1,0)*fer(#a,2,1)*bos(#c,0,0)*bos(#b,0,0) 9477 9478 +2*fer(j,1,0)*fer(#a,2,0)*bos(#c,0,1)*bos(#b,0,0) 9479 9480 -fer(j,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,3,0) 9481 9482 +3*fer(j,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,1) 9483 9484 +2*fer(j,1,0)*fer(#b,2,1)*bos(#c,0,0)*bos(#a,0,0) 9485 9486 -fer(j,1,0)*fer(#b,2,0)*bos(#c,3,0)*bos(#a,0,0) 9487 9488 +3*fer(j,1,0)*fer(#b,2,0)*bos(#c,0,1)*bos(#a,0,0) 9489 9490 +2*fer(j,1,0)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,1) 9491 9492 +2*fer(j,1,0)*fer(#c,2,1)*bos(#b,0,0)*bos(#a,0,0) 9493 9494 +2*fer(j,1,0)*fer(#c,2,0)*bos(#b,0,1)*bos(#a,0,0) 9495 9496 -fer(j,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,3,0) 9497 9498 +3*fer(j,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,1))/2 9499 9500 9501az:=war(jjacob,!#a); 9502 9503 9504az := 0 9505 9506 9507%24 superintegration 9508clearrules chiral1; 9509 9510 9511let trad; 9512 9513 9514 9515 9516as:=s_int(0,bos(f,3,0)^2-bos(f,0,1)^2,{f}); 9517 9518 9519as := 9520 9521 -bos(f,0,1)*bos(f,0,0) 9522 9523 2 9524 +d(-3)*bos(f,3,0) 9525 9526 +d(-3)*bos(f,0,2)*bos(f,0,0) 9527 9528as1:=sub(d(-3)=0,ws); 9529 9530 9531as1 := 9532 9533 -bos(f,0,1)*bos(f,0,0) 9534 9535as2:=sub(d(-3)=1,as-as1); 9536 9537 9538 2 9539as2 := bos(f,3,0) 9540 9541 +bos(f,0,2)*bos(f,0,0) 9542 9543as3:=s_int(1,as2,{f}); 9544 9545 9546as3 := fer(f,2,0)*bos(f,3,0) 9547 9548 +del(-1)*bos(f,0,2)*bos(f,0,0) 9549 9550 -del(-1)*fer(f,2,1)*fer(f,2,0) 9551 9552as4:=sub(del(-1)=0,ws); 9553 9554 9555as4 := fer(f,2,0)*bos(f,3,0) 9556 9557as4:=sub(del(-1)=1,as3-as4); 9558 9559 9560as4 := bos(f,0,2)*bos(f,0,0) 9561 9562 -fer(f,2,1)*fer(f,2,0) 9563 9564as5:=s_int(2,as4,{f}); 9565 9566 9567as5 := fer(f,2,1)*bos(f,0,0) 9568 9569 9570end; 9571 9572Tested on x86_64-pc-windows CSL 9573Time (counter 1): 4296 ms plus GC time: 96 ms 9574 9575End of Lisp run after 4.29+0.14 seconds 9576real 4.79 9577user 0.03 9578sys 0.06 9579