Emoslib is now deprecated

This Fortran function is used to describe the output field.

If the input field is in GRIB format, INTOUT is only called to describe features of the output field which are different from the input; it may be necessary to call the function several times. However, there are default values for some parts of the description which may save some calls.

If the input is in GRIB format, some information is carried over from the input field; for example, the parameter code table number and parameter number.

Declare the function as INTEGER and EXTERNAL, and invoke it as follows:

      IRET = INTOUT( HPARN, INTV, REALV, CHARV)

It is important to check the return value in IRET to ensure the call has been successful.

Character strings and single integer values may be used directly in calls:

      IRET = INTOUT( 'form', INTV, REALV, 'unpacked')
      IRET = INTOUT( 'accuracy', 16, REALV, CHARV)

with simple dummy variables (IDUM, RDUM and CDUM say) in place of the unused array arguments:

      IRET = INTOUT( 'form', IDUM, RDUM, 'unpacked')
      IRET = INTOUT( 'accuracy', 16, RDUM, CDUM)

Parameters