Examples

Example 1: Simple real variables--these declarations are all equivalent:

---

       REAL U, V(9)
       REAL*4 U, V(9)
       REAL U*4, V(9)*4

---

Example 2: Initialize variables (REAL*16 is SPARC only):

---

       REAL U/ 1.0 /, V/ 4.3 /, D*8/ 1.0 /, Q*16/ 4.5 / 

---

Example 3: Specify dimensions for some real arrays:

---

       REAL A(10,100), V(10)
       REAL X*4(10), Y(10)*4

---

Example 4: Initialize some arrays:

---

       REAL A(10,100) / 1000 * 0.0 /, B(2,2) /1.0, 2.0, 3.0, 4.0/ 

---

Example 5: Double and quadruple precision (REAL*16 is SPARC only):

---

       REAL*8  R
       REAL*16 Q
       DOUBLE PRECISION D

---

In the above example, D and R are both double precision; Q is quadruple precision.