Skip to content
Snippets Groups Projects
Commit 9c057a15 authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann :seedling:
Browse files

compute transport at init

avoid incoherent value in terminal
parent 4f5ee2b0
No related branches found
No related tags found
No related merge requests found
...@@ -10,7 +10,7 @@ SUBROUTINE inital ...@@ -10,7 +10,7 @@ SUBROUTINE inital
USE closure, ONLY: apply_closure_model USE closure, ONLY: apply_closure_model
USE ghosts, ONLY: update_ghosts_moments, update_ghosts_EM USE ghosts, ONLY: update_ghosts_moments, update_ghosts_EM
USE restarts, ONLY: load_moments, job2load USE restarts, ONLY: load_moments, job2load
USE processing, ONLY: compute_fluid_moments USE processing, ONLY: compute_fluid_moments, compute_radial_heatflux, compute_radial_transport
USE model, ONLY: LINEARITY USE model, ONLY: LINEARITY
USE nonlinear, ONLY: compute_Sapj, nonlinear_init USE nonlinear, ONLY: compute_Sapj, nonlinear_init
IMPLICIT NONE IMPLICIT NONE
...@@ -88,14 +88,17 @@ SUBROUTINE inital ...@@ -88,14 +88,17 @@ SUBROUTINE inital
!! Preparing auxiliary arrays at initial state !! Preparing auxiliary arrays at initial state
! particle density, fluid velocity and temperature (used in diagnose) ! particle density, fluid velocity and temperature (used in diagnose)
CALL speak('Computing fluid moments') CALL speak('Computing fluid moments and transport')
CALL compute_fluid_moments CALL compute_fluid_moments
CALL compute_radial_transport
CALL compute_radial_heatflux
! init auxval for nonlinear ! init auxval for nonlinear
CALL nonlinear_init CALL nonlinear_init
! compute nonlinear for t=0 diagnostic ! compute nonlinear for t=0 diagnostic
CALL compute_Sapj ! compute S_0 = S(phi_0,N_0) CALL compute_Sapj ! compute S_0 = S(phi_0,N_0)
END SUBROUTINE inital END SUBROUTINE inital
!******************************************************************************! !******************************************************************************!
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment