Last commit before tagging and releasing

extras/imported/f90-mode/Arrays/Allocate Array.yasnippet

@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# key: al
+# contributor: Translated from TextMate Snippet
+# name: Allocate Array
+# --
+allocate(${1:array}, stat=${2:err})
+if ($2 /= 0) print *, "${1/(\w+).*/$1/}: Allocation request denied"

extras/imported/f90-mode/Arrays/Allocate and Deallocate array.yasnippet

@@ -0,0 +1,10 @@
+# -*- mode: snippet -*-
+# key: alloc
+# contributor: Translated from TextMate Snippet
+# name: Allocate and Deallocate array
+# --
+allocate(${1:array}, stat=${2:err})
+if ($2 /= 0) print *, "${1/(\w+).*/$1/}: Allocation request denied"
+
+$0if (allocated(${1/(\w+).*/$1/})) deallocate(${1/(\w+).*/$1/}, stat=$2)
+if ($2 /= 0) print *, "${1/(\w+).*/$1/}: Deallocation request denied$0"

extras/imported/f90-mode/Arrays/Deallocate Array.yasnippet

@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# key: deal
+# contributor: Translated from TextMate Snippet
+# name: Deallocate Array
+# --
+if (allocated($1)) deallocate(${1:array}, stat=${2:err})
+if ($2 /= 0) print *, "$1: Deallocation request denied$0"

extras/imported/f90-mode/Arrays/Dot Product of Vectors.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: dot
+# contributor: Translated from TextMate Snippet
+# name: Dot Product of Vectors
+# --
+dot_product($1,$2)

extras/imported/f90-mode/Arrays/Index of Maximum.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: maxloc
+# contributor: Translated from TextMate Snippet
+# name: Index of Maximum
+# --
+maxloc(${1:source}${2:, mask=${3:($1>0)}})

extras/imported/f90-mode/Arrays/Index of Minimum.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: minloc
+# contributor: Translated from TextMate Snippet
+# name: Index of Minimum
+# --
+minloc(${1:source}${2:, mask=${3:$1>0}})

extras/imported/f90-mode/Arrays/Lower Bound.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: lbound
+# contributor: Translated from TextMate Snippet
+# name: Lower Bound
+# --
+lbound(${1:source}${2:, dim=${3:1}})

extras/imported/f90-mode/Arrays/Matrix Multiplication.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: mat
+# contributor: Translated from TextMate Snippet
+# name: Matrix Multiplication
+# --
+matmul($1,$2)

extras/imported/f90-mode/Arrays/Maximum Value.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: maxval
+# contributor: Translated from TextMate Snippet
+# name: Maximum Value
+# --
+maxval(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})

extras/imported/f90-mode/Arrays/Minimum Value.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: minval
+# contributor: Translated from TextMate Snippet
+# name: Minimum Value
+# --
+minval(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})

extras/imported/f90-mode/Arrays/Product of Elements.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: prod
+# contributor: Translated from TextMate Snippet
+# name: Product of Elements
+# --
+product(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})

extras/imported/f90-mode/Arrays/Size.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: size
+# contributor: Translated from TextMate Snippet
+# name: Size
+# --
+size(${1:source}${2:, dim=${3:1}})

extras/imported/f90-mode/Arrays/Sum of Elements.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: sum
+# contributor: Translated from TextMate Snippet
+# name: Sum of Elements
+# --
+sum(${1:source}${2:, dim=${3:1}}${4:, mask=${5:($1>0)}})

extras/imported/f90-mode/Arrays/Upper Bound.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: ubound
+# contributor: Translated from TextMate Snippet
+# name: Upper Bound
+# --
+ubound(${1:source}${2:, dim=${3:1}})

extras/imported/f90-mode/Arrays/Wrap Selection in Array Brackets.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# contributor: Translated from TextMate Snippet
+# name: Wrap Selection in Array Brackets
+# binding: "@A"
+# --
+(/ `yas/selected-text`$0 /)

extras/imported/f90-mode/Arrays/merge.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: merge
+# contributor: Translated from TextMate Snippet
+# name: merge
+# --
+merge(${1:source}, ${2:alternative}, mask=(${2:$1>0}))

extras/imported/f90-mode/Arrays/pack.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: pack
+# contributor: Translated from TextMate Snippet
+# name: pack
+# --
+pack(${1:array}, mask=(${2:$1>0})${3:, vector=${4:destination vector}})

extras/imported/f90-mode/Arrays/reshape.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: resh
+# contributor: Translated from TextMate Snippet
+# name: reshape
+# --
+reshape(${1:source}${2:, shape=(/$3/)}${4:, pad=(/$5/)}${6:, order=(/${7:2,1}/)})

extras/imported/f90-mode/Arrays/spread.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: spread
+# contributor: Translated from TextMate Snippet
+# name: spread
+# --
+spread(${1:source}, dim=${2:1}, ncopies=$3)

extras/imported/f90-mode/Arrays/unpack.yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: unpack
+# contributor: Translated from TextMate Snippet
+# name: unpack
+# --
+unpack(${1:vector}, mask=(${2:$1>0}), field=${3:destination array})

extras/imported/f90-mode/Arrays/where (single line).yasnippet

@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# key: wh
+# contributor: Translated from TextMate Snippet
+# name: where (single line)
+# --
+where ( $1 ${2:==} $3 ) 

extras/imported/f90-mode/Arrays/where.yasnippet

@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# key: whe
+# contributor: Translated from TextMate Snippet
+# name: where
+# --
+where ( $1 ${2:==} $3 )
+	$0
+end where