Заполнение 2D-массива Fortran

Question

Мне интересно, как заполнить двумерный массив довольно большой.Я просто хочу заполнить его X или значением и распечатать.

Пока:

CHARACTER Grid(20,20)

print *, Grid

Answer 1

Это должно быть просто.Как насчет следующего:

program simple
   CHARACTER(len=1) :: Grid(20,20)
   Grid = "x"
   Print *, Grid
end program simple

Вы можете проверить это здесь .Обратите внимание, что вы должны знать / определять длину символа заранее, в противном случае вам придется использовать размещаемый символьный массив.Если вы хотите, чтобы каждый элемент имел различную длину символов, вам нужно будет создать выделяемый массив размещаемых символов, что возможно в Fortran 2003 и более поздних версиях.