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

  $0
end subroutine $1
