run "date";
needsPackage("LieAlgebraRepresentations");
g2 = simpleLieAlgebra("G",2);
rhoV01 = adjointRepresentation(g2);
rhoV01star = dual rhoV01;
rhoW11V01star=exteriorPower(11,rhoV01star);
rhoV00=trivialRepresentation(g2);
rhoV00 = lieAlgebraRepresentation(rhoV00#"Module",rhoV01#"Basis",rhoV00#"RepresentationMatrices");
hwv1 = weightMuHighestWeightVectorsInW({0,0},rhoW11V01star);
V00InW11V01star=VInWedgekW(rhoV00,11,rhoV01,hwv1,"SaveAsFunction"=>"V00inW11V01star");
run "date";
quit