fundal_weno5_kernels_r8_real

Source: src/third_party/FUNDAL/src/tests/precision/fundal_weno5_kernels_r8_real.F90

Dependencies

Contents

• ghost_fill_r8_real
• weno5_rhs_r8_real
• rk1_update_r8_real

Subroutines

ghost_fill_r8_real

Periodic ghost fill, same as V1 ghost_fill_r8 — c is one of the collapsed parallel dims here because ghost fill has no inter-c coupling (the nonlinear constraint is on the rhs flux, not on boundary copies). Kept verbatim from V1 for fairness.

subroutine ghost_fill_r8_real(U, nb, ni, ng, nc)

Arguments

Name	Type	Intent	Attributes	Description
U	real(kind=R8P)	inout
nb	integer(kind=I4P)	in
ni	integer(kind=I4P)	in
ng	integer(kind=I4P)	in
nc	integer(kind=I4P)	in

weno5_rhs_r8_real

Same FP64 WENO5 rhs as V1 but with c sequential inside the parallel region. Mirrors the structure of V3fA-F (storage A, loop order F) so the V1' / V3fA-F comparison is the apples-to- apples one for the "realistic CFD" question.

subroutine weno5_rhs_r8_real(U, rhs, nb, ni, ng, nc)

Arguments

Name	Type	Intent	Attributes	Description
U	real(kind=R8P)	in
rhs	real(kind=R8P)	out
nb	integer(kind=I4P)	in
ni	integer(kind=I4P)	in
ng	integer(kind=I4P)	in
nc	integer(kind=I4P)	in

Call graph

rk1_update_r8_real

RK1 update with c sequential (matching the V1' parallelism surface).

subroutine rk1_update_r8_real(U, rhs, dt, nb, ni, ng, nc)

Arguments

Name	Type	Intent	Attributes	Description
U	real(kind=R8P)	inout
rhs	real(kind=R8P)	in
dt	real(kind=R8P)	in
nb	integer(kind=I4P)	in
ni	integer(kind=I4P)	in
ng	integer(kind=I4P)	in
nc	integer(kind=I4P)	in