F90SPLIT - Split FORTRAN90 Source Files

F90SPLIT is a utility that reads a FORTRAN90 source code, and writes each module to a separate file with an extension of ".f90". A module is considered to be a FORTRAN BLOCKDATA, FUNCTION, MODULE, PROGRAM or SUBROUTINE unit.

This utility can be convenient when your goal is to create a UNIX "AR" archive of the compiled object code. By splitting your source code up, and compiling each routine separately, you end up with a library in which each compiled module is individual listed and replaceable.

Files you may copy include:

• F90SPLIT.F90, the source code;
• F90SPLIT_PRB.F90, a sample file to split up;

The list of routines includes:

• F90SPLIT splits the modules of a FORTRAN file into separate files.
• CH_CAP capitalizes a single character.
• DIGIT_TO_CH returns the character representation of a decimal digit.
• F90_LINE_IS_BEGIN determines if a line begins a FORTRAN90 module.
• F90_LINE_IS_END determines if a line ends a FORTRAN90 module.
• FILE_EXT determines the "extension" of a file name.
• GET_UNIT returns a free FORTRAN unit number.
• I_TO_S_ZERO converts an integer to a string, with zero padding.
• LOWER returns a lowercase version of a string.
• S_BEFORE_SS_COPY copies a string up to a given substring.
• S_BLANK_DELETE removes blanks from a string, left justifying the remainder.
• S_BLANKS_DELETE replaces consecutive blanks by one blank.
• S_CAP replaces any lowercase letters by uppercase ones in a string.
• S_CAT concatenates two strings to make a third string.
• S_EQI is a case insensitive comparison of two strings for equality.
• S_INDEX_LAST finds the LAST occurrence of a given substring.
• S_INDEXI is a case-insensitive INDEX function.
• S_SPLIT divides a string into three parts, given the middle.
• UPPER returns an uppercase version of a string.
• WORD_NEXT_READ "reads" words from a string, one at a time.

Back to the FORTRAN software page.