Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Fix reported "DoF"s #1586

Open
wants to merge 3 commits into
base: develop
Choose a base branch
from
Open
Changes from 2 commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 5 additions & 3 deletions src/fluid/fluid_scheme.f90
Original file line number Diff line number Diff line change
Expand Up @@ -37,7 +37,7 @@ module fluid_scheme
use neko_config, only : NEKO_BCKND_DEVICE
use checkpoint, only : chkp_t
use mean_flow, only : mean_flow_t
use num_types, only : rp
use num_types, only : rp, i8
use comm
use fluid_source_term, only: fluid_source_term_t
use field, only : field_t
Expand All @@ -64,7 +64,7 @@ module fluid_scheme
use bc, only : bc_t, bc_list_t, bc_list_init, bc_list_add, bc_list_free, &
bc_list_apply_scalar, bc_list_apply_vector
use mesh, only : mesh_t, NEKO_MSH_MAX_ZLBLS, NEKO_MSH_MAX_ZLBL_LEN
use math, only : cfill, add2s2
use math, only : cfill, add2s2, glsum
use device_math, only : device_cfill, device_add2s2
use time_scheme_controller, only : time_scheme_controller_t
use operators, only : cfl
Expand Down Expand Up @@ -370,7 +370,9 @@ subroutine fluid_scheme_init_common(this, msh, lx, params, scheme, user, &
write(log_buf, '(A, I3)') 'Poly order : ', lx-1
end if
call neko_log%message(log_buf)
write(log_buf, '(A, I0)') 'DoFs : ', this%dm_Xh%size()
write(log_buf, '(A, I0)') 'GLL points : ', int(this%msh%glb_nelv,i8)*int(this%Xh%lxyz,i8)
MartinKarp marked this conversation as resolved.
Show resolved Hide resolved
call neko_log%message(log_buf)
write(log_buf, '(A, I0)') 'Unique pts.: ', int(glsum(this%c_Xh%mult,this%dm_Xh%size()),i8)
MartinKarp marked this conversation as resolved.
Show resolved Hide resolved
call neko_log%message(log_buf)

write(log_buf, '(A,ES13.6)') 'rho :', this%rho
Expand Down
Loading