sntbde.f File Reference

Store a master Table D entry into Fortran arrays. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	sntbde (LUNT, IFXYN, LINE, MXMTBD, MXELEM, NMTBD, IMFXYN, CMMNEM, CMDSC, CMSEQ, NMELEM, IEFXYN, CEELEM)
	This subroutine stores the first line of an entry that was previously read from an ASCII master Table D file into a set of merged Fortran arrays. More...

Detailed Description

Store a master Table D entry into Fortran arrays.

Author

J. Ator

Date

2007-01-19

Definition in file sntbde.f.

Function/Subroutine Documentation

sntbde()

subroutine sntbde	(		LUNT,
			IFXYN,
		character*(*)	LINE,
			MXMTBD,
			MXELEM,
			NMTBD,
		integer, dimension(*)	IMFXYN,
		character, dimension(8,*)	CMMNEM,
		character*4, dimension(*)	CMDSC,
		character, dimension(120,*)	CMSEQ,
		integer, dimension(*)	NMELEM,
		integer, dimension(mxmtbd,mxelem)	IEFXYN,
		character*120, dimension(mxmtbd,mxelem)	CEELEM
	)

This subroutine stores the first line of an entry that was previously read from an ASCII master Table D file into a set of merged Fortran arrays.

It then reads and stores all remaining lines of that same entry into the same merged Fortran arrays.

Parameters

[in]	LUNT	– integer: Fortran logical unit number for ASCII file containing Table D information
[in]	IFXYN	– integer: Bit-wise representation of FXY number
[in]	LINE	– character*(*): First line of Table D entry
[in]	MXMTBD	– integer: Dimensioned size (in integers) of merged output arrays; used by the subroutine to ensure that it doesn't overflow these arrays
[in]	MXELEM	– integer: Maximum number of elements to be stored per Table D sequence within merged output arrays; used by the subroutine to ensure that it doesn't overflow these arrays
[out]	NMTBD	– integer: Number of entries in merged output arrays
[out]	IMFXYN	– integer(*): Merged array containing bit-wise representations of FXY numbers
[out]	CMMNEM	– character*8(*): Merged array containing mnemonics
[out]	CMDSC	– character*4(*): Merged array containing descriptor codes
[out]	CMSEQ	– character*120(*): Merged array containing sequence names
[out]	NMELEM	– integer(*): Merged array containing number of elements stored for each sequence
[out]	IEFXYN	– integer(*,*): Merged array containing bit-wise representations of element FXY numbers
[out]	CEELEM	– character*120(*,*): Merged array containing element names

Author

J. Ator

Date

2007-01-19

Definition at line 41 of file sntbde.f.

References bort(), bort2(), ifxy(), igetfxy(), igetntbl(), nemock(), and parstr().

Referenced by rdmtbd().