LF Fortran 95

BLOCK DATA Statement

Description

The BLOCK DATA statement begins a block data program unit. The block data program unit initializes data that appears in named common blocks.

Syntax

BLOCK DATA [block-data-name]

Where:

block-data-name is an optional name given to the block data program unit.

Remarks

There can only be one unnamed BLOCK DATA program unit in a program.

A block data program unit may only initialize variables that appear in a named common block.

The same named common block may not appear in more than one block data subprogram.

A block data subprogram may only contain type declaration statements; the attribute specifiers PARAMETER, DIMENSION, POINTER, SAVE and TARGET; the specification statements USE, IMPLICIT, COMMON, DATA, EQUIVALENCE and INTRINSIC.

A type declaration statement in a block data subprogram may not specify the attributes ALLOCATABLE, EXTERNAL, INTENT, OPTIONAL, PRIVATE or PUBLIC.

Example

block data mydata common /d/ a,b,c data a,b,c /1.0,2.0,3.0/ end block data mydata