Couldn't find the text of this for a while...
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (* | |
| This script analyzes the dependencies between top level types in a .NET Assembly. | |
| It is then used to compare the dependency relationships in some F# projects with those in some C# projects. | |
| Note that no attempt has been made to optimize the code yet! | |
| REQUIRES: | |
| * Mono.Cecil for code analysis | |
| From http://www.mono-project.com/Cecil#Download |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| extern mod std; | |
| fn lt<T: Ord>(a: Option<T>, b: Option<T>) -> bool { | |
| match (a, b) { | |
| (None, None) => false, | |
| (None, Some(_)) => true, | |
| (Some(_), None) => false, | |
| (Some(a), Some(b)) => a < b | |
| } | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Require Import Coq.Program.Basics. | |
| Require Import Coq.Program.Syntax. | |
| Require Import Coq.Init.Datatypes. | |
| Require Import Coq.Unicode.Utf8. | |
| Open Local Scope program_scope. | |
| Open Local Scope list_scope. | |
| Open Local Scope type_scope. | |
| Class Functor (φ : Type → Type) := { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| module Main where | |
| import Control.Monad.Writer | |
| import System(getArgs, getProgName) | |
| data Column = LeftCol | MiddleCol | RightCol | |
| instance Show Column where | |
| show LeftCol = "left" | |
| show MiddleCol = "middle" | |
| show RightCol = "right" |
NewerOlder