The J script user\dodec_ap.ijs
x=:+/ . *
Prods=:\:~@~.@(* >&1e_14@:|)@(,(,/)@:( x"2/~))
ri=:%r=.-:>:%:5
T1=:-:3 3 $1,r,ri,(-r),ri,1,ri,_1,r
T2=:-:3 3$r,ri,_1,ri,1,r,1,(-r),ri
T3=:_1 1 1*=i.3

$I=:Prods^:3 T1,T2,:T3
$II=:%. I

DD=:1 : '+/@(II"_ x"2 1 ])@((0&{ x 1&{ x 2&{ x m."_)@(^/&(i.#m.))"1@(I&x)) f.'

pars=:3 3 3 3$,".;._2]0 : 0
   0.0180157305   0.0903833937  _0.1262988060
   0.0959720238  _0.0981938805  _0.0445451871
   0.1290451044  _0.1389270186  _0.0463975410
  _0.1034676072   0.1199258382  _0.1064360991
   0.0284841300  _0.0672225822  _0.0099387726
   0.0590534490   0.1113198750  _0.1468569510
  _0.1247709900  _0.0260266215  _0.0294227928
  _0.1088782995   0.0824206119   0.1432259172
  _0.0020062041  _0.1182703734   0.0298362312
  _0.1424609703  _0.0415270104  _0.1444622841
  _0.0776052450   0.0886481373   0.1092472107
   0.1178740806  _0.0903261324  _0.1113043062
   0.1085292588   0.0512562201  _0.1367073846
   0.0589886136  _0.0783689961  _0.1477134882
  _0.1205961711  _0.0598447191   0.0898105986
   0.1467316815   0.1193712204  _0.1278978093
  _0.0784800531   0.0857490972  _0.0149189145
   0.0578068920  _0.1395622734   0.0768726459
  _0.1014373995   0.0416295027   0.0670539840
  _0.1236866562  _0.1016276886   0.1434392721
  _0.0161524251   0.0261961311  _0.1216222695
   0.0945181746   0.0669648237  _0.1222031436
  _0.0682310184   0.1412775246  _0.0486418341
  _0.0233046243   0.1191796536  _0.0475573362
  _0.0961468965  _0.1408879608  _0.0039553878
   0.1218001257  _0.1052849598  _0.1243178283
   0.0902625387  _0.0575116383   0.0018951813
)

G=:pars DD
G^:(i.5) 0.1 0.2 0.3