<commit_before><?xml version="1.0" encoding="UTF-8" ?>

<Template Originator="<NAME>" Created="25/7/2012">

  <!-- Template Header -->
  <TemplateConfiguration>
    <_Name>F# Windows Forms project</_Name>
    <!--<Icon>md-project-console|res:fsharp-icon-32.png</Icon>-->
    <_Description>Creates F# Windows Forms project</_Description>
    <_Category>F#</_Category>
    <LanguageName>F#</LanguageName>
  </TemplateConfiguration>

  <!-- Actions -->
  <Actions>
    <Open filename = "Actions.fs"/>
    <Open filename = "Program.fs" />
  </Actions>

  <!-- Template Content -->
  <Combine name = "${ProjectName}" directory = ".">
    <Options>
      <StartupProject>${ProjectName}</StartupProject>
    </Options>

    <Project name = "${ProjectName}" directory = ".">
      <Options ExternalConsole="True"/>
      <References>
      	<Reference type="Gac" refto="FSharp.Core, Version=4.0.0.0, Culture=neutral, PublicKeyToken=<KEY>" />
      	<Reference type="Gac" refto="System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      	<Reference type="Gac" refto="System.Core, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      	<Reference type="Gac" refto="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=<KEY>" />
      	<Reference type="Gac" refto="System.Numerics, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      	<Reference type="Gac" refto="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      </References>
      <Files>
        <File name = "Actions.fs" AddStandardHeader="True">
  <![CDATA[namespace WindowsForms.Actions

module Actions =
    
    open System
    open System.Windows.Forms
    
    let setProperties<'a when 'a :> Control> (control:'a) name content width height x y = 
        control.Width   <- width
        control.Height  <- height
        control.Name    <- name
        control.Left    <- x
        control.Top     <- y
        control.Text    <- content 
        control 

    ///params: name title width height X Y
    let newForm = new Form() |> setProperties
    
    ///params: name text width height X Y
    let newButton       = new Button()      |> setProperties
    
    ///params: name text width height X Y
    let newTextBox      = new TextBox()     |> setProperties
    
    ///params: name text width height X Y
    let newLabel        = new Label()       |> setProperties
    
    ///params: name text width height X Y
    let newCheckBox     = new CheckBox()    |> setProperties
    
    ///params: name text width height X Y
    let newComboBox     = new ComboBox()    |> setProperties
    
    ///params: name text width height X Y
    let newListBox      = new ListBox()     |> setProperties
    
    ///params: name text idth height X Y 
    let newLinkLabel    = new LinkLabel()   |> setProperties
]]></File>
		<File name = "Program.fs" AddStandardHeader="True">
				<![CDATA[namespace ${Namespace}

module Program

open System
open ${Namespace}.Actions

let button = Actions.newButton "button1" "Test" 50 20 150 150

let form = Actions.newForm "form1" "Form" 250 150 80 80 
form.Controls.Add button

form.Show() |> ignore

 				]]></File>
 			</Files>
 		</Project>
 	</Combine>
 </Template><commit_msg>fixed ${Namespace} variable and "=" symbol<commit_after><?xml version="1.0" encoding="UTF-8" ?>

<Template Originator="<NAME>" Created="25/7/2012">

  <!-- Template Header -->
  <TemplateConfiguration>
    <_Name>F# Windows Forms project</_Name>
    <!--<Icon>md-project-console|res:fsharp-icon-32.png</Icon>-->
    <_Description>Creates F# Windows Forms project</_Description>
    <_Category>F#</_Category>
    <LanguageName>F#</LanguageName>
  </TemplateConfiguration>

  <!-- Actions -->
  <Actions>
    <Open filename = "Actions.fs"/>
    <Open filename = "Program.fs" />
  </Actions>

  <!-- Template Content -->
  <Combine name = "${ProjectName}" directory = ".">
    <Options>
      <StartupProject>${ProjectName}</StartupProject>
    </Options>

    <Project name = "${ProjectName}" directory = ".">
      <Options ExternalConsole="True"/>
      <References>
      	<Reference type="Gac" refto="FSharp.Core, Version=4.0.0.0, Culture=neutral, PublicKeyToken=<KEY>" />
      	<Reference type="Gac" refto="System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      	<Reference type="Gac" refto="System.Core, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      	<Reference type="Gac" refto="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=<KEY>" />
      	<Reference type="Gac" refto="System.Numerics, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      	<Reference type="Gac" refto="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
      </References>
      <Files>
        <File name = "Actions.fs" AddStandardHeader="True">
  <![CDATA[namespace ${Namespace}.Actions

module Actions =
    
    open System
    open System.Windows.Forms
    
    let setProperties<'a when 'a :> Control> (control:'a) name content width height x y = 
        control.Width   <- width
        control.Height  <- height
        control.Name    <- name
        control.Left    <- x
        control.Top     <- y
        control.Text    <- content 
        control 

    ///params: name title width height X Y
    let newForm = new Form() |> setProperties
    
    ///params: name text width height X Y
    let newButton       = new Button()      |> setProperties
    
    ///params: name text width height X Y
    let newTextBox      = new TextBox()     |> setProperties
    
    ///params: name text width height X Y
    let newLabel        = new Label()       |> setProperties
    
    ///params: name text width height X Y
    let newCheckBox     = new CheckBox()    |> setProperties
    
    ///params: name text width height X Y
    let newComboBox     = new ComboBox()    |> setProperties
    
    ///params: name text width height X Y
    let newListBox      = new ListBox()     |> setProperties
    
    ///params: name text idth height X Y 
    let newLinkLabel    = new LinkLabel()   |> setProperties
]]></File>
		<File name = "Program.fs" AddStandardHeader="True">
				<![CDATA[namespace ${Namespace}

module Program =

    open System
    open ${Namespace}.Actions

    let button = Actions.newButton "button1" "Test" 50 20 150 150

    let form = Actions.newForm "form1" "Form" 250 150 80 80 
    form.Controls.Add button

    form.Show() |> ignore ]]></File>
 			</Files>
 		</Project>
 	</Combine>
 </Template>
{'fraction_non_alphanumeric': 0.1414141414141414, 'fraction_numerical': 0.031961405095733454, 'mean_word_length': 2.78005698005698, 'pattern_counts': {'":': 0, '<': 119, '<?xml version=': 2, '>': 127, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 2}, 'pii_count': 12, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '5528255', 'n_tokens_mistral': 2243, 'n_tokens_neox': 2031, 'n_words': 519}