Section Arrays: Array Initialization

Adapted from: gjbex/Fortran-MOOC

This program demonstrates initializing arrays in Fortran.

program array_initialization
  implicit none
  integer :: i
  integer, dimension(5) :: A, B, C

  A = 13
  B = [ 2, 3, 5, 7, 11 ] 
  C = [ (2**i, i=0,4) ] 
  print *, A
  print *, B
  print *, C
end program array_initialization

The above program is compiled and run using Fortran Package Manager (fpm):

import os
root_dir = os.getcwd()

code_dir = root_dir + "/" + "Fortran_Code/Section_Arrays_Array_Initialization"

os.chdir(code_dir)

build_status = os.system("fpm build 2>/dev/null")

exec_status = os.system("fpm run 2>/dev/null")

          13          13          13          13          13
           2           3           5           7          11
           1           2           4           8          16