Add GraphViz package...
This commit is contained in:
parent
30949252c0
commit
2708e66b19
2 changed files with 10 additions and 0 deletions
7
DFA.fs
7
DFA.fs
|
|
@ -1,6 +1,7 @@
|
||||||
module DFA
|
module DFA
|
||||||
|
|
||||||
open System
|
open System
|
||||||
|
open Shields.GraphViz
|
||||||
|
|
||||||
///
|
///
|
||||||
/// A deterministic finite automaton
|
/// A deterministic finite automaton
|
||||||
|
|
@ -19,6 +20,12 @@ type DFA = {
|
||||||
acceptingStates: String list
|
acceptingStates: String list
|
||||||
}
|
}
|
||||||
|
|
||||||
|
(*
|
||||||
|
let createGraph (dfa:DFA) =
|
||||||
|
let mutable graph = Graph.Directed.Add(EdgeStatement.For("a", "b"))
|
||||||
|
graph
|
||||||
|
*)
|
||||||
|
|
||||||
/// Returns true if the DFA is valid, false otherwise
|
/// Returns true if the DFA is valid, false otherwise
|
||||||
let validateDFA (dfa:DFA) =
|
let validateDFA (dfa:DFA) =
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -11,4 +11,7 @@
|
||||||
<Compile Include="ContainsSequence.fs" />
|
<Compile Include="ContainsSequence.fs" />
|
||||||
<Compile Include="Program.fs" />
|
<Compile Include="Program.fs" />
|
||||||
</ItemGroup>
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<PackageReference Include="Shields.GraphViz" Version="1.0.2" />
|
||||||
|
</ItemGroup>
|
||||||
</Project>
|
</Project>
|
||||||
Loading…
Add table
Add a link
Reference in a new issue