ply_transfer_dofs_1D Subroutine

public subroutine ply_transfer_dofs_1D(indat, indegree, outdat, outdegree)

Transfer of degrees of freedom from one polynomial to another in 1D.

If the indat is larger than outdat, the higher modes are truncated. If outdat is larger, higher modes are padded with zeros.

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in) :: indat(:)

Input data to transfer to output data.
integer, intent(in) :: indegree

Degree of the input polynomial. There are indegree+1 modes expected in indat.
real(kind=rk), intent(out) :: outdat(:)

Output data to fill with input data.
integer, intent(in) :: outdegree

Degree of the output polynomial. There are outdegree+1 modes expected in outdat.

Called by

proc~~ply_transfer_dofs_1d~~CalledByGraph proc~ply_transfer_dofs_1d ply_transfer_dofs_1D proc~ply_transfer_dofs ply_transfer_dofs proc~ply_transfer_dofs->proc~ply_transfer_dofs_1d proc~ply_test_transfer_1d ply_test_transfer_1d proc~ply_test_transfer_1d->proc~ply_transfer_dofs_1d proc~serializedata serializeData proc~serializedata->proc~ply_transfer_dofs program~ply_transfer_test ply_transfer_test program~ply_transfer_test->proc~ply_test_transfer_1d proc~ply_subres_import_color ply_subres_import_color proc~ply_subres_import_color->proc~ply_transfer_dofs proc~atl_readrestart atl_readRestart proc~atl_readrestart->proc~serializedata proc~atl_writerestart atl_writeRestart proc~atl_writerestart->proc~serializedata proc~atl_initialize atl_initialize proc~atl_initialize->proc~atl_readrestart proc~atl_writerestartifnecessary atl_writeRestartIfNecessary proc~atl_writerestartifnecessary->proc~atl_writerestart program~atl_harvesting atl_harvesting program~atl_harvesting->proc~atl_writerestart

Contents