|
Module
standard_definitions
Home --> Fact Sheet
--> Free Source Code
--> Portability Project
--> standard_definitions
About the Module
standard_definitions
Go directly to Downloads
The modules f90_standard_definitions,
f95_standard_definitions and f03_standard_definitions exist to give a
descriptive symbolic definition to as many standard defined quantities as
possible.
The standard_definitions modules may be simply
downloaded and used with any modern Fortran compiler supporting the indicated
release of the standard. All the definitions standard_definitions contains are
specified by the Fortran standard.
The authors are especially interested in learning of any
standard-defined quantity or calculation which is lacking from
standard_definitions.
Back to the Top
A list of (most) constants and procedures defined
follows. Note that each module contains only those constants and procedures
applicable to that standard.
- Constants
- Selecting Kind Values
- Integers not_a_kind,
no_such_precision,
no_such_range,no_such_real,
no_such_both, and no_such_interop are the
error values returned by the selected_int_kind, selected_real_kind and
selected_char_kind inquiry procedures.
- Declarations and Status Values
- Integers status_success is the Fortran
specified "no error" value,max_rank is the maximum rank an
array can have.
- Input/Output Values
- Integers
not_a_unit,not_a_filesize and
no_records_read are the values returned by inquire to signal
the condition indicated.
- The character used when a numeric value overflows a format
width is the character fmt_overflow.
- The "asa carriage control" characters are the values of
characters cc_newline, cc_newpage,
cc_overwrite and cc_skipline. Note that
printing was deleted starting with the Fortran 2003 standard, so these
constants are not in the Fortran 2003 version of the module.
- String Search Procedure Values
- Special return values from the character intrinsics are the
value of integers substring_not_found,
null_substring, none_in_set and
all_in_set.
- Date and Time Procedure Values
- The values of not_a_time and
not_a_count are returned by system_clock().
- Integers defining the date_and_time() values array are: the
size of the array is values_size, and the elements are named
values_year, values_month,
values_day, values_utc,
values_hour, values_minute,
values_second and values_msec.
- Integers defining the lengths of the date_and_time()
character arguments are date_len, time_len
and zone_len.
- Command Line and Environment Access Procedure
Values
- Special return values from the command line access intrinsics
are the value of integers no_command_arguments,
value_len_exceeds_buffer, no_such_variable
and no_environment.
Back to the Top
- Library
- The is_valid_kind() returns true if its
integer argument may represent a valid kind parameter.
- Function substring_len() converts from
character indices to substring length.
- Functions array_order() and
array_indices() convert between array storage order and array
indices.
- Function triplet_count() computes an
iteration count or the number of array elements implied by a triplet of
integers.
- The functions is_status_error(),
is_status_info() and is_status_success()
interpret the status values.
- The function has_cpu_time() determines
whether a processor reports cpu time.
Back to the Top
The source code for the standard_definitions module
may be downloaded from these links. For Fortran 2003,
f03_standard_definitions; for
Fortran 95, f95_standard_definitions for Fortran 90,
f90_standard_definitions. Please
note that the earlier standards define fewer quantities.
Back to the Top
To make comments or suggestions regarding
standard_definitions, or any of our software, please
E-mail us. We're always happy to share
the experiences others have using our software. |