# SCM Repository

# View of /sml/trunk/src/MLRISC/graphs/trans-reduction.sml

Parent Directory | Revision Log

Revision

File size: 338 byte(s)

**409**- (**download**) (**annotate**)*Fri Sep 3 00:21:52 1999 UTC*(20 years, 1 month ago) by*monnier*File size: 338 byte(s)

Initial revision

(* * Compute the (in place) transitive reduction of a graph. * * -- Allen *) signature TRANSITIVE_REDUCTION = sig val transitive_reduction : ('n,'e,'g) Graph.graph -> unit end structure TransitiveReduction : TRANSITIVE_REDUCTION = struct structure G = Graph fun transitive_reduction (G.GRAPH G) = let in end end

root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |

Powered by ViewVC 1.0.0 |