get_fNeqFac_f2c Function

public pure function get_fNeqFac_f2c(omegaF, omegaC, sFac) result(fac)

Calculate fNeq scale factor from fine level to(2) coarse level. Such scale make sure continuuity of strain rate and shear stress over levels. To achive equal strain rate, we want: fNeq_c * omega_c / dt_c = fNeq_f * omega_f / dt_f rearrange this, we get: fNeq_c = fNeq_f * ( omega_f / omega_c ) * ( dt_c / dt_f ) dt_c/dt_f is strain rate scale factor (i.e. sFac)

This function can be used converting fNeq_f to fNeq_c, such as fill coarse from finer interpolation routines. How to use this function: sFac = physics%sfac( fineLevel, coarseLevel ) fNeq_c = fNeq_f * fNeqFac( omega_f, omega_c, sFac )


real(kind=rk), intent(in) :: omegaF

omega on fine and coarse level

real(kind=rk), intent(in) :: omegaC

omega on fine and coarse level

real(kind=rk), intent(in) :: sFac

strain rate scaling factor that from fine to coarse

Return Value real(kind=rk)

Called by

proc~~get_fneqfac_f2c~~CalledByGraph proc~get_fneqfac_f2c get_fNeqFac_f2c proc~fillcoarser_compactd3q27 fillCoarser_compactd3q27 proc~fillcoarser_compactd3q27->proc~get_fneqfac_f2c