histogram_reset Subroutine

subroutine histogram_reset(h)

Arguments

Type IntentOptional Attributes Name
type(histogram) :: h

Source Code

subroutine histogram_reset(h)
  type(histogram)    :: h
  h%range=0.d0
  h%bin=0.d0
end subroutine histogram_reset