last modified: 25-MAY-1981 | catalog | categories | new | search |

NESC0760 GRFPAK

GRFPAK, Graphics for Pipe Joint Heat Flow and Stress Analysis Program Cortes

top ]
1. NAME OR DESIGNATION OF PROGRAM:  GRFPAK
top ]
2. COMPUTERS
To submit a request, click below on the link of the version you wish to order. Only liaison officers are authorised to submit online requests. Rules for requesters are available here.
Program name Package id Status Status date
GRFPAK NESC0760/01 Tested 25-MAY-1981

Machines used:

Package ID Orig. computer Test computer
NESC0760/01 IBM 3033 IBM 3033
top ]
3. DESCRIPTION OF PROBLEM OR FUNCTION

GRFPAK is a graphics package written for the CORTES finite-element programs. It includes three plotting routines to assist in analyzing, interpreting, and presenting CORTES results. One plotting routine displays stresses or stress indices by means of contour curves drawn within either the outside or inside surface outline of a quarter section of the tee- joint. Using this routine, one can also obtain plots of the finite-  element mesh as viewed from any point in space. A second plotting routine gives a stress versus distance plot along any specified line of nodes. A third routine displays cross-sectional views of the finite-element mesh for both the undeformed (original) and deformed  configuration. The deformed configurations are drawn using an exaggerated scale specified by the user.
top ]
4. METHOD OF SOLUTION

All of the plotter software calls are channeled through one of the several multiple entries in subroutine PLTINT. The segment of GRFPAK designed for contour, mesh, and displacement plotting can produce the finite-element mesh for the original geometry and for each load case of the displaced geometry, and contour plots for any surface in any quadrant for any stress (or temperature). These contours may be displayed on the mesh or on the  outline of the tee. The node line plot segment produces the plots of the longitudinal (along the node line) stresses and transverse (normal to the node line) stresses along the 0 degree node line (x-y plane) and 90 degree node line (y-z plane) for a given surface. The  global (x, y, z) coordinates for the nodes along the 0 degree node line are given a -45 degree rotation to a new x'-y' coordinate system. The abscissa values in the plots represent x' along this line. For the 90 degree node line the abscissa values for the plots  represent the y global coordinate values. For THFA, the temperature  values along these node lines are plotted. If more than one time- step is being plotted for THFA or TSA, all of the time-steps will appear on one graph. The cross-section segment of GRFPAK produces plots of the x=0 and z=0 planes of the tee for SA and EP. The entire cross section or only a specified number of nodes along the axes from the control node may be represented.
top ]
5. RESTRICTIONS ON THE COMPLEXITY OF THE PROBLEM

Requests for plots relating to displacements are invalid for the CORTES programs TSA, THFA, and SHFA. The maximum value for the variable MTOT in the MAIN program is 22,000.
top ]
6. TYPICAL RUNNING TIME

Execution time is approximately 12 seconds for sample data which produces nine plots. The NESC executed the sample problem in 35 seconds on an IBM370/195.
top ]
7. UNUSUAL FEATURES OF THE PROGRAM:
top ]
8. RELATED AND AUXILIARY PROGRAMS

GRFPAK reads and processes data from the CORTES finite-element programs (NESC Abstract 759).
top ]
9. STATUS
Package ID Status date Status
NESC0760/01 25-MAY-1981 Tested at NEADB
top ]
10. REFERENCES

P. G. Fowler and J. W.  Bryson, User's Manual for the
CORTES Graphics Package GRFPAK, ORNL/NUREG/TM-127, August 1977.
NESC0760/01, included references:
- Zs. Revesz:
  Qualification of Unreinforced Man-Holes in Thin-Walled Piping of
  Auxiliary/Emergency Cooling Water Systems.  Special reprint of a
  paper presented at Int.Meeting on 'Thermal Nuclear Reactor Safety'
  August 29-September 2, 1982, Chicago.
top ]
11. MACHINE REQUIREMENTS

Card reader, tape unit, line printer, and CalComp plotting equipment are required. The amount of memory needed depends on the number of nodes and elements in the finite element idealization. The sample problem which consists of 675 elements required 290K bytes of memory.
top ]
12. PROGRAMMING LANGUAGE(S) USED
Package ID Computer language
NESC0760/01 FORTRAN-IV
top ]
13. OPERATING SYSTEM UNDER WHICH PROGRAM IS EXECUTED:   OS/360.
top ]
14. OTHER PROGRAMMING OR OPERATING INFORMATION OR RESTRICTIONS

   The
program was developed to produce plots on a 925/1036 CalComp plotter. The amount of memory used can be increased or decreased by  changing the value of the variable MTOT and dimensioning the A array by MTOT in the MAIN program. GRFPAK requires as input two data sets  generated by CORTES. The logical unit 12 data set contains the connectivity of the nodes, coordinates of the nodes, and the stress  quantities (temperature quantities for THFA). Logical unit 16 contains the displacements at the nodes for each load case produced  by SA and EP. Logical unit 13 is a temporary unit employed when cross section plots are requested. A dummy subroutine IDAY was provided by the NESC. The routine IDAY, which is an ORNL system routine, returns the current date in the form MM/DD/YY.
top ]
15. NAME AND ESTABLISHMENT OF AUTHORS

                 P. G. Fowler and J. W. Bryson
                 Oak Ridge National Laboratory
                 P. O. Box X
                 Oak Ridge, Tennessee  37830
top ]
16. MATERIAL AVAILABLE
NESC0760/01
File name File description Records
NESC0760_01.001 INFORMATION FILE 101
NESC0760_01.002 SOURCE (F4,EBCDIC) 3516
NESC0760_01.003 INPUT DATA FOR SAMPLE PROBLEM (UNIT 05) 30
NESC0760_01.004 INPUT DATA FOR SAMPLE PROBLEM (UNIT 12) 147
NESC0760_01.005 INPUT DATA FOR SAMPLE PROBLEM (UNIT 16) 16
NESC0760_01.006 PRINTED OUTPUT OF SAMPLE PROBLEM 277
NESC0760_01.007 JCL AT NEA D.B. (INCLUDING OVERLAY CARDS) 63
top ]
17. CATEGORIES
  • I. Deformation and Stress Distributions, Structural Analysis and Engineering Design Studies
  • N. Subsidiary Calculations

Keywords: computer graphics, finite element method, pipes, stresses.