run "date";
needsPackage("LieAlgebraRepresentations");
sp6 = simpleLieAlgebra("C",3);
rhoV001 = deGraafRepresentation({0,0,1},sp6);
rhoV001star = dual rhoV001;
rhoW10V001star=exteriorPower(10,rhoV001star);
hwv = weightMuHighestWeightVectorsInW({0,0,0},rhoW10V001star);
rhoV000=trivialRepresentation(sp6);
rhoV000 = lieAlgebraRepresentation(rhoV000#"Module",rhoV001#"Basis",rhoV000#"RepresentationMatrices");
V000InW10V001star=VInWedgekW(rhoV000,10,rhoV001star,hwv,"SaveAsFunction"=>"V000InW10V001star");
run "date";