11 lines
224 B
Plaintext
11 lines
224 B
Plaintext
|
# -*- mode: snippet -*-
|
||
|
|
# contributor: Jonas Kalderstam <jonas@kalderstam.se>
|
||
|
|
# name: subroutine .. end subroutine
|
||
|
|
# key: subroutine
|
||
|
|
# --
|
||
|
|
subroutine ${1:name} (${2:arg})
|
||
|
|
${3:real, intent(in) :: $2}
|
||
|
|
|
||
|
|
$0
|
||
|
|
end subroutine $1
|