interface

Subroutina inicializace vytvoří a inicializuje proměnnou s datovým typem network a načte názvy souborů do proměnných inisoubor, vzorovadata,testovacidata

subroutine inicializace(a,vzorovadata,testovacidata)
  type(network),intent(inout)         :: a
  character,intent(inout)             :: inisoubor,vzorovadata,testovacidata
end subroutine inicializace

Bude doplněno