eval_phiPrime_r Function

public function eval_phiPrime_r(spos)

Evaluate phiPrime profile from restart data

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: spos

Return Value real(kind=wp)


Calls

proc~~eval_phiprime_r~~CallsGraph proc~eval_phiprime_r eval_phiPrime_r proc~eval_prof_r eval_prof_r proc~eval_phiprime_r->proc~eval_prof_r proc~sbase_evaldof_s t_sBase%sBase_evalDOF_s proc~eval_prof_r->proc~sbase_evaldof_s proc~sbase_eval t_sBase%sBase_eval proc~sbase_evaldof_s->proc~sbase_eval proc~sbase_evaldof_base t_sBase%sBase_evalDOF_base proc~sbase_evaldof_s->proc~sbase_evaldof_base eval_basis eval_basis proc~sbase_eval->eval_basis eval_basis_and_n_derivs eval_basis_and_n_derivs proc~sbase_eval->eval_basis_and_n_derivs lagrangeinterpolationpolys lagrangeinterpolationpolys proc~sbase_eval->lagrangeinterpolationpolys proc~sgrid_find_elem t_sGrid%sGrid_find_elem proc~sbase_eval->proc~sgrid_find_elem

Source Code

FUNCTION eval_phiPrime_r(spos)
  IMPLICIT NONE
!-----------------------------------------------------------------------------------------------------------------------------------
! INPUT VARIABLES
  REAL(wp),INTENT(IN):: spos
!-----------------------------------------------------------------------------------------------------------------------------------
! OUTPUT VARIABLES
  REAL(wp) :: eval_phiPrime_r
!-----------------------------------------------------------------------------------------------------------------------------------
! LOCAL VARIABLES
!===================================================================================================================================
  eval_phiPrime_r=eval_prof_r(spos,1,DERIV_S)
END FUNCTION eval_phiPrime_r