Двунаправленный динамический список

[mata]

Нужно составить двунаправленный динамический список из текстового файла. Я нашёл такой вот исходник:

type
  DLPtr = ^DPolinom;
  DPolinom = record
    koef: real;  //коэффицент полинома
    step: byte;//степень полинома
    next, prew: DLPtr;//указатели на следующий и предыдущий соответственно
  end;

var
  First: DLPtr;//указатель на начало полинома. степени идут по уменьшению.
  F: text;//файловая переменная

и

procedure TForm1.Button1Click(Sender: TObject);
   var
    d, h: DLPtr;
begin
  {$I-}
  reset (F);
  {$I+}
  if IOResult <> 0 then //проверка файла
    begin
      ShowMessage ('Ошибка читения файла');
      exit;
    end;
  readln(F);
  new (d);             //создание головы
  read (F, d^.step);
  readln(F,d^.koef);
  d^.next := NIL;
  d^.prew := NIL;
  h := d;
  while not EOF (F) do //создание списка из файла
    begin
      new (h^.next);
      read (f, h^.next^.step);
      readln (f, h^.next^.koef);
      h^.next^.prew := h;
      h := h^.next;
    end;
  CloseFile(F)
end;

На начальном уровне я немного разбираюсь в программировании. Но что такое динамический список понять не могу решительно. Так же проблемы с файловой переменной, как её задать и какой тип переменных использовать ну и естественно как вывести созданный динамический список. Буду благодарен.

P.S. Забыл указать в названии темы среду - Delphi.

[mata]

Я понял как связать файл и переменную(AssignFile);
Программа запускается, но при попытке составить список выдаётся ошибка 'Invalid Numeric Input'.
Блин, я вообще не понимаю этот код...