public void DileepTest1()
{
PDLEnumerator pdlEnumerator = new PDLEnumerator();
var solver = new CharSetSolver(BitWidth.BV64);
List<char> alph = new List<char> { 'a', 'b' };
HashSet<char> al = new HashSet<char>(alph);
PDLPred phi = new PDLModSetEq(new PDLIndicesOf("a"), 2, 1);
phi = new PDLAnd(new PDLStartsWith("a"), phi);
var dfa1 = phi.GetDFA(al, solver);
var a = solver.MkCharConstraint(false, 'a');
var b = solver.MkCharConstraint(false, 'b');
var moves = new List<Move<BDD>>();
moves.Add(new Move<BDD>(0, 0, a));
moves.Add(new Move<BDD>(0, 5, a));
moves.Add(new Move<BDD>(5, 0, a));
moves.Add(new Move<BDD>(5, 5, b));
var dfa2 = Automaton<BDD>.Create(0, new int[] { 5 }, moves);
var feedbackGrade = DFAGrading.GetGrade(dfa1, dfa2, al, solver, timeout, 10, FeedbackLevel.Solution, true, false, false);
var feedString = "<ul>";
foreach (var feed in feedbackGrade.Second)
feedString += string.Format("<li>{0}</li>", feed);
feedString += "</ul>";
Console.Write( string.Format("<div>Grade: {0} <br /> Feedback: {1}</div>", feedbackGrade.First, feedString));
}
public void a2b1() //atleast 2 a's and atmost one b
{
var solver = new CharSetSolver(BitWidth.BV64);
List <char> alph = new List <char> {
'a', 'b'
};
HashSet <char> al = new HashSet <char>(alph);
PDLPred phi = new PDLAnd(new PDLNot(new PDLIntLeq(new PDLIndicesOf("a"), 1)), new PDLIntLeq(new PDLIndicesOf("b"), 1));
StringBuilder sb = new StringBuilder();
phi.ToMSO(new FreshGen()).ToString(sb);
System.Console.WriteLine(sb);
var dfa = phi.GetDFA(al, solver);
var test = solver.Convert(@"^(aa+|baa+|aba+|aa+ba*)$");
//string file = "../../../TestPDL/DotFiles/a2b1";
//solver.SaveAsDot(dfa, "aut", file);
Assert.IsTrue(dfa.IsEquivalentWith(test, solver));
}
public void contains_aa_notend_ab()
{
var solver = new CharSetSolver(BitWidth.BV64);
List <char> alph = new List <char> {
'a', 'b'
};
HashSet <char> al = new HashSet <char>(alph);
//new PDL
PDLPred phi1 = new PDLNot(new PDLIntLeq(new PDLIndicesOf("aa"), 0));
PDLPred phi2 = (new PDLBelongs(new PDLPredecessor(new PDLLast()), new PDLIndicesOf("ab")));
//PDLpred phi2 = new PDLAnd(new PDLatPos('a', new PDLprev(new PDLlast())), new PDLatPos('b', new PDLlast()));
PDLPred phi = new PDLAnd(phi1, new PDLNot(phi2));
//new PDLAnd(new PDLatPos('a', new PDLprev(new PDLlast())), new PDLatPos('b', new PDLlast())));
StringBuilder sb = new StringBuilder();
phi.ToMSO(new FreshGen()).ToString(sb);
System.Console.WriteLine(sb);
var dfa = phi.GetDFA(al, solver);
var test = solver.Convert(@"^(a|b)*aa(((a|b)*(aa|ba|bb))|(a*))$");
//string file = "../../../TestPDL/DotFiles/contains_aa_notend_ab";
//solver.SaveAsDot(dfa, "aut", file);
Assert.IsTrue(dfa.IsEquivalentWith(test, solver));
}
public void SameFirstLast()
{
var solver = new CharSetSolver(BitWidth.BV64);
List <char> alph = new List <char> {
'a', 'b'
};
HashSet <char> al = new HashSet <char>(alph);
PDLPred phi = new PDLAnd(new PDLIf(new PDLAtPos('a', new PDLFirst()), new PDLAtPos('a', new PDLLast())),
new PDLIf(new PDLAtPos('b', new PDLFirst()), new PDLAtPos('b', new PDLLast())));
StringBuilder sb = new StringBuilder();
phi.ToMSO(new FreshGen()).ToString(sb);
System.Console.WriteLine(sb);
var dfa = phi.GetDFA(al, solver);
var test = solver.Convert(@"^((b(a|b)*b)|(a(a|b)*a)|a|b)?$");
Assert.IsTrue(dfa.IsEquivalentWith(test, solver));
//string file = "../../../TestPDL/DotFiles/SameFirstLast";
//solver.SaveAsDot(dfa, "aut", file);
}
public void Grade2DFAs()
{
var solver = new CharSetSolver(BitWidth.BV64);
List <char> alph = new List <char> {
'a', 'b'
};
HashSet <char> al = new HashSet <char>(alph);
PDLPred phi = new PDLAnd(new PDLIntGeq(new PDLIndicesOf("a"), 2), new PDLIntGeq(new PDLIndicesOf("b"), 2));
//PDLPred phi2 = new PDLIf(new PDLStartsWith("b"), new PDLEndsWith("b"));
var dfaCorr = phi.GetDFA(al, solver);
var a = solver.MkCharConstraint(false, 'a');
var b = solver.MkCharConstraint(false, 'b');
var moves = new List <Move <BDD> >();
moves.Add(new Move <BDD>(0, 1, a));
moves.Add(new Move <BDD>(0, 1, b));
moves.Add(new Move <BDD>(1, 2, a));
moves.Add(new Move <BDD>(1, 2, b));
moves.Add(new Move <BDD>(2, 3, a));
moves.Add(new Move <BDD>(2, 3, b));
moves.Add(new Move <BDD>(3, 3, a));
moves.Add(new Move <BDD>(3, 3, b));
//moves.Add(new Move<BDD>(3, 4, a));
//moves.Add(new Move<BDD>(3, 2, b));
//moves.Add(new Move<BDD>(4, 4, a));
//moves.Add(new Move<BDD>(4, 5, b));
//moves.Add(new Move<BDD>(5, 6, a));
//moves.Add(new Move<BDD>(5, 4, b));
//moves.Add(new Move<BDD>(6, 6, a));
//moves.Add(new Move<BDD>(6, 6, b));
var dfa2 = Automaton <BDD> .Create(0, new int[] { 3 }, moves);
//Assert.IsTrue(phi2.GetDFA(al,solver).IsEquivalentWith(dfa2,solver));
solver.SaveAsDot(dfaCorr, "aa", "corr");
solver.SaveAsDot(dfa2, "aa", "wrong");
//var v0 = DFADensity.GetDFADifferenceRatio(dfa1, dfa2, al, solver);
//var v1 = PDLEditDistance.GetMinimalFormulaEditDistanceRatio(dfa1, dfa2, al, solver, timeout);
//var v2 = DFAEditDistance.GetDFAOptimalEdit(dfa1, dfa2, al, solver, 4, new StringBuilder());
//Console.WriteLine("density ratio: {0}; pdl edit distance: {1}; dfa edit distance: {2}", v0, v1, v2);
var gr = DFAGrading.GetGrade(dfaCorr, dfa2, al, solver, 2000, 10, FeedbackLevel.Hint, true, true, true);
Console.WriteLine(gr.First);
foreach (var f in gr.Second)
{
Console.WriteLine(f.ToString());
}
}
public void firstOcc()
{
var solver = new CharSetSolver(BitWidth.BV64);
List <char> alph = new List <char> {
'a', 'b', 'c'
};
HashSet <char> al = new HashSet <char>(alph);
PDLPred phi = new PDLAnd(new PDLNot(new PDLIntLeq(new PDLIndicesOf("abc"), 0)),
new PDLIntLeq(new PDLAllPosBefore(new PDLFirstOcc("abc")), 2));
StringBuilder sb = new StringBuilder();
phi.ToString(sb);
System.Console.WriteLine(sb);
System.Console.WriteLine(phi.Eval("acabc", new Dictionary <string, int>()));
var dfa = phi.GetDFA(al, solver);
//string file = "../../../TestPDL/DotFiles/firstOcc";
//solver.SaveAsDot(dfa, "aut", file);
}
public void DileepTest1()
{
PDLEnumerator pdlEnumerator = new PDLEnumerator();
var solver = new CharSetSolver(BitWidth.BV64);
List <char> alph = new List <char> {
'a', 'b'
};
HashSet <char> al = new HashSet <char>(alph);
PDLPred phi = new PDLModSetEq(new PDLIndicesOf("a"), 2, 1);
phi = new PDLAnd(new PDLStartsWith("a"), phi);
var dfa1 = phi.GetDFA(al, solver);
var a = solver.MkCharConstraint(false, 'a');
var b = solver.MkCharConstraint(false, 'b');
var moves = new List <Move <BDD> >();
moves.Add(new Move <BDD>(0, 0, a));
moves.Add(new Move <BDD>(0, 5, a));
moves.Add(new Move <BDD>(5, 0, a));
moves.Add(new Move <BDD>(5, 5, b));
var dfa2 = Automaton <BDD> .Create(0, new int[] { 5 }, moves);
var feedbackGrade = DFAGrading.GetGrade(dfa1, dfa2, al, solver, timeout, 10, FeedbackLevel.Solution, true, false, false);
var feedString = "<ul>";
foreach (var feed in feedbackGrade.Second)
{
feedString += string.Format("<li>{0}</li>", feed);
}
feedString += "</ul>";
Console.Write(string.Format("<div>Grade: {0} <br /> Feedback: {1}</div>", feedbackGrade.First, feedString));
}
public void Grade2DFAs()
{
var solver = new CharSetSolver(BitWidth.BV64);
List<char> alph = new List<char> { 'a', 'b' };
HashSet<char> al = new HashSet<char>(alph);
PDLPred phi = new PDLAnd(new PDLIntGeq(new PDLIndicesOf("a"), 2), new PDLIntGeq(new PDLIndicesOf("b"), 2));
//PDLPred phi2 = new PDLIf(new PDLStartsWith("b"), new PDLEndsWith("b"));
var dfaCorr = phi.GetDFA(al, solver);
var a = solver.MkCharConstraint(false, 'a');
var b = solver.MkCharConstraint(false, 'b');
var moves = new List<Move<BDD>>();
moves.Add(new Move<BDD>(0, 1, a));
moves.Add(new Move<BDD>(0, 1, b));
moves.Add(new Move<BDD>(1, 2, a));
moves.Add(new Move<BDD>(1, 2, b));
moves.Add(new Move<BDD>(2, 3, a));
moves.Add(new Move<BDD>(2, 3, b));
moves.Add(new Move<BDD>(3,3, a));
moves.Add(new Move<BDD>(3, 3, b));
//moves.Add(new Move<BDD>(3, 4, a));
//moves.Add(new Move<BDD>(3, 2, b));
//moves.Add(new Move<BDD>(4, 4, a));
//moves.Add(new Move<BDD>(4, 5, b));
//moves.Add(new Move<BDD>(5, 6, a));
//moves.Add(new Move<BDD>(5, 4, b));
//moves.Add(new Move<BDD>(6, 6, a));
//moves.Add(new Move<BDD>(6, 6, b));
var dfa2 = Automaton<BDD>.Create(0, new int[] { 3 }, moves);
//Assert.IsTrue(phi2.GetDFA(al,solver).IsEquivalentWith(dfa2,solver));
solver.SaveAsDot(dfaCorr, "aa", "corr");
solver.SaveAsDot(dfa2, "aa", "wrong");
//var v0 = DFADensity.GetDFADifferenceRatio(dfa1, dfa2, al, solver);
//var v1 = PDLEditDistance.GetMinimalFormulaEditDistanceRatio(dfa1, dfa2, al, solver, timeout);
//var v2 = DFAEditDistance.GetDFAOptimalEdit(dfa1, dfa2, al, solver, 4, new StringBuilder());
//Console.WriteLine("density ratio: {0}; pdl edit distance: {1}; dfa edit distance: {2}", v0, v1, v2);
var gr = DFAGrading.GetGrade(dfaCorr, dfa2, al, solver, 2000, 10, FeedbackLevel.Hint, true, true, true);
Console.WriteLine(gr.First);
foreach (var f in gr.Second)
Console.WriteLine(f.ToString());
}
public void firstOcc()
{
var solver = new CharSetSolver(BitWidth.BV64);
List<char> alph = new List<char> { 'a', 'b', 'c' };
HashSet<char> al = new HashSet<char>(alph);
PDLPred phi = new PDLAnd(new PDLNot(new PDLIntLeq(new PDLIndicesOf("abc"), 0)),
new PDLIntLeq(new PDLAllPosBefore(new PDLFirstOcc("abc")), 2));
StringBuilder sb = new StringBuilder();
phi.ToString(sb);
System.Console.WriteLine(sb);
System.Console.WriteLine(phi.Eval("acabc", new Dictionary<string, int>()));
var dfa = phi.GetDFA(al, solver);
//string file = "../../../TestPDL/DotFiles/firstOcc";
//solver.SaveAsDot(dfa, "aut", file);
}
public void a2b1() //atleast 2 a's and atmost one b
{
var solver = new CharSetSolver(BitWidth.BV64);
List<char> alph = new List<char> { 'a', 'b' };
HashSet<char> al = new HashSet<char>(alph);
PDLPred phi = new PDLAnd(new PDLNot(new PDLIntLeq(new PDLIndicesOf("a"), 1)), new PDLIntLeq(new PDLIndicesOf("b"), 1));
StringBuilder sb = new StringBuilder();
phi.ToMSO(new FreshGen()).ToString(sb);
System.Console.WriteLine(sb);
var dfa = phi.GetDFA(al, solver);
var test = solver.Convert(@"^(aa+|baa+|aba+|aa+ba*)$");
//string file = "../../../TestPDL/DotFiles/a2b1";
//solver.SaveAsDot(dfa, "aut", file);
Assert.IsTrue(dfa.IsEquivalentWith(test, solver));
}
public void contains_aa_notend_ab()
{
var solver = new CharSetSolver(BitWidth.BV64);
List<char> alph = new List<char> { 'a', 'b' };
HashSet<char> al = new HashSet<char>(alph);
//new PDL
PDLPred phi1 = new PDLNot(new PDLIntLeq(new PDLIndicesOf("aa"), 0));
PDLPred phi2 = (new PDLBelongs(new PDLPredecessor(new PDLLast()), new PDLIndicesOf("ab")));
//PDLpred phi2 = new PDLAnd(new PDLatPos('a', new PDLprev(new PDLlast())), new PDLatPos('b', new PDLlast()));
PDLPred phi = new PDLAnd(phi1, new PDLNot(phi2));
//new PDLAnd(new PDLatPos('a', new PDLprev(new PDLlast())), new PDLatPos('b', new PDLlast())));
StringBuilder sb = new StringBuilder();
phi.ToMSO(new FreshGen()).ToString(sb);
System.Console.WriteLine(sb);
var dfa = phi.GetDFA(al, solver);
var test = solver.Convert(@"^(a|b)*aa(((a|b)*(aa|ba|bb))|(a*))$");
//string file = "../../../TestPDL/DotFiles/contains_aa_notend_ab";
//solver.SaveAsDot(dfa, "aut", file);
Assert.IsTrue(dfa.IsEquivalentWith(test, solver));
}
public void SameFirstLast()
{
var solver = new CharSetSolver(BitWidth.BV64);
List<char> alph = new List<char> { 'a', 'b' };
HashSet<char> al = new HashSet<char>(alph);
PDLPred phi = new PDLAnd(new PDLIf(new PDLAtPos('a', new PDLFirst()), new PDLAtPos('a', new PDLLast())),
new PDLIf(new PDLAtPos('b', new PDLFirst()), new PDLAtPos('b', new PDLLast())));
StringBuilder sb = new StringBuilder();
phi.ToMSO(new FreshGen()).ToString(sb);
System.Console.WriteLine(sb);
var dfa = phi.GetDFA(al, solver);
var test = solver.Convert(@"^((b(a|b)*b)|(a(a|b)*a)|a|b)?$");
Assert.IsTrue(dfa.IsEquivalentWith(test, solver));
//string file = "../../../TestPDL/DotFiles/SameFirstLast";
//solver.SaveAsDot(dfa, "aut", file);
}
