Added dynamic/3 constructor.

src/flow_graph.erl

@@ -3,7 +3,7 @@
 % Vertex construction
 -export([hole/0, value/1, void/0, split/0, merge/0, switch/2, select/2]).
 % Edge construction
--export([flow/2, func/3, index/3, range/4, tagged/3, dynamic/2]).
+-export([flow/2, func/3, index/3, range/4, tagged/3, dynamic/2, dynamic/3]).
 % Graph construction
 -export([singleton/1, from_list/3]).
 % Graph manipulation
@@ -91,6 +91,9 @@ range(From, To, Low, High) when is_number(Low), is_number(High), Low =< High->
 tagged(From, To, Tag) ->
     make_edge(From, To, #tagged{tag=Tag}).
 
+dynamic(From, To = #vertex{node=delayed}, Code) ->
+    make_edge(From, To, #dynamic{code=Code}).
+
 dynamic(From, Code) ->
     make_edge(From, delayed(), #dynamic{code=Code}).