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