sntbbe.f File Reference

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

Go to the source code of this file.

Functions/Subroutines
subroutine	sntbbe (IFXYN, LINE, MXMTBB, NMTBB, IMFXYN, CMSCL, CMSREF, CMBW, CMUNIT, CMMNEM, CMDSC, CMELEM)
	This subroutine stores an entry that was previously read from an ASCII master Table B file into a set of merged Fortran arrays. More...

Detailed Description

Store a master Table B entry into Fortran arrays.

Definition in file sntbbe.f.

Function/Subroutine Documentation

sntbbe()

subroutine sntbbe	(		IFXYN,
		character*(*)	LINE,
			MXMTBB,
			NMTBB,
		integer, dimension(*)	IMFXYN,
		character, dimension(4,*)	CMSCL,
		character, dimension(12,*)	CMSREF,
		character, dimension(4,*)	CMBW,
		character, dimension(24,*)	CMUNIT,
		character, dimension(8,*)	CMMNEM,
		character*4, dimension(*)	CMDSC,
		character, dimension(120,*)	CMELEM
	)

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

Author

J. Ator

Date

2007-01-19

Parameters

[in]	IFXYN	– integer: Bit-wise representation of FXY number
[in]	LINE	– character*(*): Table B entry
[in]	MXMTBB	– integer: Dimensioned size (in integers) of merged output arrays; used by the subroutine to ensure that it doesn't overflow these arrays
[out]	NMTBB	– integer: Number of entries in merged output arrays
[out]	IMFXYN--	integer(*): Merged array containing bit-wise representations of FXY numbers
[out]	CMSCL	– character*4(*): Merged array containing scale factors
[out]	CMSREF	– character*12(*): Merged array containing reference values
[out]	CMBW	– character*4(*): Merged array containing bit widths
[out]	CMUNIT	– character*24(*): Merged array containing units
[out]	CMMNEM	– character*8(*): Merged array containing mnemonics
[out]	CMDSC	– character*4(*): Merged array containing descriptor codes
[out]	CMELEM	– character*120(*): Merged array containing element names

Program history log:

Date	Programmer	Comments
2007-01-19	J. Ator	Original author
2021-01-08	J. Ator	Modified mstabs array declarations for GNUv10 portability
2021-05-17	J. Ator	Allow up to 24 characters in cmunit
2021-09-30	J. Ator	Replace jstchr with Fortran intrinsic adjustl; replace rjust with Fortran intrinsic adjustr

Definition at line 42 of file sntbbe.f.

References bort(), bort2(), nemock(), and parstr().

Referenced by rdmtbb().