line_number_counter Function
public function line_number_counter(fname, funit)
count the line in the fname
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | fname |
counting the file name |
||
| integer, | intent(in), | optional | :: | funit |
file unit (default: 11) |