SIZE (array [,dim] [,kind])

  Class:  Inquiry function - Generic

  Returns the total number of elements in an array, or the extent of
  an array along a specified dimension.

  The "array" must not be a disassociated pointer or an allocatable
  array that is not allocated.  It can be an assumed-size array if
  "dim" is present with a value less than the rank of "array".  The
  "dim" must be a scalar integer with a value in the range 1 to n,
  where "n" is the rank of "array".  The "kind" must be a scalar
  integer initialization expression.

  The result is a scalar of type integer.  If "kind" is present, the
  kind parameter of the result is that specified by "kind";
  otherwise, the kind parameter of the result is that of default
  integer.  If the processor cannot represent the result value in the
  kind of the result, the result is undefined.

  If "dim" is present, the result is the extent of dimension "dim" in
  "array"; otherwise, the result is the total number of elements in
  "array".

  The setting of compiler options that specify integer size can
  affect the result of this function.

  Example:

  If B is declared as B(2:4, -3:1), then SIZE (B, DIM=2) has the
  value 5 and SIZE (B) has the value 15.