is_whole_number Function

public pure function is_whole_number(n)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: n

Return Value logical


Called by

proc~~is_whole_number~~CalledByGraph proc~is_whole_number is_whole_number proc~parse_time parse_time proc~parse_time->proc~is_whole_number proc~parse_timezone_offset parse_timezone_offset proc~parse_time->proc~parse_timezone_offset proc~read_whole_number read_whole_number proc~parse_time->proc~read_whole_number proc~parse_timezone_offset->proc~is_whole_number proc~parse_timezone_offset->proc~read_whole_number proc~read_whole_number_indexed read_whole_number_indexed proc~read_whole_number_indexed->proc~is_whole_number proc~test_is_whole_number test_is_whole_number proc~test_is_whole_number->proc~is_whole_number proc~construct_iso8601duration construct_ISO8601Duration proc~construct_iso8601duration->proc~read_whole_number_indexed proc~construct_iso8601time construct_ISO8601Time proc~construct_iso8601time->proc~parse_time proc~read_whole_number->proc~read_whole_number_indexed proc~test_parse_time test_parse_time proc~test_parse_time->proc~parse_time proc~test_parse_timezone_offset test_parse_timezone_offset proc~test_parse_timezone_offset->proc~parse_timezone_offset proc~test_read_whole_number_indexed test_read_whole_number_indexed proc~test_read_whole_number_indexed->proc~read_whole_number_indexed interface~iso8601duration ISO8601Duration interface~iso8601duration->proc~construct_iso8601duration interface~iso8601time ISO8601Time interface~iso8601time->proc~construct_iso8601time proc~parse_date parse_date proc~parse_date->proc~read_whole_number proc~test_construct_iso8601time test_construct_ISO8601Time proc~test_construct_iso8601time->proc~construct_iso8601time proc~test_read_whole_number test_read_whole_number proc~test_read_whole_number->proc~read_whole_number proc~construct_iso8601date construct_ISO8601Date proc~construct_iso8601date->proc~parse_date proc~test_parse_date test_parse_date proc~test_parse_date->proc~parse_date

Source Code

   pure logical function is_whole_number(n)
      integer, intent(in) :: n
      is_whole_number = .not. (n < 0)
   end function is_whole_number