Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /MLRISC/trunk/graphs/min-cut.sml
ViewVC logotype

Diff of /MLRISC/trunk/graphs/min-cut.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 409, Fri Sep 3 00:21:52 1999 UTC revision 545, Thu Feb 24 13:56:44 2000 UTC
# Line 5  Line 5 
5   * -- Allen   * -- Allen
6   *)   *)
7    
8  functor MinCutFn(Num : ABELIAN_GROUP) : MIN_CUT =  functor MinCut(Num : ABELIAN_GROUP) : MIN_CUT =
9  struct  struct
10    
11     structure Num = Num     structure Num = Num
12     structure G   = Graph     structure G   = Graph
13     structure A   = Array     structure A   = Array
14     structure Q   = NodePriorityQueueFn(A)     structure Q   = NodePriorityQueue(A)
15     structure L   = CatnetableList          (* for fast concatenation *)     structure L   = CatnetableList          (* for fast concatenation *)
16    
17     fun min_cut {graph=G.GRAPH G, weight} =     fun min_cut {graph=G.GRAPH G, weight} =

Legend:
Removed from v.409  
changed lines
  Added in v.545

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0