18 lines
350 B
Fortran
18 lines
350 B
Fortran
! This code has been written since 2011.01.08
|
|
! This code is written by Dongkyu Lee (THDHRKDG)
|
|
! Purpose of this code is to postprocess results of stagnating DNS code
|
|
|
|
PROGRAM post_dns
|
|
USE m_openmpi
|
|
USE post
|
|
USE Compact
|
|
|
|
CALL print_data
|
|
|
|
CALL m_openmpi_init
|
|
|
|
CALL main
|
|
|
|
CALL m_openmpi_exit
|
|
|
|
END PROGRAM
|