cloudRoutine

<UserControl
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
        xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
        xmlns:local="clr-namespace:Scratch;assembly=App"
        xmlns:d="http://schemas.microsoft.com/expression/blend/2008" 
        xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" 
        xmlns:System="clr-namespace:System;assembly=mscorlib" 
        x:Name="ControlRoot" 
        
        mc:Ignorable="d" d:DesignWidth="238" d:DesignHeight="414"  IsManipulationEnabled="True">

cloudRoutine

#r "PresentationCore"
#r "PresentationFramework"
#r "WindowsBase"
#r "System.Xaml"
#I "../../packages/FSharp.Control.Reactive.2.3.1/lib/net40/"
#I "../../packages/Rx-Linq.2.2.5/lib/net45"
#I "../../packages/Rx-Core.2.2.5/lib/net45"
#I "../../packages/Rx-Interfaces.2.2.5/lib/net45"
#I "../../packages/Rx-PlatformServices.2.2.5/lib/net45"
#I "../../packages/Rx-Providers.2.2.5/lib/net45"

cloudRoutine

define(function(require, exports, module) {
"use strict";

var oop = require("../lib/oop");
var DocCommentHighlightRules = require("./doc_comment_highlight_rules").DocCommentHighlightRules;
var TextHighlightRules = require("./text_highlight_rules").TextHighlightRules;
var Tokenizer = require("ace/tokenizer").Tokenizer;

var FSharpHighlightRules = function ()
    {

cloudRoutine

open System

    type D6 = 
        | One | Two | Three | Four | Five | Six
        member self.Value =
            match self with
            | One  -> 1      | Two  -> 2      | Three -> 3
            | Four -> 4      | Five -> 5      | Six   -> 6
        override self.ToString() =
            match self with

cloudRoutine

ace.define('ace/mode/fsharp_highlight_rules', function(require, exports, module) 
{
    "use strict";

    var oop = require("../lib/oop");
    var DocCommentHighlightRules = require("./doc_comment_highlight_rules").DocCommentHighlightRules;
    var TextHighlightRules = require("./text_highlight_rules").TextHighlightRules;
    var Tokenizer = require("ace/tokenizer").Tokenizer;

    var FSharpHighlightRules = function ()

cloudRoutine

Capability Red - Requirements at Scale by Liz Keogh
http://www.ndcvideos.com/#/app/video/2111
----
Beyond Rectangles in Web Design - CSS Shapes and CSS Masking by Razvan Caliman
http://www.ndcvideos.com/#/app/video/2121
----
Coding Culture by Sven Peters
http://www.ndcvideos.com/#/app/video/2131
----
The Ultimate Logging Architecture - You KNOW You Want It by Michele Leroux Bustamante

cloudRoutine

:: =================================================================================================
:: Copyright 2013 Adobe Systems Incorporated
:: All Rights Reserved.
::
:: NOTICE:  Adobe permits you to use, modify, and distribute this file in accordance with the terms
:: of the Adobe license agreement accompanying it.
:: =================================================================================================

REM Available Arguments:
REM [64|32] Bit Architecture (optional, 64 is default)

cloudRoutine

:: =================================================================================================
:: Copyright 2013 Adobe Systems Incorporated
:: All Rights Reserved.
::
:: NOTICE:  Adobe permits you to use, modify, and distribute this file in accordance with the terms
:: of the Adobe license agreement accompanying it.
:: =================================================================================================

echo OFF
cls

cloudRoutine

(*===============================
||                             ||
||       QuickStart            ||              
||                             ||
===============================*)

//  A simple example of a property definition is  

      let prop_RevRev xs = List.rev(List.rev xs) = xs

cloudRoutine

[<Struct>]
type Lens<'Struct,'Prop> =
    val Get : 'Struct -> 'Prop
    val Set : 'Prop   -> 'Struct -> 'Struct

    member lens.Update func prop =
        let value  = lens.Get prop
        let result = func value
        lens.Set result prop