eval_iota_r Function

public function eval_iota_r(spos)

Evaluate iota profile from restart data

Arguments

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

Return Value real(kind=wp)


Calls

proc~~eval_iota_r~~CallsGraph proc~eval_iota_r eval_iota_r proc~eval_prof_r eval_prof_r proc~eval_iota_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_iota_r(spos)
  IMPLICIT NONE
!-----------------------------------------------------------------------------------------------------------------------------------
! INPUT VARIABLES
  REAL(wp),INTENT(IN):: spos
!-----------------------------------------------------------------------------------------------------------------------------------
! OUTPUT VARIABLES
  REAL(wp) :: eval_iota_r
!-----------------------------------------------------------------------------------------------------------------------------------
! LOCAL VARIABLES
!===================================================================================================================================
  eval_iota_r=eval_prof_r(spos,3,0)
END FUNCTION eval_iota_r