INT_PTR_KIND()

  Class:  Inquiry function - Specific

  Returns the INTEGER KIND that will hold an address.  This is a
  specific function that has no generic function associated with it.
  It must not be passed as an actual argument.

  The result is of type default integer.  The result is a scalar with
  the value equal to the value of the kind parameter of the integer
  data type that can represent an address on the host platform.

  The value is 8.

  The following example shows the INT_PTR_KIND intrinsic:

     REAL A(100)
     POINTER (P, A)
     INTEGER (KIND=INT_PTR_KIND()) SAVE_P
     P = MALLOC (400)
     SAVE_P = P