NCEPLIBS-bufr  11.6.0
 All Data Structures Files Functions Variables Pages
Data Types | Macros
moda_tables.F File Reference

Declare arrays for internal storage of jump/link table. More...

Go to the source code of this file.

Data Types

module  moda_tables
 This module contains array and variable declarations used to store the internal jump/link table. More...
 

Detailed Description

Declare arrays for internal storage of jump/link table.

Definition in file moda_tables.F.

Data Type Documentation

module moda_tables

This module contains array and variable declarations used to store the internal jump/link table.

Data values within this module are stored by subroutines makestab(), tabsub() and tabent().

Author
J. Ator
Date
2014-12-10

Definition at line 13 of file moda_tables.F.

Data Fields
integer, dimension(:), allocatable ibt Bit widths corresponding to tag and typ:
  • Bit width of corresponding tag entry, if corresponding typ entry is "CHR", "NUM", "DRB" or "DRP"
  • 0, otherwise
integer, dimension(:), allocatable irf Reference values corresponding to tag and typ:
  • Reference value of corresponding tag entry, if corresponding typ entry is "NUM"
  • Number of regular (non-delayed) replications of Table D mnemonic referenced by corresponding jump entry, if corresponding typ entry is "REP"
  • 0, otherwise
integer, dimension(:), allocatable isc Scale factors corresponding to tag and typ:
  • Scale factor of corresponding tag entry, if corresponding typ entry is "NUM"
  • Jump/link table entry for Table B or Table D mnemonic which is the last sequential child descriptor of the corresponding tag entry, if the corresponding typ entry is "SUB"
  • 0, otherwise
integer, dimension(:,:),
allocatable		 iseq
integer, dimension(:), allocatable itp Integer type values corresponding to typ:
  • 1, if corresponding typ entry is "DRS", "DRP" or "DRB"
  • 2, if corresponding typ entry is "NUM"
  • 3, if corresponding typ entry is "CHR"
  • 0, otherwise
integer, dimension(:), allocatable jmpb Jump backward indices corresponding to tag and typ:
  • 0, if corresponding typ entry is "SUB"
  • Jump/link table entry denoting the replication of corresponding tag entry, if corresponding typ entry is "RPC", or if corresponding typ entry is "SEQ" and corresponding tag entry uses either short (1-bit) or regular (non-delayed) replication
  • Jump/link table entry for Table A or D mnemonic of which corresponding tag entry is a child descriptor, otherwise
integer, dimension(:), allocatable jseq
integer, dimension(:), allocatable jump Jump forward indices corresponding to tag and typ:
  • 0, if corresponding typ entry is "CHR" or "NUM"
  • Jump/link table entry for Table D mnemonic whose replication is denoted by corresponding tag entry, if corresponding typ entry is "DRB", "DRP" or "REP"
  • Jump/link table entry for Table B or D mnemonic which is the first sequential child descriptor of the corresponding tag entry, otherwise
integer, dimension(:), allocatable knt
integer, dimension(:), allocatable knti Initialized replication counts corresponding to typ and jump:
  • 0, if corresponding typ entry is "RPC", "RPS" or "DRB"
  • Number of regular (non-delayed) replications of Table D mnemonic referenced by corresponding jump entry, if corresponding typ entry is "REP"
  • 1, otherwise
integer, dimension(:), allocatable link Link indices corresponding to tag, typ and jmpb:
  • 0, if corresponding typ entry is "SUB" or "RPC", or if corresponding typ entry is "SEQ" and corresponding tag entry uses either short (1-bit) or regular (non-delayed) replication, or if corresponding tag entry is the last sequential child descriptor of the Table A or D mnemonic referenced by corresponding jmpb entry
  • Jump/link table entry for Table B or D mnemonic which follows the corresponding tag entry as the next sequential child descriptor of the Table A or D mnemonic referenced by corresponding jmpb entry, otherwise
integer maxtab Maximum number of entries in the jump/link table; equivalent to MAXJL.
integer ntab Number of entries in the jump/link table.
character *10, dimension(:),
allocatable		 tag Mnemonics in the jump/link table.
character *3, dimension(:),
allocatable		 typ Type indicators corresponding to tag:
  • "SUB", if corresponding tag entry is a Table A mnemonic
  • "SEQ", if corresponding tag entry is a Table D mnemonic using either short (1-bit) delayed replication, regular (non-delayed) replication, or no replication at all
  • "RPC", if corresponding tag entry is a Table D mnemonic using either medium (8-bit) or long (16-bit) delayed replication
  • "RPS", if corresponding tag entry is a Table D mnemonic using medium (8-bit) delayed replication in a stack
  • "DRB", if corresponding tag entry denotes the short (1-bit) delayed replication of a Table D mnemonic
  • "DRP", if corresponding tag entry denotes the medium (8-bit) or long (16-bit) delayed replication of a Table D mnemonic
  • "DRS", if corresponding tag entry denotes the medium (8-bit) delayed replication of a Table D mnemonic in a stack
  • "REP", if corresponding tag entry denotes the regular (non-delayed) replication of a Table D mnemonic
  • "CHR", if corresponding tag entry is a Table B mnemonic with units of CCITT IA5
  • "NUM", if corresponding tag entry is a Table B mnemonic with any units other than CCITT IA5
real *8, dimension(:), allocatable vali Initialized data values corresponding to typ:
  • Current placeholder value for "missing" data, if corresponding typ entry is "REP", "NUM" or "CHR"
  • 0, otherwise