driver.f90

Go to the documentation of this file.

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