blob: aba4de1b7314a500a3f826aca5b57521538a8a05 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
#include "cctk.h"
module cctk_Banner
implicit none
interface
subroutine CCTK_RegisterBanner (ierr, banner)
implicit none
integer ierr
character(*) banner
end subroutine CCTK_RegisterBanner
end interface
end module cctk_Banner
|