Most of the intrinsic functions have already been mentioned. Here, we deal only with their general classification and with those that have so far been omitted. All intrinsic procedures can be used with keyword arguments:CALL DATE_AND_TIME (TIME=t)
and many have optional arguments.
The intrinsic procedures are grouped into four categories:
- elemental - work on scalars or arrays, e.g. ABS(a);
- inquiry - independent of value of argument (which may be undefined), e.g. PRECISION(a);
- transformational - array argument with array result of different shape, e.g. RESHAPE(a, b);
- subroutines, e.g. SYSTEM_CLOCK.
The procedures not already introduced are::Bit inquiry BIT_SIZE Number of bits in the model Bit manipulation BTEST Bit testing IAND Logical AND IBCLR Clear bit IBITS Bit extraction IBSET Set bit IEOR Exclusive OR IOR Inclusive OR ISHFT Logical shift ISHFTC Circular shift NOT Logical complement Transfer function, as in INTEGER :: i = TRANSFER('abcd', 0) (replaces part of EQUIVALENCE) Subroutines DATE_AND_TIME Obtain date and/or time MVBITS Copies bits RANDOM_NUMBER Returns pseudorandom numbers RANDOM_SEED Access to seed SYSTEM_CLOCK Access to system clock CPU_TIME Returns processor time in seconds
Read more about this topic: Fortran 95 Language Features
Famous quotes containing the words procedures and/or intrinsic:
“Young children learn in a different manner from that of older children and adults, yet we can teach them many things if we adapt our materials and mode of instruction to their level of ability. But we miseducate young children when we assume that their learning abilities are comparable to those of older children and that they can be taught with materials and with the same instructional procedures appropriate to school-age children.”
—David Elkind (20th century)
“The permanence of all books is fixed by no effort friendly or hostile, but by their own specific gravity, or the intrinsic importance of their contents to the constant mind of man.”
—Ralph Waldo Emerson (18031882)