Пропустить строку из текстового файла в Fortran90

Пишу фортраном (90). Моя программа должна читать файл1, делать что-то с каждой его строкой и записывать результат в файл2. Но проблема - file1 содержит ненужную информацию в первой строке.

Как я могу пропустить строку из входного файла с помощью Fortran?

Код:

open (18, file='m3dv.dat')
open (19, file='m3dv2.dat')
do
  read(18,*) x
  tmp = sqrt(x**2 + 1)
  write(19, *) tmp
end do

Первая строка представляет собой комбинацию текста и чисел.