помогите справится с ошибкой syntax error

[studentftf]

при компиляции программы выдает ошибку "IMPLEMENTATION" expected but "INTERFACE" found
вот часть кода, помогите исправить
unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs;




type

{ TForm1 }

TForm1 = class(TForm)
procedure FormPaint(Sender: TObject);
procedure FormResize(Sender: TObject);
procedure GrOfFunc;
private
Function f(x:real):real;
{ private declarations }
public
{ public declarations }
end;

var
Form1: TForm1;
implementation

{ TForm1 }
// Функция, график которой надо построить
function TForm1.f(x: real): real;
begin
f:=exp(-x);
end;

[Mr.Smart]

Первое! Помещайте код в секцию [сode]. Для удобочитаемости!
Второе у вас секция interface встречается дважды, а она должна быть ТОЛЬКО одна в модуля!

[VirtUX]

у вас секция interface встречается дважды

Что-то я не вижу второго раза
Да и вообще ошибок не вижу за исключением отсутствия end. в конце и реализации процедур.

[Mr.Smart]

VirtUX
Товарищ просто успел отредактировать свой пост пока я писал данный текст

Добавлено спустя 1 минуту 5 секунд:
Думается, сам заметил....