Как инициализировать двумерные массивы в Fortran

В C вы можете легко инициализировать массив, используя синтаксис фигурных скобок, если я правильно помню:

int* a = new int[] { 1, 2, 3, 4 };

Как вы можете сделать то же самое в Fortran для двумерных массивов, когда вы хотите инициализировать матрицу определенными тестовыми значениями для математических целей? (Без необходимости дважды индексировать каждый элемент в отдельных инструкциях)

Массив определяется либо

real, dimension(3, 3) :: a

, либо

real, dimension(:), allocatable :: a