From c78c4336fd3795d59ff1b4384bcc5affbe2b43c3 Mon Sep 17 00:00:00 2001
From: kinoshita-eos <kinoshita@yasunaga-lab.bio.kyutech.ac.jp>
Date: Thu, 22 Jan 2015 11:03:07 +0900
Subject: [PATCH] Add: PIONE tutorial of Loop statement with upto. 	new
 file:   SampleCode/PIONE/Basic15/EvenOddLoop3.pione 	new file:  
 SampleCode/PIONE/Basic15/LoopTouch5.pione 	new file:  
 SampleCode/PIONE/Basic15/LoopTouch6.pione

---
 SampleCode/PIONE/Basic15/EvenOddLoop3.pione | 33 +++++++++++++++++++++++++++++
 SampleCode/PIONE/Basic15/LoopTouch5.pione   | 15 +++++++++++++
 SampleCode/PIONE/Basic15/LoopTouch6.pione   | 15 +++++++++++++
 3 files changed, 63 insertions(+)
 create mode 100644 SampleCode/PIONE/Basic15/EvenOddLoop3.pione
 create mode 100644 SampleCode/PIONE/Basic15/LoopTouch5.pione
 create mode 100644 SampleCode/PIONE/Basic15/LoopTouch6.pione

diff --git a/SampleCode/PIONE/Basic15/EvenOddLoop3.pione b/SampleCode/PIONE/Basic15/EvenOddLoop3.pione
new file mode 100644
index 0000000..a1a874a
--- /dev/null
+++ b/SampleCode/PIONE/Basic15/EvenOddLoop3.pione
@@ -0,0 +1,33 @@
+param $maxval := 456
+param $minval := 123
+param $dval := 37
+
+Rule Main
+	output '*.txt'.all
+Flow
+	rule EvenOdd {val: $minval + ($dval * (0.upto(($maxval - $minval)/$dval)))}
+End
+
+Rule EvenOdd
+	output '*.txt'
+	param $val
+Flow
+	if $val % 2 == 0
+		rule Even {val: $val}
+	else
+		rule Odd {val: $val}
+	end
+End
+
+Rule Even
+	output '*.txt'
+	param $val
+Action
+	echo "{$val} is even." >> Even{$val}.txt;
+End
+
+Rule Odd
+	output '*.txt'
+Action
+	echo "{$val} is odd." >> Odd{$val}.txt;
+End
\ No newline at end of file
diff --git a/SampleCode/PIONE/Basic15/LoopTouch5.pione b/SampleCode/PIONE/Basic15/LoopTouch5.pione
new file mode 100644
index 0000000..f6a7f6b
--- /dev/null
+++ b/SampleCode/PIONE/Basic15/LoopTouch5.pione
@@ -0,0 +1,15 @@
+param $min := 0
+param $max := 64
+
+Rule Main
+	output '*.txt'
+Flow
+	rule Test {val: $min.upto($max)}
+End
+
+Rule Test
+	output '{$val}.txt'
+	param $val
+Action
+	touch {$O[1]}
+End
\ No newline at end of file
diff --git a/SampleCode/PIONE/Basic15/LoopTouch6.pione b/SampleCode/PIONE/Basic15/LoopTouch6.pione
new file mode 100644
index 0000000..84dd040
--- /dev/null
+++ b/SampleCode/PIONE/Basic15/LoopTouch6.pione
@@ -0,0 +1,15 @@
+param $min := 0
+param $max := 64
+
+Rule Main
+	output '*.txt'
+Flow
+	rule Test {val: $max.downto($min)}
+End
+
+Rule Test
+	output '{$val}.txt'
+	param $val
+Action
+	touch {$O[1]}
+End
\ No newline at end of file
-- 
2.11.0