pdf_set_range_1d Subroutine

subroutine pdf_set_range_1d(self, a, b)

Arguments

Type IntentOptional Attributes Name
type(pdf_kernel) :: self
real(kind=8) :: a
real(kind=8) :: b

Calls

proc~~pdf_set_range_1d~2~~CallsGraph proc~pdf_set_range_1d~2 pdf_set_range_1d linspace linspace proc~pdf_set_range_1d~2->linspace

Source Code

subroutine pdf_set_range_1d(self,a,b)
  type(pdf_kernel) :: self
  real(8)          :: a
  real(8)          :: b
  if(.not.self%status)stop "PDF_SET_RANGE: PDF not allocated"
  self%xmin=a
  self%xmax=b
  self%x = linspace(a,b,self%N,mesh=self%dx)
end subroutine pdf_set_range_1d