| //invaluable for all those Choice<'a, exn> flows | |
| let exnf f = Printf.ksprintf (fun s -> exn s) f | |
| //combine paths | |
| let (</>) x y = System.IO.Path.Combine(x, y) | |
| //allows you to pattern match on values in the current scope rather than just literals | |
| let (|Eq|_|) expected value = | |
| if expected = value then Some () | |
| else None |
(by @andrestaltz)
If you prefer to watch video tutorials with live-coding, then check out this series I recorded with the same contents as in this article: Egghead.io - Introduction to Reactive Programming.
| type ParseError = string list | |
| type HashBlocking = { CustomerField: string; ProviderField: string } | |
| type SuffixArrayBlocking = { CustomerField: string; ProviderField: string } | |
| type BlockingMethod = | |
| | Hash of HashBlocking | |
| | SuffixArray of SuffixArrayBlocking | |
| type FieldConfig = |
| <script type="text/ng-template" id="one.html"> | |
| <div>This is first template</div> | |
| </script> | |
| <script type="text/ng-template" id="two.html"> | |
| <div>This is second template</div> | |
| </script> |
These examples are type 3 RESTful API requests and responses. The JSON-HAL specification is used to implement HATEOAS.
Some of the examples are based on my work as architect of the RESTful API at http://www.hautelook.com. All proprietary information has been removed.
| #r "System.Xml.Linq" | |
| open System | |
| open System.IO | |
| open System.Xml.Linq | |
| let script = seq { | |
| //TODO: this currently loads fsproj's in alphabeticall order, we should instead | |
| //build the dependencies graph of the fsproj's and load them in topological sort order |
