17 lines
293 B
Fortran
17 lines
293 B
Fortran
! Premixed Flame Direct Numerical Simulation
|
|
! written by Insuk Han
|
|
! May/16/2006
|
|
! This code is based on the Kim's one
|
|
!
|
|
PROGRAM test
|
|
USE ysolve
|
|
IMPLICIT NONE
|
|
CALL parse
|
|
|
|
CALL init_solver
|
|
|
|
CALL solve
|
|
|
|
CALL finalize_solver
|
|
|
|
END PROGRAM test
|