| # -*- 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
 |