Since the initial installation of NASTRAN on the UNIVAC 1100/82 computer at the Marshall Space Flight Center (MSFC), a number of local codes have been incorporated as user routines. This paper describes four of these codes and how interested users may obtain additional information

Tagg, M.

Thornton, B.

English

NASA Technical Reports Server

NASA/BISFC NASTRAN AUXILIARY 1/0 ROUTINES 
Malcolm Tagg 
McDonnell Douglas Technical Services Company 
and 
Bob Thornton 
Boeing Computer Support Services 
ABSTRACT 
Since the initial installation of NASTRAN on the UNIVAC 1100/82 
computer at the Marshall Space Flight Center (MSFC), a number of 
"local" codes have been incorporatea as "user routines." This 
paper describes four of these codes and how interested users may 
obtain additional information. 
INTRODUCTION 
The MAP elements supplied by COSMIC/NASTRAN contain the user 
subroutine names OUTPTI, DUMOD3, etc., along with corresponding 
dummy subroutines. Locally generated "user routines" are 
compiled and the relocatable elements are copied over +5e dummy 
relocatables for mapping into the COSPlIC/NASTRAN system. Several 
local codes have been generated for the MSFC computer 
installations by BCSS and its predecessors and incorporated into 
NASTRAN ii: this manner. 
The routines were written in the FORTRAll V language as used with 
standard COSMIC/NASTRAN. All of the appropriate links were 
mapped using the MAP elements supplied with the COSMIC/NASTRAN 
package. 
The "user rcutines" are described in the following format: 1) 
purpose of routine or function, 2 )  installation of routine into 
standard COSMIC/NASTRAN, 3) example showing use of the routine. 
Note that the routine names used in the text differ from the DMAP 
"callingn n nes. 
OUTPT4 - This module was written to create FORTRAN-written, 
unformatted user tapes containing banded matrix data 
recovered from NASTSAN matrix data blocks as requested 
by the user via the OUTPUT4 DMAP instruction. The data 
is in a simple compzdt, convenient form and contains no 
special labeling codes. 
INPTT4 - Compani',~n module to OUPTI, reads matrix data blocks 
from OUTPT4 tapes. 
D'JMOD3 - This module was created to convert NASTRAN tabr~lar data 
blocks into matrix data biock format for convenience in 
manipulation and output, especially by OUTPTI. The 
element or gridpoint identification data is also 
recovered and output separately. 
https://ntrs.nasa.gov/search.jsp?R=19840007524 2020-03-22T08:11:24+00:00Z
INPTT3 - This routine uses coding supplied by Rockmll International 
(RI) f o r  reading mrrtrix data i n  tha t  comoany's customary 
format i n t o  NASTRAN matrix data blocks. The R I  data i s  
i n  a compact Fortran-formatted coded form, which appears 
t o  have qui t e  widespread acceptance i n  the aerospace f ie ld .  
PFDR - Pr in t  F i l e  Data Retrieval post processor or1 i n a l l y  wr i t ten  t o  3 extract OUTPT4 data from the NASTRAN p r i n t  f le ,  i t  i s  par t i cu la r l y  
useful when data output i s  required from more than one 1 ink  exe- 
cution as occurs frequently during substructure recovery procedures. 
I n  such cases, the normal output f i l e s  are rewound a f t e r  each l i n k  
has been executed, thus ensuring tha t  subsequent executions of 
the output mdb:es w i l l  overwrite ea r l i e r  ones. The p r i n t  f i l e  
i s ,  o f  course, rewind inhibited. The p,ogram has now been general- 
ized t o  extract a l l  types o f  data. The user i s  required t o  provide 
header information t o  enable the program t o  f i n d  the data on the 
NASTRAN p r i n t  f i l e .  
IMPLEMENTATION 
1. OUTPT4 - Outputs selected matrices t o  binary f i l e  I N P I .  
A. Entry Point - OUTPT4; SUBROUTINE: WRTAPE 
B. NASTRAN Link: LINK14 
C. DMAP Call inq Sequence: OUTPUT4 11,12,13,14,15//V,N,Pl/V,N,P2 $ 
. D. Input Data Blocks: Ii - Any matrix data block which the user 
desires t o  be wr i t ten on NASTRAN f i l e  
INP1. Purged data blocks are ignored. 
Up t o  f i v e  data blocks may be output. 
E. Output Data Blocks: None. 
F. - Method: The OUTPT4 routine checks t o  determine whether the 
matrix data block i s  purged. I f  i t  i s  not, a c a l l  i s  
made t o  subroutine WRTAPE, which wr i tes each column 
o f  the matrix onto the user tspe INP1. Parameters 
P I  and P2 provide controls corresponding t o  those 
i n  the standard OUTPT2 module (q.v.*). 
G. Example: A comprehensive example o f  OUTPT4 and INPTT4 usage 
i s  provided as part  o f  the descript ion f o r  the l a t t e r  
r ou t i  no. 
2. INPTT4 - reads matr ix  data from an OUTPT4 f i l e  assigned t o  INP2 
i n t o  a spec i f ied  matr ix  data block. 
A. Entry Point: INPTT4. 
B. NASTRAN Link: LINKZ. 
C. DMAP Cal l  i ng Sequence: -
D. Input Data Blocks: None. 
E. Output Data Blocks: 
MDB - Ya t r i x  data block t o  be loaded w i th  data from user f i l e  
INP2. 
F. Method: Retrieves one matr ix from user f i l e  INP2 f o r  each c a l l  
t o  the rout ine. This f i l e  may be the !?;PI f i l e  gener- 
ated by the OUTPT4 rou t ine  o r  a s i m i l a r  user-wr i t ten 
FORTRAN f i l e .  The required format f o r  t h i s  f i l e  and 
usage o f  parameter? P I ,  P2 and P3 are described i n  
the OUTP UT4 documentation. 
G. Examples: The use o f  both INPTT4 and OUTPT4 i s  i l l u s t r a t e d  i n  
the DMAP ALTER sequence o f  Figure 1. Two matrices 
are read from a f i l e  previously created by OUTPT4 
and subsequently p r i n t zd  using the MATPRN module 
(Figure 2). The OUTPT4 1 i s t i n g  i s  shown i n  Figure 3. 
H. Notes: 
1. The primary use o f  t h i s  rout ine i s  t o  enable the 
user t o  obta in NASTRAN generated matrices i n  a FORTRAN 
binary format f o r  subsequent use i n  user-wr i t ten 
Fortran programs. S i m i  1 a r l  y formatted matrices created 
by NASTRAN OUTPT4 or  by user-wr i t ten Fortran programs 
can be read i n t o  NASTRAN data blocks by using the 
companion INPTT4 module. 
2 .  The order o f  r e t r i e v a l  o f  matr ix  data blocks must be 
i n  the order which they were wr i t ten .  
3. Matrices output by OUTPT4 w i l l  be w r i t t e n  on f i l e  
INP1. This tape must be assigned as INP2 i n  subsequent 
NASTRAN r-uns when using INPTT4 t o  recover the matrices. 
Parameter usage i s  discussed i n  the user documentation. 
ORlGMAL PAGE IS 
Of POOR QUALITY 
DMAP ALTER SEQUENCE FOR INPTT4 
AND OUTPT4 
FIGURE 1 
ORIGINAL PAGE Is 
OF POOR QUALlW 
n *  - - - - N N - - ~ V , ~ - - - - - - -  r w - r n - - - n o n - o - - r n ' , -  
- O U O U O U U U O D  0 0 0 0 u 0 0 0 0 0  O O O O U O O O O U O O O O O O O O O  
rl - * O < . * - - - = m = - N - . > - - - O O n -  -.-........ .....-.................I... A - - # . - * - O - ~ h - S - * ~ - m - O  
J a a c . - * - N a * a a o  a o - - e - a - 7 - - - 2 - n = - - h o  ..... . . . a  
0 o - ~ a O ~ - w a w - O ~ ~ o n n h - m  0 n o o - - o b r n - r - h r n - n r c  
a r ~ - ~ a t ~ > n t - - - o ~ - ~ w ~ r n  o ~ - o ~ ~ ~ s a a a + - o a o ~ - r  
u - * - - - -  -OIYWII- U C - Q -  r n r - r + n d n r r r - - - - - r +  
.................... ................... 
.. - a , - c - * h n - - n n r  r h m m e - n -  - ~ - - n - - - - - - - - - n n o = n  
I I  ) ( I  1 1 1 1  I I I 
0 
I * 1  I I ,  
ORIGINAL PAGE I3 
OF POOR QUALITY 
C a m  
000 
??P 
- * N  n o -  
0 - -  
-Lo 
- * -  I  
0,- 
n-0 - 0 -  
mm 0 o m -  h a  ., Nl. 
... 
6,  I 
1 
............................... 
a I I I ,  I , ,  I . , I  1 I ) I  8 * ! I  I ;1 : :.- 
n r n  o o a  
? ? ?  
h m -  
- * N 
no- 
n on 
* -n  
.-3 nn- 
-- - 4c -  
*". . 
- m -  
.,-n -.an 
... 
- 0- . 
0000  
a 0 0 0  
,..* 
3 a n -  
- - * -  
* * m -  
* O W *  
--a. 
a-0- 
* - -a  
n w - I  
.... 
N N - 0  
.... 
o n 0 0  
nr - -  
.... 
I , ,  I 
m e " .  00 0 
? 5 4 
m a -  
m o m  
C 10  
no-  
N- I 
a m 0  
-a* 
L C -  
C Y  
n . n
0- I C O O  ,-I- 
... 
I l  I 
2 
I o m  4 . c -  
L "I) a 4 a  
A. Entry Point: DUMOD3 
B. NASTRAN Link: LINK7 
C. M P  Cal l  i ng Sequence: 
D. Input Data Blocks: 
TDB NASTRAN Tab1 e Data Block . 
E. Output Data Blocks: 
MDB NASTRAN Matrix Data Blocks. 
F. Method: Converts tabular data blocks i n t o  matrix data block 
format. Up t o  e ight  data blocks may be converted. 
The tables are mapped i n t o  a P I  x 8 matrix and 
the g r i d  point/element I D ' S  i n t o  array LTLID which 
i s  1 i s  ted and punched on cards. 
G. - Examples: The example i l l u s t r a t e s  how the SPCFORCE (OQG table)  
can be reformatted using the DMAP sequence shown 
i n  Figure 4. The LTLID array o f  gr idpoint  I D  num- 
bers i s  shown i n  Figure 5. Figure 6 shows the 
NASTRAN SPCFORCE output and Figure 7 shows the 
corresponding DUMOD3 matrix, IFLOAD, as output 
us i ng OUTPT4. 
ORIGINAL PAGE Fg 
OF POOR QUALITY 
o o o a o o  
n o o m o n  
F Q N N C h  
O Q O N O O  
C O a N 9 0  
O O O O O C  
3 ' ¶ 0 J  0 , , : 2  
- 
w o r n  
A a- 
e 4 
a 
P L 
C 0 
U 
I U 
I a 
n c c  
a z a  
r o o  
E l -  3 x 0  
O U O  
ORIGINAL PAGE Is 
OF POOR QUALlw 
ORIGINAL PAGE I8 
OF POOR QUALm 
9 ul 
4 P 
C C *  
-7.4 
r *  
" I ,  
a 
1 1  u I 1  
x u  W  
e L u  
a 2  0 
z m u  
W 
A X  z 
U W  
UC - 
a * o  
o* 
U* W 
A 
z o m  
u z  - 
a n -  
0 - 2  
~ n n  o a o o n o  o a a n o o  o o o o n  o o n o o d  O n n o o  
c o n  mnoono  omnono  Omnno O n o o a o  O n o o e  
~ ~ o n o ~ o a n a  O m o n o n o o ~ o o o o n o o ~  o o n o o  
0 0 0 n 0 0 0 0 0 0 0 0 0 ~ 0 0 0 ~ 0 0 0 0 0 0 0 0 0 0 0 0 0  
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0  
0 0 ~ 0 0 0 0 0 ~ 0 0 ~ a ~ 0 0 0 0 0 0 0 0 0 0 0 0 ~ 0 0 0 0  
0 0 0 0 o 0 0 0 0 0 0 0 0 0 0 0 0 o 0 0 0 0 0 0 0 0 0 0 0 0 0  
0 0 0 0 0 0 0 n 0 0 0 0 0 0 q 0 ~ 0 0 0 ~ 0 0 0 0 0 0 0 0 0 0  
. . . . . . . . . . . . . . . . . . . . . . . . . . . .  
d o o o o o o  00 
o o ~ n a n e  nm 
n n o m o o n  00 
o e n n O O C O o  OOOOOOOOO 
0 0 0 0 0 0  
0 0 0 0 0 0 0 0 0  
0 0 0 0 0 0 0  
......... 
1 ,  
I 
n n  n n n n n n m n n n n n  o n n o n o n m m n o m n n h n o  nnnnn0m1-n 
n o  o o n o o n  o n n o o o  o o a o a o o o o o o o o n o o o  OnooooClno 
n o n n n o n n  n n n n n n n n n n n n n n n n o n a n n o n  o n n n n o n n n  
~ ~ ~ ~ n ~ ~ ~ o o n ~ o o n o n o n o ~ ~ ~ ~ n ~ ~ ~ a o o n n ~ o ~ o ~ n ~  
o o n n o a o o a n ~ n n o o ~ ~ ~ o c ~ ~ ~ o o o ~ o ~ ~ ~ a o o o ~ ~ ~ n o  
~ ~ n n n ~ . ~ n n n n a n n o o ~ n n n n n n a n n o ~ o m o n n ~ n ~ o n n ~  
O C O C C C O O C O C . O ~ O C O C ~ 0 0 C C O C O O O C O C O C D O E i O C O ~ O  
3 5 0 3 ~ 0 ~ 0 3 3 0 ~ Y 5 5 0 3 3 1 0 J 3 0 0 3 ~ J 0 0 0 ~ 0 0 0 0 O Q d ~ I  
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .  
3 on  n 0~ o oo 3 on n 03 o  on o o  o  oo o  oo o  o l  o  00 o  00  a oo o  o  a 
n c n o  o c n  c o c o u o  o n c  n n c c o o n o o ~ n o o c o o o o ~ c a n n o  W 
u no0 u o o  o a ~ a o c  a o ~ o c o c a o o o o o ~ ~  ~ 0 0 0 n 0 o 0 0 0 o o 0  
. ~ P C C C C C C C C C C ~ C  ~ ~ ~ ~ C ~ C ~ - ~ ~ C ~ C G C ~ C C C C C C C O C  I- 
> 1 7 7 C > 3 T l r 7  3 3 3 7  3 3 7 7 3 3 ; 1 3 3 3 0 3 > 3 J J O ' 3 3 3 3 ' > 3 3 3 Y 3 9  i- 
~ ~ c ~ o n 0 ~ 0 ~ ~ 6 o ~ ~ c o r 0 0 0 c e 0 0 c 0 0 0 c o o o 0 e a c c ~ o  u 
~ ~ n ~ ~ ~ o o o o a ~ n ~ n ~ a n ~ : ~ n ~ ~ ~ ~ ~ ~ o n n ~ ~ o ~ o ~ ~ ~ ~ ~ ~  aL 
C . O O C C  c c c C c ~ ~ P C c c o n ~ c ) c c ~ c c o c o o c c o c c ) o r c c n o  a 
- " - N  
o o n n  
1 1 1 1  
J cLTo 
Y o n *  
N D E h  
n n s h  
-Ne-". 
m oa r 
U m N N  
N.4- 
o o n  
1 I I 
Q E 4  
-- ?, 
C, r4 " 
- 0 9  
9 C d  
Y ) P  3 
0 *? m 
4 N n 
. . .  
I 
o n -  
9 iT 
8 8  Q W 
w oo m 
W N C J  
- 1 -  
. . .  
I 
4.  INPTT3 - Reads ma t r i x  data from an RI- formatted f i l e  assigned t o  
INPT i n t o  spec i f i ed  mat r i x  data blocks. 
A, Ent ry  Point :  INPTT3. 
B. NASTRAN Link:  LINK2 
C. DMAP Ca l l  i ng Sequence: 
D, I n p b t  Data Blocks: RT formatted matr ices from f i l e  INPT. 
E. Output Data Blokks: -- A l l  NASTRAN ma t r i x  data blocks. 
F. Method: Rads the matr ices from an RI-formatted data f i l e  
i n t o  NASTRAN mat r i x  data blocks. Up t o  f i v e  
matr ices may be read. 
G. Examples: Figure 8 shows the DMAP ALTER sequence requi red 
f o r  loading two matr ices i n t o  the  Normal Modes 
Analysis R ig i d  Format and adding them i n t o  the 
mass and s t i f f n e s s  matr ices. The d iagnos t i c  
messages p r i n t e d  by NASTRAN t o  i nd i ca te  success- 
f u l  completion o f  the INPUTT3 i n s t r u c t i o n  a re  
shown i n  F igure 9. 
H. - Notes: The f i l e  INPT must be assigned conta in ing the 
RI-formatted data. 
ORIGINAL PAQg a 
INPUTT3 DMAP ALTER SEQUENCE OF POOR QUALIW 
I D  RI ORBITER - .  ~ - .  
APP 
, .. .- Of SPLACEMENT .- - . . 
SOL ., . . . -, - .* -. . 3 ,O - . - 
T I R E  150  
s 
s INPUTS K O ,  no INTO K O R B I  MORE 
. . -- .- . 
ALTER 36 
INPUTT3  K O . M O . , , / K O R B . M O R B ~ ~ . ~ C ~ N , - ~ ~ C , N ~ ~ ~ C ~ N ~ O  s 
- -  - . 
CHkPNT KORB,MORB S 
s 
S FORMS KF1,  H F l  AND ADDS KORB, flORB FORHING K F F ,  HFF 
. . -. . - - -. . . . - - - -- - ....- . . .--- . . . ALTER 7 1 . 7 2  
€ 4 ~ 1  v KNN , K F ~ / S I N G L E  /YNN,MFl/SINGLE S 
. . . ..-. - - .  ---.. --- -----  - . - CHKPNT KFl,MF! S 
ALTER 7 4 . 7 5  
SCEl U S t T t K N N , M N N ~ t / M F 1 t ~ F S ~ ~ n F l p v  s 
CHKPNT K F S , U F ~ . H F ~  S - 
ALTER 76 
ADDS KT1 tKORP , /KFF S 
C H K P N T  KFF I 
AD05 MFl  .MORBv,t/HFF- J .  - , - -. 
CtiKPNT nFF I 
ENDALTER -. 
CEND 
FIGURE 8 
NASTRAN MESSAGE TO DENOTE INPUTT3 MATRIX ENTRY 
N A S f R A N * N A S T R A N . L I I I t  
D A T A  BLOC# n o  FOUND UHILC SEARCWIWG FOR M O R ~  
M l T R I R  B L O ~ H U O R B  IS OF S I Z E  797  BY 1 9 7  AND T V P t  b 
*** D I A G  8 PLSSAGE -- TRAILER FOR DATA BLOCM MOAB - 7 9 7  797 
D A T A  BLocn no ~ O U N O  YUTLL SEARCHING T O R  *ORB 
M A T R I X  BLOCn k 0 R 8  I S  OF S I Z E  797  BY 1 9 7  AND TVPC b 
FIGURE 9 
A. Method: 
Repeated executions o f  OUTPUT4 and other  output modules w i t h i n  
a s ing le  NASTRAN run (especia l ly  i n  DMAP Looping) w i l l  cause 
previously w r i t t e n  matr ix  data blocks on INPl t o  be over- 
w r i t t e n  by subsequent c a l l s  t o  the output module. This being 
a system charac ter is t i c ,  the problem could no t  be resolved 
i n t e r n a l l y  . The matrices were preserved i n  t h e i r  en t i re t y ,  
however, when w r i t t e n  by OUTPUT4 onto the NASTRAN p r i n t  
f i l e .  Hence, the p r i n t  f i l e  i s  saved f o r  subsequent i npu t  
t o  a post-processor which extracts the matrices and wr i tes  
them t o  a s ingle f i l e ,  which may be ~ o p i e d  t o  tape f o r  l a t e r  
processing. This approach en25ies the user t o  obta in the 
resu l t s  o f  a number o f  w i p u t  requests i n  a s ing le  run. 
B. Input  t o  PFDR* 
The input  t o  the post-processor i s  simply the NASTRAN p r i n t o u t  
f i l e  i t s e l f .  This f i l e  can be obtained by the i n s t r u c t i o n  
QBRKPT PRINTBIFILENAME on the UNIVAC computer. This i nstruc- 
t i o n  simply d i ve r t s  the symbolic p r i n t  data t o  the previously 
assigned f i l e  FILENAME, which can then be read by PFDR, 
C. The PFDR Post -Processor: 
The NASTRAN p r i n t  f i l e  i s  converted t o  ASC! I code t o  enable i t  
t o  be read by the post-processor. The data "key phrase" i s  
input  t o  the post-processor. If no "key" i s  given, the pro- 
cessor automatical ly de fau l ts  t o  OUTPUT4 data. 
D. Output Data: 
The output data w i l l  conta in the OUTPT4 matrices o r  the par t i cu-  
l a r  data i d e n t i f i e d  by the key phrase. This data i s  usua l ly  
copied t o  tape f o r  subsequent use. The data formats are de- 
scr ibed i n  the user documentation. 
E. Implementation: 
PFDR i s  cur ren t ly  not ava i lab le  on the MSFC IBM system. 
F. Example: A sample runstream i s  shown i n  Figure 10. 
E, Examples  
ORIGINAL PAGE 
PFDR SAMPLE RUNSTREAM OF POOR QUALITY 
s 
's--'--‘ P R I N T  f I L T D ' A T A  ' R C f  RIL'VIL- 
9 aoEL ErE; -'PRX Xrfa-"--" ------'- 
3 0 E t ~ T f  r C  OPXXXX. 
-aCxi ,P  'PR i~if,F717POSS7200 -. CCI- 
IASGeA PRXXXX. 
JBRKPT- P R I Y T s I P R X X % ~ - -  
a x o f  *NASTRANoLINMl 
aASGtA C*NASTRANa 
-'aPRf7TCICioNAStRAN. - 
aXQT C*NASTRAN,X 
a ~ o & P - O P x x x x S  
--- 
E X I T  
~ A ~ G , ~ ~ - ~ P ~ T P ; U ~ S ' , S A V E O ~ ~ ~ ~ ~ " P ' ~ ; L I ~  FF--- 
a c o P y , t n c  O P X X X X  o T O P w P  ?-. . ---.--- - 
aCoPy,GMC OPxxxx i ' rOP4TPr  
aFREE O P S ~ P .  aFREE . P R X X X X r  - .  -----.-- 
aFREL OPXXXXa 
asvclt P R X X X X  l ; ,,,HSP--' ------.. ----- 
asrn O P X X X X . ,  ,HHSP 
KEY : 
PRXXXX - F I L E  TO WHICH PRINTOUT I S  DIVERTED 
OPXXXX - FILE ro WHICH EXTRACTED DATA IS WRITTEN 
31 - ALTERNATE PRINT F I L E  DYNAMICALLY ATTACHED TO OPXXXX 
C*NASTRAN.X - EXECUTABLE ELEMENT OF PFDR 
OP4TP - TAPE TO WHICH OPXXXX I S  COPIED 
MHSP - DENOTES PYYSICAL UNIT FOR PRINTER 
FIGURE 10 
SUMMARY 
The MSFC COSMIC/NASTRAN Auxi 1 i a r y  I / O  rout ines provide usefu l  , 
addi t ional  capab i l i t i es  for  input  and output o f  various matrices 
and tables between external f i l e s  and NASTRAN. The PFDR p r i n t  
f i l e  post-processor allows the user t o  ex t rac t  anv tvpe o f  dat, 
t ha t  i s  avai lab le from the RASTRAN p r i n t  f i l e .  These rout ines 
are i n  frequent use on the MSFC UNIVAC 1100 and I B M  systems. 
I n  conclusion, the authors would 1 i k e  t o  acknowledge the work 
c f  Messrs. J. Moorman, P. Halford and D. Harper, who contr ibuted 
various enhancements under the aegis o f  the MSFC Engineering Sys- 
tems Branch o f  the Huntsv i l le  Computer Complex. 
Prospective users may obta in  fu r the r  in format ion :ram 
AH33/W. E. Gal 1 oway , NASA, MSFC, AL , Telephone : 205-453-2294. 


NASA/MSFC NASTRAN auxiliary I/O routines

Abstract

Similar works

Full text

Available Versions

NASA Technical Reports Server