nusselt_correlation Function

public function nusselt_correlation(me, Re, Pra, Tother, T)

Type Bound

nusselt_t

Arguments

Type IntentOptional Attributes Name
class(nusselt_t), intent(inout) :: me
real(kind=dp), intent(in) :: Re
real(kind=dp), intent(in) :: Pra
real(kind=dp), intent(in), optional :: Tother
real(kind=dp), intent(in), optional :: T

Return Value real(kind=dp)


Called by

proc~~nusselt_correlation~~CalledByGraph proc~nusselt_correlation nusselt_t%nusselt_correlation proc~ffsrclink_resolution_from_and_to_ports FFsrcLink_resolution_from_and_to_ports proc~ffsrclink_resolution_from_and_to_ports->proc~nusselt_correlation proc~fslink_resolution_from_and_to_ports FSlink_resolution_from_and_to_ports proc~fslink_resolution_from_and_to_ports->proc~nusselt_correlation proc~sourceterms_notfriction_channel SourceTerms_NOTfriction_channel proc~sourceterms_notfriction_channel->proc~nusselt_correlation proc~main_loop main_loop proc~main_loop->proc~ffsrclink_resolution_from_and_to_ports proc~main_loop->proc~fslink_resolution_from_and_to_ports proc~source_term_definition_channel source_term_definition_channel proc~main_loop->proc~source_term_definition_channel proc~full_physics_definition_channel full_physics_definition_channel proc~main_loop->proc~full_physics_definition_channel proc~source_term_definition_channel->proc~sourceterms_notfriction_channel proc~full_physics_definition_channel->proc~source_term_definition_channel program~reims_p reims_p program~reims_p->proc~main_loop

Source Code

    function nusselt_correlation(me,Re,Pra,Tother,T)
      class(nusselt_t),  intent(inout) :: me
      real(dp), intent(in) :: Re,Pra
      real(dp), intent(in), optional :: Tother,T
      real(dp) :: nusselt_correlation,Tother_loc,T_loc

      if(present(Tother) .and. present(T)) then
          Tother_loc=Tother; T_loc=T
      else
          Tother_loc=0.0_dp; T_loc=0.0_dp
      endif

      nusselt_correlation=me%nuss(me%nuss_cfg,Re,Pra,Tother_loc,T_loc)
    end function nusselt_correlation