aboutsummaryrefslogtreecommitdiff
path: root/vim/bundle/vim-snippets/snippets/fortran.snippets
diff options
context:
space:
mode:
Diffstat (limited to 'vim/bundle/vim-snippets/snippets/fortran.snippets')
-rw-r--r--vim/bundle/vim-snippets/snippets/fortran.snippets93
1 files changed, 93 insertions, 0 deletions
diff --git a/vim/bundle/vim-snippets/snippets/fortran.snippets b/vim/bundle/vim-snippets/snippets/fortran.snippets
new file mode 100644
index 0000000..c9ab060
--- /dev/null
+++ b/vim/bundle/vim-snippets/snippets/fortran.snippets
@@ -0,0 +1,93 @@
+snippet impl
+ implicit none
+ $0
+snippet prog
+ program ${1:main}
+ $0
+ end program $1
+snippet mod
+ module ${1:modulename}
+ $0
+ end module $1
+snippet proc
+ procedure ${1:name}
+ ${0}
+ end procedure $1
+snippet iface
+ interface ${1:name}
+ ${0}
+ end interface $1
+snippet doc
+ ! """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
+ ! File: ${2:`vim_snippets#Filename('$1')`}
+ ! Author: `g:snips_author`
+ ! Email: `g:snips_email`
+ ! Github: `g:snips_github`
+ ! Description: $1
+ ! """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
+ $0
+# Variables definitions
+# Boolean
+snippet bool
+ logical :: $0
+# Integer
+snippet int
+ integer :: $0
+snippet real
+ real :: $0
+# Double Precision
+snippet double
+ double precision :: $0
+# Char
+snippet str
+ character(len=${1:*}) :: ${0:}
+# Types
+snippet type
+ type(${1:name})
+ $0
+ end type
+snippet const
+ ${1:type}, parameter :: $2 = $0
+snippet arr
+ ${1:type}, allocatable, dimension(${2::}) :: $0
+snippet intent
+ ${1:type}, intent(inout) :: $0
+# Array
+snippet /
+ (/ $1 /) ${2:,&} $0
+snippet if
+ if (${1:condition}) then
+ $2
+ end if
+snippet case
+ select case (${1:expr})
+ case ($2)
+ case default
+ $3
+ end select $0
+snippet do
+ do ${1:i} = ${2:start},${3:end}, ${4:incr}
+ $4
+ end do
+snippet dow
+ do while (${1:condition})
+ $2
+ end do
+snippet sub
+ subroutine ${1:name}($2)
+ $0
+ end subroutine $1
+snippet func
+ function ${1:name}($2) result($3)
+ $0
+ end function $1
+snippet pr
+ write(*,*) $0
+snippet read
+ read( unit = ${1:fp}, file = ${2:filename}${3:, iostat = IERR }) $0
+snippet write
+ write( unit = ${1:fp}, file = ${2:filename}${3:, iostat = IERR }) $0
+snippet open
+ open (unit = ${1:fp}, file = ${2:filename}, status = unknown${3:, iostat = IERR }) $0
+snippet close
+ close ( unit = ${1:fp} ) $0