KTH framework for Nek5000 toolboxes; testing version
0.0.1
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | char_conv (p0, u, ulag, bm, bmlag, msk, c, cs, gsl) |
subroutine | char_conv1 (p0, u, bmnv, n, ulag, ln, gsl, c, m, cs, nc, ct, u1, r1, r2, r3, r4, bmsk, bdivw, bdwt, bmass, bmst, bm, bmlag) |
subroutine | int_vel (c_t, t0, c, n, nc, ct, nid) |
subroutine | conv_rhs (du, u, c, bmsk, bmst, bdwt, gsl) |
subroutine | convop_fst_3d (du, u, c, mx, md, nel) |
subroutine | convop_fst_2d (du, u, c, mx, md, nel) |
subroutine | grad_rstd (ur, us, ut, u, mx, md, if3d, ju) |
subroutine | intp_rstd (ju, u, mx, md, if3d, idir) |
subroutine | gen_int (jgl, jgt, mp, np, w) |
subroutine | gen_dgl (dgl, dgt, mp, np, w) |
subroutine | lim_chk (n, m, avar5, lvar5, sub_name10) |
subroutine | get_int_ptr (ip, mx, md) |
subroutine | get_dgl_ptr (ip, mx, md) |
subroutine | set_conv_char (ct, c, ux, uy, uz, nelc, tau, ifnew) |
subroutine | set_ct_cvx (ct, c, m, u, v, w, tau, nc, mc, nelc, ifnew) |
subroutine | grad_rst (ur, us, ut, u, md, if3d) |
subroutine | convect_new (bdu, u, ifuf, cx, cy, cz, ifcf) |
subroutine | convect_cons (bdu, u, ifuf, cx, cy, cz, ifcf) |
subroutine | set_convect_cons (cx, cy, cz, ux, uy, uz) |
subroutine | set_convect_new (cr, cs, ct, ux, uy, uz) |
subroutine | advchar |
subroutine | convch |
subroutine | convop_cons_3d (du, u, c, mx, md, nel) |
subroutine | convop_cons_2d (du, u, c, mx, md, nel) |
subroutine | iface_vert_int8 (fa, va, jz0, jz1, nel) |
subroutine | set_binv (bmnv, hmsk, n) |
subroutine | set_bdivw (bdivw, hmsk, n) |
subroutine | set_bmass (bmass, hmsk, n) |
subroutine | setup_dg_gs (dgh, nx, ny, nz, nel, melg, vertex) |
subroutine | dg_set_fc_ptr |
subroutine | full2face (faceary, vol_ary) |
subroutine | face2full (vol_ary, faceary) |
subroutine | add_face2full (vol_ary, faceary) |
subroutine | conv_rhs_dg_aliased (du, u, c) |
subroutine | map_faced (ju, u, mx, md, fdim, idir) |
subroutine | fbinvert (rhs) |
subroutine | grad_rstd_ta (du, ur, us, ut, md, if3d) |
subroutine | set_dg_wgts |
subroutine | conv_rhs_dg (du, u, c) |
subroutine | convect_dg (du, u, ifuf, cr, cs, ct, ifcf) |
subroutine | convop_weak (du, u, cr, cs, ct, mx, md, nel) |
subroutine | conv_bdry_dg_weak (du, u) |
subroutine | conv_rhs_dg_weak (du, u, cr, cs, ct) |
subroutine advchar |
Definition at line 903 of file convect.f.
References cfill(), char_conv(), col2(), and dnekclock().
subroutine char_conv | ( | real, dimension(1) | p0, |
real, dimension(1) | u, | ||
real, dimension(1) | ulag, | ||
real, dimension(1) | bm, | ||
real, dimension(1) | bmlag, | ||
real, dimension(1) | msk, | ||
real, dimension(1) | c, | ||
real, dimension(0:1) | cs, | ||
integer | gsl | ||
) |
Definition at line 2 of file convect.f.
References char_conv1().
subroutine char_conv1 | ( | real, dimension(n) | p0, |
real, dimension(n) | u, | ||
real, dimension(n,1) | bmnv, | ||
n, | |||
real, dimension(ln,1) | ulag, | ||
ln, | |||
integer | gsl, | ||
real, dimension(m,0:nc) | c, | ||
m, | |||
real, dimension(0:nc) | cs, | ||
nc, | |||
real, dimension(m) | ct, | ||
real, dimension(n) | u1, | ||
real, dimension(n) | r1, | ||
real, dimension(n) | r2, | ||
real, dimension(n) | r3, | ||
real, dimension(n) | r4, | ||
real, dimension(n) | bmsk, | ||
real, dimension(n,1) | bdivw, | ||
real, dimension(n) | bdwt, | ||
bmass, | |||
bmst, | |||
real, dimension(n) | bm, | ||
real, dimension(ln,1) | bmlag | ||
) |
subroutine conv_bdry_dg_weak | ( | real, dimension(1) | du, |
real, dimension(1) | u | ||
) |
Definition at line 1728 of file convect.f.
References full2face(), map_faced(), and rzero().
subroutine conv_rhs | ( | real, dimension(1) | du, |
real, dimension(1) | u, | ||
real, dimension(1) | c, | ||
real, dimension(1) | bmsk, | ||
bmst, | |||
real, dimension(1) | bdwt, | ||
integer | gsl | ||
) |
Definition at line 192 of file convect.f.
References col2(), conv_rhs_dg(), conv_rhs_dg_aliased(), convop_cons_2d(), convop_cons_3d(), convop_fst_2d(), convop_fst_3d(), rzero(), and subcol3().
subroutine conv_rhs_dg | ( | real, dimension(1) | du, |
real, dimension(1) | u, | ||
real, dimension(ldd*lelv,3) | c | ||
) |
Definition at line 1579 of file convect.f.
References add_face2full(), col2(), conv_rhs_dg_weak(), fbinvert(), full2face(), map_faced(), and rzero().
subroutine conv_rhs_dg_aliased | ( | real, dimension(1) | du, |
real, dimension(1) | u, | ||
real, dimension(1) | c | ||
) |
Definition at line 1376 of file convect.f.
References add_face2full(), col2(), convop_cons_2d(), convop_cons_3d(), convop_fst_2d(), convop_fst_3d(), fbinvert(), full2face(), and rzero().
subroutine conv_rhs_dg_weak | ( | real, dimension(1) | du, |
real, dimension(1) | u, | ||
real, dimension(1) | cr, | ||
real, dimension(1) | cs, | ||
real, dimension(1) | ct | ||
) |
Definition at line 1815 of file convect.f.
References convop_weak(), copy(), full2face(), map_faced(), and rzero().
subroutine convch |
Definition at line 964 of file convect.f.
References char_conv(), and dnekclock().
subroutine convect_cons | ( | real, dimension(1) | bdu, |
real, dimension(1) | u, | ||
logical | ifuf, | ||
real, dimension(1) | cx, | ||
real, dimension(1) | cy, | ||
real, dimension(1) | cz, | ||
logical | ifcf | ||
) |
Definition at line 731 of file convect.f.
References col2(), exitt(), grad_rst(), intp_rstd(), rzero(), and set_dealias_rx().
subroutine convect_dg | ( | real, dimension(1) | du, |
real, dimension(1) | u, | ||
logical | ifuf, | ||
real, dimension(1) | cr, | ||
real, dimension(1) | cs, | ||
real, dimension(1) | ct, | ||
logical | ifcf | ||
) |
Definition at line 1666 of file convect.f.
References conv_rhs_dg_weak().
subroutine convect_new | ( | real, dimension(1) | bdu, |
real, dimension(1) | u, | ||
logical | ifuf, | ||
real, dimension(1) | cx, | ||
real, dimension(1) | cy, | ||
real, dimension(1) | cz, | ||
logical | ifcf | ||
) |
Definition at line 638 of file convect.f.
References copy(), grad_rst(), intp_rstd(), and set_dealias_rx().
subroutine convop_cons_2d | ( | real, dimension(mx*mx,nel) | du, |
real, dimension(mx*mx,nel) | u, | ||
real, dimension(md*md,nel,2) | c, | ||
mx, | |||
md, | |||
nel | |||
) |
Definition at line 1059 of file convect.f.
References grad_rst(), intp_rstd(), lim_chk(), and rzero().
subroutine convop_cons_3d | ( | real, dimension(mx*mx*mx,nel) | du, |
real, dimension(mx*mx*mx,nel) | u, | ||
real, dimension(md*md*md,nel,3) | c, | ||
mx, | |||
md, | |||
nel | |||
) |
Definition at line 1004 of file convect.f.
References grad_rst(), intp_rstd(), lim_chk(), and rzero().
subroutine convop_fst_2d | ( | real, dimension(mx*mx,nel) | du, |
real, dimension(mx*mx,nel) | u, | ||
real, dimension(md*md,nel,2) | c, | ||
mx, | |||
md, | |||
nel | |||
) |
Definition at line 278 of file convect.f.
References grad_rstd(), intp_rstd(), and lim_chk().
subroutine convop_fst_3d | ( | real, dimension(mx*mx*mx,nel) | du, |
real, dimension(mx*mx*mx,nel) | u, | ||
real, dimension(md*md*md,nel,3) | c, | ||
mx, | |||
md, | |||
nel | |||
) |
Definition at line 236 of file convect.f.
References grad_rstd(), intp_rstd(), and lim_chk().
subroutine convop_weak | ( | real, dimension(lxx,nel) | du, |
real, dimension(lxx,nel) | u, | ||
real, dimension(ldd,nel) | cr, | ||
real, dimension(ldd,nel) | cs, | ||
real, dimension(ldd,nel) | ct, | ||
mx, | |||
md, | |||
nel | |||
) |
Definition at line 1677 of file convect.f.
References grad_rstd_ta(), intp_rstd(), and lim_chk().
subroutine dg_set_fc_ptr |
subroutine gen_dgl | ( | real, dimension(mp,np) | dgl, |
real, dimension(np*mp) | dgt, | ||
mp, | |||
np, | |||
real, dimension(1) | w | ||
) |
Definition at line 414 of file convect.f.
References fd_weights_full(), lim_chk(), transpose(), and zwgl().
subroutine gen_int | ( | real, dimension(mp,np) | jgl, |
real, dimension(np*mp) | jgt, | ||
mp, | |||
np, | |||
real, dimension(1) | w | ||
) |
Definition at line 381 of file convect.f.
References fd_weights_full(), transpose(), zwgl(), and zwgll().
subroutine get_dgl_ptr | ( | ip, | |
mx, | |||
md | |||
) |
subroutine get_int_ptr | ( | ip, | |
mx, | |||
md | |||
) |
subroutine grad_rst | ( | real, dimension(1) | ur, |
real, dimension(1) | us, | ||
real, dimension(1) | ut, | ||
real, dimension(1) | u, | ||
md, | |||
logical | if3d | ||
) |
Definition at line 614 of file convect.f.
References get_dgl_ptr(), local_grad2(), and local_grad3().
subroutine grad_rstd | ( | real, dimension(1) | ur, |
real, dimension(1) | us, | ||
real, dimension(1) | ut, | ||
real, dimension(1) | u, | ||
mx, | |||
md, | |||
logical | if3d, | ||
real, dimension(1) | ju | ||
) |
Definition at line 320 of file convect.f.
References get_dgl_ptr(), intp_rstd(), local_grad2(), and local_grad3().
subroutine grad_rstd_ta | ( | du, | |
real, dimension(1) | ur, | ||
real, dimension(1) | us, | ||
real, dimension(1) | ut, | ||
md, | |||
logical | if3d | ||
) |
Definition at line 1519 of file convect.f.
References get_dgl_ptr(), and gradrta().
subroutine int_vel | ( | real, dimension(n) | c_t, |
t0, | |||
real, dimension(n,0:nc) | c, | ||
n, | |||
nc, | |||
real, dimension(0:nc) | ct, | ||
nid | |||
) |
Definition at line 160 of file convect.f.
References exitt(), fd_weights_full(), and rzero().
subroutine intp_rstd | ( | real, dimension(1) | ju, |
real, dimension(1) | u, | ||
mx, | |||
md, | |||
logical | if3d, | ||
idir | |||
) |
Definition at line 346 of file convect.f.
References get_int_ptr(), lim_chk(), and specmpn().
subroutine lim_chk | ( | n, | |
m, | |||
character*5 | avar5, | ||
character*5 | lvar5, | ||
character*10 | sub_name10 | ||
) |
subroutine map_faced | ( | real, dimension(1) | ju, |
real, dimension(1) | u, | ||
mx, | |||
md, | |||
integer | fdim, | ||
idir | |||
) |
Definition at line 1448 of file convect.f.
References get_int_ptr(), lim_chk(), and mxm().
subroutine set_bdivw | ( | real, dimension(n,lorder) | bdivw, |
real, dimension(n) | hmsk, | ||
n | |||
) |
subroutine set_binv | ( | real, dimension(n,lorder) | bmnv, |
real, dimension(n) | hmsk, | ||
n | |||
) |
subroutine set_bmass | ( | real, dimension(n,lorder) | bmass, |
real, dimension(n) | hmsk, | ||
n | |||
) |
subroutine set_conv_char | ( | real, dimension(0:1) | ct, |
real, dimension(1) | c, | ||
real, dimension(1) | ux, | ||
real, dimension(1) | uy, | ||
real, dimension(1) | uz, | ||
integer | nelc, | ||
tau, | |||
logical | ifnew | ||
) |
Definition at line 543 of file convect.f.
References exitti(), and set_ct_cvx().
subroutine set_convect_cons | ( | real, dimension(ltd,1) | cx, |
real, dimension(ltd,1) | cy, | ||
real, dimension(ltd,1) | cz, | ||
real, dimension(lxy,1) | ux, | ||
real, dimension(lxy,1) | uy, | ||
real, dimension(lxy,1) | uz | ||
) |
Definition at line 817 of file convect.f.
References intp_rstd(), and set_dealias_rx().
subroutine set_convect_new | ( | real, dimension(ltd,1) | cr, |
real, dimension(ltd,1) | cs, | ||
real, dimension(ltd,1) | ct, | ||
real, dimension(lxy,1) | ux, | ||
real, dimension(lxy,1) | uy, | ||
real, dimension(lxy,1) | uz | ||
) |
Definition at line 845 of file convect.f.
References intp_rstd(), and set_dealias_rx().
subroutine set_ct_cvx | ( | real, dimension(0:1) | ct, |
real, dimension(m,1) | c, | ||
m, | |||
real, dimension(1) | u, | ||
real, dimension(1) | v, | ||
real, dimension(1) | w, | ||
tau, | |||
nc, | |||
mc, | |||
nelc, | |||
logical | ifnew | ||
) |
Definition at line 574 of file convect.f.
References copy(), set_convect_cons(), and set_convect_new().
subroutine set_dg_wgts |
subroutine setup_dg_gs | ( | integer | dgh, |
nx, | |||
ny, | |||
nz, | |||
nel, | |||
melg, | |||
integer, dimension(1) | vertex | ||
) |
Definition at line 1243 of file convect.f.
References iface_vert_int8(), and set_vert().