fpt: Remove nested STRUCTURE declarations

fpt and WinFPT Reference Manual - Command-line Commands

| SimCon Home | Ref Manual Home |

REMOVE NESTED STRUCTURE DECLARATIONS

Syntax:

[DO NOT] REMOVE NESTED STRUCTURE DECLARATIONS

Function:

Declarations of Fortran structures which are made within other structures are removed and are written immediately before the structures within which they were nested. If the nested structure was not named, a structure name is generated by appending the string _struc to the original record name. The name is modified so as to be unique by appending an integer number if necessary. The name may be shortened if NAME LENGTH has been specified.

Motivation

This is a necessary first step in converting structures, which are non-standard, to standard derived types. Derived types cannot be nested. In the present version of fpt, version 4.310, this conversion has not been completed. The handling of map and union still requires research.

Where to Use this Command

Operating system command line	Yes
Configuration file, config.fsp	Yes
Specification (fsp) files, *.fsp	Yes
Interactively, to FPT> prompt	Yes
Interactive command files	Yes
Embedded in the Fortran code	Yes

Default

No change is made by default.

Examples

The code:

STRUCTURE /GEN_FUNC/ CHARACTER*32 OUTPUT_NAME INTEGER*4 LAST_INDEX STRUCTURE FUN_TAB REAL*4 BREAKPOINTS(17) REAL*4 VALUES(17) END STRUCTURE END STRUCTURE

is modified to read:

STRUCTURE /FUN_TAB_STRUC/ REAL*4 BREAKPOINTS(17) REAL*4 VALUES(17) END STRUCTURE STRUCTURE /GEN_FUNC/ CHARACTER*32 OUTPUT_NAME INTEGER*4 LAST_INDEX RECORD /FUN_TAB_STRUC/FUN_TAB END STRUCTURE