n_lines Function

private function n_lines(me)

Type Bound

file_t

Arguments

Type IntentOptional Attributes Name
class(file_t), intent(in) :: me

Return Value integer


Calls

proc~~n_lines~~CallsGraph proc~n_lines file_t%n_lines proc~number_of_lines_in_file number_of_lines_in_file proc~n_lines->proc~number_of_lines_in_file

Source Code

  integer function n_lines(me)
    class(file_t),intent(in) :: me
    print*, 'n_lines'
    n_lines = number_of_lines_in_file(me%iunit)
  end function n_lines