! user_eemiljakauma 3 INTEGER INTEGER REAL .TRUE.
! user_marjajakauma 2 INTEGER REAL .FALSE.

ja fortran alkais tästä...