Defaultová inicializace odvozených typů

$$\begin{eqnarray*} &&\mbox{\tt TYPE NENULOVY\_PRVEK} \\ &&\mbox{~~~~~~{\tt REAL ... ...}} \\ &&\mbox{\tt TYPE(NENULOVY\_PRVEK) :: RIDKA\_MATICE (100)} \end{eqnarray*}$$

Defaultově nastavenou hodnotu lze změnit individuálně:

$$\begin{eqnarray*} &&\mbox{\tt RIDKA\_MATICE(25) = NENULOVY\_PRVEK (3.14, 10, 20)} \end{eqnarray*}$$