30 RECURSIVE FUNCTION ireadmm(IMSG,SUBSET,IDATE)
RESULT(IRET)
47 CALL x48(idate,idate,1)
53 CALL readmm(imsg,subset,idate,iret)
recursive function ireadmm(IMSG, SUBSET, IDATE)
Read a BUFR message from internal arrays.
This module declares and initializes the IM8B variable.
logical, public im8b
Status indicator to keep track of whether all future calls to BUFRLIB subroutines and functions from ...
recursive subroutine readmm(IMSG, SUBSET, JDATE, IRET)
This subroutine reads a specified BUFR message from internal arrays in memory, so that it is now in s...
subroutine x48(IIN4, IOUT8, NVAL)
Encode one or more 4-byte integer values as 8-byte integer values.
subroutine x84(IIN8, IOUT4, NVAL)
Encode one or more 8-byte integer values as 4-byte integer values.