Odvozené typy

Nově přibyla možnost definovat vlastní typy:

      TYPE ZAMESTNANEC
        CHARACTER (LEN=20) :: JMENO, PRIJMENI
        INTEGER :: IDENT_CISLO, ODDELENI
      END TYPE

Databázi podniku vytvoříme jako pole

      TYPE (ZAMESTNANEC), DIMENSION (100) :: PERSONAL_FIRMY

Na křestní jméno patnáctého zaměstnance se odkážemoe konstrukcí

      PERSONAL_FIRMY (15) % JMENO

Definice nových typů je samozřejmě možno zahnízďovat:

      TYPE FIRMA
         CHARACTER (30) :: NAZEV_FIRMY
         TYPE (ZAMESTNANEC), DIMENSION (100) :: PERSONAL_FIRMY 
      END TYPE

      TYPE (FIRMA), DIMENSION (30) :: SEZNAM_FIREM