Neko-TOP
A portable framework for high-order spectral element flow toplogy optimization.
Loading...
Searching...
No Matches
usr_driver.f90
Go to the documentation of this file.
1program usrneko
2 use neko, only: neko_init, neko_solve, neko_finalize
3 use case, only: case_t
4 use user, only: user_setup
5
6 type(case_t), target :: c
7
8 call user_setup(c%usr)
9 call neko_init(c)
10 call neko_solve(c)
11 call neko_finalize(c)
12
13
14end program usrneko
program usrneko
Definition driver.f90:1
User defined user region.
Definition user.f90:2
subroutine user_setup(user)
Register user defined functions (see nekos user_intf.f90)
Definition user.f90:22