Не компилируется модуль, указывает синтаксическую ошибку - Free Pascal

Формулировка задачи:

Не компилируется модуль, указывает синтаксическую ошибку но ее там нет, может причина в том, что функции возвращают пользовательский тип? Потому что в основной программе это допустимо.

unit CommonSort;
interface
const n=10;
      m=5;
      p=14;
type TVector=array[1..n*p] of integer;
     TMatr=array[1..n,1..p] of integer;
     TCube=array[1..n,1..m,1..p] of integer;
     SplitsCube=array[1..m] of TMatr;
function SplitingCube(Cube:TCube):SplitsCube;
function RestoreCube(Splits:SplitsCube):TCube;
implementation
function SplitingCube;
var i,j,k:byte;
    Matr:TMatr;
    SplitingCubex:SplitsCube;
begin
for j:=1 to m do
    begin
    for i:=1 to n do
        for k:=1 to p do
            Matr[i,k]:=Cube[i,j,k];
    SplitingCubex[j]:=Matr;
    end;
SplitingCube:=SplitingCubex;
end;
function RestoreCube;
var i,j,k:byte;
    Matr:TMatr;
    RestoreCubex:TCube;
begin
for j:=1 to m do
    begin
    Matr:=Splits[j];
    for i:=1 to n do
        for k:=1 to p do
            RestoreCubex[i,j,k]:=Matr[i,k];
    end;
RestoreCube:=RestoreCubex;
end;
end.

Решение задачи: «Не компилируется модуль, указывает синтаксическую ошибку»

textual
                            Листинг программы 
                        
                            function SplitingCube(Cube:TCube):SplitsCube;
function RestoreCube(Splits:SplitsCube):TCube;