REAL: Define symbolic names to be of real data type

• REAL :: scalar=scalar_value, vector(elements), matrix(rows, columns)

• specifies scalars, vectors, and matrices
• scalar_value, elements, rows and columns must be known at compile time, like:
  • integer

    constants

    , like
    • REAL :: x=3.14, vec(100), mtx(20,100)

  • predefined at compile time

    , like
    • REAL, PARAMETER :: elements=100 ! defines the

      symbolic constant

      elements
    • REAL :: rows=20 ! predefines the scalar

      variable

      rows
    • DATA columns/50/, scalar_value=3.14 ! predefines the scalars columns and scalar_value
• ⇒ Define a numerical array