BeginPackage["KnotTheory`A2Invariant4Knots`", {"KnotTheory`"}]
Message[KnotTheory::loading, "A2Invariant4Knots`"]

Begin["`Private`"]

KOs = Select[AllKnots[], (Crossings[#] <= 10)&]

Is = {1 + q^(-2) + q^2, -q^(-14) - q^(-12) + q^(-8) + 2/q^6 + q^(-4) + q^(-2), 
 -1 + q^(-8) + q^(-6) + q^6 + q^8, -q^(-22) - q^(-20) - q^(-18) + q^(-14) + 
  q^(-12) + 2/q^10 + q^(-8) + q^(-6), -q^(-20) - q^(-18) + q^(-12) + 
  q^(-10) + q^(-8) + q^(-6) + q^(-2), q^(-14) + q^(-12) - q^(-6) - q^(-4) + 
  q^2 + q^6 + q^8, 1 + q^(-16) - q^(-8) - q^(-4) + q^(-2) + q^2 + q^4, 
 1 - q^(-10) + 2/q^2 + 2*q^2 - q^10, -q^(-30) - q^(-28) - q^(-26) + q^(-18) + 
  q^(-16) + 2/q^14 + q^(-12) + q^(-10), -q^(-26) - q^(-24) + q^(-18) + 
  q^(-16) + q^(-8) + q^(-6) + q^(-2), q^6 + q^10 + q^14 + 2*q^16 + q^18 + 
  q^20 - q^22 - q^24 - q^26 - q^28, q^2 - q^4 + q^8 + q^10 + 2*q^12 + q^14 + 
  q^16 - q^20 - q^24 - q^26, -q^(-28) - q^(-22) - q^(-18) + q^(-16) + 
  q^(-14) + q^(-12) + 2/q^10 + q^(-6), -q^(-20) - q^(-18) + q^(-16) + 
  q^(-12) + q^(-10) + q^(-6) - q^(-4) + q^(-2) + q^4, 
 -q^(-10) + q^(-8) + q^(-6) + 2/q^2 + q^2 - q^4 - q^6 - q^10 + q^12 + q^14, 
 q^(-20) + q^(-18) - q^(-12) - q^(-10) + q^2 + q^6 + q^8, 
 1 + q^(-24) - q^(-18) - q^(-16) - q^(-12) + q^(-10) + q^(-6) + q^(-4) + 
  q^(-2), -1 + q^(-14) + q^(-12) + q^(-8) - q^(-4) - q^4 + q^8 + q^12 + q^14, 
 -1 + q^(-16) + q^(-10) + q^(-6) - q^(-4) - q^(-2) - q^2 + q^4 + q^6 + q^8 + 
  q^10, 1 + q^2 + 2*q^4 + 2*q^6 - 3*q^12 - q^14 - q^16 + q^20 + q^24, 
 1 + q^(-22) + q^(-16) - q^(-14) - q^(-10) - q^(-8) - q^(-4) + 2/q^2 + q^2 + 
  q^4, 1 - q^(-6) + 2*q^2 + 2*q^6 + q^10 - q^14 - q^18, 
 1 - q^(-10) - q^(-4) + 2/q^2 + 2*q^2 + q^4 + q^8 - q^10 - q^16, 
 -1 + q^(-12) + q^(-8) - q^(-4) + q^(-2) + q^2 - q^4 + q^8 + q^12, 
 -q^(-6) - q^(-2) + 2*q^2 + q^4 + 4*q^6 + q^8 + q^10 - q^12 - 2*q^14 - q^18, 
 q^(-22) + q^(-16) - 2/q^14 - q^(-12) - q^(-10) + 2/q^6 + 2/q^2 + q^4, 
 -1 + q^(-14) + q^(-12) - q^(-10) + q^(-8) - q^(-4) + q^(-2) + q^2 - q^4 + 
  q^8 - q^10 + q^12 + q^14, -1 - q^(-10) + q^(-8) + q^(-6) - q^(-4) + 
  q^(-2) + q^2 + q^4 + q^6 + 2*q^8 - q^10 - q^16, 
 q^(-22) - q^(-20) - q^(-18) + q^(-16) - q^(-14) + q^(-12) + q^(-6) - 
  q^(-4) + 2/q^2 + q^4, q^(-32) + q^(-30) - 2/q^28 - q^(-26) - 2/q^24 - 
  2/q^22 + q^(-20) + 3/q^16 + q^(-14) + q^(-12) + 2/q^10 - q^(-8) + q^(-6), 
 1 - q^(-18) + q^(-16) - q^(-14) + q^(-10) - q^(-8) + 2/q^6 - q^(-4) + 
  2/q^2 + q^4 - q^6, -1 + q^(-12) - q^(-10) + q^(-8) - q^(-4) + 2/q^2 + 
  2*q^2 - q^4 + q^8 - q^10 + q^12, 1 + q^(-12) - 2/q^10 - q^(-6) - q^(-4) + 
  4/q^2 + 4*q^2 - q^4 - q^6 - 2*q^10 + q^12, q^10 + q^12 + 2*q^14 + 2*q^16 + 
  2*q^18 - q^22 - 2*q^24 - 2*q^26 - q^28 + q^32, 
 -q^(-16) - q^(-14) - q^(-12) + 2/q^8 + 2/q^6 + 2/q^4 + q^(-2) - q^4, 
 q^(-22) - 2/q^14 - q^(-12) - q^(-10) + q^(-8) + 2/q^6 + q^(-4) + 2/q^2, 
 -q^(-38) - q^(-36) - q^(-34) + q^(-22) + q^(-20) + 2/q^18 + q^(-16) + 
  q^(-14), -q^(-32) - q^(-30) + q^(-24) + q^(-22) + q^(-8) + q^(-6) + q^(-2), 
 q^10 + q^14 + q^18 + q^20 + q^22 + 2*q^24 - q^30 - q^32 - q^34 - q^36, 
 -q^(-34) - q^(-32) - q^(-30) - q^(-28) + q^(-26) + q^(-24) + q^(-22) + 
  q^(-20) + q^(-16) + q^(-10) + q^(-6), q^2 - q^4 + q^8 + q^12 + q^14 + 
  q^16 + q^18 + q^22 - q^26 - q^30 - q^32, -q^(-36) - 2/q^26 - q^(-22) + 
  q^(-20) + 2/q^18 + q^(-16) + 2/q^14 + q^(-10), 
 -q^(-34) - q^(-28) + q^(-26) - q^(-18) + q^(-16) + q^(-12) + 2/q^10 + 
  q^(-6), -q^(-20) - q^(-18) + q^(-16) + q^(-12) + 2/q^10 + q^(-6) - q^(-4) - 
  q^2 + q^4 + q^10, -q^(-36) - q^(-32) - q^(-30) - q^(-26) + 2/q^24 + 
  q^(-20) + q^(-18) + 2/q^14 + q^(-10), q^6 - q^8 + q^10 + 2*q^16 + 2*q^20 + 
  q^22 + q^24 + q^26 - 2*q^28 - q^30 - q^32 - q^34, 
 1 - q^8 + 2*q^10 + 2*q^14 + q^16 + q^20 - q^22 - q^26 - q^28, 
 -q^(-26) - q^(-24) + q^(-22) + q^(-18) + 2/q^16 - q^(-14) - q^(-10) + 
  q^(-6) - q^(-4) + 2/q^2 + q^4, q^6 - q^8 + q^10 + 3*q^16 + q^18 + 2*q^20 - 
  q^24 - 2*q^28 - q^34, -q^(-10) + q^(-8) + q^(-6) - q^(-4) + 2/q^2 + q^2 + 
  q^4 + q^8 - 2*q^10 - q^12 - q^16 + q^18 + q^20, 
 q^(-4) + 2*q^2 - 2*q^4 + 2*q^12 + 2*q^16 - q^20 + q^22 - q^24 - q^26, 
 q^10 + 3*q^14 + q^16 + 2*q^18 + q^20 - 2*q^22 - 3*q^26 + q^34 - q^36, 
 -q^(-18) + q^(-16) + q^(-12) + 2/q^10 - q^(-8) + q^(-6) - 2/q^4 - q^2 + 
  q^4 + q^8 + q^10, -q^(-34) - 2/q^28 + q^(-26) + q^(-20) - q^(-18) + 
  2/q^16 + q^(-12) + 2/q^10 - q^(-8) + q^(-6), 
 -1 - q^(-16) + q^(-14) + q^(-12) - q^(-10) + 2/q^8 + q^(-2) + q^2 - 2*q^4 + 
  q^8 - q^10 + q^12 + q^14, 1 - q^(-28) + q^(-24) - q^(-22) + q^(-20) - 
  q^(-18) + q^(-14) - q^(-12) + 2/q^10 - q^(-8) + q^(-6) + q^(-4), 
 -1 + q^(-4) - q^(-2) + 2*q^2 - q^4 + 2*q^6 + q^8 + q^12 - q^14 + 2*q^16 - 
  q^20 + q^22 - q^24 - q^26, -1 + q^(-10) + q^(-8) + q^(-4) - 2/q^2 - q^4 + 
  3*q^6 + 2*q^10 - q^14 + q^16 - q^18, -q^(-34) + q^(-32) + q^(-30) - 
  2/q^28 - 2/q^24 - q^(-22) + q^(-20) + 3/q^16 + q^(-12) + 2/q^10 - q^(-8) + 
  q^(-6), -2 - q^(-16) - q^(-14) - q^(-10) + 3/q^8 + 2/q^6 + q^(-4) + 2/q^2 + 
  q^2 - 2*q^4 + q^8 - q^10 + q^12, -q^(-26) - q^(-24) + 2/q^22 + q^(-18) + 
  2/q^16 - 2/q^14 - 2/q^10 + q^(-6) - q^(-4) + 3/q^2 + q^4, 
 1 - q^(-6) + q^(-4) + 3*q^2 - q^4 + 2*q^6 - q^8 - 2*q^14 + q^16 - q^18 + 
  q^22, -1 - q^(-16) + q^(-12) - q^(-10) + 2/q^8 + 2/q^2 + 2*q^2 - 2*q^4 + 
  q^8 - q^10 + q^12, q^(-22) - q^(-18) + q^(-16) - 3/q^14 - q^(-12) + 4/q^6 + 
  3/q^2 - q^2 + q^4 - q^6, -q^(-18) + q^(-16) - 2/q^14 - q^(-12) + 2/q^10 + 
  4/q^6 + q^(-2) - 2*q^2 + q^4 - q^6 + q^10, -3 - q^(-16) + q^(-12) - 
  q^(-10) + 3/q^8 + q^(-6) + q^(-2) + q^2 - 2*q^4 + q^6 + 2*q^8 - q^10 + 
  q^12, q^(-22) - q^(-20) - 2/q^18 + q^(-16) - 2/q^14 + q^(-12) + q^(-10) + 
  3/q^6 - q^(-4) + 3/q^2 - q^2 + q^4 - q^6, 1 - q^(-6) + 2/q^4 + 3*q^2 - 
  2*q^4 + 2*q^6 - 2*q^8 - 2*q^14 + 2*q^16 - q^18 + q^22, 
 -1 - q^(-16) + q^(-12) - 2/q^10 + 2/q^8 + 3/q^2 + 3*q^2 - 2*q^4 + q^8 - 
  2*q^10 + q^12, -2 - q^(-16) + q^(-14) + 2/q^12 - 2/q^10 + 2/q^8 - q^(-6) - 
  q^(-4) + 2/q^2 + 3*q^2 - 2*q^4 + q^6 + 2*q^8 - 2*q^10 + q^12, 
 -q^(-32) - q^(-30) - 2/q^26 - q^(-24) + q^(-22) + q^(-20) + 3/q^18 + 
  2/q^16 + q^(-14) - q^(-10) + q^(-8) - q^(-4) + q^(-2), 
 1 + q^4 + q^6 - q^8 + q^10 - 2*q^12 + q^14 + q^16 + q^18 + 2*q^20 - q^22 - 
  q^26 - q^28, -3 - q^(-16) + q^(-14) + q^(-12) - q^(-10) + 3/q^8 + q^(-6) - 
  2*q^4 + q^6 + 2*q^8 - q^10 + q^12 + q^14, -q^(-34) + q^(-32) + q^(-30) - 
  3/q^28 - 2/q^24 - q^(-22) + 2/q^20 + 4/q^16 + q^(-12) + 2/q^10 - 2/q^8 + 
  q^(-6), -1 + q^(-4) - q^(-2) + 3*q^2 - q^4 + 2*q^6 + q^8 - q^10 + q^12 - 
  2*q^14 + 2*q^16 - q^20 + 2*q^22 - q^24 - q^26, 
 1 + q^(-22) - q^(-20) - 2/q^18 + 3/q^16 - q^(-14) + 2/q^12 + q^(-10) - 
  3/q^8 + q^(-6) - 4/q^4 + 3/q^2 + 3*q^4 - q^6, 
 q^(-20) + q^(-18) - 2/q^16 - q^(-12) - 2/q^10 + 2/q^8 + 2/q^4 + q^(-2) + 
  2*q^2 - 2*q^4 + q^6 + q^8 - q^10, -1 + q^(-10) + q^(-8) + q^(-6) - q^(-2) - 
  q^2 + q^6 + q^8 + q^10, 1 + q^2 + q^4 + q^6 - 2*q^12 + q^18 + q^20 - q^26, 
 -1 - q^(-16) + 2/q^8 + q^(-6) + q^(-4) - q^4 + q^6 + q^8, 
 -q^(-26) - q^(-24) + q^(-22) + q^(-18) + q^(-16) - q^(-14) - q^(-10) + 
  q^(-8) + q^(-6) + 2/q^2, 2 + q^(-20) + q^(-18) - q^(-12) - q^(-10) - 
  q^(-8) - q^(-6) + q^(-2) + 2*q^2, 2 - q^(-6) + q^(-4) + q^(-2) + 2*q^2 - 
  q^4 + q^6 - 2*q^8 - q^12 - q^14 + q^16 + q^20, 
 -1 + q^(-4) - q^(-2) + q^2 - q^4 + 2*q^6 + q^8 + 2*q^10 + 2*q^12 + q^16 - 
  2*q^18 - 2*q^20, q^6 - q^8 + q^10 + q^14 + 3*q^16 + q^18 + 2*q^20 - q^22 - 
  q^24 - q^26 - 2*q^28, q^(-26) + q^(-24) - q^(-18) - q^(-16) + q^2 + q^6 + 
  q^8, q^(-32) - q^(-26) - q^(-24) - q^(-22) - q^(-20) + q^(-18) + q^(-14) + 
  q^(-10) + q^(-8) + q^(-6) + q^(-4), q^(-20) + q^(-18) + q^(-14) - q^(-10) - 
  q^(-6) - q^(-4) + q^2 - q^4 + q^8 + q^12 + q^14, 
 q^(-16) + q^(-10) + q^(-6) - q^2 - q^4 - q^6 - q^8 + q^10 + q^12 + q^14 + 
  q^16, -q^(-2) + q^4 + 2*q^6 + q^8 + 2*q^10 - q^12 + q^14 - q^22 - q^26, 
 1 + q^(-30) - q^(-22) + q^(-20) - q^(-18) - q^(-14) - 2/q^12 + q^(-10) + 
  2/q^6 + q^(-4) + q^(-2), q^(-28) + q^(-22) - 2/q^20 - q^(-18) - q^(-14) + 
  q^(-12) + q^(-8) + q^(-6) - q^(-4) + 2/q^2 + q^4, 
 1 + q^(-24) + q^(-14) - q^(-12) - q^(-8) - q^(-6) + q^2 + q^4 + q^6, 
 q^(-8) + q^(-4) + q^2 - q^4 + 2*q^6 - q^8 - q^12 - q^14 + q^16 + q^20, 
 -q^(-10) + q^(-8) + q^(-6) - q^(-4) + 2/q^2 - q^6 + q^8 + q^12 + 2*q^14 - 
  q^16 - q^22, -1 + q^(-22) + 2/q^16 - q^(-14) - q^(-8) + q^(-6) - 2/q^4 - 
  q^2 + 2*q^4 + q^6 + q^8 + q^10, -q^(-6) + 2*q^2 - q^4 + 2*q^6 + q^8 + 
  q^10 + 2*q^12 - q^14 + q^16 - q^18 - q^20 - q^24, 
 -2 + q^(-20) + q^(-18) - q^(-16) + q^(-14) - 2/q^10 + 2/q^8 + q^2 - 2*q^4 + 
  q^6 + 2*q^8 - q^10 + q^12 + q^14, 1 + q^(-30) - q^(-28) - 2/q^22 + 
  q^(-20) - 2/q^18 + q^(-16) + q^(-14) + 3/q^10 - q^(-8) + q^(-6), 
 1 - q^(-12) + q^(-4) - q^(-2) + q^2 + q^4 + 3*q^6 + q^10 - q^12 - q^14 - 
  q^18, 1 + q^(-10) + 2/q^4 + q^2 - 2*q^4 - 2*q^8 - q^14 + 2*q^16 + q^22, 
 -1 - q^(-14) - q^(-10) + q^(-8) + q^(-6) + 2/q^2 + 2*q^2 + q^6 + q^8 - 
  q^10 - q^14, q^(-22) - q^(-20) - q^(-18) + 2/q^16 - q^(-14) + q^(-12) + 
  q^(-10) - q^(-8) + q^(-6) - 2/q^4 + q^(-2) - q^2 + 2*q^4 + q^10, 
 2 - q^(-18) + q^(-16) + q^(-10) - 2/q^8 + q^(-6) - q^(-4) + q^(-2) + 2*q^4 - 
  q^12, 1 + q^(-28) + q^(-22) - q^(-20) - q^(-14) - q^(-10) - q^(-4) + 
  2/q^2 + q^2 + q^4, 1 + q^(-30) - 2/q^22 - 2/q^18 + q^(-14) + 3/q^10 + 
  q^(-6), -1 + q^(-12) + q^(-8) + q^(-6) - q^(-4) + 2/q^2 - q^4 - 2*q^6 + 
  q^8 - q^10 + q^12 + q^14 + q^18, -q^(-6) + q^(-4) + 2*q^2 - 2*q^4 + 2*q^6 + 
  q^10 + 2*q^12 - q^14 + 2*q^16 - q^18 - q^20 - q^24, 
 q^(-28) + 2/q^22 - 2/q^20 - q^(-18) - 2/q^14 + q^(-12) - q^(-10) + q^(-8) + 
  q^(-6) - q^(-4) + 3/q^2 + q^4, 1 + q^(-30) - q^(-28) + q^(-26) + q^(-24) - 
  2/q^22 + q^(-20) - 3/q^18 - q^(-12) + 3/q^10 - q^(-8) + 2/q^6 + q^(-4), 
 -1 + q^(-12) - q^(-10) + q^(-8) + q^(-6) - q^(-4) + 3/q^2 + q^2 - q^4 - 
  2*q^6 + q^8 - 2*q^10 + q^12 + q^14 + q^18, -q^(-24) + q^(-22) - q^(-20) - 
  q^(-18) + 2/q^16 - 2/q^14 + 2/q^12 + 2/q^6 - 2/q^4 + 3/q^2 + q^4 - q^6, 
 -1 - q^(-10) + q^(-8) + q^(-6) - 2/q^4 + q^(-2) + 2*q^4 + q^6 + 3*q^8 + 
  q^14 - 2*q^16 - q^22, q^(-22) - q^(-18) + 2/q^16 - q^(-14) + q^(-12) + 
  q^(-10) - 2/q^8 + q^(-6) - 3/q^4 + q^(-2) - q^2 + 2*q^4 + q^8 + q^10, 
 -1 + q^(-28) - q^(-26) - q^(-24) + 2/q^22 - 2/q^20 + q^(-16) - 2/q^14 + 
  q^(-12) - q^(-10) + 2/q^8 + 2/q^6 - q^(-4) + 3/q^2 - q^2 + q^4, 
 -q^(-16) + q^(-14) + q^(-12) - 2/q^10 + q^(-8) - q^(-6) - q^(-4) + 2/q^2 + 
  3*q^2 + q^6 + 2*q^8 - 2*q^10 - q^16, -2 + q^(-18) - q^(-16) - 2/q^10 + 
  3/q^8 + q^(-4) + q^(-2) + 2*q^2 - 2*q^4 + q^6 + q^8 - q^10 + q^12, 
 -1 - q^(-16) + q^(-14) + q^(-12) - 2/q^10 + 2/q^8 - q^(-4) + 2/q^2 + 2*q^2 - 
  q^4 + 2*q^8 - 2*q^10 + q^12 + q^14 - q^16, 1 - q^(-10) - q^(-4) + 2/q^2 + 
  q^2 + q^4 + q^8 + q^14 - q^16 - q^22, q^(-14) + q^(-12) - q^(-10) + 
  q^(-8) - 2/q^4 + 2/q^2 + q^2 - q^6 + q^8 - 2*q^10 + q^14 - q^16 + q^18 + 
  q^20, q^(-28) - q^(-26) - q^(-24) + q^(-22) - 2/q^20 + q^(-16) + 2/q^12 + 
  q^(-8) - 2/q^4 + 2/q^2 + q^4, -1 - q^(-16) - 2/q^10 + 2/q^8 + q^(-6) + 
  2/q^2 + 2*q^2 + q^6 + 2*q^8 - 2*q^10 - q^16, 
 q^(-28) - q^(-26) - q^(-24) + 2/q^22 - q^(-20) + q^(-18) + q^(-16) - 
  2/q^14 - 2/q^10 + q^(-8) + q^(-6) - q^(-4) + 3/q^2 + q^4, 
 1 + q^(-30) - q^(-28) - 2/q^22 + 2/q^20 - q^(-18) + q^(-16) - 2/q^12 + 
  2/q^10 - q^(-8) + 2/q^6 + q^(-4), -1 - q^(-6) + q^(-4) - q^(-2) + 3*q^2 - 
  q^4 + 4*q^6 + q^8 + q^12 - 3*q^14 + 2*q^16 - q^18 - q^20 + q^22 - q^24, 
 1 + q^(-22) - q^(-18) + 2/q^16 - 2/q^14 + q^(-10) - 2/q^8 + 2/q^6 - 2/q^4 + 
  2/q^2 - q^2 + 2*q^4 - q^6 + q^10, -2 - q^(-16) + q^(-14) + 2/q^12 - 
  2/q^10 + 2/q^8 - q^(-6) - 2/q^4 + 2/q^2 + 3*q^2 - q^4 + q^6 + 3*q^8 - 
  2*q^10 + q^12 - q^16, -1 - q^(-16) + q^(-12) - 2/q^10 + 2/q^8 - q^(-4) + 
  3/q^2 + 3*q^2 - q^4 + 2*q^8 - 2*q^10 + q^12 - q^16, 
 q^(-22) - q^(-20) - 2/q^18 + 2/q^16 - 2/q^14 + q^(-12) + 2/q^10 - q^(-8) + 
  3/q^6 - 2/q^4 + 2/q^2 - 2*q^2 + 2*q^4 - q^6 + q^10, 
 -3 - q^(-16) + q^(-14) + 2/q^12 - 2/q^10 + 3/q^8 - 2/q^4 + 2/q^2 + 2*q^2 - 
  2*q^4 + 3*q^8 - 2*q^10 + 2*q^12 + q^14 - q^16, 
 q^4 + q^6 + 2*q^8 + 2*q^10 + q^12 + q^14 - 2*q^16 - q^18 - 3*q^20 - q^22 + 
  q^28 + q^32, -q^(-2) - q^2 + q^6 + q^8 + 4*q^10 + q^12 + 3*q^14 - q^18 - 
  q^20 - 2*q^22 - q^26, 1 - q^(-14) - 2/q^10 + 4/q^2 + 4*q^2 - 2*q^10 - q^14, 
 q^(-40) + q^(-38) - q^(-36) - 3/q^32 - 2/q^30 - q^(-28) - 2/q^26 + 3/q^24 + 
  3/q^20 + 2/q^18 + 2/q^14 - q^(-12) + q^(-10), 
 1 + q^4 + 2*q^6 + 3*q^10 - q^12 - q^16 - 3*q^18 - 2*q^22 + q^24 + q^26 + 
  q^30, -1 - q^(-6) + q^(-4) - q^(-2) + 2*q^2 - 2*q^4 + 3*q^6 + q^8 + 
  2*q^10 + 3*q^12 - q^14 + 2*q^16 - 2*q^18 - 2*q^20 - q^24, 
 3 - q^(-12) - q^(-8) - q^(-6) + 2/q^4 + 2*q^2 + 2*q^6 - 2*q^8 + q^10 - 
  q^12 - q^14 + q^16 - q^18, q^(-38) + q^(-36) - 2/q^34 - q^(-30) - 4/q^28 + 
  q^(-26) - q^(-24) + q^(-22) + 2/q^20 + 4/q^16 - q^(-14) + q^(-12) + 
  2/q^10 - 2/q^8 + q^(-6), 3 - q^(-12) - q^(-8) - q^(-6) + q^(-4) + 2*q^2 + 
  q^4 + 2*q^6 - q^8 + q^10 - q^12 - q^14 - q^18, 
 q^(-38) + q^(-36) - 2/q^34 - q^(-30) - 3/q^28 + q^(-26) - q^(-24) + 
  q^(-22) + q^(-20) + 3/q^16 - q^(-14) + q^(-12) + 2/q^10 - q^(-8) + q^(-6), 
 1 + q^4 + 2*q^6 - q^8 + 3*q^10 - q^12 - 3*q^18 + q^20 - 2*q^22 + q^24 + 
  q^26 - q^28 + q^30, -1 - q^(-6) + q^(-4) - q^(-2) + 3*q^2 - 2*q^4 + 3*q^6 + 
  q^8 + q^10 + 3*q^12 - 2*q^14 + 2*q^16 - 2*q^18 - 2*q^20 + q^22 - q^24, 
 -2 + q^(-20) + q^(-18) - 2/q^16 + q^(-14) - 2/q^10 + 3/q^8 + q^(-4) + q^2 - 
  3*q^4 + q^6 + 2*q^8 - q^10 + q^12 + q^14, q^(-10) - q^(-6) + 2/q^4 - 
  2/q^2 + 2*q^2 - q^4 + 4*q^6 - q^8 + q^10 - q^12 - 3*q^14 + 2*q^16 - q^18 + 
  q^22, -2 + q^(-20) + q^(-18) - 2/q^16 - 3/q^10 + 3/q^8 + q^(-4) + 2/q^2 + 
  3*q^2 - 3*q^4 + q^6 + 2*q^8 - 2*q^10 + q^12, 
 2 + q^(-6) + q^(-4) + 2/q^2 - q^4 - 3*q^6 - 2*q^8 + 2*q^14 + q^24, 
 -q^(-2) - q^2 + q^4 + 2*q^6 + q^8 + 3*q^10 - q^12 + 2*q^14 - 2*q^22 - q^26, 
 q^(-38) + q^(-36) - 2/q^34 - q^(-32) - 2/q^30 - 3/q^28 + 2/q^26 + q^(-24) + 
  2/q^22 + q^(-20) - q^(-18) + 2/q^16 - q^(-14) + q^(-12) + 2/q^10 - q^(-8) + 
  q^(-6), q^(-8) + 2/q^4 + q^2 - 2*q^4 + 2*q^6 - 2*q^8 - q^12 - q^14 + 
  2*q^16 + q^20, -q^(-6) + q^(-4) + 2*q^2 - 3*q^4 + q^6 + 2*q^10 + 4*q^12 + 
  2*q^16 - 2*q^18 - 2*q^20 - q^24, q^(-40) - 2/q^36 + q^(-34) - 2/q^32 - 
  3/q^26 + 2/q^24 - 2/q^22 + 3/q^20 + 2/q^18 + 3/q^14 - q^(-12) + q^(-10), 
 q^(-28) - q^(-26) - q^(-24) + 2/q^22 - 2/q^20 + q^(-16) - q^(-14) + 2/q^12 - 
  q^(-10) + q^(-8) - 2/q^4 + 3/q^2 + q^4, -q^(-22) - 2/q^16 + 2/q^14 + 
  q^(-12) + 2/q^8 - q^(-6) + q^(-4) + 2*q^2 - 2*q^4 + q^6 + q^8 - q^10, 
 -q^(-6) + 2/q^4 - q^(-2) + 4*q^2 - 3*q^4 + 2*q^6 - q^8 + 2*q^12 - 2*q^14 + 
  3*q^16 - q^18 - q^20 + 2*q^22 - q^24 - q^26, 
 -1 + q^(-10) + q^(-8) + 2/q^4 - 2/q^2 + q^2 - 2*q^4 + 3*q^6 - q^8 + q^10 - 
  2*q^14 + 2*q^16 - q^18 + q^22, -3 - q^(-16) + q^(-12) - 2/q^10 + 3/q^8 + 
  q^(-6) - q^(-4) + 2/q^2 + 2*q^2 - q^4 + q^6 + 3*q^8 - 2*q^10 + q^12 - q^16, 
 1 + q^4 + 2*q^6 - 2*q^8 + 2*q^10 - 2*q^12 + 2*q^16 - q^18 + 3*q^20 - 
  2*q^22 - 2*q^28 + q^30, -q^(-26) - q^(-24) + 2/q^22 + 3/q^16 - 3/q^14 - 
  q^(-10) - q^(-8) + 3/q^6 - 2/q^4 + 4/q^2 - q^2 + 2*q^4 - q^6, 
 -1 + q^(-28) + 2/q^22 - 3/q^20 - 2/q^18 - 2/q^14 + 2/q^12 + 2/q^8 + 2/q^6 - 
  q^(-4) + 3/q^2 - q^2 + q^4, q^(-12) - 2/q^10 + q^(-8) - 3/q^4 + 4/q^2 + 
  3*q^2 + q^4 - q^6 + 2*q^8 - 3*q^10 - 2*q^16 + q^18 + q^20, 
 1 + q^2 + 2*q^4 + 3*q^6 - q^8 + q^10 - 3*q^12 - 2*q^14 - 2*q^18 + 2*q^20 - 
  q^22 + q^24 + q^26 - q^28 + q^30, -1 - q^(-6) - q^(-2) + 3*q^2 + 4*q^6 + 
  2*q^8 + q^12 - 3*q^14 + q^16 - q^18 - q^20 + q^22 - q^24, 
 1 + q^(-32) + q^(-30) - 2/q^28 - q^(-26) - q^(-24) - 3/q^22 + 2/q^20 + 
  2/q^16 + 2/q^14 - q^(-12) + 3/q^10 - 2/q^8 + q^(-6) + q^(-4) - q^(-2), 
 1 - q^(-14) - 3/q^10 + 5/q^2 + 5*q^2 - 3*q^10 - q^14, 
 q^(-40) + q^(-38) - q^(-36) + q^(-34) - 3/q^32 - 2/q^30 - q^(-28) - 3/q^26 + 
  3/q^24 - q^(-22) + 3/q^20 + 2/q^18 + 3/q^14 - q^(-12) + q^(-10), 
 -1 - q^(-16) + q^(-12) - 3/q^10 + 2/q^8 - q^(-4) + 4/q^2 + 4*q^2 - q^4 + 
  2*q^8 - 3*q^10 + q^12 - q^16, q^(-20) - q^(-18) + q^(-16) - 2/q^14 - 
  q^(-12) + q^(-10) - q^(-8) + 4/q^6 - q^(-4) + 2/q^2 - q^2 + q^4 - q^6 + 
  q^8, -q^(-6) + 2/q^4 + 3*q^2 - 3*q^4 + 2*q^6 - q^8 + 2*q^12 - 2*q^14 + 
  3*q^16 - q^18 - q^20 + q^22 - q^24, -1 - q^(-6) + q^(-4) - q^(-2) + 4*q^2 - 
  q^4 + 4*q^6 + q^8 - q^10 + q^12 - 4*q^14 + 2*q^16 - q^18 - q^20 + 2*q^22 - 
  q^24, 1 - q^(-26) + q^(-24) - q^(-22) + q^(-20) - q^(-16) + q^(-14) - 
  3/q^12 + 2/q^10 + 2/q^6 + 2/q^4 - q^2, -1 + q^(-12) - 2/q^10 + q^(-8) + 
  q^(-6) - 2/q^4 + 4/q^2 + 2*q^2 - 2*q^6 + 2*q^8 - 3*q^10 + q^12 + q^14 - 
  q^16 + q^18, -2 + q^(-12) - q^(-10) + q^(-8) + q^(-6) - 3/q^4 + 2/q^2 + 
  q^2 + 2*q^4 + 4*q^8 - 2*q^10 - 2*q^16 + q^18, 
 -3 - q^(-16) + q^(-14) + 2/q^12 - 3/q^10 + 3/q^8 - 2/q^4 + 3/q^2 + 3*q^2 - 
  2*q^4 + 3*q^8 - 3*q^10 + 2*q^12 + q^14 - q^16, 
 -q^(-26) - q^(-24) + 2/q^22 - q^(-20) - q^(-18) + 4/q^16 - 2/q^14 + 2/q^12 - 
  2/q^8 + 2/q^6 - 4/q^4 + 4/q^2 - q^2 + 3*q^4 - q^6, 
 -3 + q^(-12) - q^(-10) + 2/q^8 + 2/q^6 - 2/q^4 + 2/q^2 - q^6 + 3*q^8 - 
  2*q^10 + q^12 + q^14 - q^16 + q^18, -1 - q^(-14) + q^(-12) - 2/q^10 + 
  q^(-8) - q^(-4) + 4/q^2 + 4*q^2 - q^4 + q^8 - 2*q^10 + q^12 - q^14, 
 1 - q^2 + q^4 + 2*q^6 - 2*q^8 + 4*q^10 - q^12 + q^14 + q^16 - 3*q^18 + 
  2*q^20 - 3*q^22 + q^24 + q^26 - 2*q^28 + q^30, 
 1 - q^(-18) + q^(-16) - q^(-14) - q^(-12) + 2/q^10 - q^(-8) + 3/q^6 - 
  2*q^2 + 2*q^4 + q^10 - q^12, 1 + q^(-8) - q^(-6) + 2/q^4 + 2*q^2 - 3*q^4 + 
  2*q^6 - 3*q^8 + q^10 - q^14 + 2*q^16 - q^18 + q^20, 
 -1 - q^(-6) + 2/q^4 - q^(-2) + 3*q^2 - 3*q^4 + 3*q^6 + q^10 + 3*q^12 - 
  2*q^14 + 3*q^16 - 2*q^18 - 2*q^20 + q^22 - q^24, 
 -3 + q^(-12) - 2/q^10 + 3/q^8 + 2/q^6 - 3/q^4 + 3/q^2 + q^2 - q^6 + 3*q^8 - 
  3*q^10 + q^12 + q^14 - 2*q^16 + q^18 + q^20, 
 -1 + q^(-4) - q^(-2) + 4*q^2 - 2*q^4 + q^6 + 2*q^8 - 2*q^10 + 2*q^12 - 
  2*q^14 + 2*q^16 + q^18 - 2*q^20 + 3*q^22 - 2*q^24 - 2*q^26 + q^28, 
 1 + q^(-30) - q^(-28) + 2/q^26 + 2/q^24 - 3/q^22 - 5/q^18 - q^(-16) + 
  q^(-14) + 5/q^10 - q^(-8) + 2/q^6 + q^(-4) - q^(-2), 
 1 - q^(-14) + q^(-12) - 3/q^10 - q^(-6) - q^(-4) + 6/q^2 + 6*q^2 - q^4 - 
  q^6 - 3*q^10 + q^12 - q^14, 1 - q^(-26) + q^(-24) - 2/q^22 - q^(-18) - 
  q^(-16) + 3/q^14 - q^(-12) + 4/q^10 + q^(-6) + q^(-4) - q^(-2) - q^2, 
 q^6 - 2*q^8 + 2*q^10 + q^12 - 2*q^14 + 4*q^16 + 2*q^20 + 2*q^22 - q^24 + 
  2*q^26 - 4*q^28 - q^30 - 3*q^34 + q^36 + q^38, 
 -1 + q^(-12) - q^(-10) + q^(-8) + q^(-6) - 2/q^4 + 3/q^2 + q^2 - 2*q^6 + 
  2*q^8 - 2*q^10 + q^12 + q^14 - q^16 + q^18, 
 -1 - q^(-24) + q^(-22) - q^(-20) - q^(-18) + 2/q^16 - 3/q^14 + q^(-12) + 
  q^(-8) + 4/q^6 - q^(-4) + 3/q^2 - q^2 + q^4 - q^6, 
 -3 - q^(-14) + q^(-12) - 2/q^10 + 2/q^8 + q^(-6) - q^(-4) + 3/q^2 + 3*q^2 - 
  q^4 + q^6 + 2*q^8 - 2*q^10 + q^12 - q^14, q^(-10) - q^(-6) + 3/q^4 - 
  2/q^2 + 2*q^2 - 3*q^4 + 3*q^6 - 2*q^8 + 2*q^10 + q^12 - 2*q^14 + 3*q^16 - 
  2*q^18 - q^20 + q^22, q^(-8) - q^(-6) + 2/q^4 - q^(-2) + 2*q^2 - 2*q^4 + 
  4*q^6 - 2*q^8 + q^10 - q^12 - 2*q^14 + 2*q^16 - q^18 + q^20, 
 -2 - q^(-16) + q^(-14) + 2/q^12 - 3/q^10 + 2/q^8 - q^(-6) - 2/q^4 + 3/q^2 + 
  4*q^2 - q^4 + q^6 + 3*q^8 - 3*q^10 + q^12 - q^16, 
 2 - q^(-12) + q^(-10) + 2/q^4 - q^(-2) - q^4 + q^6 - 2*q^8 + 2*q^10 + q^16 - 
  q^18, -1 - q^(-14) + q^(-12) - 3/q^10 + q^(-8) - q^(-4) + 5/q^2 + 5*q^2 - 
  q^4 + q^8 - 3*q^10 + q^12 - q^14, 1 + q^(-22) - q^(-18) + 3/q^16 - 2/q^14 + 
  q^(-10) - 3/q^8 + 2/q^6 - 3/q^4 + 2/q^2 - q^2 + 3*q^4 - q^6 + q^10, 
 1 - q^2 + q^4 + 2*q^6 - q^8 + 4*q^10 - q^12 + q^14 - 3*q^18 + q^20 - 
  3*q^22 + q^24 + q^26 - q^28 + q^30, q^(-20) - 2/q^18 + q^(-16) - 3/q^14 - 
  q^(-12) + 2/q^10 - q^(-8) + 6/q^6 - q^(-4) + 3/q^2 - 2*q^2 + q^4 - 2*q^6 + 
  q^8, -1 - q^(-6) + 2/q^4 - q^(-2) + 5*q^2 - 2*q^4 + 4*q^6 - 2*q^10 + q^12 - 
  5*q^14 + 3*q^16 - q^18 - q^20 + 3*q^22 - q^24, 
 -2 + q^(-18) - 2/q^16 - 3/q^10 + 4/q^8 + 2/q^4 + 2/q^2 + 3*q^2 - 3*q^4 + 
  q^6 + q^8 - 2*q^10 + q^12, -1 - q^(-16) + q^(-14) + 2/q^12 - 4/q^10 + 
  2/q^8 - q^(-6) - 2/q^4 + 5/q^2 + 5*q^2 - 2*q^4 - q^6 + 2*q^8 - 4*q^10 + 
  2*q^12 + q^14 - q^16, 1 + q^(-20) - 2/q^18 + 2/q^16 - 2/q^14 + 2/q^10 - 
  3/q^8 + 4/q^6 - 3/q^4 + 3/q^2 - q^2 + 2*q^4 - 2*q^6 + q^8, 
 -1 - q^(-6) + 2/q^4 - q^(-2) + 4*q^2 - 3*q^4 + 3*q^6 + 3*q^12 - 3*q^14 + 
  3*q^16 - 2*q^18 - 2*q^20 + 2*q^22 - q^24, -3 - q^(-14) + 2/q^12 - 2/q^10 + 
  2/q^8 - 2/q^4 + 4/q^2 + 4*q^2 - 2*q^4 + 2*q^8 - 2*q^10 + 2*q^12 - q^14, 
 -3 + q^(-12) - 2/q^10 + 2/q^8 + 2/q^6 - 3/q^4 + 3/q^2 + q^2 + q^4 - q^6 + 
  4*q^8 - 3*q^10 + q^12 + q^14 - 2*q^16 + q^18, 
 q^(-38) + q^(-36) - 3/q^34 + q^(-32) - 5/q^28 + 2/q^26 - 2/q^24 + q^(-22) + 
  2/q^20 - q^(-18) + 5/q^16 - 2/q^14 + 2/q^12 + 3/q^10 - 3/q^8 + q^(-6), 
 -1 - q^(-24) + 2/q^22 - 2/q^20 - 2/q^18 + 4/q^16 - 3/q^14 + 3/q^12 - 
  q^(-8) + 3/q^6 - 4/q^4 + 4/q^2 - q^2 + 3*q^4 - q^6, 
 -2 + q^(-12) - 2/q^10 + q^(-8) + q^(-6) - 4/q^4 + 3/q^2 + 2*q^2 + 3*q^4 + 
  5*q^8 - 3*q^10 - 3*q^16 + q^18, -5 - q^(-14) + 3/q^12 - 2/q^10 + 3/q^8 - 
  3/q^4 + 4/q^2 + 4*q^2 - 3*q^4 + 3*q^8 - 2*q^10 + 3*q^12 - q^14, 
 q^14 + q^16 + 2*q^18 + 2*q^20 + 2*q^22 + q^24 - 2*q^28 - 2*q^30 - 2*q^32 - 
  q^34 + q^40, 3 - q^(-12) - q^(-10) - q^(-8) + q^(-4) + 2/q^2 + 2*q^2 + 
  q^4 - q^8 - q^10 - q^12, -1 - q^(-24) - q^(-22) - 2/q^20 - q^(-18) + 
  q^(-16) + q^(-14) + 3/q^12 + 2/q^10 + 2/q^8 + q^(-6) - q^(-4), 
 q^(-30) + q^(-26) - 2/q^22 - q^(-20) - 3/q^18 + q^(-12) + 3/q^10 + q^(-8) + 
  2/q^6, q^10 + q^14 + q^16 + 2*q^18 + q^20 + q^22 + q^24 - q^26 - q^28 - 
  2*q^30 - q^32 - q^34 + q^38, 1 - q^(-16) - q^(-10) + q^(-8) + q^(-4) + 
  2/q^2 + 2*q^2 - q^4 - q^10, -q^(-22) - q^(-20) - q^(-18) - q^(-16) + 
  q^(-14) + q^(-12) + 2/q^10 + 2/q^8 + q^(-6) + q^(-4) - q^4, 
 q^(-28) + q^(-22) - 2/q^20 - q^(-18) - q^(-16) - q^(-14) + q^(-12) + 2/q^8 + 
  q^(-6) + 2/q^2, -q^(-22) - q^(-20) - q^(-18) + q^(-14) + q^(-12) + 2/q^10 + 
  q^(-8) + q^(-6), q^(-28) - 2/q^20 - q^(-18) - q^(-16) + q^(-12) + q^(-10) + 
  2/q^8 + q^(-6) + q^(-2), q^10 + 2*q^14 + q^16 + 2*q^18 + q^20 + q^24 - 
  2*q^26 - q^28 - 2*q^30 - q^32 + q^38, 1 - q^(-16) - 2/q^10 + q^(-8) + 
  q^(-4) + 3/q^2 + 3*q^2 - q^4 - 2*q^10, q^(-10) - q^(-2) + q^4 + 2*q^6 + 
  q^8 + q^10 - q^12 - q^14, q^(-20) + q^(-18) - q^(-16) - q^(-12) - q^(-10) + 
  q^(-8) + q^(-4) + q^2 - q^4 + q^6 + q^8, q^(-10) + q^(-8) + q^(-4) - 
  q^(-2) - q^4 + 2*q^6 - q^8 + q^10 - q^12 - q^14 + q^16 + q^20, 
 q^14 + q^16 + 2*q^18 + 2*q^20 + q^22 - q^28 - q^32 - q^34 - q^36 - q^38 + 
  q^40, 1 - q^(-22) - q^(-20) - q^(-18) + 2/q^14 + 2/q^12 + 2/q^10 - q^(-6) - 
  q^(-4) + q^2, q^(-18) - q^(-12) - q^(-10) + q^(-8) + q^(-4) + q^2 + q^6, 
 q^10 + q^14 + q^18 + q^20 + 2*q^22 + 3*q^24 - q^28 - 3*q^30 - 2*q^32 - 
  q^34 + q^38, -1 - q^(-24) - q^(-20) + q^(-16) - q^(-14) + q^(-12) + 2/q^8 + 
  2/q^6 + q^(-2), 1 + q^(-22) - q^(-20) - q^(-18) + 2/q^16 + 2/q^12 - 2/q^8 - 
  q^(-6) - 3/q^4 + 2/q^2 + q^2 + 2*q^4, -q^(-32) - q^(-30) + q^(-24) + 
  q^(-14) + q^(-10) + q^(-8) + q^(-6), -q^(-16) + q^(-14) + q^(-12) - 
  q^(-10) + q^(-8) - q^(-6) + q^(-2) + 2*q^2 - q^4 + q^6 + q^8 - q^10, 
 q^(-10) + q^(-4) - q^(-2) + 2*q^6 + q^10 - q^12 - q^14 + q^16, 
 -1 - q^(-24) - 2/q^20 - q^(-18) + q^(-16) + 3/q^12 + q^(-10) + 2/q^8 + 
  q^(-6) - q^(-4) + q^(-2), q^(-30) - q^(-28) + q^(-26) - 2/q^22 - 3/q^18 + 
  q^(-16) + q^(-12) + 3/q^10 + 2/q^6, 1 + q^4 + q^6 + 2*q^10 - q^12 + q^14 - 
  q^16 - q^18 - q^22 + q^24, -q^(-6) + q^(-4) - q^(-2) + 2*q^2 - q^4 + 
  3*q^6 + 2*q^10 + q^12 - q^14 + q^16 - 2*q^18 - q^20, 
 2/q^40 - q^(-34) - 3/q^32 - 2/q^30 - 3/q^28 + q^(-24) + 2/q^22 + 3/q^20 + 
  2/q^18 + q^(-16) + q^(-14), 3 - q^(-16) - q^(-12) - q^(-10) + 2/q^4 + 
  2/q^2 + 2*q^2 - q^8 - q^10 - q^12, q^10 + q^12 + q^14 + 2*q^16 + 2*q^18 + 
  q^22 - q^24 - q^26 - 2*q^28 - 2*q^30 - q^34 + q^36 + q^38, 
 1 + q^(-6) + 2/q^2 - 2*q^6 - q^10 + q^14 + q^18, 
 1 - q^(-18) + q^(-16) - q^(-14) + q^(-10) - q^(-8) + 2/q^6 - q^(-4) + 
  2/q^2 + q^4 - q^6, 2*q^6 - q^8 + 2*q^10 + 3*q^16 - q^18 + 2*q^20 - 2*q^22 - 
  q^24 - 2*q^28 + q^30, -2 + q^(-12) - q^(-10) + 2/q^8 + q^(-6) - q^(-4) + 
  2/q^2 + q^2 - 2*q^4 - q^6 + q^8 - q^10 + 2*q^12 + q^14, 
 -1 - q^(-24) + q^(-22) - q^(-20) + q^(-16) - 2/q^14 + q^(-12) - q^(-10) + 
  2/q^8 + 2/q^6 + 2/q^2, 1 + 2*q^10 + 2*q^14 - q^22 - q^26, 
 -q^(-34) - q^(-30) - q^(-28) + q^(-22) + q^(-18) + q^(-16) + q^(-14) + 
  q^(-12) + q^(-10), 1 + q^(-22) + 2/q^16 - q^(-14) - q^(-10) - 2/q^8 - 
  2/q^4 + 2/q^2 + q^2 + 2*q^4, 1 - q^(-6) + 2/q^4 + 2*q^2 - 3*q^4 + q^6 - 
  2*q^8 + 2*q^10 + 2*q^12 + 2*q^16 - 2*q^18 - q^20, 
 -q^(-16) + q^(-14) + q^(-12) - 2/q^10 + q^(-8) - q^(-6) + 2/q^2 + 3*q^2 - 
  q^4 + q^6 + q^8 - 2*q^10, 2*q^2 - q^4 + 2*q^8 + 2*q^12 - 2*q^20 + q^22 - 
  q^24 - q^26 + q^28}

Is = Function /@ (Is /. q -> #)

MapThread[(A2Invariant[#1] = #2)&, {KOs, Is}]

Clear[KOs, Is]

End[]; EndPackage[]

