FOR$IOS_F6765. Deallocating a pointer associated with an allocatable target is illegal. Instead, deallocate the target the pointer points to, which frees memory and disassociates the pointer.

FOR$IOS_F6766. You cannot deallocate an array unless it has been previously allocated. You cannot deallocate a pointer whose target was not created by allocation. The intrinsic function ALLOCATED can be used to determine whether an allocatable array is currently allocated.

FOR$IOS_F6767. There is not enough memory space to allocate the pointer.

Dynamic memory allocation is limited by several factors, including swap file size and memory requirements of other applications that are running. If you encounter an unexpectedly low limit, you might need to reset your virtual memory size through the Windows Control Panel or redefine the swap file size. Allocated arrays that are no longer needed should be deallocated.

FOR$IOS_F6768. You cannot deallocate an array unless it has been previously allocated. You cannot deallocate a pointer whose target was not created by allocation, or a pointer that has undefined association status.

The intrinsic function ALLOCATED can be used to determine whether an allocatable array is currently allocated.

FOR$IOS_F6769. There is not enough memory space to allocate the POINTER array.

Dynamic memory allocation is limited by several factors, including swap file size and memory requirements of other applications that are running. If you encounter an unexpectedly low limit, you might need to reset your virtual memory size through the Windows Control Panel or redefine the swap file size. Allocated arrays that are no longer needed should be deallocated.

FOR$IOS_F6770. It is illegal to DEALLOCATE an array that is not allocated. You can check the allocation status of an array before deallocating with the ALLOCATED function.

FOR$IOS_F6771. It is illegal to DEALLOCATE an array that is not allocated. You can check the allocation status of an array before deallocating with the ALLOCATED function.

FOR$IOS_F6772. There is not enough memory space to hold the array.

Dynamic memory allocation is limited by several factors, including swap file size and memory requirements of other applications that are running. If you encounter an unexpectedly low limit, you might need to reset your virtual memory size through the Windows Control Panel or redefine the swap file size. Allocated arrays that are no longer needed should be deallocated.

FOR$IOS_F6773. There is not enough memory space to hold the automatic data object.

Dynamic memory allocation is limited by several factors, including swap file size and memory requirements of other applications that are running. If you encounter an unexpectedly low limit, you might need to reset your virtual memory size through the Windows Control Panel or redefine the swap file size. Allocated arrays that are no longer needed should be deallocated.

An automatic data object is an object that is declared in a procedure subprogram or interface, is not a dummy argument, and depends on a nonconstant expression. For example:

  SUBROUTINE  EXAMPLE (N)
     DIMENSION A (N, 5), B(10*N)
 

FOR$IOS_F6774. It is illegal to DEALLOCATE an array that is not allocated. You can check the allocation status of an array before deallocating with the ALLOCATED function.

FOR$IOS_F6775. The optional argument DIM specifies the dimension along which minimum values are returned, and must be greater than or equal to 1 and less than or equal to the number of dimensions in the array. That is, 1 <= DIM <= n, where n is the number of dimensions in array.

FOR$IOS_F6776. The optional argument DIM specifies the dimension along which minimum values are returned, and must be greater than or equal to 1 and less than or equal to the number of dimensions (rank) in the array. That is, 1 <= DIM <= n, where n is the number of dimensions in array.

FOR$IOS_F6777. MOD(A,P) is computed as A - INT(A/P) * P. So, P cannot be zero.

FOR$IOS_F6778. MOD(A,P) is computed as A - INT(A/P) * P. So, P cannot be zero.

FOR$IOS_F6779. MOD(A,P) is computed as A - INT(A/P) * P. So, P cannot be zero.

FOR$IOS_F6780. MODULO(A,P) for real numbers is computed as A - FLOOR(A/P) * P. So, P cannot be zero.

FOR$IOS_F6781. In the function, MODULO(A,P), P cannot be zero.

FOR$IOS_F6782. The sign of the S argument to NEAREST(X,S) determines the direction of the search for the nearest number to X, and cannot be zero.

FOR$IOS_F6783.

