anchor.diff:                      end
   		end, 0, ListLabelCount).
   
  -choose_label(Candidates)->
  +choose_label(Candidates) ->
       Num = random:uniform(length(Candidates)),
       {Label, _} = lists:nth(Num, Candidates),
       {Label, length(Candidates)}.
  
positive.code:     %% the list in front of the head portion of the list
      Vertices = digraph:vertices(G),
      SplitValue = random:uniform(length(Vertices)),
      {V1, V2} = lists:split(SplitValue,Vertices),
      V = V2 ++ V1,
  
      %% The next section of the code uses the lists:foldl(...) function
  
negative.code: 				  Result = label_vertex(G, Vertex),
  				  case Result of
  				      go -> 
  					  {StopCount, GoCount + 1, G2};
  				      stop ->  
  					  {StopCount + 1, GoCount, G2}
  				  end
  			  end,{0, 0, G}, V),
      {_NewStopCount, NewGoCount, G3} = RunCond,
  
      %% At this point in the code, 
  