moda_tables Module Reference

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

Variables
integer, dimension(:), allocatable	ibt
	Bit widths corresponding to tag and typ: More...
integer, dimension(:), allocatable	irf
	Reference values corresponding to tag and typ: More...
integer, dimension(:), allocatable	isc
	Scale factors corresponding to tag and typ: More...
integer, dimension(:,:), allocatable	iseq
integer, dimension(:), allocatable	itp
	Integer type values corresponding to typ: More...
integer, dimension(:), allocatable	jmpb
	Jump backward indices corresponding to tag and typ: More...
integer, dimension(:), allocatable	jseq
integer, dimension(:), allocatable	jump
	Jump forward indices corresponding to tag and typ: More...
integer, dimension(:), allocatable	knt
integer, dimension(:), allocatable	knti
	Initialized replication counts corresponding to typ and jump: More...
integer, dimension(:), allocatable	link
	Link indices corresponding to tag, typ and jmpb: More...
integer	maxtab
	Maximum number of entries in the jump/link table; equivalent to MAXJL. More...
integer	ntab
	Number of entries in the jump/link table. More...
character *10, dimension(:), allocatable	tag
	Mnemonics in the jump/link table. More...
character *3, dimension(:), allocatable	typ
	Type indicators corresponding to tag: More...
real *8, dimension(:), allocatable	vali
	Initialized data values corresponding to typ: More...

Detailed Description

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

Variable Documentation

ibt

moda_tables::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

Definition at line 138 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), igetrfel(), iok2cpy(), ipks(), lcmgdf(), makestab(), nemspecs(), rcstpl(), rdcmps(), rdtree(), tabent(), tabsub(), ufbdmp(), ufbget(), ufbtab(), ufbtam(), ufdump(), ups(), usrtpl(), wrcmps(), writlc(), and wrtree().

irf

moda_tables::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

Definition at line 139 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), igetrfel(), iok2cpy(), ipks(), makestab(), nemspecs(), tabent(), tabsub(), ufbdmp(), ufdump(), and ups().

isc

moda_tables::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

Definition at line 140 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), bufr_c_interface_mod::get_isc_c(), igetrfel(), iok2cpy(), ipks(), lcmgdf(), lstjpb(), makestab(), nemspecs(), parutg(), strbtm(), tabent(), tabsub(), ufbdmp(), ufbseq(), ufdump(), and ups().

iseq

integer, dimension(:,:), allocatable moda_tables::iseq

Definition at line 144 of file moda_tables.F.

itp

moda_tables::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

Definition at line 141 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), drfini(), bufr_c_interface_mod::get_itp_c(), igetrfel(), invmrg(), makestab(), rcstpl(), rdcmps(), rdtree(), readlc(), strbtm(), ufbcup(), ufbdmp(), ufbget(), ufbseq(), ufbtab(), ufbtam(), ufdump(), usrtpl(), wrcmps(), writlc(), and wrtree().

jmpb

moda_tables::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

Definition at line 137 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), drstpl(), bufr_c_interface_mod::get_jmpb_c(), gettagpr(), lstjpb(), makestab(), tabent(), tabsub(), ufbdmp(), ufbseq(), and usrtpl().

jseq

integer, dimension(:), allocatable moda_tables::jseq

Definition at line 145 of file moda_tables.F.

jump

moda_tables::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

Definition at line 135 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), makestab(), tabent(), tabsub(), and ufbdmp().

knt

integer, dimension(:), allocatable moda_tables::knt

Definition at line 134 of file moda_tables.F.

knti

moda_tables::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

Definition at line 143 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), and makestab().

link

moda_tables::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

Definition at line 136 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), bufr_c_interface_mod::get_link_c(), makestab(), tabent(), tabsub(), ufbdmp(), and ufbseq().

maxtab

moda_tables::maxtab

Maximum number of entries in the jump/link table; equivalent to MAXJL.

Definition at line 130 of file moda_tables.F.

Referenced by bfrini(), and inctab().

ntab

moda_tables::ntab

Number of entries in the jump/link table.

Definition at line 131 of file moda_tables.F.

Referenced by bufr_c_interface_mod::get_isc_c(), bufr_c_interface_mod::get_itp_c(), bufr_c_interface_mod::get_jmpb_c(), bufr_c_interface_mod::get_link_c(), bufr_c_interface_mod::get_tag_c(), bufr_c_interface_mod::get_typ_c(), inctab(), makestab(), and tabsub().

tag

moda_tables::tag

Mnemonics in the jump/link table.

Definition at line 132 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), copymg(), copysb(), cpymem(), drfini(), fstag(), bufr_c_interface_mod::get_tag_c(), gettagpr(), gettagre(), igetrfel(), inctab(), invtag(), iok2cpy(), ipks(), lstjpb(), makestab(), msgini(), parutg(), rcstpl(), rdcmps(), readlc(), readns(), strbtm(), ufbcpy(), ufbcup(), ufbdmp(), ufbrw(), ufbseq(), ufdump(), ups(), usrtpl(), wrcmps(), writlc(), and wrtree().

typ

moda_tables::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

Definition at line 133 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), drstpl(), bufr_c_interface_mod::get_typ_c(), inctab(), invmrg(), iok2cpy(), lcmgdf(), lstjpb(), makestab(), nemspecs(), parutg(), ufbdmp(), ufbseq(), ufdump(), usrtpl(), writlc(), and wrtree().

vali

moda_tables::vali

Initialized data values corresponding to typ:

• Current placeholder value for "missing" data, if corresponding typ entry is "REP", "NUM" or "CHR"
• 0, otherwise

Definition at line 142 of file moda_tables.F.

Referenced by arallocf(), ardllocf(), makestab(), rcstpl(), and usrtpl().