19 lines
303 B
Fortran
19 lines
303 B
Fortran
module soundbrotch
|
|
|
|
implicit none
|
|
|
|
contains
|
|
|
|
! ---------------------------------------------------------
|
|
|
|
subroutine soundbrotch_version ()
|
|
|
|
write(0, '(A)') "*** this is soundbrotch version alpha"
|
|
|
|
end subroutine
|
|
|
|
! ---------------------------------------------------------
|
|
|
|
end module
|
|
|