neko.f90

program plainneko
  use neko, only: neko_init, neko_solve, neko_finalize
  use case, only: case_t
  use neko_top, only: neko_top_register_types
 
  type(case_t) :: C
 
  call neko_top_register_types()
  call neko_init(c)
  call neko_solve(c)
  call neko_finalize(c)
 
end program plainneko