HP 3000 Manuals

HP FORTRAN 77/iX Reference

SHORT Directive 

The SHORT directive sets the default size for integer and logical data
types and constants to two bytes.  The INTEGER and LOGICAL type names are
set equivalent to INTEGER*2 and LOGICAL*2, respectively.

Syntax 

$SHORT [INTEGERS]

The keyword INTEGERS in the directive is optional and has no effect.

Default               Long (4 bytes) if neither the LONG nor the SHORT
                      directive is given.

Location              The SHORT directive must appear before any
                      nondirective statements in the program unit,
                      including the program head.

Toggling/ Duration    Cannot be toggled after the appearance of
                      nondirective statements in the program unit.

MPE/iX 5.0 Documentation