FOR$IOS_F6784. The integer array PUT must be greater than or equal to the number of integers the processor uses to set the seed value. This number can be determined by calling RANDOM_SEED with the SIZE argument. For example:

  INTEGER, ALLOCATABLE SEED
  CALL RANDOM_SEED( )           ! initialize processor
  CALL RANDOM_SEED(SIZE = K)    ! get size of seed
  ALLOCATE SEED(K)              ! allocate array
  CALL RANDOM_SEED(PUT = SEED)  ! set the seed
 

FOR$IOS_F6785. The integer array GET must be greater than or equal to the number of integers the processor uses to set the seed value. This number can be determined by calling RANDOM_SEED with the SIZE argument. For example:

  INTEGER, ALLOCATABLE SEED
  CALL RANDOM_SEED( )           ! initialize processor
  CALL RANDOM_SEED(SIZE = K)    ! get size of seed
  ALLOCATE SEED(K)              ! allocate array
  CALL RANDOM_SEED(GET = SEED)  ! get the seed
 

FOR$IOS_F6786.

FOR$IOS_F6787.

FOR$IOS_F6788. The optional argument DIM specifies the dimension whose upper bound is to be returned, and must be greater than or equal to 1 and less than or equal to the number of dimensions in the array. That is, 1 <= DIM <= n, where n is the number of dimensions in array.

FOR$IOS_F6789. The optional argument DIM specifies the dimension whose upper bound is to be returned, and must be greater than or equal to 1 and less than or equal to the number of dimensions (rank) in the array. That is, 1 <= DIM <= n, where n is the number of dimensions in array.

FOR$IOS_F6790. The optional argument DIM specifies the dimension whose upper bound is to be returned.

An assumed-size array is a dummy argument in a subroutine or function, and the upper bound of its last dimension is detemined by the size of actual array passed to it. Assumed-size arrays have no determined shape, and you cannot use UBOUND to determine the extent of the last dimension. You can use UBOUND to determine the upper bound of one of the fixed dimensions, in which case you must pass the dimension number along with the array name.

FOR$IOS_F6791. The optional argument DIM specifies the dimension whose upper bound is to be returned, and must be greater than or equal to 1 and less than or equal to the number of dimensions (rank) in the array. That is, 1 <= DIM <= n, where n is the number of dimensions in array.

FOR$IOS_F6792.

FOR$IOS_F6793. An illegal value was used with the POSITION specifier.

POSITION accepts the following values:

• 'ASIS' (the default)
• 'REWIND' - on Fortran I/O systems, this is the same as 'ASIS'
• 'APPEND'

FOR$IOS_F6794. An illegal value was used with the ACTION specifier.

ACTION accepts the following values:

• 'READ'
• 'WRITE'
• 'READWRITE' - the default

FOR$IOS_F6795. The DELIM specifier is only allowed for files connected for formatted data transfer. It is used to delimit character constants in list-directed an namelist output.

FOR$IOS_F6796. An illegal value was used with the DELIM specifier.

DELIM accepts the following values:

• 'APOSTROPHE'
• 'QUOTE'
• 'NONE' - the default

FOR$IOS_F6797. The PAD specifier is only allowed for formatted input records. It indicates whether the formatted input record is padded with blanks when an input list and format specification requires more data than the record contains.

FOR$IOS_F6798. An illegal value was used with the PAD specifier.

PAD accepts the following values:

• 'NO'
• 'YES' - the default

FOR$IOS_F6799. An illegal value was used with the CARRIAGECONTROL specifier.

CARRIAGECONTROL accepts the following values:

• 'FORTRAN' - default if /vms is specified or the unit is connected to a terminal or console
• 'LIST' - default for formatted files
• 'NONE' - default for unformatted files

FOR$IOS_F6800. The SIZE specifier can only appear in a formatted, sequential READ statement that has the specifier ADVANCE='NO' (indicating nonadvancing input).

FOR$IOS_F6801.

FOR$IOS_F6802.

FOR$IOS_F6803.

FOR$IOS_F6804.