WorldWideScience

Sample records for fortran

  1. Fortran

    CERN Document Server

    Marateck, Samuel L

    1977-01-01

    FORTRAN is written for students who have no prior knowledge of computers or programming. The book aims to teach students how to program using the FORTRAN language.The publication first elaborates on an introduction to computers and programming, introduction to FORTRAN, and calculations and the READ statement. Discussions focus on flow charts, rounding numbers, strings, executing the program, the WRITE and FORMAT statements, performing an addition, input and output devices, and algorithms. The text then takes a look at functions and the IF statement and the DO Loop, the IF-THEN-ELSE and the WHI

  2. Standard Fortran

    International Nuclear Information System (INIS)

    Marshall, N.H.

    1981-01-01

    Because of its vast software investment in Fortran programs, the nuclear community has an inherent interest in the evolution of Fortran. This paper reviews the impact of the new Fortran 77 standard and discusses the projected changes which can be expected in the future

  3. Programming in Fortran M

    Energy Technology Data Exchange (ETDEWEB)

    Foster, I.; Olson, R.; Tuecke, S.

    1993-08-01

    Fortran M is a small set of extensions to Fortran that supports a modular approach to the construction of sequential and parallel programs. Fortran M programs use channels to plug together processes which may be written in Fortran M or Fortran 77. Processes communicate by sending and receiving messages on channels. Channels and processes can be created dynamically, but programs remain deterministic unless specialized nondeterministic constructs are used. Fortran M programs can execute on a range of sequential, parallel, and networked computers. This report incorporates both a tutorial introduction to Fortran M and a users guide for the Fortran M compiler developed at Argonne National Laboratory. The Fortran M compiler, supporting software, and documentation are made available free of charge by Argonne National Laboratory, but are protected by a copyright which places certain restrictions on how they may be redistributed. See the software for details. The latest version of both the compiler and this manual can be obtained by anonymous ftp from Argonne National Laboratory in the directory pub/fortran-m at info.mcs.anl.gov.

  4. Modern Fortran in practice

    NARCIS (Netherlands)

    Markus, A.

    2012-01-01

    From its earliest days, the Fortran programming language has been designed with computing efficiency in mind. The latest standard, Fortran 2008, incorporates a host of modern features, including object-orientation, array operations, user-defined types, and provisions for parallel computing. This

  5. FPP: A Fortran preprocessor

    International Nuclear Information System (INIS)

    Boyarski, A.

    1992-11-01

    FPP is a preprocessor which aids in porting Fortran source code across differing platforms. It provides conditional compilation features to enable or disable sections of code, and can modify file names in INCLUDE statements to a syntax suitable for a target platform. FPP is written Fortran 77, and runs on VM/CMS, VAX/VMS, UNIX, and PC/DOS SYSTEMS

  6. Scientific Programming in Fortran

    Directory of Open Access Journals (Sweden)

    W. Van Snyder

    2007-01-01

    Full Text Available The Fortran programming language was designed by John Backus and his colleagues at IBM to reduce the cost of programming scientific applications. IBM delivered the first compiler for its model 704 in 1957. IBM's competitors soon offered incompatible versions. ANSI (ASA at the time developed a standard, largely based on IBM's Fortran IV in 1966. Revisions of the standard were produced in 1977, 1990, 1995 and 2003. Development of a revision, scheduled for 2008, is under way. Unlike most other programming languages, Fortran is periodically revised to keep pace with developments in language and processor design, while revisions largely preserve compatibility with previous versions. Throughout, the focus on scientific programming, and especially on efficient generated programs, has been maintained.

  7. Strategies and Experiences Using High Performance Fortran

    National Research Council Canada - National Science Library

    Shires, Dale

    2001-01-01

    .... High performance Fortran (HPF) is a relative new addition to the Fortran dialect It is an attempt to provide an efficient high-level Fortran parallel programming language for the latest generation of been debatable...

  8. A Note on Compiling Fortran

    Energy Technology Data Exchange (ETDEWEB)

    Busby, L. E. [Lawrence Livermore National Lab. (LLNL), Livermore, CA (United States)

    2017-09-01

    Fortran modules tend to serialize compilation of large Fortran projects, by introducing dependencies among the source files. If file A depends on file B, (A uses a module defined by B), you must finish compiling B before you can begin compiling A. Some Fortran compilers (Intel ifort, GNU gfortran and IBM xlf, at least) offer an option to ‘‘verify syntax’’, with the side effect of also producing any associated Fortran module files. As it happens, this option usually runs much faster than the object code generation and optimization phases. For some projects on some machines, it can be advantageous to compile in two passes: The first pass generates the module files, quickly; the second pass produces the object files, in parallel. We achieve a 3.8× speedup in the case study below.

  9. Replacing Fortran Namelists with JSON

    Science.gov (United States)

    Robinson, T. E., Jr.

    2017-12-01

    Maintaining a log of input parameters for a climate model is very important to understanding potential causes for answer changes during the development stages. Additionally, since modern Fortran is now interoperable with C, a more modern approach to software infrastructure to include code written in C is necessary. Merging these two separate facets of climate modeling requires a quality control for monitoring changes to input parameters and model defaults that can work with both Fortran and C. JSON will soon replace namelists as the preferred key/value pair input in the GFDL model. By adding a JSON parser written in C into the model, the input can be used by all functions and subroutines in the model, errors can be handled by the model instead of by the internal namelist parser, and the values can be output into a single file that is easily parsable by readily available tools. Input JSON files can handle all of the functionality of a namelist while being portable between C and Fortran. Fortran wrappers using unlimited polymorphism are crucial to allow for simple and compact code which avoids the need for many subroutines contained in an interface. Errors can be handled with more detail by providing information about location of syntax errors or typos. The output JSON provides a ground truth for values that the model actually uses by providing not only the values loaded through the input JSON, but also any default values that were not included. This kind of quality control on model input is crucial for maintaining reproducibility and understanding any answer changes resulting from changes in the input.

  10. Fortran 90 for scientists and engineers

    CERN Document Server

    Hahn, Brian

    1994-01-01

    The introduction of the Fortran 90 standard is the first significant change in the Fortran language in over 20 years. this book is designed for anyone wanting to learn Fortran for the first time or or a programmer who needs to upgrade from Fortran 77 to Fortran 90.Employing a practical, problem-based approach this book provides a comprehensive introduction to the language. More experienced programmers will find it a useful update to the new standard and will benefit from the emphasis on science and engineering applications.

  11. LFK, FORTRAN Application Performance Test

    International Nuclear Information System (INIS)

    McMahon, F.H.

    1991-01-01

    1 - Description of program or function: LFK, the Livermore FORTRAN Kernels, is a computer performance test that measures a realistic floating-point performance range for FORTRAN applications. Informally known as the Livermore Loops test, the LFK test may be used as a computer performance test, as a test of compiler accuracy (via checksums) and efficiency, or as a hardware endurance test. The LFK test, which focuses on FORTRAN as used in computational physics, measures the joint performance of the computer CPU, the compiler, and the computational structures in units of Mega-flops/sec or Mflops. A C language version of subroutine KERNEL is also included which executes 24 samples of C numerical computation. The 24 kernels are a hydrodynamics code fragment, a fragment from an incomplete Cholesky conjugate gradient code, the standard inner product function of linear algebra, a fragment from a banded linear equations routine, a segment of a tridiagonal elimination routine, an example of a general linear recurrence equation, an equation of state fragment, part of an alternating direction implicit integration code, an integrate predictor code, a difference predictor code, a first sum, a first difference, a fragment from a two-dimensional particle-in-cell code, a part of a one-dimensional particle-in-cell code, an example of how casually FORTRAN can be written, a Monte Carlo search loop, an example of an implicit conditional computation, a fragment of a two-dimensional explicit hydrodynamics code, a general linear recurrence equation, part of a discrete ordinates transport program, a simple matrix calculation, a segment of a Planck distribution procedure, a two-dimensional implicit hydrodynamics fragment, and determination of the location of the first minimum in an array. 2 - Method of solution: CPU performance rates depend strongly on the maturity of FORTRAN compiler machine code optimization. The LFK test-bed executes the set of 24 kernels three times, resetting the DO

  12. VFC: The Vienna Fortran Compiler

    Directory of Open Access Journals (Sweden)

    Siegfried Benkner

    1999-01-01

    Full Text Available High Performance Fortran (HPF offers an attractive high‐level language interface for programming scalable parallel architectures providing the user with directives for the specification of data distribution and delegating to the compiler the task of generating an explicitly parallel program. Available HPF compilers can handle regular codes quite efficiently, but dramatic performance losses may be encountered for applications which are based on highly irregular, dynamically changing data structures and access patterns. In this paper we introduce the Vienna Fortran Compiler (VFC, a new source‐to‐source parallelization system for HPF+, an optimized version of HPF, which addresses the requirements of irregular applications. In addition to extended data distribution and work distribution mechanisms, HPF+ provides the user with language features for specifying certain information that decisively influence a program’s performance. This comprises data locality assertions, non‐local access specifications and the possibility of reusing runtime‐generated communication schedules of irregular loops. Performance measurements of kernels from advanced applications demonstrate that with a high‐level data parallel language such as HPF+ a performance close to hand‐written message‐passing programs can be achieved even for highly irregular codes.

  13. An Introduction to High Performance Fortran

    Directory of Open Access Journals (Sweden)

    John Merlin

    1995-01-01

    Full Text Available High Performance Fortran (HPF is an informal standard for extensions to Fortran 90 to assist its implementation on parallel architectures, particularly for data-parallel computation. Among other things, it includes directives for specifying data distribution across multiple memories, and concurrent execution features. This article provides a tutorial introduction to the main features of HPF.

  14. READDATA: a FORTRAN 77 codeword input package

    International Nuclear Information System (INIS)

    Lander, P.A.

    1983-07-01

    A new codeword input package has been produced as a result of the incompatibility between different dialects of FORTRAN, especially when character variables are passed as parameters. This report is for those who wish to use a codeword input package with FORTRAN 77. The package, called ''Readdata'', attempts to combine the best features of its predecessors such as BINPUT and pseudo-BINPUT. (author)

  15. High Performance Fortran for Aerospace Applications

    National Research Council Canada - National Science Library

    Mehrotra, Piyush

    2000-01-01

    .... HPF is a set of Fortran extensions designed to provide users with a high-level interface for programming data parallel scientific applications while delegating to the compiler/runtime system the task...

  16. Fortran Testing and Refactoring Infrastructure, Phase I

    Data.gov (United States)

    National Aeronautics and Space Administration — Tech-X proposes to develop a comprehensive Fortran testing and refactoring infrastructure that allows developers and scientists to leverage the benefits of a...

  17. Fortran Testing and Refactoring Infrastructure, Phase II

    Data.gov (United States)

    National Aeronautics and Space Administration — Tech-X proposes to develop a comprehensive Fortran testing and refactoring infrastructure that allows developers and scientists to leverage the benefits of...

  18. C Versus Fortran-77 for Scientific Programming

    Directory of Open Access Journals (Sweden)

    Tom MacDonald

    1992-01-01

    Full Text Available The predominant programming language for numeric and scientific applications is Fortran-77 and supercomputers are primarily used to run large-scale numeric and scientific applications. Standard C* is not widely used for numerical and scientific programming, yet Standard C provides many desirable linguistic features not present in Fortran-77. Furthermore, the existence of a standard library and preprocessor eliminates the worst portability problems. A comparison of Standard C and Fortran-77 shows several key deficiencies in C that reduce its ability to adequately solve some numerical problems. Some of these problems have already been addressed by the C standard but others remain. Standard C with a few extensions and modifications could be suitable for all numerical applications and could become more popular in supercomputing environments.

  19. IRRIGOGRAPHY AFTER PREPARATIONS OF PATIENTS WITH FORTRANS

    Directory of Open Access Journals (Sweden)

    Irena Jankovic

    2006-01-01

    Full Text Available Fortrans® is a laxative in the form of the powder which is used for making solution for oral application. Laxative effects are achieved over long linear polymer (polyethylene-glikol - PEG 4000 which binds water molecules, increasing thus the volume of fluids in the intestinal tract.Material of study comprises 150 irrigographies made at the Institute of Radiology of the Clinical Center in Nis in the period from January 2004 to Jun 2005.The preparation in these cases was done by Fortrans®. The contrast medium used was barium sulfate.The results of study are presented in illustrations and irrigograms.In conclusion,we can say that Fortrans® provides reliable, effective and simple preparation of patients for irrigography as well as for fast, comfortable and efficient endographic examination (irrigography. The obtained irrigograms are of satisfactory quality, showing sharp contrasts.

  20. Alternatives to FORTRAN in control systems

    International Nuclear Information System (INIS)

    Howell, J.A.; Wright, R.M.

    1985-01-01

    Control system software has traditionally been written in assembly language, FORTRAN, or Basic. Today there exist several high-level languages with features that make them convenient and effective in control systems. These features include bit manipulation, user-defined data types, character manipulation, and high-level logical operations. Some of theses languages are quite different from FORTRAN and yet are easy to read and use. We discuss several languages, their features that make them convenient for control systems, and give examples of their use. We focus particular attention on the language C, developed by Bell Laboratories

  1. Basic linear algebra subprograms for FORTRAN usage

    Science.gov (United States)

    Lawson, C. L.; Hanson, R. J.; Kincaid, D. R.; Krogh, F. T.

    1977-01-01

    A package of 38 low level subprograms for many of the basic operations of numerical linear algebra is presented. The package is intended to be used with FORTRAN. The operations in the package are dot products, elementary vector operations, Givens transformations, vector copy and swap, vector norms, vector scaling, and the indices of components of largest magnitude. The subprograms and a test driver are available in portable FORTRAN. Versions of the subprograms are also provided in assembly language for the IBM 360/67, the CDC 6600 and CDC 7600, and the Univac 1108.

  2. How to Interface Fortran with Matlab

    OpenAIRE

    Sagastizábal , Claudia; Vige , Guillaume

    1995-01-01

    Projet PROMATH; We describe the general procedure for interfacing Fortran routines with Matlab. We explain how to write a mex-file and the associated gateway function. In particular, each different type of argument is considered in detail. We finish with an illustrative example

  3. Pattern recognition in molecular dynamics. [FORTRAN

    Energy Technology Data Exchange (ETDEWEB)

    Zurek, W H; Schieve, W C [Texas Univ., Austin (USA)

    1977-07-01

    An algorithm for the recognition of the formation of bound molecular states in the computer simulation of a dilute gas is presented. Applications to various related problems in physics and chemistry are pointed out. Data structure and decision processes are described. Performance of the FORTRAN program based on the algorithm in cooperation with the molecular dynamics program is described and the results are presented.

  4. High Performance Object-Oriented Scientific Programming in Fortran 90

    Science.gov (United States)

    Norton, Charles D.; Decyk, Viktor K.; Szymanski, Boleslaw K.

    1997-01-01

    We illustrate how Fortran 90 supports object-oriented concepts by example of plasma particle computations on the IBM SP. Our experience shows that Fortran 90 and object-oriented methodology give high performance while providing a bridge from Fortran 77 legacy codes to modern programming principles. All of our object-oriented Fortran 90 codes execute more quickly thatn the equeivalent C++ versions, yet the abstraction modelling capabilities used for scentific programming are comparably powereful.

  5. JLAPACK – Compiling LAPACK FORTRAN to Java

    Directory of Open Access Journals (Sweden)

    David M. Doolin

    1999-01-01

    Full Text Available The JLAPACK project provides the LAPACK numerical subroutines translated from their subset Fortran 77 source into class files, executable by the Java Virtual Machine (JVM and suitable for use by Java programmers. This makes it possible for Java applications or applets, distributed on the World Wide Web (WWW to use established legacy numerical code that was originally written in Fortran. The translation is accomplished using a special purpose Fortran‐to‐Java (source‐to‐source compiler. The LAPACK API will be considerably simplified to take advantage of Java’s object‐oriented design. This report describes the research issues involved in the JLAPACK project, and its current implementation and status.

  6. Application of Modern Fortran to Spacecraft Trajectory Design and Optimization

    Science.gov (United States)

    Williams, Jacob; Falck, Robert D.; Beekman, Izaak B.

    2018-01-01

    In this paper, applications of the modern Fortran programming language to the field of spacecraft trajectory optimization and design are examined. Modern object-oriented Fortran has many advantages for scientific programming, although many legacy Fortran aerospace codes have not been upgraded to use the newer standards (or have been rewritten in other languages perceived to be more modern). NASA's Copernicus spacecraft trajectory optimization program, originally a combination of Fortran 77 and Fortran 95, has attempted to keep up with modern standards and makes significant use of the new language features. Various algorithms and methods are presented from trajectory tools such as Copernicus, as well as modern Fortran open source libraries and other projects.

  7. Emulating Multiple Inheritance in Fortran 2003/2008

    Directory of Open Access Journals (Sweden)

    Karla Morris

    2015-01-01

    in Fortran 2003. The design unleashes the power of the associated class relationships for modeling complicated data structures yet avoids the ambiguities that plague some multiple inheritance scenarios.

  8. DISPPAK SUBPAK, MS FORTRAN Extended Subroutine Library

    International Nuclear Information System (INIS)

    Langer, S.

    1991-01-01

    1 - Description of program or function: DISPPAK is a set of routines for use with Microsoft FORTRAN programs that allows the flexible display of information on the screen of an IBM PC in both text and graphics modes. The text mode routines allow the cursor to be placed at an arbitrary point on the screen and text to be displayed at the cursor location, making it possible to create menus and other structured displays. A routine to set the color of the characters that these routines display is also provided. A set of line drawing routines is included for use with IBM's Color Graphics Adapter or an equivalent board (such as the Enhanced Graphics Adapter in CGA emulation mode). These routines support both pixel coordinates and a user-specified set of real number coordinates. SUBPAK is a function library which allows Microsoft FORTRAN programs to calculate random numbers, issue calls to the operating system, read individual characters from the keyboard, perform Boolean and shift operations, and communicate with the I/O ports of the IBM PC. In addition, peek and poke routines, a routine that returns the address of any variable, and routines that can access the system time and date are included. 2 - Method of solution: For the DISPPAK line drawing routines, the user selects a fraction of the screen to use for plotting, chooses the coordinates that refer to the lower-left and upper-right corners, and decides whether the mapping should be linear or logarithmic. Lines are then drawn between endpoints defined in terms of the user coordinate system. Out-of-range coordinates are forced to the border of the window before the line is drawn. 3 - Restrictions on the complexity of the problem: No support is provided for filled areas or text

  9. ARBUS: A FORTRAN tool for generating tree structure diagrams

    International Nuclear Information System (INIS)

    Ferrero, C.; Zanger, M.

    1992-02-01

    The FORTRAN77 stand-alone code ARBUS has been designed to aid the user by providing a tree structure diagram generating utility for computer programs written in FORTRAN language. This report is intended to describe the main purpose and features of ARBUS and to highlight some additional applications of the code by means of practical test cases. (orig.) [de

  10. Object-Oriented Scientific Programming with Fortran 90

    Science.gov (United States)

    Norton, C.

    1998-01-01

    Fortran 90 is a modern language that introduces many important new features beneficial for scientific programming. We discuss our experiences in plasma particle simulation and unstructured adaptive mesh refinement on supercomputers, illustrating the features of Fortran 90 that support the object-oriented methodology.

  11. The Fortran-P Translator: Towards Automatic Translation of Fortran 77 Programs for Massively Parallel Processors

    Directory of Open Access Journals (Sweden)

    Matthew O'keefe

    1995-01-01

    Full Text Available Massively parallel processors (MPPs hold the promise of extremely high performance that, if realized, could be used to study problems of unprecedented size and complexity. One of the primary stumbling blocks to this promise has been the lack of tools to translate application codes to MPP form. In this article we show how applications codes written in a subset of Fortran 77, called Fortran-P, can be translated to achieve good performance on several massively parallel machines. This subset can express codes that are self-similar, where the algorithm applied to the global data domain is also applied to each subdomain. We have found many codes that match the Fortran-P programming style and have converted them using our tools. We believe a self-similar coding style will accomplish what a vectorizable style has accomplished for vector machines by allowing the construction of robust, user-friendly, automatic translation systems that increase programmer productivity and generate fast, efficient code for MPPs.

  12. Portable parallel programming in a Fortran environment

    International Nuclear Information System (INIS)

    May, E.N.

    1989-01-01

    Experience using the Argonne-developed PARMACs macro package to implement a portable parallel programming environment is described. Fortran programs with intrinsic parallelism of coarse and medium granularity are easily converted to parallel programs which are portable among a number of commercially available parallel processors in the class of shared-memory bus-based and local-memory network based MIMD processors. The parallelism is implemented using standard UNIX (tm) tools and a small number of easily understood synchronization concepts (monitors and message-passing techniques) to construct and coordinate multiple cooperating processes on one or many processors. Benchmark results are presented for parallel computers such as the Alliant FX/8, the Encore MultiMax, the Sequent Balance, the Intel iPSC/2 Hypercube and a network of Sun 3 workstations. These parallel machines are typical MIMD types with from 8 to 30 processors, each rated at from 1 to 10 MIPS processing power. The demonstration code used for this work is a Monte Carlo simulation of the response to photons of a ''nearly realistic'' lead, iron and plastic electromagnetic and hadronic calorimeter, using the EGS4 code system. 6 refs., 2 figs., 2 tabs

  13. Types: A data abstraction package in FORTRAN

    International Nuclear Information System (INIS)

    Youssef, S.

    1990-01-01

    TYPES is a collection of Fortran programs which allow the creation and manipulation of abstract ''data objects'' without the need for a preprocessor. Each data object is assigned a ''type'' as it is created which implies participation in a set of characteristic operations. Available types include scalars, logicals, ordered sets, stacks, queues, sequences, trees, arrays, character strings, block text, histograms, virtual and allocatable memories. A data object may contain integers, reals, or other data objects in any combination. In addition to the type specific operations, a set of universal utilities allows for copying input/output to disk, naming, editing, displaying, user input, interactive creation, tests for equality of contents or structure, machine to machine translation or source code creation for and data object. TYPES is available on VAX/VMS, SUN 3, SPARC, DEC/Ultrix, Silicon Graphics 4D and Cray/Unicos machines. The capabilities of the package are discussed together with characteristic applications and experience in writing the GVerify package

  14. FASTPLOT, Interface Routines to MS FORTRAN Graphics Library

    International Nuclear Information System (INIS)

    1999-01-01

    1 - Description of program or function: FASTPLOT is a library of routines that can be used to interface with the Microsoft FORTRAN Graphics library (GRAPHICS.LIB). The FASTPLOT routines simplify the development of graphics applications and add capabilities such as histograms, Splines, symbols, and error bars. FASTPLOT also includes routines that can be used to create menus. 2 - Methods: FASTPLOT is a library of routines which must be linked with a user's FORTRAN programs that call any FASTPLOT routines. In addition, the user must link with the Microsoft FORTRAN Graphics library (GRAPHICS.LIB). 3 - Restrictions on the complexity of the problem: None noted

  15. MORTRAN-2, FORTRAN Language Extension with User-Supplied Macros

    International Nuclear Information System (INIS)

    Cook, A. James; Shustek, L.J.

    1980-01-01

    1 - Description of problem or function: MORTRAN2 is a FORTRAN language extension that permits a relatively easy transition from FORTRAN to a more convenient and structured language. Its features include free-field format; alphanumeric statement labels; flexible comment convention; nested block structure; for-by-to, do, while, until, loop, if-then-else, if-else, exit, and next statements; multiple assignment statements; conditional compilation; and automatic listing indentation. The language is implemented by a macro-based pre-processor and is further extensible by user-defined macros. 2 - Method of solution: The MORTRAN2 pre-processor may be regarded as a compiler whose object code is ANSI Standard FORTRAN. The MORTRAN2 language is dynamically defined by macros which are input at each use of the pre-processor. 3 - Restrictions on the complexity of the problem: The pre-processor output must be accepted by a FORTRAN compiler

  16. Programação orientada a objetos em FORTRAN

    OpenAIRE

    Beck, André Teófilo; Bazán, Felipe Alexander Vargas

    2011-01-01

    Este artigo apresenta conceitos fundamentais de programação orientada a objetos (OO) em FORTRAN. Em geral, os usuários de FORTRAN não estão familiarizados com estes conceitos, pois os compiladores desta linguagem não possuíam suporte para programação OO até o recente lançamento da versão 11.1 do compilador Intel Visual FORTRAN. Este compilador suporta a maioria das características de orientação a objetos do padrão FORTRAN 2003, permitindo a atualização de práticas de programaçã...

  17. SVM Support in the Vienna Fortran Compilation System

    OpenAIRE

    Brezany, Peter; Gerndt, Michael; Sipkova, Viera

    1994-01-01

    Vienna Fortran, a machine-independent language extension to Fortran which allows the user to write programs for distributed-memory systems using global addresses, provides the forall-loop construct for specifying irregular computations that do not cause inter-iteration dependences. Compilers for distributed-memory systems generate code that is based on runtime analysis techniques and is only efficient if, in addition, aggressive compile-time optimizations are applied. Since these optimization...

  18. IFF, Full-Screen Input Menu Generator for FORTRAN Program

    International Nuclear Information System (INIS)

    Seidl, Albert

    1991-01-01

    1 - Description of program or function: The IFF-package contains input modules for use within FORTRAN programs. This package enables the programmer to easily include interactive menu-directed data input (module VTMEN1) and command-word processing (module INPCOM) into a FORTRAN program. 2 - Method of solution: No mathematical operations are performed. 3 - Restrictions on the complexity of the problem: Certain restrictions of use may arise from the dimensioning of arrays. Field lengths are defined via PARAMETER-statements

  19. Classical Fortran programming for engineering and scientific applications

    CERN Document Server

    Kupferschmid, Michael

    2009-01-01

    IntroductionWhy Study Programming?The Evolution of FORTRANWhy Study FORTRAN?Classical FORTRANAbout This BookAdvice to InstructorsAbout the AuthorAcknowledgmentsDisclaimersHello, World!Case Study: A First FORTRAN ProgramCompiling the ProgramRunning a Program in UNIXOmissionsExpressions and Assignment StatementsConstantsVariables and Variable NamesArithmetic OperatorsFunction ReferencesExpressionsA

  20. Comparison of and conversion between different implementations of the FORTRAN programming language

    Science.gov (United States)

    Treinish, L.

    1980-01-01

    A guideline for computer programmers who may need to exchange FORTRAN programs between several computers is presented. The characteristics of the FORTRAN language available on three different types of computers are outlined, and procedures and other considerations for the transfer of programs from one type of FORTRAN to another are discussed. In addition, the variance of these different FORTRAN's from the FORTRAN 77 standard are discussed.

  1. Aspects of FORTRAN in large-scale programming

    International Nuclear Information System (INIS)

    Metcalf, M.

    1983-01-01

    In these two lectures I examine the following three questions: i) Why did high-energy physicists begin to use FORTRAN. ii) Why do high-energy physicists continue to use FORTRAN. iii) Will high-energy physicists always use FORTRAN. In order to find answers to these questions, it is necessary to look at the history of the language, its present position, and its likely future, and also to consider its manner of use, the topic of portability, and the competition from other languages. Here we think especially of early competition from ALGOL, the more recent spread in the use of PASCAL, and the appearance of a completely new and ambitious language, ADA. (orig.)

  2. Introduction to modern Fortran for the Earth system sciences

    CERN Document Server

    Chirila, Dragos B

    2014-01-01

    This work provides a short "getting started" guide to Fortran 90/95. The main target audience consists of newcomers to the field of numerical computation within Earth system sciences (students, researchers or scientific programmers). Furthermore, readers accustomed to other programming languages may also benefit from this work, by discovering how some programming techniques they are familiar with map to Fortran 95. The main goal is to enable readers to quickly start using Fortran 95 for writing useful programs. It also introduces a gradual discussion of Input/Output facilities relevant for Earth system sciences, from the simplest ones to the more advanced netCDF library (which has become a de facto standard for handling the massive datasets used within Earth system sciences). While related works already treat these disciplines separately (each often providing much more information than needed by the beginning practitioner), the reader finds in this book a shorter guide which links them. Compared to other book...

  3. Aspects of FORTRAN in large-scale programming

    CERN Document Server

    Metcalf, M

    1983-01-01

    In these two lectures I shall try to examine the following three questions: i) Why did high-energy physicists begin to use FORTRAN? ii) Why do high-energy physicists continue to use FORTRAN? iii) Will high-energy physicists always use FORTRAN? In order to find answers to these questions, it is necessary to look at the history of the language, its present position, and its likely future, and also to consider its manner of use, the topic of portability, and the competition from other languages. Here we think especially of early competition from ALGOL, the more recent spread in the use of PASCAL, and the appearance of a completely new and ambitious language, ADA.

  4. Numerical methods of mathematical optimization with Algol and Fortran programs

    CERN Document Server

    Künzi, Hans P; Zehnder, C A; Rheinboldt, Werner

    1971-01-01

    Numerical Methods of Mathematical Optimization: With ALGOL and FORTRAN Programs reviews the theory and the practical application of the numerical methods of mathematical optimization. An ALGOL and a FORTRAN program was developed for each one of the algorithms described in the theoretical section. This should result in easy access to the application of the different optimization methods.Comprised of four chapters, this volume begins with a discussion on the theory of linear and nonlinear optimization, with the main stress on an easily understood, mathematically precise presentation. In addition

  5. Cloudy's Journey from FORTRAN to C, Why and How

    Science.gov (United States)

    Ferland, G. J.

    Cloudy is a large-scale plasma simulation code that is widely used across the astronomical community as an aid in the interpretation of spectroscopic data. The cover of the ADAS VI book featured predictions of the code. The FORTRAN 77 source code has always been freely available on the Internet, contributing to its widespread use. The coming of PCs and Linux has fundamentally changed the computing environment. Modern Fortran compilers (F90 and F95) are not freely available. A common-use code must be written in either FORTRAN 77 or C to be Open Source/GNU/Linux friendly. F77 has serious drawbacks - modern language constructs cannot be used, students do not have skills in this language, and it does not contribute to their future employability. It became clear that the code would have to be ported to C to have a viable future. I describe the approach I used to convert Cloudy from FORTRAN 77 with MILSPEC extensions to ANSI/ISO 89 C. Cloudy is now openly available as a C code, and will evolve to C++ as gcc and standard C++ mature. Cloudy looks to a bright future with a modern language.

  6. Numerical integration subprogrammes in Fortran II-D

    Energy Technology Data Exchange (ETDEWEB)

    Fry, C. R.

    1966-12-15

    This note briefly describes some integration subprogrammes written in FORTRAN II-D for the IBM 1620-II at CARDE. These presented are two Newton-Cotes, Chebyshev polynomial summation, Filon's, Nordsieck's and optimum Runge-Kutta and predictor-corrector methods. A few miscellaneous numerical integration procedures are also mentioned covering statistical functions, oscillating integrands and functions occurring in electrical engineering.

  7. Multidimentional and Multi-Parameter Fortran-Based Curve Fitting ...

    African Journals Online (AJOL)

    This work briefly describes the mathematics behind the algorithm, and also elaborates how to implement it using FORTRAN 95 programming language. The advantage of this algorithm, when it is extended to surfaces and complex functions, is that it makes researchers to have a better trust during fitting. It also improves the ...

  8. An Introduction to Fortran Programming: An IPI Approach.

    Science.gov (United States)

    Fisher, D. D.; And Others

    This text is designed to give individually paced instruction in Fortran Programing. The text contains fifteen units. Unit titles include: Flowcharts, Input and Output, Loops, and Debugging. Also included is an extensive set of appendices. These were designed to contain a great deal of practical information necessary to the course. These appendices…

  9. GRESS, FORTRAN Pre-compiler with Differentiation Enhancement

    International Nuclear Information System (INIS)

    1999-01-01

    1 - Description of program or function: The GRESS FORTRAN pre-compiler (SYMG) and run-time library are used to enhance conventional FORTRAN-77 programs with analytic differentiation of arithmetic statements for automatic differentiation in either forward or reverse mode. GRESS 3.0 is functionally equivalent to GRESS 2.1. GRESS 2.1 is an improved and updated version of the previous released GRESS 1.1. Improvements in the implementation of a the CHAIN option have resulted in a 70 to 85% reduction in execution time and up to a 50% reduction in memory required for forward chaining applications. 2 - Method of solution: GRESS uses a pre-compiler to analyze FORTRAN statements and determine the mathematical operations embodied in them. As each arithmetic assignment statement in a program is analyzed, SYMG generates the partial derivatives of the term on the left with respect to each floating-point variable on the right. The result of the pre-compilation step is a new FORTRAN program that can produce derivatives for any REAL (i.e., single or double precision) variable calculated by the model. Consequently, GRESS enhances FORTRAN programs or subprograms by adding the calculation of derivatives along with the original output. Derivatives from a GRESS enhanced model can be used internally (e.g., iteration acceleration) or externally (e.g., sensitivity studies). By calling GRESS run-time routines, derivatives can be propagated through the code via the chain rule (referred to as the CHAIN option) or accumulated to create an adjoint matrix (referred to as the ADGEN option). A third option, GENSUB, makes it possible to process a subset of a program (i.e., a do loop, subroutine, function, a sequence of subroutines, or a whole program) for calculating derivatives of dependent variables with respect to independent variables. A code enhanced with the GENSUB option can use forward mode, reverse mode, or a hybrid of the two modes. 3 - Restrictions on the complexity of the problem: GRESS

  10. User manual for two simple postscript output FORTRAN plotting routines

    Science.gov (United States)

    Nguyen, T. X.

    1991-01-01

    Graphics is one of the important tools in engineering analysis and design. However, plotting routines that generate output on high quality laser printers normally come in graphics packages, which tend to be expensive and system dependent. These factors become important for small computer systems or desktop computers, especially when only some form of a simple plotting routine is sufficient. With the Postscript language becoming popular, there are more and more Postscript laser printers now available. Simple, versatile, low cost plotting routines that can generate output on high quality laser printers are needed and standard FORTRAN language plotting routines using output in Postscript language seems logical. The purpose here is to explain two simple FORTRAN plotting routines that generate output in Postscript language.

  11. A FORTRAN program for a least-square fitting

    International Nuclear Information System (INIS)

    Yamazaki, Tetsuo

    1978-01-01

    A practical FORTRAN program for a least-squares fitting is presented. Although the method is quite usual, the program calculates not only the most satisfactory set of values of unknowns but also the plausible errors associated with them. As an example, a measured lateral absorbed-dose distribution in water for a narrow 25-MeV electron beam is fitted to a Gaussian distribution. (auth.)

  12. A Fortran Program for Deep Space Sensor Analysis.

    Science.gov (United States)

    1984-12-14

    used to help p maintain currency to the deep space satellite catelog? Research Question Can a Fortran program be designed to evaluate the effectiveness ...Range ( AFETR ) Range p Measurements Laboratory (RML) is located in Malibar, .- Florida. Like GEODSS, Malibar uses a 48 inch telescope with a...phased out. This mode will evaluate the effect of the loss of the 3 Baker-Nunn sites to mode 3 Mode 5 through Mode 8 Modes 5 through 8 are identical to

  13. An environment for parallel structuring of Fortran programs

    International Nuclear Information System (INIS)

    Sridharan, K.; McShea, M.; Denton, C.; Eventoff, B.; Browne, J.C.; Newton, P.; Ellis, M.; Grossbard, D.; Wise, T.; Clemmer, D.

    1990-01-01

    The paper describes and illustrates an environment for interactive support of the detection and implementation of macro-level parallelism in Fortran programs. The approach couples algorithms for dependence analysis with both innovative techniques for complexity management and capabilities for the measurement and analysis of the parallel computation structures generated through use of the environment. The resulting environment is complementary to the more common approach of seeking local parallelism by loop unrolling, either by an automatic compiler or manually. (orig.)

  14. MAPLIB, Thermodynamics Materials Property Generator for FORTRAN Program

    International Nuclear Information System (INIS)

    Schumann, U.; Zimmerer, W. and others

    1978-01-01

    1 - Nature of physical problem solved: MAPLIB is a program system which is able to incorporate the values of the properties of any material in a form suitable for use in other computer programs. The data are implemented in FORTRAN functions. A utility program is provided to assist in library management. 2 - Method of solution: MAPLIB consists of the following parts: 1) Conventions for the data format. 2) Some integrated data. 3) A data access system (FORTRAN subroutine). 4) An utility program for updating and documentation of the actual library content. The central part is a set of FORTRAN functions, e.g. WL H2O v(t,p) (heat conduction of water vapor as a function of temperature and pressure), which compute the required data and which can be called by the user program. The data content of MAPLIB has been delivered by many persons. There was no systematic evaluation of the material. It is the responsibility of every user to check the data for physical accuracy. MAPLIB only serves as a library system for manipulation and storing of such data. 3 - Restrictions on the complexity of the problem: a) See responsibility as explained above. b) Up to 1000 data functions could be implemented. c) If too many data functions are included in MAPLIB, the storage requirements become excessive for application in users programs

  15. DTK C/Fortran Interface Development for NEAMS FSI Simulations

    Energy Technology Data Exchange (ETDEWEB)

    Slattery, Stuart R. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Lebrun-Grandie, Damien T. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States)

    2016-09-19

    This report documents the development of DataTransferKit (DTK) C and Fortran interfaces for fluid-structure-interaction (FSI) simulations in NEAMS. In these simulations, the codes Nek5000 and Diablo are being coupled within the SHARP framework to study flow-induced vibration (FIV) in reactor steam generators. We will review the current Nek5000/Diablo coupling algorithm in SHARP and the current state of the solution transfer scheme used in this implementation. We will then present existing DTK algorithms which may be used instead to provide an improvement in both flexibility and scalability of the current SHARP implementation. We will show how these can be used within the current FSI scheme using a new set of interfaces to the algorithms developed by this work. These new interfaces currently expose the mesh-free solution transfer algorithms in DTK, a C++ library, and are written in C and Fortran to enable coupling of both Nek5000 and Diablo in their native Fortran language. They have been compiled and tested on Cooley, the test-bed machine for Mira at ALCF.

  16. Automatic generation of Fortran programs for algebraic simulation models

    International Nuclear Information System (INIS)

    Schopf, W.; Rexer, G.; Ruehle, R.

    1978-04-01

    This report documents a generator program by which econometric simulation models formulated in an application-orientated language can be transformed automatically in a Fortran program. Thus the model designer is able to build up, test and modify models without the need of a Fortran programmer. The development of a computer model is therefore simplified and shortened appreciably; in chapter 1-3 of this report all rules are presented for the application of the generator to the model design. Algebraic models including exogeneous and endogeneous time series variables, lead and lag function can be generated. In addition, to these language elements, Fortran sequences can be applied to the formulation of models in the case of complex model interrelations. Automatically the generated model is a module of the program system RSYST III and is therefore able to exchange input and output data with the central data bank of the system and in connection with the method library modules can be used to handle planning problems. (orig.) [de

  17. Fortran interface layer of the framework for developing particle simulator FDPS

    Science.gov (United States)

    Namekata, Daisuke; Iwasawa, Masaki; Nitadori, Keigo; Tanikawa, Ataru; Muranushi, Takayuki; Wang, Long; Hosono, Natsuki; Nomura, Kentaro; Makino, Junichiro

    2018-06-01

    Numerical simulations based on particle methods have been widely used in various fields including astrophysics. To date, various versions of simulation software have been developed by individual researchers or research groups in each field, through a huge amount of time and effort, even though the numerical algorithms used are very similar. To improve the situation, we have developed a framework, called FDPS (Framework for Developing Particle Simulators), which enables researchers to develop massively parallel particle simulation codes for arbitrary particle methods easily. Until version 3.0, FDPS provided an API (application programming interface) for the C++ programming language only. This limitation comes from the fact that FDPS is developed using the template feature in C++, which is essential to support arbitrary data types of particle. However, there are many researchers who use Fortran to develop their codes. Thus, the previous versions of FDPS require such people to invest much time to learn C++. This is inefficient. To cope with this problem, we developed a Fortran interface layer in FDPS, which provides API for Fortran. In order to support arbitrary data types of particle in Fortran, we design the Fortran interface layer as follows. Based on a given derived data type in Fortran representing particle, a PYTHON script provided by us automatically generates a library that manipulates the C++ core part of FDPS. This library is seen as a Fortran module providing an API of FDPS from the Fortran side and uses C programs internally to interoperate Fortran with C++. In this way, we have overcome several technical issues when emulating a `template' in Fortran. Using the Fortran interface, users can develop all parts of their codes in Fortran. We show that the overhead of the Fortran interface part is sufficiently small and a code written in Fortran shows a performance practically identical to the one written in C++.

  18. Mass: Fortran program for calculating mass-absorption coefficients

    International Nuclear Information System (INIS)

    Nielsen, Aa.; Svane Petersen, T.

    1980-01-01

    Determinations of mass-absorption coefficients in the x-ray analysis of trace elements are an important and time consuming part of the arithmetic calculation. In the course of time different metods have been used. The program MASS calculates the mass-absorption coefficients from a given major element analysis at the x-ray wavelengths normally used in trace element determinations and lists the chemical analysis and the mass-absorption coefficients. The program is coded in FORTRAN IV, and is operational on the IBM 370/165 computer, on the UNIVAC 1110 and on PDP 11/05. (author)

  19. Numerical computation of molecular integrals via optimized (vectorized) FORTRAN code

    International Nuclear Information System (INIS)

    Scott, T.C.; Grant, I.P.; Saunders, V.R.

    1997-01-01

    The calculation of molecular properties based on quantum mechanics is an area of fundamental research whose horizons have always been determined by the power of state-of-the-art computers. A computational bottleneck is the numerical calculation of the required molecular integrals to sufficient precision. Herein, we present a method for the rapid numerical evaluation of molecular integrals using optimized FORTRAN code generated by Maple. The method is based on the exploitation of common intermediates and the optimization can be adjusted to both serial and vectorized computations. (orig.)

  20. A FORTRAN realization of the block adjustment of CCD frames

    Science.gov (United States)

    Yu, Yong; Tang, Zhenghong; Li, Jinling; Zhao, Ming

    A FORTRAN version realization of the block adjustment (BA) of overlapping CCD frames is developed. The flowchart is introduced including (a) data collection, (b) preprocessing, and (c) BA and object positioning. The subroutines and their functions are also demonstrated. The program package is tested by simulated data with/without the application of white noises. It is also preliminarily applied to the reduction of optical positions of four extragalactic radio sources. The results show that because of the increase in the sky coverage and number of reference stars, the precision of deducted positions is improved compared with single plate adjustment.

  1. The FORTRAN-77 version of the Karlsruhe program system KAPROS

    International Nuclear Information System (INIS)

    Moritz, N.

    1985-02-01

    The FORTRAN-77 KAPROS-kernel includes some major changes compared with the version, which is described in the KfK-report 2254. The changes are documented in this report from the point of view of the system-programmer. This report is meant to be a supplement to the KfK-report 2254, assuming that the reader of this report is familiar with the KfK-report 2254. He also should be familiar with the IBM operating system MVS SP1.3.2 and the usual terms of data processing. (orig.) [de

  2. IMAGEP - A FORTRAN ALGORITHM FOR DIGITAL IMAGE PROCESSING

    Science.gov (United States)

    Roth, D. J.

    1994-01-01

    IMAGEP is a FORTRAN computer algorithm containing various image processing, analysis, and enhancement functions. It is a keyboard-driven program organized into nine subroutines. Within the subroutines are other routines, also, selected via keyboard. Some of the functions performed by IMAGEP include digitization, storage and retrieval of images; image enhancement by contrast expansion, addition and subtraction, magnification, inversion, and bit shifting; display and movement of cursor; display of grey level histogram of image; and display of the variation of grey level intensity as a function of image position. This algorithm has possible scientific, industrial, and biomedical applications in material flaw studies, steel and ore analysis, and pathology, respectively. IMAGEP is written in VAX FORTRAN for DEC VAX series computers running VMS. The program requires the use of a Grinnell 274 image processor which can be obtained from Mark McCloud Associates, Campbell, CA. An object library of the required GMR series software is included on the distribution media. IMAGEP requires 1Mb of RAM for execution. The standard distribution medium for this program is a 1600 BPI 9track magnetic tape in VAX FILES-11 format. It is also available on a TK50 tape cartridge in VAX FILES-11 format. This program was developed in 1991. DEC, VAX, VMS, and TK50 are trademarks of Digital Equipment Corporation.

  3. Exploiting first-class arrays in Fortran for accelerator programming

    International Nuclear Information System (INIS)

    Rasmussen, Craig E.; Weseloh, Wayne N.; Robey, Robert W.; Sottile, Matthew J.; Quinlan, Daniel; Overbey, Jeffrey

    2010-01-01

    Emerging architectures for high performance computing often are well suited to a data parallel programming model. This paper presents a simple programming methodology based on existing languages and compiler tools that allows programmers to take advantage of these systems. We will work with the array features of Fortran 90 to show how this infrequently exploited, standardized language feature is easily transformed to lower level accelerator code. Our transformations are based on a mapping from Fortran 90 to C++ code with OpenCL extensions. The sheer complexity of programming for clusters of many or multi-core processors with tens of millions threads of execution make the simplicity of the data parallel model attractive. Furthermore, the increasing complexity of todays applications (especially when convolved with the increasing complexity of the hardware) and the need for portability across hardware architectures make a higher-level and simpler programming model like data parallel attractive. The goal of this work has been to exploit source-to-source transformations that allow programmers to develop and maintain programs at a high-level of abstraction, without coding to a specific hardware architecture. Furthermore these transformations allow multiple hardware architectures to be targeted without changing the high-level source. It also removes the necessity for application programmers to understand details of the accelerator architecture or to know OpenCL.

  4. Computer applications in physics with FORTRAN, BASIC and C

    CERN Document Server

    Chandra, Suresh

    2014-01-01

    Because of encouraging response for first two editions of the book and for taking into account valuable suggestion from teachers as well as students, the text for Interpolation, Differentiation, Integration, Roots of an Equation, Solution of Simultaneous Equations, Eigenvalues and Eigenvectors of Matrix, Solution of Differential Equations, Solution of Partial Differential Equations, Monte Carlo Method and Simulation, Computation of some Functions is improved throughout and presented in a more systematic manner by using simple language. These techniques have vast applications in Science, Engineering and Technology. The C language is becoming popular in universities, colleges and engineering institutions. Besides the C language, programs are written in FORTRAN and BASIC languages. Consequently, this book has rather wide scope for its use. Each of the topics are developed in a systematic manner; thus making this book useful for graduate, postgraduate and engineering students. KEY FEATURES: Each topic is self exp...

  5. MULTITASKER, Multitasking Kernel for C and FORTRAN Under UNIX

    International Nuclear Information System (INIS)

    Brooks, E.D. III

    1988-01-01

    1 - Description of program or function: MULTITASKER implements a multitasking kernel for the C and FORTRAN programming languages that runs under UNIX. The kernel provides a multitasking environment which serves two purposes. The first is to provide an efficient portable environment for the development, debugging, and execution of production multiprocessor programs. The second is to provide a means of evaluating the performance of a multitasking program on model multiprocessor hardware. The performance evaluation features require no changes in the application program source and are implemented as a set of compile- and run-time options in the kernel. 2 - Method of solution: The FORTRAN interface to the kernel is identical in function to the CRI multitasking package provided for the Cray XMP. This provides a migration path to high speed (but small N) multiprocessors once the application has been coded and debugged. With use of the UNIX m4 macro preprocessor, source compatibility can be achieved between the UNIX code development system and the target Cray multiprocessor. The kernel also provides a means of evaluating a program's performance on model multiprocessors. Execution traces may be obtained which allow the user to determine kernel overhead, memory conflicts between various tasks, and the average concurrency being exploited. The kernel may also be made to switch tasks every cpu instruction with a random execution ordering. This allows the user to look for unprotected critical regions in the program. These features, implemented as a set of compile- and run-time options, cause extra execution overhead which is not present in the standard production version of the kernel

  6. Nonalgebraic symbol manipulators for use in scientific and engineering modeling: introducing the FORSE (FORtran Symobol Expander)

    International Nuclear Information System (INIS)

    Schultz, J.H.; Lettvin, J.D.

    1982-02-01

    A system of nonalgebraic symbol manipulators, called The FORSE (FORtran Symbol Expanders) has been developed to document and prepare input-output for Fortran programs. The use of documentation at the level of the individual equation is defended. The operation of The FORSE is described, along with user instructions and a worked example

  7. Development of the static analyzer ANALYSIS/EX for FORTRAN programs

    International Nuclear Information System (INIS)

    Osanai, Seiji; Yokokawa, Mitsuo

    1993-08-01

    The static analyzer 'ANALYSIS' is the software tool for analyzing tree structure and COMMON regions of a FORTRAN program statically. With the installation of the new FORTRAN compiler, FORTRAN77EX(V12), to the computer system at JAERI, a new version of ANALYSIS, 'ANALYSIS/EX', has been developed to enhance its analyzing functions. In addition to the conventional functions of ANALYSIS, the ANALYSIS/EX is capable of analyzing of FORTRAN programs written in the FORTRAN77EX(V12) language grammar such as large-scale nuclear codes. The analyzing function of COMMON regions are also improved so as to obtain the relation between variables in COMMON regions in more detail. In this report, results of improvement and enhanced functions of the static analyzer ANALYSIS/EX are presented. (author)

  8. GKS-EZ programming manual for FORTRAN-77

    Energy Technology Data Exchange (ETDEWEB)

    Beach, R.C.

    1992-01-01

    A standard has now been adopted for subroutine packages that drive graphic devices. It is known as the Graphical Kernel system (GKS), and many commercial implementations of it are available. Unfortunately, it is a difficult system to learn, and certain functions that are important for scientific use are not provided. Although GKS can be used to achieve portability of graphic applications between graphic devices, computers, and operating systems, it can also be misused in this respect. In addition, it introduces the very real problem of portability between the various implementations of GKS. This document describes a set of FORTRAN-77 subroutines that may be used to control a wide variety of graphic devices and overcome most of these problems. Some of these subroutines are from GKS itself, while others are higher-level subroutines that call GKS subroutines. These subroutines are collectively known as GKS-EZ. The purpose is to supply someone who is not a specialist in computer graphics with a flexible, robust, and easy to learn graphics system. Users of GKS-EZ should not have much need for a full GKS manual; this document will supply all of the information to use GKS-EZ except for a few items. These missing items include the numeric identification of the supported graphic devices and the procedure for linking the GKS subroutines into a executable module.

  9. SPECFUN1, Portable Special FORTRAN Routines with Test Drivers

    International Nuclear Information System (INIS)

    Cody, W.J.

    1993-01-01

    1 - Description of program or function: SPECFUN is a collection of transportable FORTRAN subroutines and test drivers to evaluate certain special functions. The individual subroutines are - Name/Description: ALGAMA: Log gamma function, DAW: Dawson's integral, EI: Exponential integrals, ERF: Error function, ERFC: Complementary error function, GAMMA: Gamma function, I0: Bessel function I-sub-0, I1: Bessel function I-sub-1, J0Y0: Bessel functions J-sub-0 and Y-sub-0, J1Y1: Bessel functions J-sub-1 and Y-sub-1, K0: Bessel function K-sub-0, K1: Bessel function K-sub-1, PSI: Logarithmic derivative of the gamma function, REN: Random number generator, RIBESL: Bessel function I-sub-(N,ALPHA), RJBESL: Bessel function J-sub-(N,ALPHA), RKBESL: Bessel function K-sub-(N,ALPHA), RYBESL: Bessel function Y-sub-(N,ALPHA), MACHAR: Machine-dependent constants. 2 - Method of solution: SPECFUN generally uses rational mini-max approximations for functions of one variable and recurrence relations for functions of two or more variables. 3 - Restrictions on the complexity of the problem: Accuracy is targeted at between 18 and 20 significant decimal digits

  10. VIDEO-PC, SVGA Routines for FORTRAN on PC

    International Nuclear Information System (INIS)

    1994-01-01

    1 - Description of program or function: These primitives are the lowest level routines needed to perform super VGA graphics on a PC. A sample main program is included that exercises the primitives. Both Lahey and Microsoft FORTRAN's have graphics libraries. However, the libraries do not support 256 color graphics at resolutions greater than 320x200. The primitives bypass these libraries while still conforming to standard usage of BIOS. The supported graphics modes depend upon the PC graphics card and its memory. Super VGA resolutions of 640x480 and 800x600 have been tested on an ATI VGA Wonder card with 512 K memory and on several 80486 PC's (unknown manufacturers) at retail stores. 2 - Method of solution: Both Lahey and Microsoft primitives depend upon sending the correct parameters to the PC BIOS (basic input output system) as discussed in the references. 3 - Restrictions on the complexity of the problem: The primitives were developed for 256 color VGA applications. It is known, for instance, that some CGA and 16 color VGA video modes will not operate correctly using these primitives. Potential users should try the test program on their PC/video card combination to determine applicability

  11. RELABEL2007, Labels FORTRAN Statements in ENDF Format Processing Programs

    International Nuclear Information System (INIS)

    2007-01-01

    1 - Description of program or function: RELABEL labels a ENDF/B pre-processing program so that statement labels are in increasing order in increments of 10 within each routine, and cards are identified in columns 73-80 by three alphanumeric characters in columns 73-75 and sequence numbers in columns 76-80 in increments of 10. IAEA1314/10: This version include the updates up to January 30, 2007. Changes in ENDF/B-VII Format and procedures, as well as the evaluations themselves, make it impossible for versions of the ENDF/B pre-processing codes earlier than PREPRO 2007 (2007 Version) to accurately process current ENDF/B-VII evaluations. The present code can handle all existing ENDF/B-VI evaluations through release 8, which will be the last release of ENDF/B-VI. Modifications from previous versions: Relabel VERS. 2007-1 (JAN. 2007): No change since March 2004 version 2 - Method of solution: 3 - Restrictions on the complexity of the problem: RELABEL is designed to maintain ENDF/B processing programs which use a restricted set of FORTRAN statements. As such, this program is not completely general

  12. MODLIB, library of Fortran modules for nuclear reaction codes

    International Nuclear Information System (INIS)

    Talou, Patrick

    2006-01-01

    1 - Description of program or function: ModLib is a library of Fortran (90-compatible) modules to be used in existing and future nuclear reaction codes. The development of the library is an international effort being undertaken under the auspices of the long-term Subgroup A of the OECD/NEA Working Party on Evaluation and Cooperation. The aim is to constitute a library of well-tested and well-documented pieces of codes that can be used with confidence in all our coding efforts. This effort will undoubtedly help avoid the duplication of work, and most certainly facilitate the very important inter-comparisons between existing codes. 2 - Methods: - Width f luctuations [Talou, Chadwick]: calculates width fluctuation correction factors (output) for a set of transmission coefficients (input). Three methods are available: HRTW, Moldauer, and Verbaarschot (also called GOE approach). So far, no distinction is made according to the type of the coefficients channels (particle emission, gamma-ray emission, fission). - Gamma s trength [Herman]: calculates gamma-ray transmission coefficients using a Giant Resonance formalism. - Level d ensity [Koning]: computes the Gilbert-Cameron-Ignatyuk formalism for the continuum nuclear level density. - CHECKR, FIZCON, INTER, PSYCHE, STANEF [Dunford]: these modules are used in the MODLIB project but are not included in this package. They are available from the NEA Data Bank Computer Program Service under Package Ids: CHECKR (USCD1208), FIZCON (USCD1209), INTER (USCD1212), PSYCHE (USCD1216), STANEF (USCD1218)

  13. Parallelization of MCNP4 code by using simple FORTRAN algorithms

    International Nuclear Information System (INIS)

    Yazid, P.I.; Takano, Makoto; Masukawa, Fumihiro; Naito, Yoshitaka.

    1993-12-01

    Simple FORTRAN algorithms, that rely only on open, close, read and write statements, together with disk files and some UNIX commands have been applied to parallelization of MCNP4. The code, named MCNPNFS, maintains almost all capabilities of MCNP4 in solving shielding problems. It is able to perform parallel computing on a set of any UNIX workstations connected by a network, regardless of the heterogeneity in hardware system, provided that all processors produce a binary file in the same format. Further, it is confirmed that MCNPNFS can be executed also on Monte-4 vector-parallel computer. MCNPNFS has been tested intensively by executing 5 photon-neutron benchmark problems, a spent fuel cask problem and 17 sample problems included in the original code package of MCNP4. Three different workstations, connected by a network, have been used to execute MCNPNFS in parallel. By measuring CPU time, the parallel efficiency is determined to be 58% to 99% and 86% in average. On Monte-4, MCNPNFS has been executed using 4 processors concurrently and has achieved the parallel efficiency of 79% in average. (author)

  14. NLEdit: A generic graphical user interface for Fortran programs

    Science.gov (United States)

    Curlett, Brian P.

    1994-01-01

    NLEdit is a generic graphical user interface for the preprocessing of Fortran namelist input files. The interface consists of a menu system, a message window, a help system, and data entry forms. A form is generated for each namelist. The form has an input field for each namelist variable along with a one-line description of that variable. Detailed help information, default values, and minimum and maximum allowable values can all be displayed via menu picks. Inputs are processed through a scientific calculator program that allows complex equations to be used instead of simple numeric inputs. A custom user interface is generated simply by entering information about the namelist input variables into an ASCII file. There is no need to learn a new graphics system or programming language. NLEdit can be used as a stand-alone program or as part of a larger graphical user interface. Although NLEdit is intended for files using namelist format, it can be easily modified to handle other file formats.

  15. The FORTRAN NALAP code adapted to a microcomputer compiler

    International Nuclear Information System (INIS)

    Lobo, Paulo David de Castro; Borges, Eduardo Madeira; Braz Filho, Francisco Antonio; Guimaraes, Lamartine Nogueira Frutuoso

    2010-01-01

    The Nuclear Energy Division of the Institute for Advanced Studies (IEAv) is conducting the TERRA project (TEcnologia de Reatores Rapidos Avancados), Technology for Advanced Fast Reactors project, aimed at a space reactor application. In this work, to attend the TERRA project, the NALAP code adapted to a microcomputer compiler called Compaq Visual Fortran (Version 6.6) is presented. This code, adapted from the light water reactor transient code RELAP 3B, simulates thermal-hydraulic responses for sodium cooled fast reactors. The strategy to run the code in a PC was divided in some steps mainly to remove unnecessary routines, to eliminate old statements, to introduce new ones and also to include extension precision mode. The source program was able to solve three sample cases under conditions of protected transients suggested in literature: the normal reactor shutdown, with a delay of 200 ms to start the control rod movement and a delay of 500 ms to stop the pumps; reactor scram after transient of loss of flow; and transients protected from overpower. Comparisons were made with results from the time when the NALAP code was acquired by the IEAv, back in the 80's. All the responses for these three simulations reproduced the calculations performed with the CDC compiler in 1985. Further modifications will include the usage of gas as coolant for the nuclear reactor to allow a Closed Brayton Cycle Loop - CBCL - to be used as a heat/electric converter. (author)

  16. The FORTRAN NALAP code adapted to a microcomputer compiler

    Energy Technology Data Exchange (ETDEWEB)

    Lobo, Paulo David de Castro; Borges, Eduardo Madeira; Braz Filho, Francisco Antonio; Guimaraes, Lamartine Nogueira Frutuoso, E-mail: plobo.a@uol.com.b, E-mail: eduardo@ieav.cta.b, E-mail: fbraz@ieav.cta.b, E-mail: guimarae@ieav.cta.b [Instituto de Estudos Avancados (IEAv/CTA), Sao Jose dos Campos, SP (Brazil)

    2010-07-01

    The Nuclear Energy Division of the Institute for Advanced Studies (IEAv) is conducting the TERRA project (TEcnologia de Reatores Rapidos Avancados), Technology for Advanced Fast Reactors project, aimed at a space reactor application. In this work, to attend the TERRA project, the NALAP code adapted to a microcomputer compiler called Compaq Visual Fortran (Version 6.6) is presented. This code, adapted from the light water reactor transient code RELAP 3B, simulates thermal-hydraulic responses for sodium cooled fast reactors. The strategy to run the code in a PC was divided in some steps mainly to remove unnecessary routines, to eliminate old statements, to introduce new ones and also to include extension precision mode. The source program was able to solve three sample cases under conditions of protected transients suggested in literature: the normal reactor shutdown, with a delay of 200 ms to start the control rod movement and a delay of 500 ms to stop the pumps; reactor scram after transient of loss of flow; and transients protected from overpower. Comparisons were made with results from the time when the NALAP code was acquired by the IEAv, back in the 80's. All the responses for these three simulations reproduced the calculations performed with the CDC compiler in 1985. Further modifications will include the usage of gas as coolant for the nuclear reactor to allow a Closed Brayton Cycle Loop - CBCL - to be used as a heat/electric converter. (author)

  17. FORTRAN text correction with the CDC-1604-A console typewriter during reading a punched card program

    International Nuclear Information System (INIS)

    Kotorobaj, F.; Ruzhichka, Ya.; Stolyarskij, Yu.V.

    1977-01-01

    The paper describes FORTRAN text correction with the CDC 1604-A console typewriter during reading a punched card program. This method gives one more possibility of FORTRAN program correction during program's input to the CDC 1604-A computer. This essentially reduced the time necessary for punched card correction with other methods. Possibility of inputting desired number of punched cards one after another allows one writing small FORTRAN programs to computer core storage with simultaneous punching of the cards. The correction program has been written to the CDC 1604 COOP monitor

  18. FORTRAN data files transference from VAX/VMS to ALPHA/UNIX; Traspaso de ficheros FORTRAN de datos de VAX/VMS a ALPHA/UNIX

    Energy Technology Data Exchange (ETDEWEB)

    Sanchez, E.; Milligen, B. Ph van [CIEMAT (Spain)

    1997-09-01

    Several tools have been developed to access the TJ-IU databases, which currently reside in VAX/VMS servers, from the TJ-II Data Acquisition System DEC ALPHA 8400 server. The TJ-I/TJ-IU databases are not homogeneous and contain several types of data files, namely, SADE, CAMAC and FORTRAN unformatted files. The tools presented in this report allow one to transfer CAMAC and those FORTRAN unformatted files defined herein, from a VAX/VMS server, for data manipulation on the ALPHA/Digital UNIX server. (Author)

  19. A Case Study of Some Issues in the Optimization of Fortran 90 Array Notation

    Directory of Open Access Journals (Sweden)

    John D. McCalpin

    1996-01-01

    Full Text Available Some issues in the relationship of coding style and compiler optimization are discussed with regard to Fortran 90 array notation. A review of several important Fortran 90 array constructs and their performance on vector and scalar hardware sets the stage for a more detailed example based on the kernel of a finite difference computational fluid dynamics model, specifically the nonlinear shallow water equations. Special attention is paid to the optimization of memory use and memory traffic. It is shown that the style of coding interacts with the rules of Fortran 90 and the current state of the art of Fortran 90 compilers to produce a fairly wide range of performance levels. Although performance degradations are typically small, a few cases of more serious loss of effciency are identified and discussed.

  20. Comparison of PASCAL and FORTRAN for solving problems in the physical sciences

    Science.gov (United States)

    Watson, V. R.

    1981-01-01

    The paper compares PASCAL and FORTRAN for problem solving in the physical sciences, due to requests NASA has received to make PASCAL available on the Numerical Aerodynamic Simulator (scheduled to be operational in 1986). PASCAL disadvantages include the lack of scientific utility procedures equivalent to the IBM scientific subroutine package or the IMSL package which are available in FORTRAN. Advantages include a well-organized, easy to read and maintain writing code, range checking to prevent errors, and a broad selection of data types. It is concluded that FORTRAN may be the better language, although ADA (patterned after PASCAL) may surpass FORTRAN due to its ability to add complex and vector math, and the specify the precision and range of variables.

  1. FORTRAN programs for transient eddy current calculations using a perturbation-polynomial expansion technique

    International Nuclear Information System (INIS)

    Carpenter, K.H.

    1976-11-01

    A description is given of FORTRAN programs for transient eddy current calculations in thin, non-magnetic conductors using a perturbation-polynomial expansion technique. Basic equations are presented as well as flow charts for the programs implementing them. The implementation is in two steps--a batch program to produce an intermediate data file and interactive programs to produce graphical output. FORTRAN source listings are included for all program elements, and sample inputs and outputs are given for the major programs

  2. The Transition and Adoption to Modern Programming Concepts for Scientific Computing in Fortran

    Directory of Open Access Journals (Sweden)

    Charles D. Norton

    2007-01-01

    Full Text Available This paper describes our experiences in the early exploration of modern concepts introduced in Fortran90 for large-scale scientific programming. We review our early work in expressing object-oriented concepts based on the new Fortran90 constructs – foreign to most programmers at the time – our experimental work in applying them to various applications, the impact on the WG5/J3 standards committees to consider formalizing object-oriented constructs for later versions of Fortran, and work in exploring how other modern programming techniques such as Design Patterns can and have impacted our software development. Applications will be drawn from plasma particle simulation and finite element adaptive mesh refinement for solid earth crustal deformation modeling.

  3. MPI to Coarray Fortran: Experiences with a CFD Solver for Unstructured Meshes

    Directory of Open Access Journals (Sweden)

    Anuj Sharma

    2017-01-01

    Full Text Available High-resolution numerical methods and unstructured meshes are required in many applications of Computational Fluid Dynamics (CFD. These methods are quite computationally expensive and hence benefit from being parallelized. Message Passing Interface (MPI has been utilized traditionally as a parallelization strategy. However, the inherent complexity of MPI contributes further to the existing complexity of the CFD scientific codes. The Partitioned Global Address Space (PGAS parallelization paradigm was introduced in an attempt to improve the clarity of the parallel implementation. We present our experiences of converting an unstructured high-resolution compressible Navier-Stokes CFD solver from MPI to PGAS Coarray Fortran. We present the challenges, methodology, and performance measurements of our approach using Coarray Fortran. With the Cray compiler, we observe Coarray Fortran as a viable alternative to MPI. We are hopeful that Intel and open-source implementations could be utilized in the future.

  4. PGHPF – An Optimizing High Performance Fortran Compiler for Distributed Memory Machines

    Directory of Open Access Journals (Sweden)

    Zeki Bozkus

    1997-01-01

    Full Text Available High Performance Fortran (HPF is the first widely supported, efficient, and portable parallel programming language for shared and distributed memory systems. HPF is realized through a set of directive-based extensions to Fortran 90. It enables application developers and Fortran end-users to write compact, portable, and efficient software that will compile and execute on workstations, shared memory servers, clusters, traditional supercomputers, or massively parallel processors. This article describes a production-quality HPF compiler for a set of parallel machines. Compilation techniques such as data and computation distribution, communication generation, run-time support, and optimization issues are elaborated as the basis for an HPF compiler implementation on distributed memory machines. The performance of this compiler on benchmark programs demonstrates that high efficiency can be achieved executing HPF code on parallel architectures.

  5. Visualization of Distributed Data Structures for High Performance Fortran-Like Languages

    Directory of Open Access Journals (Sweden)

    Rainer Koppler

    1997-01-01

    Full Text Available This article motivates the usage of graphics and visualization for efficient utilization of High Performance Fortran's (HPF's data distribution facilities. It proposes a graphical toolkit consisting of exploratory and estimation tools which allow the programmer to navigate through complex distributions and to obtain graphical ratings with respect to load distribution and communication. The toolkit has been implemented in a mapping design and visualization tool which is coupled with a compilation system for the HPF predecessor Vienna Fortran. Since this language covers a superset of HPF's facilities, the tool may also be used for visualization of HPF data structures.

  6. DB90: A Fortran Callable Relational Database Routine for Scientific and Engineering Computer Programs

    Science.gov (United States)

    Wrenn, Gregory A.

    2005-01-01

    This report describes a database routine called DB90 which is intended for use with scientific and engineering computer programs. The software is written in the Fortran 90/95 programming language standard with file input and output routines written in the C programming language. These routines should be completely portable to any computing platform and operating system that has Fortran 90/95 and C compilers. DB90 allows a program to supply relation names and up to 5 integer key values to uniquely identify each record of each relation. This permits the user to select records or retrieve data in any desired order.

  7. Bridging FORTRAN to object oriented paradigm for HEP data modeling task

    International Nuclear Information System (INIS)

    Huang, J.

    1993-12-01

    Object oriented (OO) technology appears to offer tangible benefits to the high energy physics (HEP) community. Yet many physicists view this newest software development used with much reservation and reluctance. Facing the reality of having to support the existing physics applications, which are written in FORTRAN, the software engineers in the Computer Engineering Group of the Physics Research Division at the Superconducting Super Collider Laboratory have accepted the challenge of mixing an old language with the new technology. This paper describes the experience and the techniques devised to fit FORTRAN into the OO paradigm (OOP)

  8. FORTRAN data files transference from VAX/VMS to ALPHA/UNIX

    International Nuclear Information System (INIS)

    Sanchez, E.; Milligen, B.Ph. van

    1997-01-01

    Several tools have been developed to access the TJ-I and TJ-IU databases, which currently reside in VAX/VMS servers, from the TJ-II Data Acquisition System DEC ALPHA 8400 server. The TJ-I/TJ-IU databases are not homogeneous and contain several types of data files, namely, SADE. CAMAC and FORTRAN un formatted files. The tools presented in this report allow one to transfer CAMAC and those FORTRAN un formatted files defined herein. from a VAX/VMS server, for data manipulation on the ALPHA/Digital UNIX server. (Author) 5 refs

  9. Fortran code for generating random probability vectors, unitaries, and quantum states

    Directory of Open Access Journals (Sweden)

    Jonas eMaziero

    2016-03-01

    Full Text Available The usefulness of generating random configurations is recognized in many areas of knowledge. Fortran was born for scientific computing and has been one of the main programming languages in this area since then. And several ongoing projects targeting towards its betterment indicate that it will keep this status in the decades to come. In this article, we describe Fortran codes produced, or organized, for the generation of the following random objects: numbers, probability vectors, unitary matrices, and quantum state vectors and density matrices. Some matrix functions are also included and may be of independent interest.

  10. Using Coarrays to Parallelize Legacy Fortran Applications: Strategy and Case Study

    Directory of Open Access Journals (Sweden)

    Hari Radhakrishnan

    2015-01-01

    Full Text Available This paper summarizes a strategy for parallelizing a legacy Fortran 77 program using the object-oriented (OO and coarray features that entered Fortran in the 2003 and 2008 standards, respectively. OO programming (OOP facilitates the construction of an extensible suite of model-verification and performance tests that drive the development. Coarray parallel programming facilitates a rapid evolution from a serial application to a parallel application capable of running on multicore processors and many-core accelerators in shared and distributed memory. We delineate 17 code modernization steps used to refactor and parallelize the program and study the resulting performance. Our initial studies were done using the Intel Fortran compiler on a 32-core shared memory server. Scaling behavior was very poor, and profile analysis using TAU showed that the bottleneck in the performance was due to our implementation of a collective, sequential summation procedure. We were able to improve the scalability and achieve nearly linear speedup by replacing the sequential summation with a parallel, binary tree algorithm. We also tested the Cray compiler, which provides its own collective summation procedure. Intel provides no collective reductions. With Cray, the program shows linear speedup even in distributed-memory execution. We anticipate similar results with other compilers once they support the new collective procedures proposed for Fortran 2015.

  11. Real time interrupt handling using FORTRAN IV plus under RSX-11M

    International Nuclear Information System (INIS)

    Schultz, D.E.

    1981-01-01

    A real-time data acquisition application for a linear accelerator is described. The important programming features of this application are use of connect to interrupt, a shared library, map to I/O page, and a shared data area. How you can provide rapid interrupt handling using these tools from FORTRAN IV PLUS is explained

  12. Pseudo-BINPUT, a free formal input package for Fortran programmes

    International Nuclear Information System (INIS)

    Gubbins, M.E.

    1977-11-01

    Pseudo - BINPUT is an input package for reading free format data in codeword control in a FORTRAN programme. To a large degree it mimics in function the Winfrith Subroutine Library routine BINPUT. By using calls of the data input package DECIN to mimic the input routine BINPUT, Pseudo - BINPUT combines some of the advantages of both systems. (U.K.)

  13. A FORTRAN program for an IBM PC compatible computer for calculating kinematical electron diffraction patterns

    International Nuclear Information System (INIS)

    Skjerpe, P.

    1989-01-01

    This report describes a computer program which is useful in transmission electron microscopy. The program is written in FORTRAN and calculates kinematical electron diffraction patterns in any zone axis from a given crystal structure. Quite large unit cells, containing up to 2250 atoms, can be handled by the program. The program runs on both the Helcules graphic card and the standard IBM CGA card

  14. Programs in Fortran language for reporting the results of the analyses by ICP emission spectroscopy

    International Nuclear Information System (INIS)

    Roca, M.

    1985-01-01

    Three programs, written in FORTRAN IV language, for reporting the results of the analyses by ICP emission spectroscopy from data stored in files on floppy disks have been developed. They are intended, respectively, for the analyses of: 1) waters, 2) granites and slates, and 3) different kinds of geological materials. (Author) 8 refs

  15. SLACINPT - a FORTRAN program that generates boundary data for the SLAC gun code

    International Nuclear Information System (INIS)

    Michel, W.L.; Hepburn, J.D.

    1982-03-01

    The FORTRAN program SLACINPT was written to simplify the preparation of boundary data for the SLAC gun code. In SLACINPT, the boundary is described by a sequence of straight line or arc segments. From these, the program generates the individual boundary mesh point data, required as input by the SLAC gun code

  16. Extracting UML Class Diagrams from Object-Oriented Fortran: ForUML

    Directory of Open Access Journals (Sweden)

    Aziz Nanthaamornphong

    2015-01-01

    Full Text Available Many scientists who implement computational science and engineering software have adopted the object-oriented (OO Fortran paradigm. One of the challenges faced by OO Fortran developers is the inability to obtain high level software design descriptions of existing applications. Knowledge of the overall software design is not only valuable in the absence of documentation, it can also serve to assist developers with accomplishing different tasks during the software development process, especially maintenance and refactoring. The software engineering community commonly uses reverse engineering techniques to deal with this challenge. A number of reverse engineering-based tools have been proposed, but few of them can be applied to OO Fortran applications. In this paper, we propose a software tool to extract unified modeling language (UML class diagrams from Fortran code. The UML class diagram facilitates the developers' ability to examine the entities and their relationships in the software system. The extracted diagrams enhance software maintenance and evolution. The experiments carried out to evaluate the proposed tool show its accuracy and a few of the limitations.

  17. Autogenic Feedback Training (Body Fortran) with Biofeedback and the Computer for Self-Improvement and Change.

    Science.gov (United States)

    Cassel, Russell N.; Sumintardja, Elmira Nasrudin

    1983-01-01

    Describes autogenic feedback training, which provides the basis whereby an individual is able to improve on well being through use of a technique described as "body fortran," implying that you program self as one programs a computer. Necessary requisites are described including relaxation training and the management of stress. (JAC)

  18. Innovative Language-Based & Object-Oriented Structured AMR Using Fortran 90 and OpenMP

    Science.gov (United States)

    Norton, C.; Balsara, D.

    1999-01-01

    Parallel adaptive mesh refinement (AMR) is an important numerical technique that leads to the efficient solution of many physical and engineering problems. In this paper, we describe how AMR programing can be performed in an object-oreinted way using the modern aspects of Fortran 90 combined with the parallelization features of OpenMP.

  19. Optimization of Grillages Using Genetic Algorithms for Integrating Matlab and Fortran Environments

    Directory of Open Access Journals (Sweden)

    Darius Mačiūnas

    2012-12-01

    Full Text Available The purpose of the paper is to present technology applied for the global optimization of grillage-type pile foundations (further grillages. The goal of optimization is to obtain the optimal layout of pile placement in the grillages. The problem can be categorized as a topology optimization problem. The objective function is comprised of maximum reactive force emerging in a pile. The reactive force is minimized during the procedure of optimization during which variables enclose the positions of piles beneath connecting beams. Reactive forces in all piles are computed utilizing an original algorithm implemented in the Fortran programming language. The algorithm is integrated into the MatLab environment where the optimization procedure is executed utilizing a genetic algorithm. The article also describes technology enabling the integration of MatLab and Fortran environments. The authors seek to evaluate the quality of a solution to the problem analyzing experimental results obtained applying the proposed technology.

  20. Optimization of Grillages Using Genetic Algorithms for Integrating Matlab and Fortran Environments

    Directory of Open Access Journals (Sweden)

    Darius Mačiūnas

    2013-02-01

    Full Text Available The purpose of the paper is to present technology applied for the global optimization of grillage-type pile foundations (further grillages. The goal of optimization is to obtain the optimal layout of pile placement in the grillages. The problem can be categorized as a topology optimization problem. The objective function is comprised of maximum reactive force emerging in a pile. The reactive force is minimized during the procedure of optimization during which variables enclose the positions of piles beneath connecting beams. Reactive forces in all piles are computed utilizing an original algorithm implemented in the Fortran programming language. The algorithm is integrated into the MatLab environment where the optimization procedure is executed utilizing a genetic algorithm. The article also describes technology enabling the integration of MatLab and Fortran environments. The authors seek to evaluate the quality of a solution to the problem analyzing experimental results obtained applying the proposed technology.

  1. Running the EGS4 Monte Carlo code with Fortran 90 on a pentium computer

    International Nuclear Information System (INIS)

    Caon, M.; Bibbo, G.; Pattison, J.

    1996-01-01

    The possibility to run the EGS4 Monte Carlo code radiation transport system for medical radiation modelling on a microcomputer is discussed. This has been done using a Fortran 77 compiler with a 32-bit memory addressing system running under a memory extender operating system. In addition a virtual memory manager such as QEMM386 was required. It has successfully run on a SUN Sparcstation2. In 1995 faster Pentium-based microcomputers became available as did the Windows 95 operating system which can handle 32-bit programs, multitasking and provides its own virtual memory management. The paper describe how with simple modification to the batch files it was possible to run EGS4 on a Pentium under Fortran 90 and Windows 95. This combination of software and hardware is cheaper and faster than running it on a SUN Sparcstation2. 8 refs., 1 tab

  2. Running the EGS4 Monte Carlo code with Fortran 90 on a pentium computer

    Energy Technology Data Exchange (ETDEWEB)

    Caon, M. [Flinders Univ. of South Australia, Bedford Park, SA (Australia)]|[Univercity of South Australia, SA (Australia); Bibbo, G. [Womens and Childrens hospital, SA (Australia); Pattison, J. [Univercity of South Australia, SA (Australia)

    1996-09-01

    The possibility to run the EGS4 Monte Carlo code radiation transport system for medical radiation modelling on a microcomputer is discussed. This has been done using a Fortran 77 compiler with a 32-bit memory addressing system running under a memory extender operating system. In addition a virtual memory manager such as QEMM386 was required. It has successfully run on a SUN Sparcstation2. In 1995 faster Pentium-based microcomputers became available as did the Windows 95 operating system which can handle 32-bit programs, multitasking and provides its own virtual memory management. The paper describe how with simple modification to the batch files it was possible to run EGS4 on a Pentium under Fortran 90 and Windows 95. This combination of software and hardware is cheaper and faster than running it on a SUN Sparcstation2. 8 refs., 1 tab.

  3. A browser-based tool for conversion between Fortran NAMELIST and XML/HTML

    Science.gov (United States)

    Naito, O.

    A browser-based tool for conversion between Fortran NAMELIST and XML/HTML is presented. It runs on an HTML5 compliant browser and generates reusable XML files to aid interoperability. It also provides a graphical interface for editing and annotating variables in NAMELIST, hence serves as a primitive code documentation environment. Although the tool is not comprehensive, it could be viewed as a test bed for integrating legacy codes into modern systems.

  4. FORTRAN subroutine for computing the optimal estimate of f(x)

    International Nuclear Information System (INIS)

    Gaffney, P.W.

    1980-10-01

    A FORTRAN subroutine called RANGE is presented that is designed to compute the optimal estimate of a function f given values of the function at n distinct points x 1 2 < ... < x/sub n/ and given a bound on one of the derivatives of f. We donate this estimate by Ω. It is optimal in the sense that the error abs value (f - Ω) has the smallest possible error bound

  5. A browser-based tool for conversion between Fortran NAMELIST and XML/HTML

    Directory of Open Access Journals (Sweden)

    O. Naito

    2017-01-01

    Full Text Available A browser-based tool for conversion between Fortran NAMELIST and XML/HTML is presented. It runs on an HTML5 compliant browser and generates reusable XML files to aid interoperability. It also provides a graphical interface for editing and annotating variables in NAMELIST, hence serves as a primitive code documentation environment. Although the tool is not comprehensive, it could be viewed as a test bed for integrating legacy codes into modern systems.

  6. The inverse of winnowing: a FORTRAN subroutine and discussion of unwinnowing discrete data

    Science.gov (United States)

    Bracken, Robert E.

    2004-01-01

    This report describes an unwinnowing algorithm that utilizes a discrete Fourier transform, and a resulting Fortran subroutine that winnows or unwinnows a 1-dimensional stream of discrete data; the source code is included. The unwinnowing algorithm effectively increases (by integral factors) the number of available data points while maintaining the original frequency spectrum of a data stream. This has utility when an increased data density is required together with an availability of higher order derivatives that honor the original data.

  7. A FORTRAN version implementation of block adjustment of CCD frames and its preliminary application

    Science.gov (United States)

    Yu, Y.; Tang, Z.-H.; Li, J.-L.; Zhao, M.

    2005-09-01

    A FORTRAN version implementation of the block adjustment (BA) of overlapping CCD frames is developed and its flowchart is shown. The program is preliminarily applied to obtain the optical positions of four extragalactic radio sources. The results show that because of the increase in the number and sky coverage of reference stars the precision of optical positions with BA is improved compared with the single CCD frame adjustment.

  8. Existing Fortran interfaces to Trilinos in preparation for exascale ForTrilinos development

    Energy Technology Data Exchange (ETDEWEB)

    Evans, Katherine J. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Young, Mitchell T. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Collins, Benjamin S. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Johnson, Seth R. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Prokopenko, Andrey V. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Heroux, Michael A. [Sandia National Lab. (SNL-NM), Albuquerque, NM (United States)

    2017-03-01

    This report summarizes the current state of Fortran interfaces to the Trilinos library within several key applications of the Exascale Computing Program (ECP), with the aim of informing developers about strategies to develop ForTrilinos, an exascale-ready, Fortran interface software package within Trilinos. The two software projects assessed within are the DOE Office of Science's Accelerated Climate Model for Energy (ACME) atmosphere component, CAM, and the DOE Office of Nuclear Energy's core-simulator portion of VERA, a nuclear reactor simulation code. Trilinos is an object-oriented, C++ based software project, and spans a collection of algorithms and other enabling technologies such as uncertainty quantification and mesh generation. To date, Trilinos has enabled these codes to achieve large-scale simulation results, however the simulation needs of CAM and VERA-CS will approach exascale over the next five years. A Fortran interface to Trilinos that enables efficient use of programming models and more advanced algorithms is necessary. Where appropriate, the needs of the CAM and VERA-CS software to achieve their simulation goals are called out specifically. With this report, a design document and execution plan for ForTrilinos development can proceed.

  9. TOOLPACK1, Tools for Development and Maintenance of FORTRAN 77 Program

    International Nuclear Information System (INIS)

    Cowell, Wayne R.

    1993-01-01

    1 - Description of program or function: TOOLPACK1 consists of the following categories of software; (1) an integrated collection of tools intended to support the development and maintenance of FORTRAN 77 programs, in particular moderate-sized collections of mathematical software; (2) several user/Toolpack interfaces, one of which is selected for use at any particular installation; (3) three implementations of the tool/system interface, called TIE (Tool Interface to the Environment). The tools are written in FORTRAN 77 and are portable among TIE installations. The source contains symbolic constants as macro names and must be expanded with a suitable macro expander before being compiled and loaded. A portable macro expander is supplied in TOOLPACK1. The tools may be divided into three functional areas: general, documentation, and processing. One tool, the macro processor, Can be used in any of these categories. ISTDC: data comparison tool is designed mainly for comparing files of numeric values, and files with embedded text. ISTET Expands tabs. ISTFI: finds all the include files that a file needs. ISTGP Searches multiple files for occurrences of a regular expression. ISTHP: will provide limited help information about tools. ISTMP: The macro processor may be used to pre-process a file. The processor provides macro replacement, inclusion, conditional replacement, and processing capabilities for complex file processing. ISTSP: TIE-conforming version of the SPLIT utility to split up the concatenated files used on the tape. ISTSV: save/restore utility to save and restore sub-trees of the Portable File Store (PFS). ISTTD: text comparison tool. ISTVC: simple text file version controller. ISTAL: aids is a preprocessor that can be used to generate specific information from intermediate files created by other tools. The information that can be generated includes call-graphs, cross reference listings, segment execution frequencies, and symbol information. ISTAL can also strip

  10. A Fortran program (RELAX3D) to solve the 3 dimensional Poisson (Laplace) equation

    International Nuclear Information System (INIS)

    Houtman, H.; Kost, C.J.

    1983-09-01

    RELAX3D is an efficient, user friendly, interactive FORTRAN program which solves the Poisson (Laplace) equation Λ 2 =p for a general 3 dimensional geometry consisting of Dirichlet and Neumann boundaries approximated to lie on a regular 3 dimensional mesh. The finite difference equations at these nodes are solved using a successive point-iterative over-relaxation method. A menu of commands, supplemented by HELP facility, controls the dynamic loading of the subroutine describing the problem case, the iterations to converge to a solution, and the contour plotting of any desired slices, etc

  11. CWF and TABLE - Two Fortran programmes for the calculation of Coulomb penetration and shift factors

    International Nuclear Information System (INIS)

    Norton, D.S.; James, M.F.

    1965-12-01

    CWF and TABLE are Fortran programmes, written for the IBM 7090 and English-Electric Leo Marconi KDF9 computers, that calculate the penetration and shift factors for a charged particle in a Coulomb field. The numerical methods used are those of Lutz and Karvelis. The two programmes are very similar. Input to TABLE is in the form of the centre-of-mass co-ordinates. CWF is intended for use in calculating cross-sections for neutron-induced reactions which result in charged particle emission, and the input is in the form of the neutron energy in the laboratory frame of reference, together with other necessary reaction data. (author)

  12. LIONS: a new set of Fortran 90 codes for the SPIRAL project at GANIL

    International Nuclear Information System (INIS)

    Bertrand, P.

    1994-01-01

    A set of new computer programs developed at GANIL is presented; these codes are used to study different parts of the SPIRAL project (a new radioactive ion beam facility), and particularly the dynamics in the CIME cyclotron, its injection inflector, and the new extraction system of the ECR ion sources. Three important modules are described: CHA3D for the evaluation of 3D electric fields with or without space charge effects, LIONS for the motion of ions and EXTRACT for the ECRIS extraction. These modules are written in Fortran 90 in a ''data parallel scheme''. They work either on UNIX workstations or parallel and vectorial computers. (author). 5 figs., 5 refs

  13. FORTRAN program for calculating liquid-phase and gas-phase thermal diffusion column coefficients

    International Nuclear Information System (INIS)

    Rutherford, W.M.

    1980-01-01

    A computer program (COLCO) was developed for calculating thermal diffusion column coefficients from theory. The program, which is written in FORTRAN IV, can be used for both liquid-phase and gas-phase thermal diffusion columns. Column coefficients for the gas phase can be based on gas properties calculated from kinetic theory using tables of omega integrals or on tables of compiled physical properties as functions of temperature. Column coefficients for the liquid phase can be based on compiled physical property tables. Program listings, test data, sample output, and users manual are supplied for appendices

  14. MONTEC, an interactive fortran program to simulate radiation dose and dose-rate responses of populations

    International Nuclear Information System (INIS)

    Perry, K.A.; Szekely, J.G.

    1983-09-01

    The computer program MONTEC was written to simulate the distribution of responses in a population whose members are exposed to multiple radiation doses at variable dose rates. These doses and dose rates are randomly selected from lognormal distributions. The individual radiation responses are calculated from three equations, which include dose and dose-rate terms. Other response-dose/rate relationships or distributions can be incorporated by the user as the need arises. The purpose of this documentation is to provide a complete operating manual for the program. This version is written in FORTRAN-10 for the DEC system PDP-10

  15. QEDMOD: Fortran program for calculating the model Lamb-shift operator

    Science.gov (United States)

    Shabaev, V. M.; Tupitsyn, I. I.; Yerokhin, V. A.

    2018-02-01

    We present Fortran package QEDMOD for computing the model QED operator hQED that can be used to account for the Lamb shift in accurate atomic-structure calculations. The package routines calculate the matrix elements of hQED with the user-specified one-electron wave functions. The operator can be used to calculate Lamb shift in many-electron atomic systems with a typical accuracy of few percent, either by evaluating the matrix element of hQED with the many-electron wave function, or by adding hQED to the Dirac-Coulomb-Breit Hamiltonian.

  16. LIONS: a new set of Fortran90 codes for the SPIRAL project at GANIL

    International Nuclear Information System (INIS)

    Bertrand, P.

    1995-01-01

    In this paper a set of new computer programs developed at GANIL is presented. These codes are used to study different parts of the SPIRAL project, in particular the dynamics in the CIME cyclotron and the new extraction system of the ECR ion sources. Three important modules are described: CHA3D for the evaluation of 3D electric fields with or without space charge effects, LIONS for the motion of ions and EXTRACT for the ECRIS extraction. These modules are written in Fortran90 in a ''data parallel scheme''. They work either on UNIX workstations or parallel and vectorial computers. (orig.)

  17. JTpack90: A parallel, object-based, Fortran 90 linear algebra package

    Energy Technology Data Exchange (ETDEWEB)

    Turner, J.A.; Kothe, D.B. [Los Alamos National Lab., NM (United States); Ferrell, R.C. [Cambridge Power Computing Associates, Ltd., Brookline, MA (United States)

    1997-03-01

    The authors have developed an object-based linear algebra package, currently with emphasis on sparse Krylov methods, driven primarily by needs of the Los Alamos National Laboratory parallel unstructured-mesh casting simulation tool Telluride. Support for a number of sparse storage formats, methods, and preconditioners have been implemented, driven primarily by application needs. They describe the object-based Fortran 90 approach, which enhances maintainability, performance, and extensibility, the parallelization approach using a new portable gather/scatter library (PGSLib), current capabilities and future plans, and present preliminary performance results on a variety of platforms.

  18. Fortran code for SU(3) lattice gauge theory with and without MPI checkerboard parallelization

    Science.gov (United States)

    Berg, Bernd A.; Wu, Hao

    2012-10-01

    We document plain Fortran and Fortran MPI checkerboard code for Markov chain Monte Carlo simulations of pure SU(3) lattice gauge theory with the Wilson action in D dimensions. The Fortran code uses periodic boundary conditions and is suitable for pedagogical purposes and small scale simulations. For the Fortran MPI code two geometries are covered: the usual torus with periodic boundary conditions and the double-layered torus as defined in the paper. Parallel computing is performed on checkerboards of sublattices, which partition the full lattice in one, two, and so on, up to D directions (depending on the parameters set). For updating, the Cabibbo-Marinari heatbath algorithm is used. We present validations and test runs of the code. Performance is reported for a number of currently used Fortran compilers and, when applicable, MPI versions. For the parallelized code, performance is studied as a function of the number of processors. Program summary Program title: STMC2LSU3MPI Catalogue identifier: AEMJ_v1_0 Program summary URL:http://cpc.cs.qub.ac.uk/summaries/AEMJ_v1_0.html Program obtainable from: CPC Program Library, Queen's University, Belfast, N. Ireland Licensing provisions: Standard CPC licence, http://cpc.cs.qub.ac.uk/licence/licence.html No. of lines in distributed program, including test data, etc.: 26666 No. of bytes in distributed program, including test data, etc.: 233126 Distribution format: tar.gz Programming language: Fortran 77 compatible with the use of Fortran 90/95 compilers, in part with MPI extensions. Computer: Any capable of compiling and executing Fortran 77 or Fortran 90/95, when needed with MPI extensions. Operating system: Red Hat Enterprise Linux Server 6.1 with OpenMPI + pgf77 11.8-0, Centos 5.3 with OpenMPI + gfortran 4.1.2, Cray XT4 with MPICH2 + pgf90 11.2-0. Has the code been vectorised or parallelized?: Yes, parallelized using MPI extensions. Number of processors used: 2 to 11664 RAM: 200 Mega bytes per process. Classification: 11

  19. FORTRAN computer programs to process Savannah River Laboratory hydrogeochemical and stream-sediment reconnaissance data

    International Nuclear Information System (INIS)

    Zinkl, R.J.; Shettel, D.L. Jr.; D'Andrea, R.F. Jr.

    1980-03-01

    FORTRAN computer programs have been written to read, edit, and reformat the hydrogeochemical and stream-sediment reconnaissance data produced by Savannah River Laboratory for the National Uranium Resource Evaluation program. The data are presorted by Savannah River Laboratory into stream sediment, ground water, and stream water for each 1 0 x 2 0 quadrangle. Extraneous information is eliminated, and missing analyses are assigned a specific value (-99999.0). Negative analyses are below the detection limit; the absolute value of a negative analysis is assumed to be the detection limit

  20. A new Fortran 90 program to compute regular and irregular associated Legendre functions (new version announcement)

    Science.gov (United States)

    Schneider, Barry I.; Segura, Javier; Gil, Amparo; Guan, Xiaoxu; Bartschat, Klaus

    2018-04-01

    This is a revised and updated version of a modern Fortran 90 code to compute the regular Plm (x) and irregular Qlm (x) associated Legendre functions for all x ∈(- 1 , + 1) (on the cut) and | x | > 1 and integer degree (l) and order (m). The necessity to revise the code comes as a consequence of some comments of Prof. James Bremer of the UC//Davis Mathematics Department, who discovered that there were errors in the code for large integer degree and order for the normalized regular Legendre functions on the cut.

  1. specsim: A Fortran-77 program for conditional spectral simulation in 3D

    Science.gov (United States)

    Yao, Tingting

    1998-12-01

    A Fortran 77 program, specsim, is presented for conditional spectral simulation in 3D domains. The traditional Fourier integral method allows generating random fields with a given covariance spectrum. Conditioning to local data is achieved by an iterative identification of the conditional phase information. A flowchart of the program is given to illustrate the implementation procedures of the program. A 3D case study is presented to demonstrate application of the program. A comparison with the traditional sequential Gaussian simulation algorithm emphasizes the advantages and drawbacks of the proposed algorithm.

  2. The formal specification of abstract data types and their implementation in Fortran 90: implementation issues concerning the use of pointers

    Science.gov (United States)

    Maley, D.; Kilpatrick, P. L.; Schreiner, E. W.; Scott, N. S.; Diercksen, G. H. F.

    1996-10-01

    In this paper we continue our investigation into the development of computational-science software based on the identification and formal specification of Abstract Data Types (ADTs) and their implementation in Fortran 90. In particular, we consider the consequences of using pointers when implementing a formally specified ADT in Fortran 90. Our aim is to highlight the resulting conflict between the goal of information hiding, which is central to the ADT methodology, and the space efficiency of the implementation. We show that the issue of storage recovery cannot be avoided by the ADT user, and present a range of implementations of a simple ADT to illustrate various approaches towards satisfactory storage management. Finally, we propose a set of guidelines for implementing ADTs using pointers in Fortran 90. These guidelines offer a way gracefully to provide disposal operations in Fortran 90. Such an approach is desirable since Fortran 90 does not provide automatic garbage collection which is offered by many object-oriented languages including Eiffel, Java, Smalltalk, and Simula.

  3. DDT: A Research Tool for Automatic Data Distribution in High Performance Fortran

    Directory of Open Access Journals (Sweden)

    Eduard AyguadÉ

    1997-01-01

    Full Text Available This article describes the main features and implementation of our automatic data distribution research tool. The tool (DDT accepts programs written in Fortran 77 and generates High Performance Fortran (HPF directives to map arrays onto the memories of the processors and parallelize loops, and executable statements to remap these arrays. DDT works by identifying a set of computational phases (procedures and loops. The algorithm builds a search space of candidate solutions for these phases which is explored looking for the combination that minimizes the overall cost; this cost includes data movement cost and computation cost. The movement cost reflects the cost of accessing remote data during the execution of a phase and the remapping costs that have to be paid in order to execute the phase with the selected mapping. The computation cost includes the cost of executing a phase in parallel according to the selected mapping and the owner computes rule. The tool supports interprocedural analysis and uses control flow information to identify how phases are sequenced during the execution of the application.

  4. OpenMP-accelerated SWAT simulation using Intel C and FORTRAN compilers: Development and benchmark

    Science.gov (United States)

    Ki, Seo Jin; Sugimura, Tak; Kim, Albert S.

    2015-02-01

    We developed a practical method to accelerate execution of Soil and Water Assessment Tool (SWAT) using open (free) computational resources. The SWAT source code (rev 622) was recompiled using a non-commercial Intel FORTRAN compiler in Ubuntu 12.04 LTS Linux platform, and newly named iOMP-SWAT in this study. GNU utilities of make, gprof, and diff were used to develop the iOMP-SWAT package, profile memory usage, and check identicalness of parallel and serial simulations. Among 302 SWAT subroutines, the slowest routines were identified using GNU gprof, and later modified using Open Multiple Processing (OpenMP) library in an 8-core shared memory system. In addition, a C wrapping function was used to rapidly set large arrays to zero by cross compiling with the original SWAT FORTRAN package. A universal speedup ratio of 2.3 was achieved using input data sets of a large number of hydrological response units. As we specifically focus on acceleration of a single SWAT run, the use of iOMP-SWAT for parameter calibrations will significantly improve the performance of SWAT optimization.

  5. Reformulation RELAP5-3D in FORTRAN 95 and Results

    International Nuclear Information System (INIS)

    Mesina, George L.

    2010-01-01

    RELAP5-3D is a nuclear power plant code used worldwide for safety analysis, design, and operator training. In keeping with ongoing developments in the computing industry, we have re-architected the code in the FORTRAN 95 language, the current, fully-available, FORTRAN language. These changes include a complete reworking of the database and conversion of the source code to take advantage of new constructs. The improvements and impacts to the code are manifold. It is a completely machine-independent code that produces machine independent fluid property and plot files and expands to the exact size needed to accommodate the user's input. Runtime is generally better for larger input models. Other impacts of code conversion are improved code readability, reduced maintenance and development time, increased adaptability to new computing platforms, and increased code longevity. The conversion methodology, code improvements and testing upgrades are presented in a manner that will be useful to future conversion projects for other such large codes. Comparison between the pre- and post-conversion code are made on the basis of code metrics and code performance.

  6. The development of GPU-based parallel PRNG for Monte Carlo applications in CUDA Fortran

    Directory of Open Access Journals (Sweden)

    Hamed Kargaran

    2016-04-01

    Full Text Available The implementation of Monte Carlo simulation on the CUDA Fortran requires a fast random number generation with good statistical properties on GPU. In this study, a GPU-based parallel pseudo random number generator (GPPRNG have been proposed to use in high performance computing systems. According to the type of GPU memory usage, GPU scheme is divided into two work modes including GLOBAL_MODE and SHARED_MODE. To generate parallel random numbers based on the independent sequence method, the combination of middle-square method and chaotic map along with the Xorshift PRNG have been employed. Implementation of our developed PPRNG on a single GPU showed a speedup of 150x and 470x (with respect to the speed of PRNG on a single CPU core for GLOBAL_MODE and SHARED_MODE, respectively. To evaluate the accuracy of our developed GPPRNG, its performance was compared to that of some other commercially available PPRNGs such as MATLAB, FORTRAN and Miller-Park algorithm through employing the specific standard tests. The results of this comparison showed that the developed GPPRNG in this study can be used as a fast and accurate tool for computational science applications.

  7. The development of GPU-based parallel PRNG for Monte Carlo applications in CUDA Fortran

    Energy Technology Data Exchange (ETDEWEB)

    Kargaran, Hamed, E-mail: h-kargaran@sbu.ac.ir; Minuchehr, Abdolhamid; Zolfaghari, Ahmad [Department of nuclear engineering, Shahid Behesti University, Tehran, 1983969411 (Iran, Islamic Republic of)

    2016-04-15

    The implementation of Monte Carlo simulation on the CUDA Fortran requires a fast random number generation with good statistical properties on GPU. In this study, a GPU-based parallel pseudo random number generator (GPPRNG) have been proposed to use in high performance computing systems. According to the type of GPU memory usage, GPU scheme is divided into two work modes including GLOBAL-MODE and SHARED-MODE. To generate parallel random numbers based on the independent sequence method, the combination of middle-square method and chaotic map along with the Xorshift PRNG have been employed. Implementation of our developed PPRNG on a single GPU showed a speedup of 150x and 470x (with respect to the speed of PRNG on a single CPU core) for GLOBAL-MODE and SHARED-MODE, respectively. To evaluate the accuracy of our developed GPPRNG, its performance was compared to that of some other commercially available PPRNGs such as MATLAB, FORTRAN and Miller-Park algorithm through employing the specific standard tests. The results of this comparison showed that the developed GPPRNG in this study can be used as a fast and accurate tool for computational science applications.

  8. A brief description and comparison of programming languages FORTRAN, ALGOL, COBOL, PL/1, and LISP 1.5 from a critical standpoint

    Science.gov (United States)

    Mathur, F. P.

    1972-01-01

    Several common higher level program languages are described. FORTRAN, ALGOL, COBOL, PL/1, and LISP 1.5 are summarized and compared. FORTRAN is the most widely used scientific programming language. ALGOL is a more powerful language for scientific programming. COBOL is used for most commercial programming applications. LISP 1.5 is primarily a list-processing language. PL/1 attempts to combine the desirable features of FORTRAN, ALGOL, and COBOL into a single language.

  9. Implementation of Neutronics Analysis Code using the Features of Object Oriented Programming via Fortran90/95

    Energy Technology Data Exchange (ETDEWEB)

    Han, Tae Young; Cho, Beom Jin [KEPCO Nuclear Fuel, Daejeon (Korea, Republic of)

    2011-05-15

    The object-oriented programming (OOP) concept was radically established after 1990s and successfully involved in Fortran 90/95. The features of OOP are such as the information hiding, encapsulation, modularity and inheritance, which lead to producing code that satisfy three R's: reusability, reliability and readability. The major OOP concepts, however, except Module are not mainly used in neutronics analysis codes even though the code was written by Fortran 90/95. In this work, we show that the OOP concept can be employed to develop the neutronics analysis code, ASTRA1D (Advanced Static and Transient Reactor Analyzer for 1-Dimension), via Fortran90/95 and those can be more efficient and reasonable programming methods

  10. Implementation of the Next Generation Attenuation (NGA) ground-motion prediction equations in Fortran and R

    Science.gov (United States)

    Kaklamanos, James; Boore, David M.; Thompson, Eric M.; Campbell, Kenneth W.

    2010-01-01

    This report presents two methods for implementing the earthquake ground-motion prediction equations released in 2008 as part of the Next Generation Attenuation of Ground Motions (NGA-West, or NGA) project coordinated by the Pacific Earthquake Engineering Research Center (PEER). These models were developed for predicting ground-motion parameters for shallow crustal earthquakes in active tectonic regions (such as California). Of the five ground-motion prediction equations (GMPEs) developed during the NGA project, four models are implemented: the GMPEs of Abrahamson and Silva (2008), Boore and Atkinson (2008), Campbell and Bozorgnia (2008), and Chiou and Youngs (2008a); these models are abbreviated as AS08, BA08, CB08, and CY08, respectively. Since site response is widely recognized as an important influence of ground motions, engineering applications typically require that such effects be modeled. The model of Idriss (2008) is not implemented in our programs because it does not explicitly include site response, whereas the other four models include site response and use the same variable to describe the site condition (VS30). We do not intend to discourage the use of the Idriss (2008) model, but we have chosen to implement the other four NGA models in our programs for those users who require ground-motion estimates for various site conditions. We have implemented the NGA models by using two separate programming languages: Fortran and R (R Development Core Team, 2010). Fortran, a compiled programming language, has been used in the scientific community for decades. R is an object-oriented language and environment for statistical computing that is gaining popularity in the statistical and scientific community. Derived from the S language and environment developed at Bell Laboratories, R is an open-source language that is freely available at http://www.r-project.org/ (last accessed 11 January 2011). In R, the functions for computing the NGA equations can be loaded as an

  11. Kemari: A Portable High Performance Fortran System for Distributed Memory Parallel Processors

    Directory of Open Access Journals (Sweden)

    T. Kamachi

    1997-01-01

    Full Text Available We have developed a compilation system which extends High Performance Fortran (HPF in various aspects. We support the parallelization of well-structured problems with loop distribution and alignment directives similar to HPF's data distribution directives. Such directives give both additional control to the user and simplify the compilation process. For the support of unstructured problems, we provide directives for dynamic data distribution through user-defined mappings. The compiler also allows integration of message-passing interface (MPI primitives. The system is part of a complete programming environment which also comprises a parallel debugger and a performance monitor and analyzer. After an overview of the compiler, we describe the language extensions and related compilation mechanisms in detail. Performance measurements demonstrate the compiler's applicability to a variety of application classes.

  12. Installation of a new Fortran compiler and effective programming method on the vector supercomputer

    International Nuclear Information System (INIS)

    Nemoto, Toshiyuki; Suzuki, Koichiro; Watanabe, Kenji; Machida, Masahiko; Osanai, Seiji; Isobe, Nobuo; Harada, Hiroo; Yokokawa, Mitsuo

    1992-07-01

    The Fortran compiler, version 10 has been replaced with the new one, version 12 (V12) on the Fujitsu Computer system at JAERI since May, 1992. The benchmark test for the performance of the V12 compiler is carried out with 16 representative nuclear codes in advance of the installation of the compiler. The performance of the compiler is achieved by the factor of 1.13 in average. The effect of the enhanced functions of the compiler and the compatibility to the nuclear codes are also examined. The assistant tool for vectorization TOP10EX is developed. In this report, the results of the evaluation of the V12 compiler and the usage of the tools for vectorization are presented. (author)

  13. EFFDOS - a FORTRAN-77-code for the calculation of the effective dose equivalent

    International Nuclear Information System (INIS)

    Baer, M.; Honcu, S.; Huebschmann, W.

    1984-01-01

    The FORTRAN-77-code EFFDOS calculates the effective dose equivalent according to ICRP 26 due to the longterm emission of radionuclides into the atmosphere for the following exposure pathways: inhalation, ingestion, γ-ground irradiation (γ-irradiation by radionuclides deposited on the ground) and β- or γ-submersion (irradiation by the passing radioactive cloud). For calculating the effective dose equivalent at a single spot it is necessary to put in the diffusion factor and - if need be - the washout factor; otherwise EFFDOS calculates the input data for the computer codes ISOLA III and WOLGA-1, which then are enabled to compute the atmospheric diffusion, ground deposition and local dose equivalent distribution for the requested exposure pathway. Atmospheric diffusion, deposition and radionuclide transfer are calculated according to the ''Allgemeine Berechnungsgrundlage ....'' recommended by the German Fed. Ministry of Interior. A sample calculated is added. (orig.) [de

  14. Fortran programs for the time-dependent Gross-Pitaevskii equation in a fully anisotropic trap

    Science.gov (United States)

    Muruganandam, P.; Adhikari, S. K.

    2009-10-01

    Here we develop simple numerical algorithms for both stationary and non-stationary solutions of the time-dependent Gross-Pitaevskii (GP) equation describing the properties of Bose-Einstein condensates at ultra low temperatures. In particular, we consider algorithms involving real- and imaginary-time propagation based on a split-step Crank-Nicolson method. In a one-space-variable form of the GP equation we consider the one-dimensional, two-dimensional circularly-symmetric, and the three-dimensional spherically-symmetric harmonic-oscillator traps. In the two-space-variable form we consider the GP equation in two-dimensional anisotropic and three-dimensional axially-symmetric traps. The fully-anisotropic three-dimensional GP equation is also considered. Numerical results for the chemical potential and root-mean-square size of stationary states are reported using imaginary-time propagation programs for all the cases and compared with previously obtained results. Also presented are numerical results of non-stationary oscillation for different trap symmetries using real-time propagation programs. A set of convenient working codes developed in Fortran 77 are also provided for all these cases (twelve programs in all). In the case of two or three space variables, Fortran 90/95 versions provide some simplification over the Fortran 77 programs, and these programs are also included (six programs in all). Program summaryProgram title: (i) imagetime1d, (ii) imagetime2d, (iii) imagetime3d, (iv) imagetimecir, (v) imagetimesph, (vi) imagetimeaxial, (vii) realtime1d, (viii) realtime2d, (ix) realtime3d, (x) realtimecir, (xi) realtimesph, (xii) realtimeaxial Catalogue identifier: AEDU_v1_0 Program summary URL:http://cpc.cs.qub.ac.uk/summaries/AEDU_v1_0.html Program obtainable from: CPC Program Library, Queen's University, Belfast, N. Ireland Licensing provisions: Standard CPC licence, http://cpc.cs.qub.ac.uk/licence/licence.html No. of lines in distributed program, including test data

  15. ptchg: A FORTRAN program for point-charge calculations of electric field gradients (EFGs)

    Science.gov (United States)

    Spearing, Dane R.

    1994-05-01

    ptchg, a FORTRAN program, has been developed to calculate electric field gradients (EFG) around an atomic site in crystalline solids using the point-charge direct-lattice summation method. It uses output from the crystal structure generation program Atoms as its input. As an application of ptchg, a point-charge calculation of the EFG quadrupolar parameters around the oxygen site in SiO 2 cristobalite is demonstrated. Although point-charge calculations of electric field gradients generally are limited to ionic compounds, the computed quadrupolar parameters around the oxygen site in SiO 2 cristobalite, a highly covalent material, are in good agreement with the experimentally determined values from nuclear magnetic resonance (NMR) spectroscopy.

  16. Perbandingan Bubble Sort dengan Insertion Sort pada Bahasa Pemrograman C dan Fortran

    Directory of Open Access Journals (Sweden)

    Reina Reina

    2013-12-01

    Full Text Available Sorting is a basic algorithm studied by students of computer science major. Sorting algorithm is the basis of other algorithms such as searching algorithm, pattern matching algorithm. Bubble sort is a popular basic sorting algorithm due to its easiness to be implemented. Besides bubble sort, there is insertion sort. It is lesspopular than bubble sort because it has more difficult algorithm. This paper discusses about process time between insertion sort and bubble sort with two kinds of data. First is randomized data, and the second is data of descending list. Comparison of process time has been done in two kinds of programming language that is C programming language and FORTRAN programming language. The result shows that bubble sort needs more time than insertion sort does.

  17. Program NICOLET to integrate energy loss in superconducting coils. [In FORTRAN for CDC-6600

    Energy Technology Data Exchange (ETDEWEB)

    Vogel, H.F.

    1978-08-01

    A voltage pickup coil, inductively coupled to the magnetic field of the superconducting coil under test, is connected so its output may be compared with the terminal voltage of the coil under test. The integrated voltage difference is indicative of the resistive volt-seconds. When multiplied with the main coil current, the volt-seconds yield the loss. In other words, a hysteresis loop is obtained if the integrated voltage difference phi = ..integral delta..Vdt is plotted as a function of the coil current, i. First, time functions of the two signals phi(t) and i(t) are recorded on a dual-trace digital oscilloscope, and these signals are then recorded on magnetic tape. On a CDC-6600, the recorded information is decoded and plotted, and the hysteresis loops are integrated by the set of FORTRAN programs NICOLET described in this report. 4 figures.

  18. RODDRP - A FORTRAN program for use in control rod calibration by the rod drop method

    International Nuclear Information System (INIS)

    Wilson, W.E.

    1972-01-01

    The different methods to measure reactivity which are applicable to control rod calibration are discussed. They include: 1) the positive period method, 2) the rod drop method, 3) the source-jerk method, 4) the rod oscillation method, and 5) the pulsed neutron method. The instrument setup used at WSU for rod drop measurements is presented. To speed up the analysis of power fall-off trace, a FORTRAN IV program called RODDRP was written to simultaneously solve the in-hour equation and relative neutron flux. The procedure for calculating the worth of the rod that produced the power trace is given. The reactivity for each time relative flux point is obtained. Conclusions about the status of the equipment are made

  19. A FORTRAN program for numerical solution of the Altarelli-Parisi equations by the Laguerre method

    International Nuclear Information System (INIS)

    Kumano, S.; Londergan, J.T.

    1992-01-01

    We review the Laguerre method for solving the Altarelli-Parisi equations. The Laguerre method allows one to expand quark/parton distributions and splitting functions in orthonormal polynomials. The desired quark distributions are themselves expanded in terms of evolution operators, and we derive the integrodifferential equations satisfied by the evolution operators. We give relevant equations for both flavor nonsinglet and singlet distributions, for both spin-independent and spin-dependent distributions. We discuss stability and accuracy of the results using this method. For intermediate values of Bjorken x (0.03< x<0.7), one can obtain accurate results with a modest number of Laguerre polynomials (N≅20); we discuss requirements for convergence also for the regions of large or small x. A FORTRAN program is provided which implements the Laguerre method; test results are given for both the spin-independent and spin-dependent cases. (orig.)

  20. A Linear Algebra Framework for Static High Performance Fortran Code Distribution

    Directory of Open Access Journals (Sweden)

    Corinne Ancourt

    1997-01-01

    Full Text Available High Performance Fortran (HPF was developed to support data parallel programming for single-instruction multiple-data (SIMD and multiple-instruction multiple-data (MIMD machines with distributed memory. The programmer is provided a familiar uniform logical address space and specifies the data distribution by directives. The compiler then exploits these directives to allocate arrays in the local memories, to assign computations to elementary processors, and to migrate data between processors when required. We show here that linear algebra is a powerful framework to encode HPF directives and to synthesize distributed code with space-efficient array allocation, tight loop bounds, and vectorized communications for INDEPENDENT loops. The generated code includes traditional optimizations such as guard elimination, message vectorization and aggregation, and overlap analysis. The systematic use of an affine framework makes it possible to prove the compilation scheme correct.

  1. Algorithm 589. SICEDR: a FORTRAN subroutine for improving the accuracy of computed matrix eigenvalues

    International Nuclear Information System (INIS)

    Dongarra, J.J.

    1982-01-01

    SICEDR is a FORTRAN subroutine for improving the accuracy of a computed real eigenvalue and improving or computing the associated eigenvector. It is first used to generate information during the determination of the eigenvalues by the Schur decomposition technique. In particular, the Schur decomposition technique results in an orthogonal matrix Q and an upper quasi-triangular matrix T, such that A = QTQ/sup T/. Matrices A, Q, and T and the approximate eigenvalue, say lambda, are then used in the improvement phase. SICEDR uses an iterative method similar to iterative improvement for linear systems to improve the accuracy of lambda and improve or compute the eigenvector x in O(n 2 ) work, where n is the order of the matrix A

  2. Programs in Fortran language for reporting the results of the analyses by ICP emission spectroscopy; Programas en lenguaje Fortran para la informacion de los resultados de los analisis efectuados mediante Espectroscopia Optica de emision con fuente de plasma

    Energy Technology Data Exchange (ETDEWEB)

    Roca, M

    1985-07-01

    Three programs, written in FORTRAN IV language, for reporting the results of the analyses by ICP emission spectroscopy from data stored in files on floppy disks have been developed. They are intended, respectively, for the analyses of: 1) waters, 2) granites and slates, and 3) different kinds of geological materials. (Author) 8 refs.

  3. Scientific Programming with High Performance Fortran: A Case Study Using the xHPF Compiler

    Directory of Open Access Journals (Sweden)

    Eric De Sturler

    1997-01-01

    Full Text Available Recently, the first commercial High Performance Fortran (HPF subset compilers have appeared. This article reports on our experiences with the xHPF compiler of Applied Parallel Research, version 1.2, for the Intel Paragon. At this stage, we do not expect very High Performance from our HPF programs, even though performance will eventually be of paramount importance for the acceptance of HPF. Instead, our primary objective is to study how to convert large Fortran 77 (F77 programs to HPF such that the compiler generates reasonably efficient parallel code. We report on a case study that identifies several problems when parallelizing code with HPF; most of these problems affect current HPF compiler technology in general, although some are specific for the xHPF compiler. We discuss our solutions from the perspective of the scientific programmer, and presenttiming results on the Intel Paragon. The case study comprises three programs of different complexity with respect to parallelization. We use the dense matrix-matrix product to show that the distribution of arrays and the order of nested loops significantly influence the performance of the parallel program. We use Gaussian elimination with partial pivoting to study the parallelization strategy of the compiler. There are various ways to structure this algorithm for a particular data distribution. This example shows how much effort may be demanded from the programmer to support the compiler in generating an efficient parallel implementation. Finally, we use a small application to show that the more complicated structure of a larger program may introduce problems for the parallelization, even though all subroutines of the application are easy to parallelize by themselves. The application consists of a finite volume discretization on a structured grid and a nested iterative solver. Our case study shows that it is possible to obtain reasonably efficient parallel programs with xHPF, although the compiler

  4. SMMP v. 3.0—Simulating proteins and protein interactions in Python and Fortran

    Science.gov (United States)

    Meinke, Jan H.; Mohanty, Sandipan; Eisenmenger, Frank; Hansmann, Ulrich H. E.

    2008-03-01

    We describe a revised and updated version of the program package SMMP. SMMP is an open-source FORTRAN package for molecular simulation of proteins within the standard geometry model. It is designed as a simple and inexpensive tool for researchers and students to become familiar with protein simulation techniques. SMMP 3.0 sports a revised API increasing its flexibility, an implementation of the Lund force field, multi-molecule simulations, a parallel implementation of the energy function, Python bindings, and more. Program summaryTitle of program:SMMP Catalogue identifier:ADOJ_v3_0 Program summary URL:http://cpc.cs.qub.ac.uk/summaries/ADOJ_v3_0.html Program obtainable from: CPC Program Library, Queen's University of Belfast, N. Ireland Licensing provisions:Standard CPC licence, http://cpc.cs.qub.ac.uk/licence/licence.html Programming language used:FORTRAN, Python No. of lines in distributed program, including test data, etc.:52 105 No. of bytes in distributed program, including test data, etc.:599 150 Distribution format:tar.gz Computer:Platform independent Operating system:OS independent RAM:2 Mbytes Classification:3 Does the new version supersede the previous version?:Yes Nature of problem:Molecular mechanics computations and Monte Carlo simulation of proteins. Solution method:Utilizes ECEPP2/3, FLEX, and Lund potentials. Includes Monte Carlo simulation algorithms for canonical, as well as for generalized ensembles. Reasons for new version:API changes and increased functionality. Summary of revisions:Added Lund potential; parameters used in subroutines are now passed as arguments; multi-molecule simulations; parallelized energy calculation for ECEPP; Python bindings. Restrictions:The consumed CPU time increases with the size of protein molecule. Running time:Depends on the size of the simulated molecule.

  5. BGSUB and BGFIX: FORTRAN programs to correct Ge(Li) gamma-ray spectra for photopeaks from radionuclides in background

    International Nuclear Information System (INIS)

    Cutshall, N.H.; Larsen, I.L.

    1980-03-01

    Two FORTRAN programs which provide correction and error analysis for background photopeak contributions to low-level gamma-ray spectra are discussed. A peak-by-peak background subtraction approach is used instead of channel-by-channel correction. The accuracy of corrected results near background levels is substantially improved over uncorrected values

  6. MATH77 - A LIBRARY OF MATHEMATICAL SUBPROGRAMS FOR FORTRAN 77, RELEASE 4.0

    Science.gov (United States)

    Lawson, C. L.

    1994-01-01

    MATH77 is a high quality library of ANSI FORTRAN 77 subprograms implementing contemporary algorithms for the basic computational processes of science and engineering. The portability of MATH77 meets the needs of present-day scientists and engineers who typically use a variety of computing environments. Release 4.0 of MATH77 contains 454 user-callable and 136 lower-level subprograms. Usage of the user-callable subprograms is described in 69 sections of the 416 page users' manual. The topics covered by MATH77 are indicated by the following list of chapter titles in the users' manual: Mathematical Functions, Pseudo-random Number Generation, Linear Systems of Equations and Linear Least Squares, Matrix Eigenvalues and Eigenvectors, Matrix Vector Utilities, Nonlinear Equation Solving, Curve Fitting, Table Look-Up and Interpolation, Definite Integrals (Quadrature), Ordinary Differential Equations, Minimization, Polynomial Rootfinding, Finite Fourier Transforms, Special Arithmetic , Sorting, Library Utilities, Character-based Graphics, and Statistics. Besides subprograms that are adaptations of public domain software, MATH77 contains a number of unique packages developed by the authors of MATH77. Instances of the latter type include (1) adaptive quadrature, allowing for exceptional generality in multidimensional cases, (2) the ordinary differential equations solver used in spacecraft trajectory computation for JPL missions, (3) univariate and multivariate table look-up and interpolation, allowing for "ragged" tables, and providing error estimates, and (4) univariate and multivariate derivative-propagation arithmetic. MATH77 release 4.0 is a subroutine library which has been carefully designed to be usable on any computer system that supports the full ANSI standard FORTRAN 77 language. It has been successfully implemented on a CRAY Y/MP computer running UNICOS, a UNISYS 1100 computer running EXEC 8, a DEC VAX series computer running VMS, a Sun4 series computer running Sun

  7. Thermal Hydraulic Fortran Program for Steady State Calculations of Plate Type Fuel Research Reactors

    International Nuclear Information System (INIS)

    Khedr, H.

    2008-01-01

    The safety assessment of Research and Power Reactors is a continuous process over their life and that requires verified and validated codes. Power Reactor codes all over the world are well established and qualified against a real measuring data and qualified experimental facilities. These codes are usually sophisticated, require special skills and consume much more running time. On the other hand, most of the Research Reactor codes still requiring more data for validation and qualification. Therefore it is benefit for a regulatory body and the companies working in the area of Research Reactor assessment and design to have their own program that give them a quick judgment. The present paper introduces a simple one dimensional Fortran program called THDSN for steady state best estimate Thermal Hydraulic (TH) calculations of plate type fuel RRs. Beside calculating the fuel and coolant temperature distribution and pressure gradient in an average and hot channel the program calculates the safety limits and margins against the critical phenomena encountered in RR such as the burnout heat flux and the onset of flow instability. Well known TH correlations for calculating the safety parameters are used. THDSN program is verified by comparing its results for 2 and 10 MW benchmark reactors with that published in IAEA publications and good agreement is found. Also the program results are compared with those published for other programs such as PARET and TERMIC. An extension for this program is underway to cover the transient TH calculations

  8. A fortran program for elastic scattering of deuterons with an optical model containing tensorial potentials

    International Nuclear Information System (INIS)

    Raynal, J.

    1963-01-01

    The optical model has been applied with success to the elastic scattering of particles of spin 0 and 1/2 and to a lesser degree to that of deuterons. For particles of spin l/2, an LS coupling term is ordinarily used; this term is necessary to obtain a polarization; for deuterons, this coupling has been already introduced, but the possible forms of potentials are more numerous (in this case, scalar products of a second rank spin tensor with a tensor of the same rank in space or momentum can occur). These terms which may be necessary are primarily important for the tensor polarization. This problem is of particular interest at Saclay since a beam of polarized deuterons has become available. The FORTRAN program SPM 037 permits the study of the effect of tensorial potentials constructed from the distance of the deuteron from the target and its angular momentum with respect to it. This report should make possible the use and even the modification of the program. It consists of: a description of the problem and of the notation employed, a presentation of the methods adopted, an indication of the necessary data and how they should be introduced, and finally tables of symbols which are in equivalence or common statements: these tables must be considered when making any modification. (author) [fr

  9. Performance Issues in High Performance Fortran Implementations of Sensor-Based Applications

    Directory of Open Access Journals (Sweden)

    David R. O'hallaron

    1997-01-01

    Full Text Available Applications that get their inputs from sensors are an important and often overlooked application domain for High Performance Fortran (HPF. Such sensor-based applications typically perform regular operations on dense arrays, and often have latency and through put requirements that can only be achieved with parallel machines. This article describes a study of sensor-based applications, including the fast Fourier transform, synthetic aperture radar imaging, narrowband tracking radar processing, multibaseline stereo imaging, and medical magnetic resonance imaging. The applications are written in a dialect of HPF developed at Carnegie Mellon, and are compiled by the Fx compiler for the Intel Paragon. The main results of the study are that (1 it is possible to realize good performance for realistic sensor-based applications written in HPF and (2 the performance of the applications is determined by the performance of three core operations: independent loops (i.e., loops with no dependences between iterations, reductions, and index permutations. The article discusses the implications for HPF implementations and introduces some simple tests that implementers and users can use to measure the efficiency of the loops, reductions, and index permutations generated by an HPF compiler.

  10. Dynamic Memory De-allocation in Fortran 95/2003 Derived Type Calculus

    Directory of Open Access Journals (Sweden)

    Damian W.I. Rouson

    2005-01-01

    Full Text Available Abstract data types developed for computational science and engineering are frequently modeled after physical objects whose state variables must satisfy governing differential equations. Generalizing the associated algebraic and differential operators to operate on the abstract data types facilitates high-level program constructs that mimic standard mathematical notation. For non-trivial expressions, multiple object instantiations must occur to hold intermediate results during the expression's evaluation. When the dimension of each object's state space is not specified at compile-time, the programmer becomes responsible for dynamically allocating and de-allocating memory for each instantiation. With the advent of allocatable components in Fortran 2003 derived types, the potential exists for these intermediate results to occupy a substantial fraction of a program's footprint in memory. This issue becomes particularly acute at the highest levels of abstraction where coarse-grained data structures predominate. This paper proposes a set of rules for de-allocating memory that has been dynamically allocated for intermediate results in derived type calculus, while distinguishing that memory from more persistent objects. The new rules are applied to the design of a polymorphic time integrator for integrating evolution equations governing dynamical systems. Associated issues of efficiency and design robustness are discussed.

  11. Users manual for an expert system (HSPEXP) for calibration of the hydrological simulation program; Fortran

    Science.gov (United States)

    Lumb, A.M.; McCammon, R.B.; Kittle, J.L.

    1994-01-01

    Expert system software was developed to assist less experienced modelers with calibration of a watershed model and to facilitate the interaction between the modeler and the modeling process not provided by mathematical optimization. A prototype was developed with artificial intelligence software tools, a knowledge engineer, and two domain experts. The manual procedures used by the domain experts were identified and the prototype was then coded by the knowledge engineer. The expert system consists of a set of hierarchical rules designed to guide the calibration of the model through a systematic evaluation of model parameters. When the prototype was completed and tested, it was rewritten for portability and operational use and was named HSPEXP. The watershed model Hydrological Simulation Program--Fortran (HSPF) is used in the expert system. This report is the users manual for HSPEXP and contains a discussion of the concepts and detailed steps and examples for using the software. The system has been tested on watersheds in the States of Washington and Maryland, and the system correctly identified the model parameters to be adjusted and the adjustments led to improved calibration.

  12. PUBG; purex solvent extraction process model. [IBM3033; CDC CYBER175; FORTRAN IV

    Energy Technology Data Exchange (ETDEWEB)

    Geldard, J.F.; Beyerlein, A.L.

    PUBG is a chemical model of the Purex solvent extraction system, by which plutonium and uranium are recovered from spent nuclear fuel rods. The system comprises a number of mixer-settler banks. This discrete stage structure is the basis of the algorithms used in PUBG. The stages are connected to provide for countercurrent flow of the aqueous and organic phases. PUBG uses the common convention that has the aqueous phase enter at the lowest numbered stage and exit at the highest one; the organic phase flows oppositely. The volumes of the mixers are smaller than those of the settlers. The mixers generate a fine dispersion of one phase in the other. The high interfacial area is intended to provide for rapid mass transfer of the plutonium and uranium from one phase to the other. The separation of this dispersion back into the two phases occurs in the settlers. The species considered by PUBG are Hydrogen (1+), Plutonium (4+), Uranyl Oxide (2+), Plutonium (3+), Nitrate Anion, and reductant in the aqueous phase and Hydrogen (1+), Uranyl Oxide (2+), Plutonium (4+), and TBP (tri-n-butylphosphate) in the organic phase. The reductant used in the Purex process is either Uranium (4+) or HAN (hydroxylamine nitrate).IBM3033;CDC CYBER175; FORTRAN IV; OS/MVS or OS/MVT (IBM3033), NOS 1.3 (CDC CYBER175); The IBM3033 version requires 150K bytes of memory for execution; 62,000 (octal) words are required by the CDC CYBER175 version..

  13. FORTRAN routines for calculating water thermodynamic properties for use in transient thermal-hydraulics codes

    International Nuclear Information System (INIS)

    Green, C.

    1979-12-01

    A set of FORTRAN subroutines is described for calculating water thermodynamic properties. These were written for use in a transient thermal-hydraulics program, where speed of execution is paramount. The choice of which subroutines to optimise depends on the primary variables in the thermal-hydraulics code. In this particular case the subroutine which has been optimised is the one which calculates pressure and specific enthalpy given the specific volume and the specific internal energy. Another two subroutines are described which complete a self-consistent set. These calculate the specific volume and the temperature given the pressure and the specific enthalpy, and the specific enthalpy and the specific volume given the pressure and the temperature (or the quality). The accuracy is high near the saturation lines, typically less than 1% relative error, and decreases as the fluid becomes more subcooled in the liquid region or more superheated in the steam region. This behaviour is inherent in the method which uses quantities defined on the saturation lines and assumes that certain derivatives are constant for excursions away from these saturation lines. The accuracy and speed of the subroutines are discussed in detail in this report. (author)

  14. ASSIST - a package of Fortran routines for handling input under specified syntax rules and for management of data structures

    International Nuclear Information System (INIS)

    Sinclair, J.E.

    1991-02-01

    The ASSIST package (A Structured Storage and Input Syntax Tool) provides for Fortran programs a means for handling data structures more general than those provided by the Fortran language, and for obtaining input to the program from a file or terminal according to specified syntax rules. The syntax-controlled input can be interactive, with automatic generation of prompts, and dialogue to correct any input errors. The range of syntax rules possible is sufficient to handle lists of numbers and character strings, keywords, commands with optional clauses, and many kinds of variable-format constructions, such as algebraic expressions. ASSIST was developed for use in two large programs for the analysis of safety of radioactive waste disposal facilities, but it should prove useful for a wide variety of applications. (author)

  15. A Fortran program for the numerical integration of the one-dimensional Schroedinger equation using exponential and Bessel fitting methods

    International Nuclear Information System (INIS)

    Cash, J.R.; Raptis, A.D.; Simos, T.E.

    1990-01-01

    An efficient algorithm is described for the accurate numerical integration of the one-dimensional Schroedinger equation. This algorithm uses a high-order, variable step Runge-Kutta like method in the region where the potential term dominates, and an exponential or Bessel fitted method in the asymptotic region. This approach can be used to compute scattering phase shifts in an efficient and reliable manner. A Fortran program which implements this algorithm is provided and some test results are given. (orig.)

  16. Application of Pfortran and Co-Array Fortran in the Parallelization of the GROMOS96 Molecular Dynamics Module

    Directory of Open Access Journals (Sweden)

    Piotr Bała

    2001-01-01

    Full Text Available After at least a decade of parallel tool development, parallelization of scientific applications remains a significant undertaking. Typically parallelization is a specialized activity supported only partially by the programming tool set, with the programmer involved with parallel issues in addition to sequential ones. The details of concern range from algorithm design down to low-level data movement details. The aim of parallel programming tools is to automate the latter without sacrificing performance and portability, allowing the programmer to focus on algorithm specification and development. We present our use of two similar parallelization tools, Pfortran and Cray's Co-Array Fortran, in the parallelization of the GROMOS96 molecular dynamics module. Our parallelization started from the GROMOS96 distribution's shared-memory implementation of the replicated algorithm, but used little of that existing parallel structure. Consequently, our parallelization was close to starting with the sequential version. We found the intuitive extensions to Pfortran and Co-Array Fortran helpful in the rapid parallelization of the project. We present performance figures for both the Pfortran and Co-Array Fortran parallelizations showing linear speedup within the range expected by these parallelization methods.

  17. BADGER v1.0: A Fortran equation of state library

    Science.gov (United States)

    Heltemes, T. A.; Moses, G. A.

    2012-12-01

    The BADGER equation of state library was developed to enable inertial confinement fusion plasma codes to more accurately model plasmas in the high-density, low-temperature regime. The code had the capability to calculate 1- and 2-T plasmas using the Thomas-Fermi model and an individual electron accounting model. Ion equation of state data can be calculated using an ideal gas model or via a quotidian equation of state with scaled binding energies. Electron equation of state data can be calculated via the ideal gas model or with an adaptation of the screened hydrogenic model with ℓ-splitting. The ionization and equation of state calculations can be done in local thermodynamic equilibrium or in a non-LTE mode using a variant of the Busquet equivalent temperature method. The code was written as a stand-alone Fortran library for ease of implementation by external codes. EOS results for aluminum are presented that show good agreement with the SESAME library and ionization calculations show good agreement with the FLYCHK code. Program summaryProgram title: BADGERLIB v1.0 Catalogue identifier: AEND_v1_0 Program summary URL:http://cpc.cs.qub.ac.uk/summaries/AEND_v1_0.html Program obtainable from: CPC Program Library, Queen's University, Belfast, N. Ireland Licensing provisions: Standard CPC licence, http://cpc.cs.qub.ac.uk/licence/licence.html No. of lines in distributed program, including test data, etc.: 41 480 No. of bytes in distributed program, including test data, etc.: 2 904 451 Distribution format: tar.gz Programming language: Fortran 90. Computer: 32- or 64-bit PC, or Mac. Operating system: Windows, Linux, MacOS X. RAM: 249.496 kB plus 195.630 kB per isotope record in memory Classification: 19.1, 19.7. Nature of problem: Equation of State (EOS) calculations are necessary for the accurate simulation of high energy density plasmas. Historically, most EOS codes used in these simulations have relied on an ideal gas model. This model is inadequate for low

  18. KUEBEL. A Fortran program for computation of cooling-agent-distribution within reactor fuel-elements

    International Nuclear Information System (INIS)

    Inhoven, H.

    1984-12-01

    KUEBEL is a Fortran-program for computation of cooling-agent-distribution within reactor fuel-elements or -zones of theirs. They may be assembled of max. 40 cooling-channels with laminar up to turbulent type of flow (respecting Reynolds' coefficients up to 2.0E+06) at equal pressure loss. Flow-velocity, dynamic flow-, contraction- and friction-losses will be calculated for each channel and for the total zone. Other computations will present mean heat-up of cooling-agent, mean outlet-temperature of the core, boiling-temperature and absolute pressure at flow-outlet. All characteristic coolant-values, including the factor of safety for flow-instability of the most-loaded cooling gap are computed by 'KUEBEL' too. Absolute pressure at flow-outlet or is-factor may be defined as dependent or independent variables of the program alternatively. In latter case 3 variations of solution will be available: Adapted flow of cooling-agent, inlet-temperature of the core and thermal power. All calculations can be done alternatively with variation of parameters: flow of cooling-agent, inlet-temperature of the core and thermal power, which are managed by the program itself. 'KUEBEL' is able to distinguish light- and heavy-water coolant, flow-direction of coolant and fuel elements with parallel, rectangular, respectively concentric, cylindrical shape of their gaps. Required material specifics are generated by the program. Segments of fuel elements or constructively unconnected gaps can also be computed by means of interposition of S.C. 'phantom channels'. (orig.) [de

  19. Multi-processing CTH: Porting legacy FORTRAN code to MP hardware

    Energy Technology Data Exchange (ETDEWEB)

    Bell, R.L.; Elrick, M.G.; Hertel, E.S. Jr.

    1996-12-31

    CTH is a family of codes developed at Sandia National Laboratories for use in modeling complex multi-dimensional, multi-material problems that are characterized by large deformations and/or strong shocks. A two-step, second-order accurate Eulerian solution algorithm is used to solve the mass, momentum, and energy conservation equations. CTH has historically been run on systems where the data are directly accessible to the cpu, such as workstations and vector supercomputers. Multiple cpus can be used if all data are accessible to all cpus. This is accomplished by placing compiler directives or subroutine calls within the source code. The CTH team has implemented this scheme for Cray shared memory machines under the Unicos operating system. This technique is effective, but difficult to port to other (similar) shared memory architectures because each vendor has a different format of directives or subroutine calls. A different model of high performance computing is one where many (> 1,000) cpus work on a portion of the entire problem and communicate by passing messages that contain boundary data. Most, if not all, codes that run effectively on parallel hardware were written with a parallel computing paradigm in mind. Modifying an existing code written for serial nodes poses a significantly different set of challenges that will be discussed. CTH, a legacy FORTRAN code, has been modified to allow for solutions on distributed memory parallel computers such as the IBM SP2, the Intel Paragon, Cray T3D, or a network of workstations. The message passing version of CTH will be discussed and example calculations will be presented along with performance data. Current timing studies indicate that CTH is 2--3 times faster than equivalent C++ code written specifically for parallel hardware. CTH on the Intel Paragon exhibits linear speed up with problems that are scaled (constant problem size per node) for the number of parallel nodes.

  20. RAGBEEF: a FORTRAN IV implementation of a time-dependent model for radionuclide contamination of beef

    Energy Technology Data Exchange (ETDEWEB)

    Pleasant, J C; McDowell-Boyer, L M; Killough, G G

    1982-06-01

    RAGBEEF is a FORTRAN IV program that calculates radionuclide concentrations in beef as a result of ingestion of contaminated feeds, pasture, and pasture soil by beef cattle. The model implemented by RAGBEEF is dynamic in nature, allowing the user to consider age- and season-dependent aspects of beef cattle management in estimating concentrations in beef. It serves as an auxiliary code to RAGTIME, previously documented by the authors, which calculates radionuclide concentrations in agricultural crops in a dynamic manner, but evaluates concentrations in beef for steady-state conditions only. The time-dependent concentrations in feeds, pasture, and pasture soil generated by RAGTIME are used as input to the RAGBEEF code. RAGBEEF, as presently implemented, calculates radionuclide concentrations in the muscle of age-based cohorts in a beef cattle herd. Concentrations in the milk of lactating cows are also calculated, but are assumed age-dependent as in RAGTIME. Radionuclide concentrations in beef and milk are described in RAGBEEF by a system of ordinary linear differential equations in which the transfer rate of radioactivity between compartments is proportional to the inventory of radioactivity in the source compartment. This system is solved by use of the GEAR package for solution of systems of ordinary differential equations. The accuracy of this solution is monitored at various check points by comparison with explicit solutions of Bateman-type equations. This report describes the age- and season-dependent considerations making up the RAGBEEF model, as well as presenting the equations which describe the model and a documentation of the associated computer code. Listings of the RAGBEEF and updated RAGTIME codes are provided in appendices, as are the results of a sample run of RAGBEEF and a description of recent modifications to RAGTIME.

  1. RAGBEEF: a FORTRAN IV implementation of a time-dependent model for radionuclide contamination of beef

    International Nuclear Information System (INIS)

    Pleasant, J.C.; McDowell-Boyer, L.M; Killough, G.G.

    1982-06-01

    RAGBEEF is a FORTRAN IV program that calculates radionuclide concentrations in beef as a result of ingestion of contaminated feeds, pasture, and pasture soil by beef cattle. The model implemented by RAGBEEF is dynamic in nature, allowing the user to consider age- and season-dependent aspects of beef cattle management in estimating concentrations in beef. It serves as an auxiliary code to RAGTIME, previously documented by the authors, which calculates radionuclide concentrations in agricultural crops in a dynamic manner, but evaluates concentrations in beef for steady-state conditions only. The time-dependent concentrations in feeds, pasture, and pasture soil generated by RAGTIME are used as input to the RAGBEEF code. RAGBEEF, as presently implemented, calculates radionuclide concentrations in the muscle of age-based cohorts in a beef cattle herd. Concentrations in the milk of lactating cows are also calculated, but are assumed age-dependent as in RAGTIME. Radionuclide concentrations in beef and milk are described in RAGBEEF by a system of ordinary linear differential equations in which the transfer rate of radioactivity between compartments is proportional to the inventory of radioactivity in the source compartment. This system is solved by use of the GEAR package for solution of systems of ordinary differential equations. The accuracy of this solution is monitored at various check points by comparison with explicit solutions of Bateman-type equations. This report describes the age- and season-dependent considerations making up the RAGBEEF model, as well as presenting the equations which describe the model and a documentation of the associated computer code. Listings of the RAGBEEF and updated RAGTIME codes are provided in appendices, as are the results of a sample run of RAGBEEF and a description of recent modifications to RAGTIME

  2. TSPP - A Collection of FORTRAN Programs for Processing and Manipulating Time Series

    Science.gov (United States)

    Boore, David M.

    2008-01-01

    This report lists a number of FORTRAN programs that I have developed over the years for processing and manipulating strong-motion accelerograms. The collection is titled TSPP, which stands for Time Series Processing Programs. I have excluded 'strong-motion accelerograms' from the title, however, as the boundary between 'strong' and 'weak' motion has become blurred with the advent of broadband sensors and high-dynamic range dataloggers, and many of the programs can be used with any evenly spaced time series, not just acceleration time series. This version of the report is relatively brief, consisting primarily of an annotated list of the programs, with two examples of processing, and a few comments on usage. I do not include a parameter-by-parameter guide to the programs. Future versions might include more examples of processing, illustrating the various parameter choices in the programs. Although these programs have been used by the U.S. Geological Survey, no warranty, expressed or implied, is made by the USGS as to the accuracy or functioning of the programs and related program material, nor shall the fact of distribution constitute any such warranty, and no responsibility is assumed by the USGS in connection therewith. The programs are distributed on an 'as is' basis, with no warranty of support from me. These programs were written for my use and are being publically distributed in the hope that others might find them as useful as I have. I would, however, appreciate being informed about bugs, and I always welcome suggestions for improvements to the codes. Please note that I have made little effort to optimize the coding of the programs or to include a user-friendly interface (many of the programs in this collection have been included in the software usdp (Utility Software for Data Processing), being developed by Akkar et al. (personal communication, 2008); usdp includes a graphical user interface). Speed of execution has been sacrificed in favor of a code that

  3. FORTRAN Code for Glandular Dose Calculation in Mammography Using Sobol-Wu Parameters

    Directory of Open Access Journals (Sweden)

    Mowlavi A A

    2007-07-01

    Full Text Available Background: Accurate computation of the radiation dose to the breast is essential to mammography. Various the thicknesses of breast, the composition of the breast tissue and other variables affect the optimal breast dose. Furthermore, the glandular fraction, which refers to the composition of the breasts, as partitioned between radiation-sensitive glandular tissue and the adipose tissue, also has an effect on this calculation. Fatty or fibrous breasts would have a lower value for the glandular fraction than dense breasts. Breast tissue composed of half glandular and half adipose tissue would have a glandular fraction in between that of fatty and dense breasts. Therefore, the use of a computational code for average glandular dose calculation in mammography is a more effective means of estimating the dose of radiation, and is accurate and fast. Methods: In the present work, the Sobol-Wu beam quality parameters are used to write a FORTRAN code for glandular dose calculation in molybdenum anode-molybdenum filter (Mo-Mo, molybdenum anode-rhodium filter (Mo-Rh and rhodium anode-rhodium filter (Rh-Rh target-filter combinations in mammograms. The input parameters of code are: tube voltage in kV, half-value layer (HVL of the incident x-ray spectrum in mm, breast thickness in cm (d, and glandular tissue fraction (g. Results: The average glandular dose (AGD variation against the voltage of the mammogram X-ray tube for d = 4 cm, HVL = 0.34 mm Al and g=0.5 for the three filter-target combinations, as well as its variation against the glandular fraction of breast tissue for kV=25, HVL=0.34, and d=4 cm has been calculated. The results related to the average glandular absorbed dose variation against HVL for kV = 28, d=4 cm and g= 0.6 are also presented. The results of this code are in good agreement with those previously reported in the literature. Conclusion: The code developed in this study calculates the glandular dose quickly, and it is complete and

  4. OpenMP GNU and Intel Fortran programs for solving the time-dependent Gross-Pitaevskii equation

    Science.gov (United States)

    Young-S., Luis E.; Muruganandam, Paulsamy; Adhikari, Sadhan K.; Lončar, Vladimir; Vudragović, Dušan; Balaž, Antun

    2017-11-01

    We present Open Multi-Processing (OpenMP) version of Fortran 90 programs for solving the Gross-Pitaevskii (GP) equation for a Bose-Einstein condensate in one, two, and three spatial dimensions, optimized for use with GNU and Intel compilers. We use the split-step Crank-Nicolson algorithm for imaginary- and real-time propagation, which enables efficient calculation of stationary and non-stationary solutions, respectively. The present OpenMP programs are designed for computers with multi-core processors and optimized for compiling with both commercially-licensed Intel Fortran and popular free open-source GNU Fortran compiler. The programs are easy to use and are elaborated with helpful comments for the users. All input parameters are listed at the beginning of each program. Different output files provide physical quantities such as energy, chemical potential, root-mean-square sizes, densities, etc. We also present speedup test results for new versions of the programs. Program files doi:http://dx.doi.org/10.17632/y8zk3jgn84.2 Licensing provisions: Apache License 2.0 Programming language: OpenMP GNU and Intel Fortran 90. Computer: Any multi-core personal computer or workstation with the appropriate OpenMP-capable Fortran compiler installed. Number of processors used: All available CPU cores on the executing computer. Journal reference of previous version: Comput. Phys. Commun. 180 (2009) 1888; ibid.204 (2016) 209. Does the new version supersede the previous version?: Not completely. It does supersede previous Fortran programs from both references above, but not OpenMP C programs from Comput. Phys. Commun. 204 (2016) 209. Nature of problem: The present Open Multi-Processing (OpenMP) Fortran programs, optimized for use with commercially-licensed Intel Fortran and free open-source GNU Fortran compilers, solve the time-dependent nonlinear partial differential (GP) equation for a trapped Bose-Einstein condensate in one (1d), two (2d), and three (3d) spatial dimensions for

  5. METHUSELAH II - A Fortran program and nuclear data library for the physics assessment of liquid-moderated reactors

    International Nuclear Information System (INIS)

    Brinkworth, M.J.; Griffiths, J.A.

    1966-03-01

    METHUSELAH II is a Fortran program with a nuclear data library, used to calculate cell reactivity and burn-up in liquid-moderated reactors. It has been developed from METHUSELAH I by revising the nuclear data library, and by introducing into the program improvements relating to nuclear data, improvements in efficiency and accuracy, and additional facilities which include a neutron balance edit, specialised outputs, fuel cycling, and fuel costing. These developments are described and information is given on the coding and usage of versions of METHUSELAH II for the IBM 7030 (STRETCH), IBM 7090, and KDF9 computers. (author)

  6. HAUFES : a FORTRAN code for the calculation of compound nuclear cross-sections by Hauser-Feshbach theory

    International Nuclear Information System (INIS)

    Viyogi, Y.P.; Ganguly, N.K.

    1975-01-01

    The FORTRAN code described in the report has been developed for the BESM-6 computer with a view to calculate the cross-section of reactions proceeding via the formation of compound nucleus for all open two-body reaction channels using Hauser-Feshbach theory with Moldauer's correction for the fluctuation of level widths. The code can also be used to analyse data from 'crystal blocking' experiments to obtain nuclear level densities. The report describes the input-output specifications along with a short account of the algorithm of the program. (author)

  7. DATA-ENTRY-3: some observations and pragmatics of a structured design. [In FORTRAN for PDP-11/10

    Energy Technology Data Exchange (ETDEWEB)

    Sparks, D.

    1977-08-01

    The FORTRAN program DATA-ENTRY-3 was developed from the COBOL program DATA-ENTRY-1, which solves a large class of elementary data-capture, data-formating, and data-editing problems of managerial accounting. Most of the work involved finding methods to make DATA-ENTRY-3, which is written for a small-machine environment (PDP-11/10 under the RT-11 operating system), logically equivalent to DATA-ENTRY-1, which is written for a large-machine environment (CDC 6600 under a time-sharing operating system). This report explains how structured programing helped, and briefly describes the function of each subroutine.

  8. EDDY - a FORTRAN program to extract significant features from eddy-current test data - the basis of the CANSCAN system

    International Nuclear Information System (INIS)

    Jarvis, R.G.; Cranston, R.J.

    1982-09-01

    The FORTRAN program EDDY is designed to analyse data: from eddy-current scans of steam generator tubes. It is written in modular form, for future development, and it uses signal-recognition techniques that the authors developed in the profilometry of irradiated fuel elements. During a scan, significant signals are detected and extracted for immediate attention or more detailed analysis later. A version of the program was used in the CANSCAN system 'for automated eddy-current in-service inspection of nuclear steam generator tubing'

  9. Formula Translation in Blitz++, NumPy and Modern Fortran: A Case Study of the Language Choice Tradeoffs

    Directory of Open Access Journals (Sweden)

    Sylwester Arabas

    2014-01-01

    Full Text Available Three object-oriented implementations of a prototype solver of the advection equation are introduced. The presented programs are based on Blitz++ (C++, NumPy (Python and Fortran's built-in array containers. The solvers constitute implementations of the Multidimensional Positive-Definite Advective Transport Algorithm (MPDATA. The introduced codes serve as examples for how the application of object-oriented programming (OOP techniques and new language constructs from C++11 and Fortran 2008 allow to reproduce the mathematical notation used in the literature within the program code. A discussion on the tradeoffs of the programming language choice is presented. The main angles of comparison are code brevity and syntax clarity (and hence maintainability and auditability as well as performance. All performance tests are carried out using free and open-source compilers. In the case of Python, a significant performance gain is observed when switching from the standard interpreter (CPython to the PyPy implementation of Python. Entire source code of all three implementations is embedded in the text and is licensed under the terms of the GNU GPL license.

  10. Far-Field Lorenz-Mie Scattering in an Absorbing Host Medium: Theoretical Formalism and FORTRAN Program

    Science.gov (United States)

    Mishchenko, Michael I.; Yang, Ping

    2018-01-01

    In this paper we make practical use of the recently developed first-principles approach to electromagnetic scattering by particles immersed in an unbounded absorbing host medium. Specifically, we introduce an actual computational tool for the calculation of pertinent far-field optical observables in the context of the classical Lorenzâ€"Mie theory. The paper summarizes the relevant theoretical formalism, explains various aspects of the corresponding numerical algorithm, specifies the input and output parameters of a FORTRAN program available at https://www.giss.nasa.gov/staff/mmishchenko/Lorenz-Mie.html, and tabulates benchmark results useful for testing purposes. This public-domain FORTRAN program enables one to solve the following two important problems: (i) simulate theoretically the reading of a remote well-collimated radiometer measuring electromagnetic scattering by an individual spherical particle or a small random group of spherical particles; and (ii) compute the single-scattering parameters that enter the vector radiative transfer equation derived directly from the Maxwell equations.

  11. Far-field Lorenz-Mie scattering in an absorbing host medium: Theoretical formalism and FORTRAN program

    Science.gov (United States)

    Mishchenko, Michael I.; Yang, Ping

    2018-01-01

    In this paper we make practical use of the recently developed first-principles approach to electromagnetic scattering by particles immersed in an unbounded absorbing host medium. Specifically, we introduce an actual computational tool for the calculation of pertinent far-field optical observables in the context of the classical Lorenz-Mie theory. The paper summarizes the relevant theoretical formalism, explains various aspects of the corresponding numerical algorithm, specifies the input and output parameters of a FORTRAN program available at https://www.giss.nasa.gov/staff/mmishchenko/Lorenz-Mie.html, and tabulates benchmark results useful for testing purposes. This public-domain FORTRAN program enables one to solve the following two important problems: (i) simulate theoretically the reading of a remote well-collimated radiometer measuring electromagnetic scattering by an individual spherical particle or a small random group of spherical particles; and (ii) compute the single-scattering parameters that enter the vector radiative transfer equation derived directly from the Maxwell equations.

  12. The fortran programme for the calculation of the absorption and double scattering corrections in cross-section measurements with fast neutrons using the monte Carlo method (1963); Programme fortran pour le calcul des corrections d'absorption et de double diffusion dans les mesures de sections efficaces pour les neutrons rapides par la methode de monte-carlo (1963)

    Energy Technology Data Exchange (ETDEWEB)

    Fernandez, B [Commissariat a l' Energie Atomique, Saclay (France). Centre d' Etudes Nucleaires

    1963-07-01

    A calculation for double scattering and absorption corrections in fast neutron scattering experiments using Monte-Carlo method is given. Application to cylindrical target is presented in FORTRAN symbolic language. (author) [French] Un calcul des corrections de double diffusion et d'absorption dans les experiences de diffusion de neutrons rapides par la methode de Monte-Carlo est presente. L'application au cas d'une cible cylindrique est traitee en langage symbolique FORTRAN. (auteur)

  13. "SMART": A Compact and Handy FORTRAN Code for the Physics of Stellar Atmospheres

    Science.gov (United States)

    Sapar, A.; Poolamäe, R.

    2003-01-01

    A new computer code SMART (Spectra from Model Atmospheres by Radiative Transfer) for computing the stellar spectra, forming in plane-parallel atmospheres, has been compiled by us and A. Aret. To guarantee wide compatibility of the code with shell environment, we chose FORTRAN-77 as programming language and tried to confine ourselves to common part of its numerous versions both in WINDOWS and LINUX. SMART can be used for studies of several processes in stellar atmospheres. The current version of the programme is undergoing rapid changes due to our goal to elaborate a simple, handy and compact code. Instead of linearisation (being a mathematical method of recurrent approximations) we propose to use the physical evolutionary changes or in other words relaxation of quantum state populations rates from LTE to NLTE has been studied using small number of NLTE states. This computational scheme is essentially simpler and more compact than the linearisation. This relaxation scheme enables using instead of the Λ-iteration procedure a physically changing emissivity (or the source function) which incorporates in itself changing Menzel coefficients for NLTE quantum state populations. However, the light scattering on free electrons is in the terms of Feynman graphs a real second-order quantum process and cannot be reduced to consequent processes of absorption and emission as in the case of radiative transfer in spectral lines. With duly chosen input parameters the code SMART enables computing radiative acceleration to the matter of stellar atmosphere in turbulence clumps. This also enables to connect the model atmosphere in more detail with the problem of the stellar wind triggering. Another problem, which has been incorporated into the computer code SMART, is diffusion of chemical elements and their isotopes in the atmospheres of chemically peculiar (CP) stars due to usual radiative acceleration and the essential additional acceleration generated by the light-induced drift. As

  14. Operations analysis (study 2.1). Program SEPSIM (solar electric propulsion stage simulation). [in FORTRAN: space tug

    Science.gov (United States)

    Lang, T. J.

    1974-01-01

    Program SEPSIM is a FORTRAN program which performs deployment, servicing, and retrieval missions to synchronous equatorial orbit using a space tug with a continuous low thrust upper stage known as a solar electric propulsion stage (SEPS). The SEPS ferries payloads back and forth between an intermediate orbit and synchronous orbit, and performs the necessary servicing maneuvers in synchronous orbit. The tug carries payloads between the orbiter and the intermediate orbit, deploys fully fueled SEPS vehicles, and retrieves exhausted SEPS vehicles when, and if, required. The program is presently contained in subroutine form in the Logistical On-orbit VEhicle Servicing (LOVES) Program, but can also be run independently with the addition of a simple driver program.

  15. Development of three-dimensional neoclassical transport simulation code with high performance Fortran on a vector-parallel computer

    International Nuclear Information System (INIS)

    Satake, Shinsuke; Okamoto, Masao; Nakajima, Noriyoshi; Takamaru, Hisanori

    2005-11-01

    A neoclassical transport simulation code (FORTEC-3D) applicable to three-dimensional configurations has been developed using High Performance Fortran (HPF). Adoption of computing techniques for parallelization and a hybrid simulation model to the δf Monte-Carlo method transport simulation, including non-local transport effects in three-dimensional configurations, makes it possible to simulate the dynamism of global, non-local transport phenomena with a self-consistent radial electric field within a reasonable computation time. In this paper, development of the transport code using HPF is reported. Optimization techniques in order to achieve both high vectorization and parallelization efficiency, adoption of a parallel random number generator, and also benchmark results, are shown. (author)

  16. HTCAP: a FORTRAN IV program for calculating coated-particle operating temperatures in HFIR target irradiation experiments

    International Nuclear Information System (INIS)

    Kania, M.J.

    1976-05-01

    A description is presented of HTCAP, a computer code that calculates in-reactor operating temperatures of loose coated ThO 2 particles in the HFIR target series of irradiation tests. Three computational models are employed to determine the following: (1) fission heat generation rates, (2) capsule heat transfer analysis, and (3) maximum particle surface temperature within the design of an HT capsule. Maximum particle operating temperatures are calculated at daily intervals during each irradiation cycle. The application of HTCAP to sleeve CP-62 of HT-15 is discussed, and the results are compared with those obtained in an earlier thermal analysis on the same capsule. Agreement is generally within +-5 percent, while decreasing the computational time by more than an order of magnitude. A complete FORTRAN listing and summary of required input data are presented in appendices. Included is a listing of the input data and a tabular output from the thermal analysis of sleeve CP-62 of HT-15

  17. Java/JNI/C/Fortran makefile project for a Java plug-in and related Android app in Eclipse ADT bundle : A side-by-side comparison

    NARCIS (Netherlands)

    De Beer, R.; Van Ormondt, D.

    2015-01-01

    We have developed a Java/Fortran based application, called MonteCarlo, that enables the users can carry out Monte Carlo studies in the field of in vivo MRS. The application is supposed to be used as a tool for the jMRUI platform, being the in vivo MRS software system of the TRANSACT European Union

  18. Final Report, Center for Programming Models for Scalable Parallel Computing: Co-Array Fortran, Grant Number DE-FC02-01ER25505

    Energy Technology Data Exchange (ETDEWEB)

    Robert W. Numrich

    2008-04-22

    The major accomplishment of this project is the production of CafLib, an 'object-oriented' parallel numerical library written in Co-Array Fortran. CafLib contains distributed objects such as block vectors and block matrices along with procedures, attached to each object, that perform basic linear algebra operations such as matrix multiplication, matrix transpose and LU decomposition. It also contains constructors and destructors for each object that hide the details of data decomposition from the programmer, and it contains collective operations that allow the programmer to calculate global reductions, such as global sums, global minima and global maxima, as well as vector and matrix norms of several kinds. CafLib is designed to be extensible in such a way that programmers can define distributed grid and field objects, based on vector and matrix objects from the library, for finite difference algorithms to solve partial differential equations. A very important extra benefit that resulted from the project is the inclusion of the co-array programming model in the next Fortran standard called Fortran 2008. It is the first parallel programming model ever included as a standard part of the language. Co-arrays will be a supported feature in all Fortran compilers, and the portability provided by standardization will encourage a large number of programmers to adopt it for new parallel application development. The combination of object-oriented programming in Fortran 2003 with co-arrays in Fortran 2008 provides a very powerful programming model for high-performance scientific computing. Additional benefits from the project, beyond the original goal, include a programto provide access to the co-array model through access to the Cray compiler as a resource for teaching and research. Several academics, for the first time, included the co-array model as a topic in their courses on parallel computing. A separate collaborative project with LANL and PNNL showed how to

  19. A fortran program for elastic scattering of deuterons with an optical model containing tensorial potentials; Programme fortran pour la diffusion elastique de deutons avec un modele optique contenant des termes tensoriels

    Energy Technology Data Exchange (ETDEWEB)

    Raynal, J. [Commissariat a l' Energie Atomique, Saclay (France). Centre d' Etudes Nucleaires

    1963-07-01

    The optical model has been applied with success to the elastic scattering of particles of spin 0 and 1/2 and to a lesser degree to that of deuterons. For particles of spin l/2, an LS coupling term is ordinarily used; this term is necessary to obtain a polarization; for deuterons, this coupling has been already introduced, but the possible forms of potentials are more numerous (in this case, scalar products of a second rank spin tensor with a tensor of the same rank in space or momentum can occur). These terms which may be necessary are primarily important for the tensor polarization. This problem is of particular interest at Saclay since a beam of polarized deuterons has become available. The FORTRAN program SPM 037 permits the study of the effect of tensorial potentials constructed from the distance of the deuteron from the target and its angular momentum with respect to it. This report should make possible the use and even the modification of the program. It consists of: a description of the problem and of the notation employed, a presentation of the methods adopted, an indication of the necessary data and how they should be introduced, and finally tables of symbols which are in equivalence or common statements: these tables must be considered when making any modification. (author) [French] Le modele optique a ete applique avec succes a la diffusion elastique des particules de spin nul et 1/2 et dans une moindre mesure a celle des deutons. Pour les particules de spin 1/2, on utilise habituellement un couplage LS, necessaire pour calculer la polarisation; pour les deutons, ce couplage a deja ete introduit, mais les formes de potentiel possibles sont plus nombreuses (intervention de produits scalaires d'un tenseur d'ordre 2 de spin avec un tenseur du meme ordre d'espace ou d'impulsion) et celles qui peuvent etre eventuellement necessaires ont une importance capitale pour la polarisation tensorielle. Ce probleme revet a Saclay un interet

  20. A fortran program for elastic scattering of deuterons with an optical model containing tensorial potentials; Programme fortran pour la diffusion elastique de deutons avec un modele optique contenant des termes tensoriels

    Energy Technology Data Exchange (ETDEWEB)

    Raynal, J [Commissariat a l' Energie Atomique, Saclay (France). Centre d' Etudes Nucleaires

    1963-07-01

    The optical model has been applied with success to the elastic scattering of particles of spin 0 and 1/2 and to a lesser degree to that of deuterons. For particles of spin l/2, an LS coupling term is ordinarily used; this term is necessary to obtain a polarization; for deuterons, this coupling has been already introduced, but the possible forms of potentials are more numerous (in this case, scalar products of a second rank spin tensor with a tensor of the same rank in space or momentum can occur). These terms which may be necessary are primarily important for the tensor polarization. This problem is of particular interest at Saclay since a beam of polarized deuterons has become available. The FORTRAN program SPM 037 permits the study of the effect of tensorial potentials constructed from the distance of the deuteron from the target and its angular momentum with respect to it. This report should make possible the use and even the modification of the program. It consists of: a description of the problem and of the notation employed, a presentation of the methods adopted, an indication of the necessary data and how they should be introduced, and finally tables of symbols which are in equivalence or common statements: these tables must be considered when making any modification. (author) [French] Le modele optique a ete applique avec succes a la diffusion elastique des particules de spin nul et 1/2 et dans une moindre mesure a celle des deutons. Pour les particules de spin 1/2, on utilise habituellement un couplage LS, necessaire pour calculer la polarisation; pour les deutons, ce couplage a deja ete introduit, mais les formes de potentiel possibles sont plus nombreuses (intervention de produits scalaires d'un tenseur d'ordre 2 de spin avec un tenseur du meme ordre d'espace ou d'impulsion) et celles qui peuvent etre eventuellement necessaires ont une importance capitale pour la polarisation tensorielle. Ce probleme revet a Saclay un interet particulier depuis la mise

  1. Thermal-hydraulic Fortran program for steady-state calculations of plate-type fuel research reactors

    Directory of Open Access Journals (Sweden)

    Khedr Ahmed

    2008-01-01

    Full Text Available The safety assessment of research and power reactors is a continuous process covering their lifespan and requiring verified and validated codes. Power reactor codes all over the world are well established and qualified against real measuring data and qualified experimental facilities. These codes are usually sophisticated, require special skills and consume a lot of running time. On the other hand, most research reactor codes still require much more data for validation and qualification. It is, therefore, of benefit to any regulatory body to develop its own codes for the review and assessment of research reactors. The present paper introduces a simple, one-dimensional Fortran program called THDSN for steady-state thermal-hydraulic calculations of plate-type fuel research reactors. Besides calculating the fuel and coolant temperature distributions and pressure gradients in an average and hot channel, the program calculates the safety limits and margins against the critical phenomena encountered in research reactors, such as the onset of nucleate boiling, critical heat flux and flow instability. Well known thermal-hydraulic correlations for calculating the safety parameters and several formulas for the heat transfer coefficient have been used. The THDSN program was verified by comparing its results for 2 and 10 MW benchmark reactors with those published in IAEA publications and a good agreement was found. Also, the results of the program are compared with those published for other programs, such as the PARET and TERMIC.

  2. Evaluation of ΔGsub(f) values for unstable compounds: a Fortran program for the calculation of ternary phase equilibria

    International Nuclear Information System (INIS)

    Throop, G.J.; Rogl, P.; Rudy, E.

    1978-01-01

    A Fortran IV program was set up for the calculation of phase equilibria and tieline distributions in ternary systems of the type: transition metal-transition metal-nonmetal (interstitial type of solid solutions). The method offers the possibility of determining the thermodynamic values for unstable compounds through their influence upon ternary phase equilibria. The variation of the free enthalpy of formation of ternary solid solutions is calculated as a function of nonmetal content, thus describing the actual curvature of the phase boundaries. The integral and partial molar free enthalpies of formation of binary nonstoichiometric compounds and of phase solutions are expressed as analytical functions of the nonmetal content within their homogeneity range. The coefficient of these analytical expressions are obtained by the use either of the Wagner-Schottky vacancy model or polynomials second order in composition (parabolic approach). The free energy of formation, ΔGsub(f) has been calculated for the systems Ti-C, Zr-C, and Ta-C. Calculations of the ternary phase equilibria yielded the values for ΔGsub(f) for the unstable compounds Ti 2 C at 1500 0 C and Zr 2 C at 1775 0 C of -22.3 and 22.7 kcal g atom metal respectively. These values were used for the calculation of isothermal sections within the ternary systems Ti-Ta-C (at 1500 0 C) and Zr-Ta-C (at 1775 0 C). The ideal case of ternary phase solutions is extended to regular solutions. (author)

  3. A Fortran 77 computer code for damped least-squares inversion of Slingram electromagnetic anomalies over thin tabular conductors

    Science.gov (United States)

    Dondurur, Derman; Sarı, Coşkun

    2004-07-01

    A FORTRAN 77 computer code is presented that permits the inversion of Slingram electromagnetic anomalies to an optimal conductor model. Damped least-squares inversion algorithm is used to estimate the anomalous body parameters, e.g. depth, dip and surface projection point of the target. Iteration progress is controlled by maximum relative error value and iteration continued until a tolerance value was satisfied, while the modification of Marquardt's parameter is controlled by sum of the squared errors value. In order to form the Jacobian matrix, the partial derivatives of theoretical anomaly expression with respect to the parameters being optimised are calculated by numerical differentiation by using first-order forward finite differences. A theoretical and two field anomalies are inserted to test the accuracy and applicability of the present inversion program. Inversion of the field data indicated that depth and the surface projection point parameters of the conductor are estimated correctly, however, considerable discrepancies appeared on the estimated dip angles. It is therefore concluded that the most important factor resulting in the misfit between observed and calculated data is due to the fact that the theory used for computing Slingram anomalies is valid for only thin conductors and this assumption might have caused incorrect dip estimates in the case of wide conductors.

  4. Calculation of Absorbed Glandular Dose using a FORTRAN Program Based on Monte Carlo X-ray Spectra in Mammography

    Directory of Open Access Journals (Sweden)

    Ali Asghar Mowlavi

    2011-03-01

    Full Text Available Introduction: Average glandular dose calculation in mammography with Mo-Rh target-filter and dose calculation for different situations is accurate and fast. Material and Methods: In this research, first of all, x-ray spectra of a Mo target bombarded by a 28 keV electron beam with and without a Rh filter were calculated using the MCNP code. Then, we used the Sobol-Wu parameters to write a FORTRAN code to calculate average glandular dose. Results: Average glandular dose variation was calculated against the voltage of the mammographic x-ray tube for d = 5 cm, HVL= 0.35 mm Al, and different value of g. Also, the results related to average glandular absorbed dose variation per unit roentgen radiation against the glandular fraction of breast tissue for kV = 28 and HVL = 0.400 mmAl and different values of d are presented. Finally, average glandular dose against d for g = 60% and three values of kV (23, 27, 35 kV with corresponding HVLs have been calculated. Discussion and Conclusion: The absorbed dose computational program is accurate, complete, fast and user friendly. This program can be used for optimization of exposure dose in mammography. Also, the results of this research are in good agreement with the computational results of others.

  5. Domain-Specific Acceleration and Auto-Parallelization of Legacy Scientific Code in FORTRAN 77 using Source-to-Source Compilation

    OpenAIRE

    Vanderbauwhede, Wim; Davidson, Gavin

    2017-01-01

    Massively parallel accelerators such as GPGPUs, manycores and FPGAs represent a powerful and affordable tool for scientists who look to speed up simulations of complex systems. However, porting code to such devices requires a detailed understanding of heterogeneous programming tools and effective strategies for parallelization. In this paper we present a source to source compilation approach with whole-program analysis to automatically transform single-threaded FORTRAN 77 legacy code into Ope...

  6. Comprehensive Performance Evaluation for Hydrological and Nutrients Simulation Using the Hydrological Simulation Program–Fortran in a Mesoscale Monsoon Watershed, China

    OpenAIRE

    Zhaofu Li; Chuan Luo; Kaixia Jiang; Rongrong Wan; Hengpeng Li

    2017-01-01

    The Hydrological Simulation Program–Fortran (HSPF) is a hydrological and water quality computer model that was developed by the United States Environmental Protection Agency. Comprehensive performance evaluations were carried out for hydrological and nutrient simulation using the HSPF model in the Xitiaoxi watershed in China. Streamflow simulation was calibrated from 1 January 2002 to 31 December 2007 and then validated from 1 January 2008 to 31 December 2010 using daily observed data, and nu...

  7. Aviation Safety Modeling and Simulation (ASMM) Propulsion Fleet Modeling: A Tool for Semi-Automatic Construction of CORBA-based Applications from Legacy Fortran Programs

    Science.gov (United States)

    Sang, Janche

    2003-01-01

    Within NASA's Aviation Safety Program, NASA GRC participates in the Modeling and Simulation Project called ASMM. NASA GRC s focus is to characterize the propulsion systems performance from a fleet management and maintenance perspective by modeling and through simulation predict the characteristics of two classes of commercial engines (CFM56 and GE90). In prior years, the High Performance Computing and Communication (HPCC) program funded, NASA Glenn in developing a large scale, detailed simulations for the analysis and design of aircraft engines called the Numerical Propulsion System Simulation (NPSS). Three major aspects of this modeling included the integration of different engine components, coupling of multiple disciplines, and engine component zooming at appropriate level fidelity, require relatively tight coupling of different analysis codes. Most of these codes in aerodynamics and solid mechanics are written in Fortran. Refitting these legacy Fortran codes with distributed objects can increase these codes reusability. Aviation Safety s modeling and simulation use in characterizing fleet management has similar needs. The modeling and simulation of these propulsion systems use existing Fortran and C codes that are instrumental in determining the performance of the fleet. The research centers on building a CORBA-based development environment for programmers to easily wrap and couple legacy Fortran codes. This environment consists of a C++ wrapper library to hide the details of CORBA and an efficient remote variable scheme to facilitate data exchange between the client and the server model. Additionally, a Web Service model should also be constructed for evaluation of this technology s use over the next two- three years.

  8. Characterizing Flow and Suspended Sediment Trends in the Sacramento River Basin, CA Using Hydrologic Simulation Program - FORTRAN (HSPF)

    Science.gov (United States)

    Stern, M. A.; Flint, L. E.; Flint, A. L.; Wright, S. A.; Minear, J. T.

    2014-12-01

    A watershed model of the Sacramento River Basin, CA was developed to simulate streamflow and suspended sediment transport to the San Francisco Bay Delta (SFBD) for fifty years (1958-2008) using the Hydrological Simulation Program - FORTRAN (HSPF). To compensate for the large model domain and sparse data, rigorous meteorological development and characterization of hydraulic geometry were employed to spatially distribute climate and hydrologic processes in unmeasured locations. Parameterization techniques sought to include known spatial information for tributaries such as soil information and slope, and then parameters were scaled up or down during calibration to retain the spatial characteristics of the land surface in un-gaged areas. Accuracy was assessed by comparing model calibration to measured streamflow. Calibration and validation of the Sacramento River ranged from "good" to "very good" performance based upon a "goodness-of-fit" statistical guideline. Model calibration to measured sediment loads were underestimated on average by 39% for the Sacramento River, and model calibration to suspended sediment concentrations were underestimated on average by 22% for the Sacramento River. Sediment loads showed a slight decreasing trend from 1958-2008 and was significant (p < 0.0025) in the lower 50% of stream flows. Hypothetical climate change scenarios were developed using the Climate Assessment Tool (CAT). Several wet and dry scenarios coupled with temperature increases were imposed on the historical base conditions to evaluate sensitivity of streamflow and sediment on potential changes in climate. Wet scenarios showed an increase of 9.7 - 17.5% in streamflow, a 7.6 - 17.5% increase in runoff, and a 30 - 93% increase in sediment loads. The dry scenarios showed a roughly 5% decrease in flow and runoff, and a 16 - 18% decrease in sediment loads. The base hydrology was most sensitive to a temperature increase of 1.5 degrees Celsius and an increase in storm intensity and

  9. Creating User-Friendly Tools for Data Analysis and Visualization in K-12 Classrooms: A Fortran Dinosaur Meets Generation Y

    Science.gov (United States)

    Chambers, L. H.; Chaudhury, S.; Page, M. T.; Lankey, A. J.; Doughty, J.; Kern, Steven; Rogerson, Tina M.

    2008-01-01

    During the summer of 2007, as part of the second year of a NASA-funded project in partnership with Christopher Newport University called SPHERE (Students as Professionals Helping Educators Research the Earth), a group of undergraduate students spent 8 weeks in a research internship at or near NASA Langley Research Center. Three students from this group formed the Clouds group along with a NASA mentor (Chambers), and the brief addition of a local high school student fulfilling a mentorship requirement. The Clouds group was given the task of exploring and analyzing ground-based cloud observations obtained by K-12 students as part of the Students' Cloud Observations On-Line (S'COOL) Project, and the corresponding satellite data. This project began in 1997. The primary analysis tools developed for it were in FORTRAN, a computer language none of the students were familiar with. While they persevered through computer challenges and picky syntax, it eventually became obvious that this was not the most fruitful approach for a project aimed at motivating K-12 students to do their own data analysis. Thus, about halfway through the summer the group shifted its focus to more modern data analysis and visualization tools, namely spreadsheets and Google(tm) Earth. The result of their efforts, so far, is two different Excel spreadsheets and a Google(tm) Earth file. The spreadsheets are set up to allow participating classrooms to paste in a particular dataset of interest, using the standard S'COOL format, and easily perform a variety of analyses and comparisons of the ground cloud observation reports and their correspondence with the satellite data. This includes summarizing cloud occurrence and cloud cover statistics, and comparing cloud cover measurements from the two points of view. A visual classification tool is also provided to compare the cloud levels reported from the two viewpoints. This provides a statistical counterpart to the existing S'COOL data visualization tool

  10. On the tradeoffs of programming language choice for numerical modelling in geoscience. A case study comparing modern Fortran, C++/Blitz++ and Python/NumPy.

    Science.gov (United States)

    Jarecka, D.; Arabas, S.; Fijalkowski, M.; Gaynor, A.

    2012-04-01

    The language of choice for numerical modelling in geoscience has long been Fortran. A choice of a particular language and coding paradigm comes with different set of tradeoffs such as that between performance, ease of use (and ease of abuse), code clarity, maintainability and reusability, availability of open source compilers, debugging tools, adequate external libraries and parallelisation mechanisms. The availability of trained personnel and the scale and activeness of the developer community is of importance as well. We present a short comparison study aimed at identification and quantification of these tradeoffs for a particular example of an object oriented implementation of a parallel 2D-advection-equation solver in Python/NumPy, C++/Blitz++ and modern Fortran. The main angles of comparison will be complexity of implementation, performance of various compilers or interpreters and characterisation of the "added value" gained by a particular choice of the language. The choice of the numerical problem is dictated by the aim to make the comparison useful and meaningful to geoscientists. Python is chosen as a language that traditionally is associated with ease of use, elegant syntax but limited performance. C++ is chosen for its traditional association with high performance but even higher complexity and syntax obscurity. Fortran is included in the comparison for its widespread use in geoscience often attributed to its performance. We confront the validity of these traditional views. We point out how the usability of a particular language in geoscience depends on the characteristics of the language itself and the availability of pre-existing software libraries (e.g. NumPy, SciPy, PyNGL, PyNIO, MPI4Py for Python and Blitz++, Boost.Units, Boost.MPI for C++). Having in mind the limited complexity of the considered numerical problem, we present a tentative comparison of performance of the three implementations with different open source compilers including CPython and

  11. A FORTRAN-compatible program package for the control of CAMAC-systems by a PDP-11 (CA11-A/DEC, Type 1533A/BORER)

    International Nuclear Information System (INIS)

    Lengauer, C.

    1975-01-01

    The described software serves for the control of CAMAC-systems by a PDP-11 Computer with one DEC CA11-A Branch-Driver, respectively up to ten BORER Type 1533A Single-Crate-Controllers under the Operating System DOS V08. The software consists of three parts: 1) a subroutine library for programming in FORTRAN, 2) a macro library for programming in Assembler (for time-critical problems), 3) a loadable CAMAC-Driver for controlling the system by input of single CAMAC-commands at the terminal. Programs which apply the first two parts can be written independently of the CAMAC-Controller used at runtime. (orig.) [de

  12. PNP2 calculus programme for interpretation of the experimental data by pulsed source neutrons methods. (Pt. 1). [Fortran IV for ICT 1900

    Energy Technology Data Exchange (ETDEWEB)

    Fratiloiu, C; Cristea, Gh

    1975-01-01

    PNP2 is a calculation programme destined to the interpretation of the experimental data by the pulsed source neutrons method on multiplyer environments into critic or subcritic state, populated with thermal neutrons. The programme is elaborate in the FORTRAN IV language of the ICT 1900 computer. The variation form in time of the thermal neutrons population for the multiplyer environments as a result of this whipping to the moments t=KT, with pockets of neutrons, appearing in the simplified theory of the pulsed source neutrons method. By this process are determinated the quantities Nsub(..cap alpha..), ..cap alpha.., Nsub(r) and B as well as empiric variants which affect these magnitudes. With these quantities is calculated the reactivity in relative units.

  13. Parallel Fortran-MPI software for numerical inversion of the Laplace transform and its application to oscillatory water levels in groundwater environments

    Science.gov (United States)

    Zhan, X.

    2005-01-01

    A parallel Fortran-MPI (Message Passing Interface) software for numerical inversion of the Laplace transform based on a Fourier series method is developed to meet the need of solving intensive computational problems involving oscillatory water level's response to hydraulic tests in a groundwater environment. The software is a parallel version of ACM (The Association for Computing Machinery) Transactions on Mathematical Software (TOMS) Algorithm 796. Running 38 test examples indicated that implementation of MPI techniques with distributed memory architecture speedups the processing and improves the efficiency. Applications to oscillatory water levels in a well during aquifer tests are presented to illustrate how this package can be applied to solve complicated environmental problems involved in differential and integral equations. The package is free and is easy to use for people with little or no previous experience in using MPI but who wish to get off to a quick start in parallel computing. ?? 2004 Elsevier Ltd. All rights reserved.

  14. Exshall: A Turkel-Zwas explicit large time-step FORTRAN program for solving the shallow-water equations in spherical coordinates

    Science.gov (United States)

    Navon, I. M.; Yu, Jian

    A FORTRAN computer program is presented and documented applying the Turkel-Zwas explicit large time-step scheme to a hemispheric barotropic model with constraint restoration of integral invariants of the shallow-water equations. We then proceed to detail the algorithms embodied in the code EXSHALL in this paper, particularly algorithms related to the efficiency and stability of T-Z scheme and the quadratic constraint restoration method which is based on a variational approach. In particular we provide details about the high-latitude filtering, Shapiro filtering, and Robert filtering algorithms used in the code. We explain in detail the various subroutines in the EXSHALL code with emphasis on algorithms implemented in the code and present the flowcharts of some major subroutines. Finally, we provide a visual example illustrating a 4-day run using real initial data, along with a sample printout and graphic isoline contours of the height field and velocity fields.

  15. Electron - A fortran programme for the coupled channel calculation of nuclear electromagnetic (e,e') form factors and cross sections in the self-consistent random-phase approximation

    International Nuclear Information System (INIS)

    Cavinato, M.; Marangoni, M.; Saruis, A.M.

    1984-01-01

    Description is given of the Electron programme for IBM 370/168 computer, written in Fortran 4. language. The programme calculates (e,e') cross-sections and longitudinal/transverse form factors for closed shell nuclei in the framework of a self-consistent RPA theory

  16. OFF, Open source Finite volume Fluid dynamics code: A free, high-order solver based on parallel, modular, object-oriented Fortran API

    Science.gov (United States)

    Zaghi, S.

    2014-07-01

    OFF, an open source (free software) code for performing fluid dynamics simulations, is presented. The aim of OFF is to solve, numerically, the unsteady (and steady) compressible Navier-Stokes equations of fluid dynamics by means of finite volume techniques: the research background is mainly focused on high-order (WENO) schemes for multi-fluids, multi-phase flows over complex geometries. To this purpose a highly modular, object-oriented application program interface (API) has been developed. In particular, the concepts of data encapsulation and inheritance available within Fortran language (from standard 2003) have been stressed in order to represent each fluid dynamics "entity" (e.g. the conservative variables of a finite volume, its geometry, etc…) by a single object so that a large variety of computational libraries can be easily (and efficiently) developed upon these objects. The main features of OFF can be summarized as follows: Programming LanguageOFF is written in standard (compliant) Fortran 2003; its design is highly modular in order to enhance simplicity of use and maintenance without compromising the efficiency; Parallel Frameworks Supported the development of OFF has been also targeted to maximize the computational efficiency: the code is designed to run on shared-memory multi-cores workstations and distributed-memory clusters of shared-memory nodes (supercomputers); the code's parallelization is based on Open Multiprocessing (OpenMP) and Message Passing Interface (MPI) paradigms; Usability, Maintenance and Enhancement in order to improve the usability, maintenance and enhancement of the code also the documentation has been carefully taken into account; the documentation is built upon comprehensive comments placed directly into the source files (no external documentation files needed): these comments are parsed by means of doxygen free software producing high quality html and latex documentation pages; the distributed versioning system referred as git

  17. SAMPO, A Fortran IV Program for Computer Analysis of Gamma Spectrafrom Ge(Li) Detectors, and for Other Spectra with Peaks

    Energy Technology Data Exchange (ETDEWEB)

    Routti, Jorma T.

    1969-10-20

    SAMPO is a Fortran IV program written to perform the data- reduction analysis described by J. T. Routti and S. G. Prussin in Photopeak Method for the Computer Analysis of Gamma-Ray Spectra from Semiconductor Detectors, Nuclear Instruments and Methods 72, 125-142 (1969). The code has also been used to analyze other spectra with peaks and continua. Program SAMPO can be used for an automatic off-line or an interactive on-line analysis. It includes algorithms for line-shape, energy, and efficiency calibrations, and peak-search and peak-fitting routines. Different options are available to make the code applicable to accurate nuclear spectroscopic work as well as to routine data reduction. The mathematical methods and their coding are briefly described. Instructions for using the program and for preparing input data are given and the optimal strategies for running the code are discussed. Instructions are given for using the LRL program library version of SAMPO and for obtaining source decks.

  18. A novel auto-correlation function method and FORTRAN codes for the determination of the decay ratio in BWR stability analysis

    International Nuclear Information System (INIS)

    Behringer, K.

    2001-08-01

    A novel auto-correlation function (ACF) method has been investigated for determining the oscillation frequency and the decay ratio in BWR stability analyses. The report describes not only the method but also documents comprehensively the used and developed FORTRAN codes. The neutron signals are band-pass filtered to separate the oscillation peak in the power spectral density (PSD) from background. Two linear second-order oscillation models are considered. The ACF of each model, corrected for signal filtering and with the inclusion of a background term under the peak in the PSD, is then least-squares fitted to the ACF estimated on the previously filtered neutron signals, in order to determine the oscillation frequency and the decay ratio. The procedures of filtering and ACF estimation use fast Fourier transform techniques with signal segmentation. Gliding 'short-time' ACF estimates along a signal record allow the evaluation of uncertainties. Some numerical results are given which have been obtained from neutron signal data offered by the recent Forsmark I and Forsmark II NEA benchmark project. They are compared with those from other benchmark participants using different other analysis methods. (author)

  19. GASCON and MHDGAS: FORTRAN IV computer codes for calculating gas and condensed-phase compositions in the coal-fired open-cycle MHD system

    Energy Technology Data Exchange (ETDEWEB)

    Blackburn, P E

    1977-12-01

    Fortran IV computer codes have been written to calculate the equilibrium partial pressures of the gaseous phase and the quantity and composition of the condensed phases in the open-cycle MHD system. The codes are based on temperature-dependent equilibrium constants, mass conservation, the mass action law, and assumed ideal solution of compounds in each of two condensed phases. It is assumed that the phases are an oxide-silicate phase and a sulfate-carbonate-hydroxide phase. Calculations are iterated for gas and condensate concentrations while increasing or decreasing the total moles of elements, but keeping mole ratios constant, to achieve the desired total pressure. During iteration the oxygen partial pressure is incrementally changed. The decision to increase or decrease the oxygen pressure in this process depends on comparison of the oxygen content calculated in the gas and condensate phases with the initial amount of oxygen in the ash, coal, seed, and air. This process, together with a normalization step, allows the elements to converge to their initial quantities. Two versions of the computer code have been written. GASCON calculates the equilibrium gas partial pressures and the quantity and composition of the condensed phases in steps of thirteen temperature and pressure combinations in which the condensate is removed after each step, simulating continuous slag removal from the MHD system. MHDGAS retains the condensate for each step, simulating flow of condensate (and gas) through the MHD system.

  20. Calibration parameters used to simulate streamflow from application of the Hydrologic Simulation Program-FORTRAN Model (HSPF) to mountainous basins containing coal mines in West Virginia

    Science.gov (United States)

    Atkins, John T.; Wiley, Jeffrey B.; Paybins, Katherine S.

    2005-01-01

    This report presents the Hydrologic Simulation Program-FORTRAN Model (HSPF) parameters for eight basins in the coal-mining region of West Virginia. The magnitude and characteristics of model parameters from this study will assist users of HSPF in simulating streamflow at other basins in the coal-mining region of West Virginia. The parameter for nominal capacity of the upper-zone storage, UZSN, increased from south to north. The increase in UZSN with the increase in basin latitude could be due to decreasing slopes, decreasing rockiness of the soils, and increasing soil depths from south to north. A special action was given to the parameter for fraction of ground-water inflow that flows to inactive ground water, DEEPFR. The basis for this special action was related to the seasonal movement of the water table and transpiration from trees. The models were most sensitive to DEEPFR and the parameter for interception storage capacity, CEPSC. The models were also fairly sensitive to the parameter for an index representing the infiltration capacity of the soil, INFILT; the parameter for indicating the behavior of the ground-water recession flow, KVARY; the parameter for the basic ground-water recession rate, AGWRC; the parameter for nominal capacity of the upper zone storage, UZSN; the parameter for the interflow inflow, INTFW; the parameter for the interflow recession constant, IRC; and the parameter for lower zone evapotranspiration, LZETP.

  1. TRIGRS - A Fortran Program for Transient Rainfall Infiltration and Grid-Based Regional Slope-Stability Analysis, Version 2.0

    Science.gov (United States)

    Baum, Rex L.; Savage, William Z.; Godt, Jonathan W.

    2008-01-01

    The Transient Rainfall Infiltration and Grid-Based Regional Slope-Stability Model (TRIGRS) is a Fortran program designed for modeling the timing and distribution of shallow, rainfall-induced landslides. The program computes transient pore-pressure changes, and attendant changes in the factor of safety, due to rainfall infiltration. The program models rainfall infiltration, resulting from storms that have durations ranging from hours to a few days, using analytical solutions for partial differential equations that represent one-dimensional, vertical flow in isotropic, homogeneous materials for either saturated or unsaturated conditions. Use of step-function series allows the program to represent variable rainfall input, and a simple runoff routing model allows the user to divert excess water from impervious areas onto more permeable downslope areas. The TRIGRS program uses a simple infinite-slope model to compute factor of safety on a cell-by-cell basis. An approximate formula for effective stress in unsaturated materials aids computation of the factor of safety in unsaturated soils. Horizontal heterogeneity is accounted for by allowing material properties, rainfall, and other input values to vary from cell to cell. This command-line program is used in conjunction with geographic information system (GIS) software to prepare input grids and visualize model results.

  2. SIOB: a FORTRAN code for least-squares shape fitting several neutron transmission measurements using the Breit--Wigner multilevel formula. [For IBM-360/91

    Energy Technology Data Exchange (ETDEWEB)

    de Saussure, G.; Olsen, D. K.; Perez, R. B.

    1978-05-01

    The FORTRAN-IV code SIOB was developed to least-square fit the shape of neutron transmission curves. Any number of measurements on a common energy scale for different sample thicknesses can be simultaneously fitted. The computed transmission curves can be broadened with either a Gaussian or a rectangular resolution function or both, with the resolution width a function of energy. The total cross section is expressed as a sum of single-level or multilevel Breit--Wigner terms and Doppler broadened by using the fast interpolation routine QUICKW. The number of data points, resonance levels, and variables which can be handled simultaneously is only limited by the overall dimensions of two arrays in the program and by the stability of the matrix inversion. In a test problem seven transmissions each with 3750 data points were simultaneously fitted with 74 resonances and 110 variable parameters. The problem took 47 min of CPU time on an IBM-360/91, for 3 iterations. 3 figures, 2 tables.

  3. A novel auto-correlation function method and FORTRAN codes for the determination of the decay ratio in BWR stability analysis

    Energy Technology Data Exchange (ETDEWEB)

    Behringer, K

    2001-08-01

    A novel auto-correlation function (ACF) method has been investigated for determining the oscillation frequency and the decay ratio in BWR stability analyses. The report describes not only the method but also documents comprehensively the used and developed FORTRAN codes. The neutron signals are band-pass filtered to separate the oscillation peak in the power spectral density (PSD) from background. Two linear second-order oscillation models are considered. The ACF of each model, corrected for signal filtering and with the inclusion of a background term under the peak in the PSD, is then least-squares fitted to the ACF estimated on the previously filtered neutron signals, in order to determine the oscillation frequency and the decay ratio. The procedures of filtering and ACF estimation use fast Fourier transform techniques with signal segmentation. Gliding 'short-time' ACF estimates along a signal record allow the evaluation of uncertainties. Some numerical results are given which have been obtained from neutron signal data offered by the recent Forsmark I and Forsmark II NEA benchmark project. They are compared with those from other benchmark participants using different other analysis methods. (author)

  4. Comprehensive Performance Evaluation for Hydrological and Nutrients Simulation Using the Hydrological Simulation Program-Fortran in a Mesoscale Monsoon Watershed, China.

    Science.gov (United States)

    Li, Zhaofu; Luo, Chuan; Jiang, Kaixia; Wan, Rongrong; Li, Hengpeng

    2017-12-19

    The Hydrological Simulation Program-Fortran (HSPF) is a hydrological and water quality computer model that was developed by the United States Environmental Protection Agency. Comprehensive performance evaluations were carried out for hydrological and nutrient simulation using the HSPF model in the Xitiaoxi watershed in China. Streamflow simulation was calibrated from 1 January 2002 to 31 December 2007 and then validated from 1 January 2008 to 31 December 2010 using daily observed data, and nutrient simulation was calibrated and validated using monthly observed data during the period from July 2009 to July 2010. These results of model performance evaluation showed that the streamflows were well simulated over the study period. The determination coefficient ( R ²) was 0.87, 0.77 and 0.63, and the Nash-Sutcliffe coefficient of efficiency (Ens) was 0.82, 0.76 and 0.65 for the streamflow simulation in annual, monthly and daily time-steps, respectively. Although limited to monthly observed data, satisfactory performance was still achieved during the quantitative evaluation for nutrients. The R ² was 0.73, 0.82 and 0.92, and the Ens was 0.67, 0.74 and 0.86 for nitrate, ammonium and orthophosphate simulation, respectively. Some issues may affect the application of HSPF were also discussed, such as input data quality, parameter values, etc. Overall, the HSPF model can be successfully used to describe streamflow and nutrients transport in the mesoscale watershed located in the East Asian monsoon climate area. This study is expected to serve as a comprehensive and systematic documentation of understanding the HSPF model for wide application and avoiding possible misuses.

  5. The CRAFT Fortran Programming Model

    Directory of Open Access Journals (Sweden)

    Douglas M. Pase

    1994-01-01

    Full Text Available Many programming models for massively parallel machines exist, and each has its advantages and disadvantages. In this article we present a programming model that combines features from other programming models that (1 can be efficiently implemented on present and future Cray Research massively parallel processor (MPP systems and (2 are useful in constructing highly parallel programs. The model supports several styles of programming: message-passing, data parallel, global address (shared data, and work-sharing. These styles may be combined within the same program. The model includes features that allow a user to define a program in terms of the behavior of the system as a whole, where the behavior of individual tasks is implicit from this systemic definition. (In general, features marked as shared are designed to support this perspective. It also supports an opposite perspective, where a program may be defined in terms of the behaviors of individual tasks, and a program is implicitly the sum of the behaviors of all tasks. (Features marked as private are designed to support this perspective. Users can exploit any combination of either set of features without ambiguity and thus are free to define a program from whatever perspective is most appropriate to the problem at hand.

  6. A FORTRAN program for the use of digital terrain elevation models of the Instituto Nacional de Estadistica, Geografia e Informatica of Mexico (INEGI); Programa en FORTRAN para el manejo de modelos digitales de elevacion del terreno del Instituto Nacional de Estadistica, Geografia e Informatica de Mexico (INEGI)

    Energy Technology Data Exchange (ETDEWEB)

    Garcia Estrada, Gerardo [Gerencia de Proyectos Geotermoelectricos de la Comision Federal de Electricidad, Morelia (Mexico)

    1996-09-01

    A FORTRAN program is presented for the use of digital terrain elevation models with raster format of the Instituto Nacional de Estadistica, Geografia e Informatica of Mexico (INEGI). This program allows the selection of a data window that can be delimited, optionally, giving the extreme coordinates in degrees, minutes and seconds or in UTM (Universal Transversal Mercator) coordinates. Digital terrain data are selected to produce an output file in SURFER binary grid format with decimal degrees coordinates. Optionally an x, y, z output file in ASCII code permits the griding with commercial software to produce a map with planar rectangular coordinates. During the window selection a simple filtering process is performed to diminish numerical errors of the original file, and if it is wanted, an undersampling can be conducted to prepare less detailed maps of great coverage. This program has been extensively tested in the Gerencia de Proyectos Geotermoelectricos de la Comision federal de Electricidad (CFE) in Mexico, where it is used to prepare base maps, automatically traced topographic profiles and boundary condition for thermal modelling. Another direct uses are the calculus of terrain and isostatic corrections for gravity studies, topographic height estimating based on known horizontal coordinates, climatic effects modelling, automatic calculus of material volumes and many more. [Espanol] Se presenta un programa FORTRAN para el uso de modelos digitales de elevacion del terreno con el formato raster del Instituto Nacional de Estadistica, Geografia e Informatica de Mexico (INEGI). El programa permite la seleccion de una ventana de datos, la cual puede elegirse optativamente dando las coordenadas extremas en coordenadas geograficas en grados, minutos y segundos o en coordenadas UTM (proyeccion Universal Transversa de Mercator). Se seleccionan los datos del modelo digital y se produce una rejilla lista para su despliegue en formato binario UTM cuyo enrejillado permite

  7. Coincidence: Fortran code for calculation of (e, e'x) differential cross-sections, nuclear structure functions and polarization asymmetry in self-consistent random phase approximation with Skyrme interaction

    Energy Technology Data Exchange (ETDEWEB)

    Cavinato, M.; Marangoni, M.; Saruis, A.M.

    1990-10-01

    This report describes the COINCIDENCE code written for the IBM 3090/300E computer in Fortran 77 language. The output data of this code are the (e, e'x) threefold differential cross-sections, the nuclear structure functions, the polarization asymmetry and the angular correlation coefficients. In the real photon limit, the output data are the angular distributions for plane polarized incident photons. The code reads from tape the transition matrix elements previously calculated, by in continuum self-consistent RPA (random phase approximation) theory with Skyrme interactions. This code has been used to perform a numerical analysis of coincidence (e, e'x) reactions with polarized electrons on the /sup 16/O nucleous.

  8. PRP: a FORTRAN IV interactive plotting program

    Science.gov (United States)

    Andrew, A. S.; Linde, J.

    A computer program, PRP, has been designed to plot any arithmetic combination selected from a set of major and trace element data on a y- x graph. y and x are defined and entered as a program string (y, x) which is interpreted sequentially. Operators ( +, -, ∗, /, ( unary) , square root, log 10, In c, antilog 10, exponential, integer, absolute value, (,),,) and integer or real numbers may be included. Axis lengths and scales are determined by the user. Five different plotting symbols are available.

  9. Development of Land Segmentation, Stream-Reach Network, and Watersheds in Support of Hydrological Simulation Program-Fortran (HSPF) Modeling, Chesapeake Bay Watershed, and Adjacent Parts of Maryland, Delaware, and Virginia

    Science.gov (United States)

    Martucci, Sarah K.; Krstolic, Jennifer L.; Raffensperger, Jeff P.; Hopkins, Katherine J.

    2006-01-01

    The U.S. Geological Survey, U.S. Environmental Protection Agency Chesapeake Bay Program Office, Interstate Commission on the Potomac River Basin, Maryland Department of the Environment, Virginia Department of Conservation and Recreation, Virginia Department of Environmental Quality, and the University of Maryland Center for Environmental Science are collaborating on the Chesapeake Bay Regional Watershed Model, using Hydrological Simulation Program - FORTRAN to simulate streamflow and concentrations and loads of nutrients and sediment to Chesapeake Bay. The model will be used to provide information for resource managers. In order to establish a framework for model simulation, digital spatial datasets were created defining the discretization of the model region (including the Chesapeake Bay watershed, as well as the adjacent parts of Maryland, Delaware, and Virginia outside the watershed) into land segments, a stream-reach network, and associated watersheds. Land segmentation was based on county boundaries represented by a 1:100,000-scale digital dataset. Fifty of the 254 counties and incorporated cities in the model region were divided on the basis of physiography and topography, producing a total of 309 land segments. The stream-reach network for the Chesapeake Bay watershed part of the model region was based on the U.S. Geological Survey Chesapeake Bay SPARROW (SPAtially Referenced Regressions On Watershed attributes) model stream-reach network. Because that network was created only for the Chesapeake Bay watershed, the rest of the model region uses a 1:500,000-scale stream-reach network. Streams with mean annual streamflow of less than 100 cubic feet per second were excluded based on attributes from the dataset. Additional changes were made to enhance the data and to allow for inclusion of stream reaches with monitoring data that were not part of the original network. Thirty-meter-resolution Digital Elevation Model data were used to delineate watersheds for each

  10. CADS: a FORTRAN subroutine package to aid symbolic dataflow in FORTRAN programs

    International Nuclear Information System (INIS)

    Richards, L.R.P.; Butland, A.T.D.; Symonds, A.G.

    1982-07-01

    The Core Allocation and Dataflow System, CADS, consists of two parts, VARY and VARYIO. VARY provides a means of organising the use of data store in a program by allowing the programmer to reference and manipulate areas of data store by names of the programmer's subprogram, and therefore the complete program, to be independent of its data sources or the destination of its results. CADS therefore provides a system of symbolic dataflow. (author)

  11. On the Automatic Parallelization of Sparse and Irregular Fortran Programs

    Directory of Open Access Journals (Sweden)

    Yuan Lin

    1999-01-01

    Full Text Available Automatic parallelization is usually believed to be less effective at exploiting implicit parallelism in sparse/irregular programs than in their dense/regular counterparts. However, not much is really known because there have been few research reports on this topic. In this work, we have studied the possibility of using an automatic parallelizing compiler to detect the parallelism in sparse/irregular programs. The study with a collection of sparse/irregular programs led us to some common loop patterns. Based on these patterns new techniques were derived that produced good speedups when manually applied to our benchmark codes. More importantly, these parallelization methods can be implemented in a parallelizing compiler and can be applied automatically.

  12. Automatic Migration from PARMACS to MPI in Parallel Fortran Applications

    Directory of Open Access Journals (Sweden)

    Rolf Hempel

    1999-01-01

    Full Text Available The PARMACS message passing interface has been in widespread use by application projects, especially in Europe. With the new MPI standard for message passing, many projects face the problem of replacing PARMACS with MPI. An automatic translation tool has been developed which replaces all PARMACS 6.0 calls in an application program with their corresponding MPI calls. In this paper we describe the mapping of the PARMACS programming model onto MPI. We then present some implementation details of the converter tool.

  13. A visual Fortran user interface for CITATION code

    International Nuclear Information System (INIS)

    Albarhoum, M.; Zaidan, N.

    2006-11-01

    A user interface is designed to enable running the CITATION code under Windows. Four sections of CITATION input file are arranged in the form of 4 interfaces, in which all the parameters of the section can be modified dynamically. The help for each parameter (item) can be read from a general help for the section which, in turn, can be visualized upon selecting the section from the program general menu. (author)

  14. Vienna Fortran - A Language Specification. Version 1.1

    Science.gov (United States)

    1992-03-01

    these include critical sections, events and locks. New instructions for node I/O are provided. In addition, there are a number of intrinsic functions to...form SELECT DCASE (Al,..,,Ar) capl,..., capm END SELECT where * r > 1 and all Ai, 1 < i < r, are array names. The Ai are called selectors. At the time of

  15. GOC: General Orbit Code. [In FORTRAN for IBM 360

    Energy Technology Data Exchange (ETDEWEB)

    Maddox, L.B.; McNeilly, G.S.

    1979-08-01

    GOC (General Orbit Code) is a versatile program which will perform a variety of calculations relevant to isochronous cyclotron design studies. In addition to the usual calculations of interest (e.g., equilibrium and accelerated orbits, focusing frequencies, field isochronization, etc.), GOC has a number of options to calculate injections with a charge change. GOC provides both printed and plotted output, and will follow groups of particles to allow determination of finite-beam properties. An interactive PDP-10 program called GIP, which prepares input data for GOC, is available. GIP is a very easy and convenient way to prepare complicated input data for GOC. Enclosed with this report are several microfiche containing source listings of GOC and other related routines and the printed output from a multiple-option GOC run.

  16. Red's natural editor, a program designed to edit FORTRAN programs

    International Nuclear Information System (INIS)

    Cullen, D.E.

    1993-01-01

    An EDITOR code is documented which supplements the 1994 ENDF Pre-processing Code Package which is available from the IAEA Nuclear Data Section for the processing of ENDF formatted nuclear data libraries. (author)

  17. An empirical comparison of Qbasic, FORTRAN, C, Pascal, C ++ ...

    African Journals Online (AJOL)

    The software development process involves the development, coding and running of programs in a chosen programming language. There are thousands of programming languages in existence and selecting a suitable one is never an easy task. Over the years, several attempts have been made to evaluate programming ...

  18. GSAP: FORTRAN code for gamma-spectrum analysis

    International Nuclear Information System (INIS)

    Hnatowicz, V.; Kozma, P.; Ilyushchenko, V.I.

    1989-01-01

    The GSAP program performs fully automatic evaluation of gamma-ray energy spectra measured with semiconductor detectors. After the input data comprising experimental spectrum, energy and FWHM calibrations and parameters controlling the peak search are supplied, the program starts peak searching from the spectrum beginning. The detected peaks are arranged into multiplets which are unfolded by standard non-linear least-squares-fit assuming Gaussian peak and linear background. The program proceeds until all multiplets are processed. The determined peak parameters are printed and the result of each particular fit is shown in the graphical form. 6 refs

  19. RELIEVE: A FORTRAN 77 program for numerical and graphical processing of digital topographic maps; RELIEVE: Un programa FORTRAN para procesamiento numerico y grafico de mapas topograficos digitalizados

    Energy Technology Data Exchange (ETDEWEB)

    Sanchez, J.J.; Gorostiza, C.

    1995-12-01

    The RELIEVE program was developed in order to its integration with the expert system SIRENAS, in the frame of the Industrial Risks Programme, within the CIEMAT center. For accomplishing this mentioned system, arose the necessity of an additional component unable for analyzing the topography (relieve) of the territory in which the focused site is located. That one is just the mission of the RELIEVE program. Basically RELIEVE analyses the digitalized data points of a determined topographic area, around a location of interest. The program allows us estimation by numerical techniques, using IMSL library, of the deep width, and other geometrical characteristics of the valley that are involved in. Optionally RELIEVE produces also graphical outputs concerning 3D representation of topographical map, level curves, sections of interest considered in the valley, etc., by means of the DISSPLA II library, running in the IBM system of the CIEMAT. (Author)

  20. RELIEVE: A FORTRAN 77 program for numerical and graphical processing of digital topographic maps; RELIEVE: Un programa FORTRAN para procesamiento numerico y grafico de mapas topograficos digitalizados

    Energy Technology Data Exchange (ETDEWEB)

    Sanchez, J.J.; Gorostiza, C.

    1995-07-01

    The RELIEVE program was developed in order to its integration with the expert system SIRENAS, in the frame of the Industrial Risks Programme, within the CIEMAT center. For accomplishing this mentioned system, arose the necessity of an additional component enabled for analyzing the topography (relieve) of the territory in which the focused site is located. That is just the mission of the RELIEVE program. Basically RELIEVE analyses the digitalized data points of a determinate topographic area, around a location of interest. The program allows us estimation by numerical techniques, using IMSL library, of the deep width, and other geometrical characteristics of the valley that is involved in. Optionally RELIEVE produces also graphical outputs concerning 3D representation of topographical map, level curves, sections of interest considered in the valley, etc., by means of the DISSPLA II library, running in the IBM system of the CIEMAT. (Author) 5 refs.

  1. Conversion of the CALAP (Computer Aided Landform Analysis Program) Program from FORTRAN to DUCK.

    Science.gov (United States)

    1986-09-01

    segments occur above" t 5 "the elevation of 100’?" t t)) READ(LU(1),*)IRSMH (p ruga -sr-str-dseg-rule (goal rega) (rega drainage) A (drainage sr-streams) (s-r...display-tf ruga -list-sr-msg-5 <irtic> Cirtltr> Cirt2o> <irt3o) (call displaij-tf rega-list-sr-msg-6 <irac> <iracm> <iracml) (call displaij-tf rega-list

  2. AIRFIL: a FORTRAN program for reduction of data obtained from alpha spectrometry of perimeter air filters

    International Nuclear Information System (INIS)

    Hinton, E.R. Jr.; Howell, R.L.

    1984-03-01

    Isotopic alpha spectrometry of 238 U, 235 U, and 234 U, along with gross alpha/beta counting of perimeter air filters, is performed by the Oak Ridge Y-12 Plant Laboratory in support of the Envrirnomental Monitoring Section of the Radiation Safety Department. Weekly samples are gross alpha/beta counted and the isotopic analysis performed on quarterly composites. Calculations and data management represents a major portion of the anlaysis time when performed manually, even with a desktop calculator. In order to reduce calculation time, perform orderly data manipulation and management, reduce errors due to redundant calculations, and eliminate report typing turnaround time, a computer program (AIRFIL) has been developed that performs these functions. The program accepts data through user prompts, then calculates and prints intermediate and final data, including detection limits

  3. Interactive FORTRAN IV computer programs for the thermodynamic and transport properties of selected cryogens (fluids pack)

    Science.gov (United States)

    Mccarty, R. D.

    1980-01-01

    The thermodynamic and transport properties of selected cryogens had programmed into a series of computer routines. Input variables are any two of P, rho or T in the single phase regions and either P or T for the saturated liquid or vapor state. The output is pressure, density, temperature, entropy, enthalpy for all of the fluids and in most cases specific heat capacity and speed of sound. Viscosity and thermal conductivity are also given for most of the fluids. The programs are designed for access by remote terminal; however, they have been written in a modular form to allow the user to select either specific fluids or specific properties for particular needs. The program includes properties for hydrogen, helium, neon, nitrogen, oxygen, argon, and methane. The programs include properties for gaseous and liquid states usually from the triple point to some upper limit of pressure and temperature which varies from fluid to fluid.

  4. OR TEP-II: a FORTRAN Thermal-Ellipsoid Plot Program for crystal structure illustrations

    International Nuclear Information System (INIS)

    Johnson, C.K.

    1976-03-01

    A computer program is described for drawing crystal structure illustrations using a mechanical plotter. Ball-and-stick type illustrations of a quality suitable for publication are produced with either spheres or thermal-motion probability ellipsoids on the atomic sites. The program can produce stereoscopic pairs of illustrations which aid in the visualization of complex packing arrangements of atoms and thermal motion patterns. Interatomic distances, bond angles, and principal axes of thermal motion are also calculated to aid the structural study. The most recent version of the program, OR TEP-II, has a hidden-line-elimination feature to omit those portions of atoms or bonds behind other atoms or bonds

  5. Validation of FORTRAN emulators for the G2 varian control programs

    International Nuclear Information System (INIS)

    Delorme, G.

    1996-01-01

    The extensive use of the Gentilly full scope simulator for training and verification of plant procedures, forced the development of a reliable desktop simulator for software maintenance purposes. For that we needed emulators for the control programs which run on the DCC Varian computers in the full scope simulator. This paper presents the validation results for the Reactor Regulating System (RRS) program. This emulator was programmed in a modular fashion providing ease of maintenance and of transportation to another environment. The results obtained with specific tests or with integrated testing involving complex control rule interactions, compared favorably with the ones obtained using the actual plant control programs running on the full scope simulator, which constitutes an irrefutable validation procedure. This RRS package along with the other emulators being validated In this manner could be used in safety codes with confidence. (author)

  6. LAMP-B: a Fortran program set for the lattice cell analysis by collision probability method

    International Nuclear Information System (INIS)

    Tsuchihashi, Keiichiro

    1979-02-01

    Nature of physical problem solved: LAMB-B solves an integral transport equation by the collision probability method for many variety of lattice cell geometries: spherical, plane and cylindrical lattice cell; square and hexagonal arrays of pin rods; annular clusters and square clusters. LAMP-B produces homogenized constants for multi and/or few group diffusion theory programs. Method of solution: LAMP-B performs an exact numerical integration to obtain the collision probabilities. Restrictions on the complexity of the problem: Not more than 68 group in the fast group calculation, and not more than 20 regions in the resonance integral calculation. Typical running time: It varies with the number of energy groups and the selection of the geometry. Unusual features of the program: Any or any combination of constituent subprograms can be used so that the partial use of this program is available. (author)

  7. A Three-Dimensional Transonic, Potential Flow Computer Program, Its Conversion to IBM Fortran and Utilization

    Science.gov (United States)

    1983-12-01

    8217 «-H co«» omro rococo >r>o inr* uoocMcoo^ooin^rmoooroh-ro^cnp-co^cof-cTtro ^Hv»>Ot-»>>»>j"(oromr^>-isOcoooo^H>f coroooococoofoco OX«,<D<yi^’t|Tl...oooooooooooooooooooooo Om*T rococo cMvom-j-votn HVOOOC^OH oucnr-ficM**" >-i<M>rcM>r<J, oo »r o^co oooo r-st sj- oo ^ vO vj» Is» vO o» m ro...I I I I I I I I I I I I I I I I m fM co o CM »-4 co in -4" CM m r-t co o m r* »* <x> o >!• m o OCO^CMCO>f rOCOCO *00>>TOCM’HfO rH^O^rvOCO co,Mcooco

  8. Parametric Engineering System Definition Model. Volume II. Appendix C. FORTRAN Listings

    Science.gov (United States)

    1979-08-01

    x ý_ .V L , x 0w X: U Aw a U= U2 LL (A9 > cAL .D- 3: w.. = L I- ;< c Q 4 -- uj- 2: UZLL - ccZ4 .W - U. C ~ U- FLJ LLt- CLL>JuU. j Z Xf jZ x V- *O L...ý - P- u Z.." - S.. = 2- U :- - - - LUý zz w z c IN.U 4( 4 U.-JC uI. 0 > u .C Cj ’t a. u c , L0> V)QV)e in G.t O~ .0 P- ct tD ~ *-cMc" -t m C c...7 0 7; n, C-1600 z c t= orw > w I Z z z. z Z tn - w 1 t CU Z ": < - z -a>- C- LL Z = z - , - a I-. LU * C-161 0X w -U. c td , Ln U-lU_ U. LL.- Wj~ W z

  9. An aid to two-dimensional contouring using nonuniform orthogonal grids - A Fortran algorithm

    Digital Repository Service at National Institute of Oceanography (India)

    Gouveia, A.D.

    of grids in which Ax and Ay can differ with x and y respectively. Contours obtained in this manner should be used with care if slopes or trends are to be calculated. This algorithm has applications for data presentation in several specialized fields... showing the main features of the variable, care must be taken if the contours are to be used for quantitative estimations of slopes and trends. This procedure, however, avoids the possible errors of injudicious interpolation of the data onto a regular...

  10. A Fortran-77 program for Monte Carlo simulation of upwelling light from the sea

    Digital Repository Service at National Institute of Oceanography (India)

    Sathe, P.V.; Sathyendranath, S.

    for Monte Carlo simulation of spectral and angular composition of upwelling light emerging from a wind-roughened sea under given physical conditions and for a given water quality. The program also simulates the light field prevailing immediately below... constituents of the sea which influence the quality of upwelling light. Because the program is a direct simulation of radiative transfer from the atmosphere to the sea and vice versa, it may be put to a variety of uses in studies in marine optics. Simulated...

  11. New FORTRAN computer programs to acquire and process isotopic mass-spectrometric data

    International Nuclear Information System (INIS)

    Smith, D.H.

    1982-08-01

    The computer programs described in New Computer Programs to Acquire and Process Isotopic Mass Spectrometric Data have been revised. This report describes in some detail the operation of these programs, which acquire and process isotopic mass spectrometric data. Both functional and overall design aspects are addressed. The three basic program units - file manipulation, data acquisition, and data processing - are discussed in turn. Step-by-step instructions are included where appropriate, and each subsection is described in enough detail to give a clear picture of its function. Organization of file structure, which is central to the entire concept, is extensively discussed with the help of numerous tables. Appendices contain flow charts and outline file structure to help a programmer unfamiliar with the programs to alter them with a minimum of lost time

  12. OR TEP-II: a FORTRAN Thermal-Ellipsoid Plot Program for crystal structure illustrations

    Energy Technology Data Exchange (ETDEWEB)

    Johnson, C.K.

    1976-03-01

    A computer program is described for drawing crystal structure illustrations using a mechanical plotter. Ball-and-stick type illustrations of a quality suitable for publication are produced with either spheres or thermal-motion probability ellipsoids on the atomic sites. The program can produce stereoscopic pairs of illustrations which aid in the visualization of complex packing arrangements of atoms and thermal motion patterns. Interatomic distances, bond angles, and principal axes of thermal motion are also calculated to aid the structural study. The most recent version of the program, OR TEP-II, has a hidden-line-elimination feature to omit those portions of atoms or bonds behind other atoms or bonds.

  13. Perbandingan Bubble Sort dengan Insertion Sort pada Bahasa Pemrograman C dan Fortran

    OpenAIRE

    Reina, Reina; Gautama, Josef Bernadi

    2013-01-01

    Sorting is a basic algorithm studied by students of computer science major. Sorting algorithm is the basis of other algorithms such as searching algorithm, pattern matching algorithm. Bubble sort is a popular basic sorting algorithm due to its easiness to be implemented. Besides bubble sort, there is insertion sort. It is lesspopular than bubble sort because it has more difficult algorithm. This paper discusses about process time between insertion sort and bubble sort with two kinds of data. ...

  14. ZONE: a finite element mesh generator. [In FORTRAN IV for CDC 7600

    Energy Technology Data Exchange (ETDEWEB)

    Burger, M. J.

    1976-05-01

    The ZONE computer program is a finite-element mesh generator which produces the nodes and element description of any two-dimensional geometry. The geometry is subdivided into a mesh of quadrilateral and triangular zones arranged sequentially in an ordered march through the geometry. The order of march can be chosen so that the minimum bandwidth is obtained. The node points are defined in terms of the x and y coordinates in a global rectangular coordinate system. The zones generated are quadrilaterals or triangles defined by four node points in a counterclockwise sequence. Node points defining the outside boundary are generated to describe pressure boundary conditions. The mesh that is generated can be used as input to any two-dimensional as well as any axisymmetrical structure program. The output from ZONE is essentially the input file to NAOS, HONDO, and other axisymmetric finite element programs. 14 figures. (RWR)

  15. TaylUR 3, a multivariate arbitrary-order automatic differentiation package for Fortran 95

    International Nuclear Information System (INIS)

    Hippel, G.M. von

    2009-09-01

    The new version of TaylUR is based on a completely new core, which now is able to compute the numerical values of all of a complex-valued function's partial derivatives up to an arbitrary order, including mixed partial derivatives. (orig.)

  16. Ordinary and partial differential equation routines in C, C++, Fortran, Java, Maple, and Matlab

    CERN Document Server

    Lee, HJ

    2003-01-01

    This book provides a set of ODE/PDE integration routines in the six most widely used computer languages, enabling scientists and engineers to apply ODE/PDE analysis toward solving complex problems. This text concisely reviews integration algorithms and then analyzes the widely used Runge-Kutta method. It first presents a complete code before discussing its components in detail, focusing on integration concepts such as error monitoring and control. The format allows readers to understand the basics of ODE/PDE integration, and then calculate sample numerical solutions within the targeted program

  17. Autogenic Feedback Training (Body FORTRAN) for Musically Gifted Students at Bonita Vista High School.

    Science.gov (United States)

    Lane, John M.

    1982-01-01

    The Gifted Self-Understanding Assessment Battery (GSAB) was given to 34 (27 females, 7 males) music students (aged 15-17) at Bonita Vista High School in Chula Vista (California). Biofeedback training and assessment were followed by individual counseling for Autogenic Feedback Training (AFT) to achieve improvement of the individual's own well…

  18. New FORTRAN computer programs to acquire and process isotopic mass spectrometric data: Operator's manual

    International Nuclear Information System (INIS)

    Smith, D.H.; McKown, H.S.

    1993-09-01

    This TM is one of a pair that describes ORNL-developed software for acquisition and processing of isotope ratio mass spectral data. This TM is directed at the laboratory analyst. No technical knowledge of the programs and programming is required. It describes how to create and edit files, how to acquire and process data, and how to set up files to obtain the desired results. The aim of this TM is to serve as a utilitarian instruction manual, a open-quotes how toclose quotes approach rather than a open-quotes why?close quotes

  19. RELIEVE: A FORTRAN 77 program for numerical and graphical processing of digital topographic maps

    International Nuclear Information System (INIS)

    Sanchez, J.J.; Gorostiza, C.

    1995-01-01

    The RELIEVE program was developed in order to its integration with the expert system SIRENAS, in the frame of the Industrial Risks Programme, within the CIEMAT center. For accomplishing this mentioned system, arose the necessity of an additional component enabled for analyzing the topography (relieve) of the territory in which the focused site is located. That is just the mission of the RELIEVE program. Basically RELIEVE analyses the digitalized data points of a determinate topographic area, around a location of interest. The program allows us estimation by numerical techniques, using IMSL library, of the deep width, and other geometrical characteristics of the valley that is involved in. Optionally RELIEVE produces also graphical outputs concerning 3D representation of topographical map, level curves, sections of interest considered in the valley, etc., by means of the DISSPLA II library, running in the IBM system of the CIEMAT. (Author) 5 refs

  20. REGRES: A FORTRAN-77 program to calculate nonparametric and ``structural'' parametric solutions to bivariate regression equations

    Science.gov (United States)

    Rock, N. M. S.; Duffy, T. R.

    REGRES allows a range of regression equations to be calculated for paired sets of data values in which both variables are subject to error (i.e. neither is the "independent" variable). Nonparametric regressions, based on medians of all possible pairwise slopes and intercepts, are treated in detail. Estimated slopes and intercepts are output, along with confidence limits, Spearman and Kendall rank correlation coefficients. Outliers can be rejected with user-determined stringency. Parametric regressions can be calculated for any value of λ (the ratio of the variances of the random errors for y and x)—including: (1) major axis ( λ = 1); (2) reduced major axis ( λ = variance of y/variance of x); (3) Y on Xλ = infinity; or (4) X on Y ( λ = 0) solutions. Pearson linear correlation coefficients also are output. REGRES provides an alternative to conventional isochron assessment techniques where bivariate normal errors cannot be assumed, or weighting methods are inappropriate.

  1. CLUPH: a Fortran program of collision probabilities for hexagonal lattice and its application to VHTR

    International Nuclear Information System (INIS)

    Tsuchihashi, Keichiro; Gotoh, Yorio

    1981-02-01

    A new collision probability routine CLUPH was added to the computer program set LAMP-B to analyse the hexagonal VHTR fuel and control blocks where in addition to the annular array of fuel pin rods the asymmetric insertions of burnable poison rods and control rods are characteristic. The perfect reflective boundary condition is no more realistic to consider the arrangement of asymmetric hexagonal blocks. The periodic and the rotational arrangement of blocks are surveyed to consider the interference effect between the burnable poison rods. In addition the effects of coated particle fuel in fuel rod, and of B 4 C grain in burnable poison rod, are investigated. The average cross sections of control rod block were derived from the calculation of a super cell which consists of the control rod block and of the surrounding six fuel blocks. The care was taken to the control rod block located at the core-reflector boundary by replacing a sector of surrounding material in supper cell by reflector material. The two dimensional diffusion calculations of simplified cores of Mk-III were performed to obtain the reactivity worths of control rods, for illustration. (author)

  2. A fortran programme for determining frequency responses for linear systems with time delays

    International Nuclear Information System (INIS)

    Milsom, P.R.

    1966-11-01

    In this report a digital computer programme for evaluating frequency responses is described. In its standard form the programme is capable of determining the gain and phase of up to 35 variables over a range of up to 30 frequencies for a system described by up to 65 equations. The equations must be either first order differential or algebraic and either type may include time delayed terms. Up to 50 such terms are permissible throughout the equation set. Provision is made for up to 10 inputs and up to 50 differentiated input terms are permitted throughout the equation set. However, it is possible for the user to increase a maximum dimension, albeit at the expense of another array dimension. In punching the data from the equations the user has no sorting or arranging of coefficients to do, and the equations may be in any order. The specifying of other input information, such as frequency range, the inputs to be perturbed and the variables for which frequency responses are required, is also very straightforward. (author)

  3. PSOD: an interactive Fortran program to simulate the radiation dose response of membrane populations

    International Nuclear Information System (INIS)

    Perry, K.A.; Szekely, J.G.

    1982-04-01

    Program PSOD was written to simulate the distribution in responses of membrane populations subjected to random radiation doses and dose rates. It computes the response (damage) according to one of three formulas selected by the user, and outputs statistical results to the terminal. It will plot simulated dose- and response-frequency distributions in two or three dimensions. Doses and dose rates are selected from the log normal distribution; other distributions can be incorporated as the need arises. A true log normal curve with defined mean and standard deviation can also be generated. The purpose of this documentation is to provide a complete operating manual for the program. A user guide is available on-line after initiating a session of PSOD. Detailed examinations of the statistical validity of various steps have been included to aid future modifications and updating

  4. MEDINA: MECCA Development in Accelerators – KPP Fortran to CUDA source-to-source Pre-processor

    Directory of Open Access Journals (Sweden)

    Michail Alvanos

    2017-04-01

    Full Text Available The global climate model ECHAM/MESSy Atmospheric Chemistry (EMAC is a modular global model that simulates climate change and air quality scenarios. The application includes different sub-models for the calculation of chemical species concentrations, their interaction with land and sea, and the human interaction. The paper presents a source-to-source parser that enables support for Graphics Processing Units (GPU by the Kinetic Pre-Processor (KPP general purpose open-source software tool. The requirements of the host system are also described. The source code of the source-to-source parser is available under the MIT License.

  5. ACQUA97 - a Fortran subroutine to evaluate the IAPWS-IF97 equations of state for water and steam

    International Nuclear Information System (INIS)

    Veloso, Marcelo A.; Dias, Marcio S.; Fortini, Maria Auxiliadora

    2007-01-01

    Fundamental to subroutine ACQUA97 is the IAPWS-IF97 formulation for the thermodynamic properties of water and steam adopted by the International Association for the Properties of Water and Steam (IAPWS) in 1997. This new formulation is designed specifically for industrial applications, and replaces the previous industrial formulation, IFC-67, that has formed the basis of steam tables used in many areas of steam power industry throughout the world since the late 1960's. ACQUA97 has been programmed to compute the thermodynamic properties of water and steam (pressure, temperature, specific volume, specific entropy, specific enthalpy, and internal specific energy) and their main first partial derivatives for several combinations of two independent variables. One of the independent variable is either pressure or temperature. Vapor-liquid saturation properties are calculated at specified temperature or pressure. Transport properties (dynamic viscosity and thermal conductivity) and vapor-liquid surface tension are also calculated with formulations adopted by IAPWS. Any of the above mentioned thermophysical properties can be computed by this single subroutine from a simple main program supplied by the user. ACQUA97 might be very useful to those who deal with design and evaluation of thermal power plants. (author)

  6. FORTRAN 4 programs for the extraction of potential well parameters from the energy dependence of total elastic scattering cross sections

    Science.gov (United States)

    Labudde, R. A.

    1972-01-01

    An attempt has been made to keep the programs as subroutine oriented as possible. Usually only the main programs are directly concerned with the problem of total cross sections. In particular the subroutines POLFIT, BILINR, GASS59/MAXLIK, SYMOR, MATIN, STUDNT, DNTERP, DIFTAB, FORDIF, EPSALG, REGFAL and ADSIMP are completely general, and are concerned only with the problems of numerical analysis and statistics. Each subroutine is independently documented.

  7. Fortran programs for computation of optical properties of the sea from radiation data collected by in situ spectrometers

    Digital Repository Service at National Institute of Oceanography (India)

    Sathe, P.V.; Sathyendranath, S.

    can n0w execute 0OT!C~ * 1031 FORMAT (SX, t DO you want LOS, NOPUALISED or A3~OLUT~ v=lues? t 1,/,~X,' if L03, enter 1 ',l,Sx,' 4f ~O~LIS£~, -nter ? ' ~,l,Sx,' if ARSOLUTE, enter ~',1) 1094 P.V. S^TRE and S. S,',TNYE.~DgANATH !C0~ ~OP~AT (5~,'Do...

  8. Interactive computer graphics displays for hierarchical data structures. [Description of THESGRAF, in FORTRAN IV for CDC and IBM computers

    Energy Technology Data Exchange (ETDEWEB)

    Cahn, D.F.; Murano, C.V.

    1980-05-01

    An interactive computer graphical display program was developed as an aid to user visualization and manipulation of hierarchically structured data systems such as thesauri. In the present configuration, a thesaurus term and its primary and secondary conceptual neighbors are presented to the user in tree graph form on a CRT; the user then designates, via light pen or keyboard, any of the neighbors as the next term of interest and receives a new display centered on this term. By successive specification of broader, narrower, and related terms, the user can course rapidly through the thesaurus space and refine his search file. At any stage, he deals with a term-centered, conceptually meaningful picture of a localized portion of the thesaurus, and is freed from the artificial difficulties of handling the traditional alphabetized thesaurus. Intentional limitation of the associative range of each display frame, and the use of color, case, and interconnecting vectors to encode relationships among terms, enhance interpretability of the display. Facile movement through the term space, provided by interactive computation, allows the display to remain simple, and is an essential element of the system. 3 figures.

  9. DISPL: a software package for one and two spatially dimensioned kinetics-diffusion problems. [FORTRAN for IBM computers

    Energy Technology Data Exchange (ETDEWEB)

    Leaf, G K; Minkoff, M; Byrne, G D; Sorensen, D; Bleakney, T; Saltzman, J

    1978-11-01

    DISPL is a software package for solving some second-order nonlinear systems of partial differential equations including parabolic, elliptic, hyperbolic, and some mixed types such as parabolic--elliptic equations. Fairly general nonlinear boundary conditions are allowed as well as interface conditions for problems in an inhomogeneous media. The spatial domain is one- or two-dimensional with Cartesian, cylindrical, or spherical (in one dimension only) geometry. The numerical method is based on the use of Galerkin's procedure combined with the use of B-splines in order to reduce the system of PDE's to a system of ODE's. The latter system is then solved with a sophisticated ODE software package. Software features include extensive dump/restart facilities, free format input, moderate printed output capability, dynamic storage allocation, and three graphics packages. 17 figures, 9 tables.

  10. An interactive FORTRAN program for the evaluation of structure factors and pair distribution functions from neutron diffraction experiments

    International Nuclear Information System (INIS)

    Abel, W.

    1985-02-01

    This report describes an interactive program to evaluate neutron diffraction data using the Graphic System (GS) under MVS (TSO). Different evaluation steps may be directed by a CLIST. The present program is limited to cylindrical sample geometry. From the fully corrected static structure factor the pair correlation function g(r) and the radial density function may be calculated from which the mean coordination number can be obtained by numerical integration over the main peak. Producing a hardcopy output on a mechanical plotter is provided. (orig.) [de

  11. Classical collisions of protons with hydrogen atoms. [Equations of motion, cross sections, C code, FORTRAN, moments of inertia

    Energy Technology Data Exchange (ETDEWEB)

    Banks, D; Hughes, P E; Percival, I C [Queen Mary Coll., London (UK); Barnes, K S [National Health Service Operational Research Group, Royal Institute of Public Administration, Reading, Berkshire, UK; Richards, D [Open Univ., Milton Keynes (UK); Valentine, N A [Digital Equipment Corporation, Bilton House, Uxbridge Road, Ealing, London, UK; Wilson, Mc B [Glasgow Univ. (UK). Dept. of Natural Philosophy

    1977-01-01

    The program solves the equations of motion for the interaction of 3 charged particles, obtaining final states in terms of initial states, and energy transfers, angles of ejection, and final cartesian co-ordinates of relative motion. Using a Monte Carlo method on many orbits total ionization and charge transfer cross sections, integral energy transfer cross sections and moments of energy transfers are estimated. Facilities are provided for obtaining angular distributions, momentum transfer cross sections and for comparison with various approximate classical theories. The equations of motion are solved using stepwise fourth-order Runge-Kutta integration with automatic steplength change. Selection of initial conditions is determined by the user, usually as a statistical distribution determined by a pseudorandom number subroutine. Classical representation theory and transformation methods are extensively used.

  12. SENSIT: a cross-section and design sensitivity and uncertainty analysis code. [In FORTRAN for CDC-7600, IBM 360

    Energy Technology Data Exchange (ETDEWEB)

    Gerstl, S.A.W.

    1980-01-01

    SENSIT computes the sensitivity and uncertainty of a calculated integral response (such as a dose rate) due to input cross sections and their uncertainties. Sensitivity profiles are computed for neutron and gamma-ray reaction cross sections of standard multigroup cross section sets and for secondary energy distributions (SEDs) of multigroup scattering matrices. In the design sensitivity mode, SENSIT computes changes in an integral response due to design changes and gives the appropriate sensitivity coefficients. Cross section uncertainty analyses are performed for three types of input data uncertainties: cross-section covariance matrices for pairs of multigroup reaction cross sections, spectral shape uncertainty parameters for secondary energy distributions (integral SED uncertainties), and covariance matrices for energy-dependent response functions. For all three types of data uncertainties SENSIT computes the resulting variance and estimated standard deviation in an integral response of interest, on the basis of generalized perturbation theory. SENSIT attempts to be more comprehensive than earlier sensitivity analysis codes, such as SWANLAKE.

  13. ESCADT: a FORTRAN code for computing the positions and areas of x-ray photoelectron spectral peaks

    International Nuclear Information System (INIS)

    Cox, L.E.

    1979-09-01

    Program ESCADT uses least-squares-derived convoluting numbers to smooth and differentiate x-ray photoelectron spectra. Peak maxima are located by finding zero crossings of the first derivative and refined using a cubic polynomial fitting procedure. Background points are located using the product of the absolute value of the first derivative and the smoothed ordinate value. Peak areas, using both linear and scattered electron backgrounds, are computed. Spectra are corrected for changes in instrument sensitivity and energy calibration with gold-standard data retrieved from a disk file. Five determinations of the gold 4f peak positions yielded standard deviations of 0.011 and 0.031 eV for the 4f/sub 7/2/ and 4f/sub 5/2/ peaks, respectively. The relative standard deviation for the computed areas was 0.85%

  14. A fortran code CVTRAN to provide cross-section file for TWODANT by using macroscopic file written by SRAC

    International Nuclear Information System (INIS)

    Yamane, Tsuyoshi; Tsuchihashi, Keichiro

    1999-03-01

    A code CVTRAN provides the macroscopic cross-sections in the format of XSLIB file which is one of Standard interface files for a two-dimensional Sn transport code TWODANT by reading a macroscopic cross section file in the PDS format which is prepared by SRAC execution. While a two-dimensional Sn transport code TWOTRAN published by LANL is installed as a module in the SRAC code system, several functions such as alpha search, concentration search, zone thickness search and various edits are suppressed. Since the TWODANT code was released from LANL, its short running time, stable convergence and plenty of edits have attracted many users. The code CVTRAN makes the TWODANT available to the SRAC user by providing the macroscopic cross-sections on a card-image file XSLIB. The CVTRAN also provides material dependent fission spectra into a card-image format file CVLIB, together with group velocities, group boundary energies and material names. The user can feed them into the TWODANT input, if necessary, by cut-and-paste command. (author)

  15. WESCOM. A Fortran Code for Evaluation of Nuclear Weapon Effects on Satellite Communications. Volume 2. Code Structure

    Science.gov (United States)

    1981-01-31

    DCREG WOX DEPDAT DEVICE FBREG HEACOM HEAVE1 JAMMER MAGLNK riODULT OPTION ORGIN PATH ATMOSN CONST CONWES ACCUM AMBABS ANLYT2...SQRT ALOG SQkV ALOG OCOS DMOD DSIN ALOG COS EXP SIN SQRT CONST DIGMOD DI6M0D WRATE WRATEH CINPUT CONST DCREG FBREG OPTION PROP...ATMOST FDSRAT WRATE ATMOST FDSRAT OUT WRATE BREG BURST DCREG PHEN BREG BURST CONST DBREG FBREG MAGLNK 25 ROUTINE EDEPG EDEPMD

  16. RBEOER: a FORTRAN program for the computation of RBEs, OERs, survival ratios, and the effects of fractionation using the theory of dual radiation action

    International Nuclear Information System (INIS)

    Zaider, M.; Dicello, J.F.

    1978-05-01

    The computer code RBEOER calculates RBEs, OERs and survival curves as a function of the dose delivered to a biological system and the temporal distribution of the dose (fractionation). The method of calculation is based on the theory of dual radiation action. The basic formalism and the input parameters are described. A sample output is presented

  17. ISOLA II: a FORTRAN IV program for the calculation of long-term dose distribution in the vicinity of nuclear installations

    International Nuclear Information System (INIS)

    Huebschmann, W.; Nagel, D.

    The computer code ISOLA serves for the annual calculation of the radiation burden of the environment of the Nuclear Research Center at Karlsruhe resulting from the release of alpha-active and beta-active off-gases. In the improved version ISOLA II the model of a double Gaussian Distribution function is strictly-maintained, so that the influence due to neighboring sectors is included. The emissions are assumed to be constant in time during a given time period. The user may select either the print-out of an isodose map for a desired area (for example a map square 20 km on each edge) or he may obtain a list of doses for up to 2000 filed points (for example in the surrounding communities). The input and output forms will be shown by the use of an example

  18. A Structural Weight Estimation Program (SWEEP) for Air craft. Volume 7 - Fuselage Module. Appendix A: Module Flow Charts and FORTRAN Lists. Appendix B: Fuselage Module Sample Output

    Science.gov (United States)

    1974-06-01

    HTLUIII »171 • «171 • unui i ■-coici i ■ «mnti • •m<i»i • UTLtlll :—i t<*i • %’»< ’ MUSI 11-COlOl 11 ««•11171 • «imciTi . «tuen fltl...ICnillC COMR ICIOMI n» IMIT KMTH INO «J NO MUSI TUIMM IM «III • tlill/OlIl MlltOM •III • OI«m MIIMM •Kl • tltl MIIMM irnctT...ll«l*IWIIl • «Uli mt iMiT iwmiM to rot«, H» M» VCHIOI I Mllll • MHIKlll Muti • Mini MUSI • Mnsi<oiti MINI • MUSI MUM • Mllll-OKil MIMI

  19. GNASH: a preequilibrium, statistical nuclear-model code for calculation of cross sections and emission spectra. [In FORTRAN for CDC 7600

    Energy Technology Data Exchange (ETDEWEB)

    Young, P.G.; Arthur, E.D.

    1977-11-01

    A new multistep Hauser--Feshbach code that includes corrections for preequilibrium effects is described. The code can calculate up to 60 decay reactions (cross sections and energy spectra) in one computation, and thereby provide considerable flexibility for handling processes with complicated reaction chains. Input parameter setup, problem output, and subroutine descriptions are given along with a sample problem calculation. A brief theoretical description is also included. 8 figures, 3 tables.

  20. SAP3PR: a FORTRAN program for calculating equivalent nodal loads resulting from pressure on the faces of 8- to 20-node isoparametric elements

    International Nuclear Information System (INIS)

    Fanning, D.N.

    1978-04-01

    A computer program is described for calculating the equivalent nodal loads resulting from distributed loads on a three-dimensional finite-element model. Included is a listing of the computer program, a description of the input data, and an example of the output

  1. Re-targeting the Graze performance debugging tool for Java threads and analyzing the re-targeting to automatically parallelized (FORTRAN) code

    OpenAIRE

    Tsai, Pedro T. H.

    2000-01-01

    Approved for public release; distribution is unlimited This research focuses on the design of a language-independent concept, Glimpse, for performance debugging of multi-threaded programs. This research extends previous work on Graze, a tool designed and implemented for performance debugging of C++ programs. Not only is Glimpse easily portable among different programming languages, (i) it is useful in many different paradigms ranging from few long-lived threads to many short-lived...

  2. Automated approach to quantitative error analysis. [BEAPAC-1T and -3T, for testing reliability of computer codes, in FORTRAN for IBM 370/195 and CDC 6400

    Energy Technology Data Exchange (ETDEWEB)

    Bareiss, E.H.

    1977-04-01

    A method is described how a quantitative measure for the robustness of a given neutron transport theory code for coarse network calculations can be obtained. A code that performs this task automatically and at only nominal cost is described. This code also generates user-oriented benchmark problems which exhibit the analytic behavior at interfaces. 5 figures, 1 table.

  3. Java/JNI/C/Fortran based HSVD/HLSVD custom plugins for the jMRUI software system : Development, installation and usage

    NARCIS (Netherlands)

    De Beer, R.; Van Ormondt, D.

    2015-01-01

    This work was done in the context of FP7 - PEOPLE Marie Curie Initial Training Network Project PITN-GA-2012-316679-TRANSACT. This report describes the development, installation and usage of the HSVD and HLSVD plugin for the jMRUI software system. The latter system is maintained by the TRANSACT EU

  4. HADA. A FORTRAN-IV program for the thermohydraulic design of an advanced pressurized light water reactor with a tight fuel rod lattice

    International Nuclear Information System (INIS)

    Dalle Donne, M.

    1985-03-01

    For the user of the program the input data are described in detail. Two sample runs demonstrate the usage of the program and the output. In addition to the description of the physical background given in KfK 3453, the provided and used solution algorithms are explained. In the last chapters the utility programs are described and an installation guide for the program system is listed. (orig.) [de

  5. A Structural Weight Estimation Program (SWEEP) for Aircraft. Volume III - Airloads Estimation Module. Appendix A: Module Flow Charts and FORTRAN Lists. Appendix B: Sample Output

    Science.gov (United States)

    1974-06-01

    nfcii* rcoov’«.>.ii.»i.ii.m.>«.»i «• »mwiw cunc fmumm. rcotw /cmtu.i.ii.fi.fi. Ml T • , ■I • Wua 0 IST ’’i’SL» or ne IHM ■0. V »im» SKS...COMIIMIt •••• «• MM>i.n r*n«iM Mi ■•>■ tttmm f« Mix • M<>Mi<«itii r*natM MT «•«•ii • «<><*>■«><»’ rinom Mi t»«-«!»»« >»•■»<«•> r*ii« ist Mi Mw<Mi...OOlMKOOiliKOOlli«)») I imo-liii.Vi.lT ) f» irittioi- viH -iim.a.a amoi-to 00 to II a itioi-i o r> VI-COIIMII>/«T.II %ftlNIMII>/«1.II OOlN.|l-«Oit«li<«l

  6. FADDEEV: A fortran code for the calculation of the frequency response matrix of multiple-input, multiple-output dynamic systems

    International Nuclear Information System (INIS)

    Owens, D.H.

    1972-06-01

    The KDF9/EGDON programme FADDEEV has been written to investigate a technique for the calculation of the matrix of frequency responses G(jw) describing the response of the output vector y from the multivariable differential/algebraic system S to the drive of the system input vector u. S: Ex = Ax + Bu, y = Cx, G(jw) = C(jw E - A ) -1 B. The programme uses an algorithm due to Faddeev and has been written with emphasis upon: (a) simplicity of programme structure and computational technique which should enable a user to find his way through the programme fairly easily, and hence facilitate its manipulation as a subroutine in a larger code; (b) rapid computational ability, particularly in systems with fairly large number of inputs and outputs and requiring the evaluation of the frequency responses at a large number of frequencies. Transport or time delays must be converted by the user to Pade or Bode approximations prior to input. Conditions under which the algorithm fails to give accurate results are identified, and methods for increasing the accuracy of the calculations are discussed. The conditions for accurate results using FADDEEV indicate that its application is specialized. (author)

  7. TRAJ - a FORTRAN 77 computer program for the calculation of trajectories on the basis of space and time varying velocity fields

    International Nuclear Information System (INIS)

    Zimmer, J.

    1986-09-01

    The computation of three dimensional trajectories is described in this report. Since measurements of the position and velocity of individual fluid parcels are difficult to be carried out and analytic solutions applicable to the trajectory problem are not available, trajectories have to be calculated by successive observations of the corresponding velocity fields using a method of successive approximation. The application is restricted to cartesian grid coordinate system with equidistant grid points. This model was developed for meteorological purposes (transport of pollutants) but can also be used for other fluids and scales. (orig./PW) [de

  8. ROBUST: an interactive FORTRAN-77 package for exploratory data analysis using parametric, ROBUST and nonparametric location and scale estimates, data transformations, normality tests, and outlier assessment

    Science.gov (United States)

    Rock, N. M. S.

    ROBUST calculates 53 statistics, plus significance levels for 6 hypothesis tests, on each of up to 52 variables. These together allow the following properties of the data distribution for each variable to be examined in detail: (1) Location. Three means (arithmetic, geometric, harmonic) are calculated, together with the midrange and 19 high-performance robust L-, M-, and W-estimates of location (combined, adaptive, trimmed estimates, etc.) (2) Scale. The standard deviation is calculated along with the H-spread/2 (≈ semi-interquartile range), the mean and median absolute deviations from both mean and median, and a biweight scale estimator. The 23 location and 6 scale estimators programmed cover all possible degrees of robustness. (3) Normality: Distributions are tested against the null hypothesis that they are normal, using the 3rd (√ h1) and 4th ( b 2) moments, Geary's ratio (mean deviation/standard deviation), Filliben's probability plot correlation coefficient, and a more robust test based on the biweight scale estimator. These statistics collectively are sensitive to most usual departures from normality. (4) Presence of outliers. The maximum and minimum values are assessed individually or jointly using Grubbs' maximum Studentized residuals, Harvey's and Dixon's criteria, and the Studentized range. For a single input variable, outliers can be either winsorized or eliminated and all estimates recalculated iteratively as desired. The following data-transformations also can be applied: linear, log 10, generalized Box Cox power (including log, reciprocal, and square root), exponentiation, and standardization. For more than one variable, all results are tabulated in a single run of ROBUST. Further options are incorporated to assess ratios (of two variables) as well as discrete variables, and be concerned with missing data. Cumulative S-plots (for assessing normality graphically) also can be generated. The mutual consistency or inconsistency of all these measures helps to detect errors in data as well as to assess data-distributions themselves.

  9. General Purpose Fortran Program for Discrete-Ordinate-Method Radiative Transfer in Scattering and Emitting Layered Media: An Update of DISORT

    Science.gov (United States)

    Tsay, Si-Chee; Stamnes, Knut; Wiscombe, Warren; Laszlo, Istvan; Einaudi, Franco (Technical Monitor)

    2000-01-01

    This update reports a state-of-the-art discrete ordinate algorithm for monochromatic unpolarized radiative transfer in non-isothermal, vertically inhomogeneous, but horizontally homogeneous media. The physical processes included are Planckian thermal emission, scattering with arbitrary phase function, absorption, and surface bidirectional reflection. The system may be driven by parallel or isotropic diffuse radiation incident at the top boundary, as well as by internal thermal sources and thermal emission from the boundaries. Radiances, fluxes, and mean intensities are returned at user-specified angles and levels. DISORT has enjoyed considerable popularity in the atmospheric science and other communities since its introduction in 1988. Several new DISORT features are described in this update: intensity correction algorithms designed to compensate for the 8-M forward-peak scaling and obtain accurate intensities even in low orders of approximation; a more general surface bidirectional reflection option; and an exponential-linear approximation of the Planck function allowing more accurate solutions in the presence of large temperature gradients. DISORT has been designed to be an exemplar of good scientific software as well as a program of intrinsic utility. An extraordinary effort has been made to make it numerically well-conditioned, error-resistant, and user-friendly, and to take advantage of robust existing software tools. A thorough test suite is provided to verify the program both against published results, and for consistency where there are no published results. This careful attention to software design has been just as important in DISORT's popularity as its powerful algorithmic content.

  10. Feasibility study for SOFC-GT hybrid locomotive power: Part I. Development of a dynamic 3.5 MW SOFC-GT FORTRAN model

    OpenAIRE

    Martinez, AS; Brouwer, J; Samuelsen, GS

    2012-01-01

    This work presents the development of a dynamic SOFC-GT hybrid system model applied to a long-haul freight locomotive in operation. Given the expectations of the rail industry, the model is used to develop a preliminary analysis of the proposed system's operational capability on conventional diesel fuel as well as natural gas and hydrogen as potential fuels in the future. It is found that operation of the system on all three of these fuels is feasible with favorable efficiencies and reasonabl...

  11. Feasibility study for SOFC-GT hybrid locomotive power: Part I. Development of a dynamic 3.5 MW SOFC-GT FORTRAN model

    Science.gov (United States)

    Martinez, Andrew S.; Brouwer, Jacob; Samuelsen, G. Scott

    2012-09-01

    This work presents the development of a dynamic SOFC-GT hybrid system model applied to a long-haul freight locomotive in operation. Given the expectations of the rail industry, the model is used to develop a preliminary analysis of the proposed system's operational capability on conventional diesel fuel as well as natural gas and hydrogen as potential fuels in the future. It is found that operation of the system on all three of these fuels is feasible with favorable efficiencies and reasonable dynamic response. The use of diesel fuel reformate in the SOFC presents a challenge to the electrochemistry, especially as it relates to control and optimization of the fuel utilization in the anode compartment. This is found to arise from the large amount of carbon monoxide in diesel reformate that is fed to the fuel cell, limiting the maximum fuel utilization possible. This presents an opportunity for further investigations into carbon monoxide electrochemical oxidation and/or system integration studies where the efficiency of the fuel reformer can be balanced against the needs of the SOFC.

  12. ZIP MK 2 : A Fortran code for calculating the eigenvalues (poles and zeros and frequency responses of large sets of linear equations representing complex dynamic systems)

    International Nuclear Information System (INIS)

    Sumner, H.M.

    1969-03-01

    The KDF9/EGDON program ZIP MK 2 is the third of a series of programs for off-line digital computer analysis of dynamic systems: it has been designed specifically to cater for the needs of the design or control engineer in having an input scheme which is minimally computer-oriented. It uses numerical algorithms which are as near fool-proof as the author could discover or devise, and has comprehensive diagnostic sections to help the user in the event of faulty data or machine execution. ZIP MK 2 accepts mathematical models comprising first order linear differential and linear algebraic equations, and from these computes and factorises the transfer functions between specified pairs of output and input variables; if desired, the frequency response may be computed from the computed transfer function. The model input scheme is fully compatible with the frequency response programs FRP MK 1 and MK 2, except that, for ZIP MK 2, transport, or time-delays must be converted by the user to Pade or Bode approximations prior to input. ZIP provides the pole-zero plot, (or complex plane analysis), while FRP provides the frequency response and FIFI the time domain analyses. The pole-zero method of analysis has been little used in the past for complex models, especially where transport delays occur, and one of its primary purposes is as a research tool to investigate the usefulness of this method, for process plant, whether nuclear, chemical or other continuous processes. (author)

  13. ISOLA II - A FORTRAN IV code for the calculation of the long-term α- and β-dose distributions in the vicinity of nuclear installations

    International Nuclear Information System (INIS)

    Huebschmann, W.; Nagel, D.

    1975-12-01

    The computer code ISOLA is used to calculate the annual radiation doses caused by α- and β-active off-gases in the environment of the Karlsruhe Nuclear Research Center. In the revised version ISOLA II the double Gaussian distribution model is strictly observed. As a consequence, the contribution of activity from neighbour sectors is taken into account. Up to 15 emitters may be coped with simultaneously. The emission rates are considered to be constant during the given time interval. Optionally either the isodoses chart of a specified area (for instance a square 20 by 20 km) or a list of doses calculated at up to 2,000 locations (for instance the living areas) in the environment may be set up. Input and output are shown for a specific case. (orig.) [de

  14. Determination of plateau slope and activity using filter measurement results and W. Chauvenet's criterion (Mage II and Fortran IV calculation programmes); Determination de pente de palier et d'activite a partir de resultats de mesure filtres selon le critere de W. Chauvenet (programmes de calcul en Mage II et Fortran IV)

    Energy Technology Data Exchange (ETDEWEB)

    Becker, A [Commissariat a l' Energie Atomique, Saclay (France). Centre d' Etudes Nucleaires, Departement d' Electronique Generale, Laboratoire de Metrologie de la Radioactivite

    1967-10-01

    In order to permit (at least partially) the objective comparison of plateau characteristics of gas-ionisation counters, plateaus which are obtained when each radioactive sample from normal LMR production is measured, a programme has been drawn up (on an electronic computer) comprising a processing section using least squares for obtaining the corrected plateaux and energies. With a view to an automatic operation of radio-measurement chains, the programme also comprises a preliminary section in which the statistical considerations of B. Peirce have been applied in the version better known as Chauvenet's criterion; this has been done with a view to eliminate measurement results which are dubious and even totally wrong. (author) [French] Pour rendre possibles (au moins partiellement) des comparaisons objectives entre paliers de caracteristiques de compteurs a ionisation gazeuse, paliers traces lors de la mesure de chaque etalon radioactif de la production courante du L.M.R., il a ete ecrit un programme (sur machine a calculer electronique) comportant une partie de traitement par les moindres carres en vue de la determination de pentes et d'activites corrigees. En prevision d'une exploitation automatique de cha es de radio-mesure, le programme comporte en outre une partie preliminaire dans laquelle des considerations statistiques dues a B. Peirce ont ete appliquees dans leur version plus connue sous le nom de critere de Chauvenet et ce dans le but d'une elimination des resultats de mesure suspects et meme veritablement aberrants. (auteur)

  15. Computer program to fit a hyperellipse to a set of phase-space points in as many as six dimensions. [HELIPS, and COFAC to determine derivatives of determinants, in FORTRAN

    Energy Technology Data Exchange (ETDEWEB)

    Wadlinger, E.A.

    1980-03-01

    A computer program that will fit a hyperellipse to a set of phase-space points in as many as 6 dimensions was written and tested. The weight assigned to the phase-space points can be varied as a function of their distance from the centroid of the distribution. Varying the weight enables determination of whether there is a difference in ellipse orientation between inner and outer particles. This program should be useful in studying the effects of longitudinal and transverse phase-space couplings.

  16. Trinuc: a fortran program for the identification, and the energy and momentum determination of the light charged particles (p,d,t) and neutrons emitted after the absorption at the rest of negative pions in light nuclei

    International Nuclear Information System (INIS)

    Rui, R.

    1982-01-01

    Energy, momentum and missing mass spectra, angular distribution of two particles (n,n), (p,p), (n,d) and (n,t) detected in coincidence experiments, have been calculated with this program. At this moment only π - absorption reactions on 12 C nuclei have been studied, even if the program is adaptable to execute these calculations for any kind of target nucleus. The π - + 12 C experiment was performed at the triumf meson facility - Vancouver B.C., Canada -, under the supervision of prof. C. Cernigoi. The instrumental apparatus used to perform the experiment consisted of a beam telescope (ref. 1), of four large are a plastic counters NC (ref. 2) and of a large telescope plastic counter RT (ref.3). The tecniques of time of flight (TOF) e x de (only for charged particles) have been used to deduce the energy and identify the mass of the detected particles

  17. RCP01: a Monte Carlo program for solving neutron and photon transport problems in three-dimensional geometry with detailed energy description (LWBR development program). [For CDC-6600 and -7600, in FORTRAN

    Energy Technology Data Exchange (ETDEWEB)

    Candelore, N R; Gast, R C; Ondis, II, L A

    1978-08-01

    The RCP01 Monte Carlo program for the CDC-7600 and CDC-6600 performs fixed source or eigenfunction neutron reaction rate calculations, or photon reaction rate calculations, for complex geometries. The photon calculations may be linked to the neutron reaction rate calculations. For neutron calculations, the full energy range is treated as required for neutron birth by the fission process and the subsequent neutron slowing down and thermalization, i.e., 10 MeV to 0 eV; for photon calculations the same energy range is treated. The detailed cross sections required for the neutron or photon collision processes are provided by RCPL1. This report provides details of the various types of neutron and photon starts and collisions, the common geometry tracking, and the input required. 37 figures, 1 table.

  18. Interim report on the development and application of environmental mapped data digitization, encoding, analysis, and display software for the ALICE system. Volume II. [MAP, CHAIN, FIX, and DOUT, in FORTRAN IV for PDP-10

    Energy Technology Data Exchange (ETDEWEB)

    Amiot, L.W.; Lima, R.J.; Scholbrock, S.D.; Shelman, C.B.; Wehman, R.H.

    1979-06-01

    Volume I of An Interim Report on the Development and Application of Environmental Mapped Data Digitization, Encoding, Analysis, and Display Software for the ALICE System provided an overall description of the software developed for the ALICE System and presented an example of its application. The scope of the information presented in Volume I was directed both to the users and developers of digitization, encoding, analysis, and display software. Volume II presents information which is directly related to the actual computer code and operational characteristics (keys and subroutines) of the software. Volume II will be of more interest to developers of software than to users of the software. However, developers of software should be aware that the code developed for the ALICE System operates in an environment where much of the peripheral hardware to the PDP-10 is ANL/AMD built. For this reason, portions of the code may have to be modified for implementation on other computer system configurations. 11 tables.

  19. A Heuristic FORTRAN Model of the Identification and Allocation of CONUS (Continental United States) Prime BEEF (Base Engineer Emergency Forces) Forces in Support of Theater OPlan (Operation Plan) Requirements.

    Science.gov (United States)

    1983-09-01

    Group Schein’s (1970) definition of "group" is: A psychological group is any number of people who (1) interact with one another, (2) are... psychologically aware of one another, and (3) perceive themselves to be a group. From the perspective of task design and group processes, Griffin (1982) defines...requirements (Bartlow, 1983). This is done with no planned consideration for deploying base Alevel resources to the same deployed location. Although

  20. An Algebraic Machinery for Optimizing Data Motion for HPF

    Directory of Open Access Journals (Sweden)

    Jan-Jan Wu

    1997-01-01

    Full Text Available This paper describes a general compiler optimization technique that reduces communica tion over-head for FORTRAN-90 (and High Performance FORTRAN implementations on massively parallel machines.

  1. Figure10

    Data.gov (United States)

    U.S. Environmental Protection Agency — Fortran/NCARgraphics program to compute and plot RRF mean and variability:map_rrf_variability_13runs_epimax.f Ioapi files needed by Fortran/NCARGraphics code:...

  2. A Computer Program to Compile a Flander-Amidon Interaction Analysis Matrix

    Science.gov (United States)

    Hardy, Robert C.

    1970-01-01

    A program was written in FORTRAN IV for an IBM 3600 to produce the Flanders-Amidon Interaction Analysis Matrix and to also produce percentages of certain p FORTRAN IV and V for the Univac 1108. (Editor/RT)

  3. Integrated system for production of neutronics and photonics calculational constants. Volume 21, Part C, Program SIGMAL (version 79-1): Doppler-broaden evaluated cross sections in the Livermore-Evaluated Nuclear Data Library (ENDL) format. [In FORTRAN IV for CDC 7600

    Energy Technology Data Exchange (ETDEWEB)

    Cullen, D.E.

    1979-03-17

    A code, SIGMAL, to Doppler-broaden evaluated cross sections in the ENDL format was designed. This code can Doppler-broaden cross sections that result from neutrons, protons, deuterons, tritons, /sup 3/He, or alpha particles incident on any target nuclei. The code allows broadening to up to 100 final temperatures, either directly from the initial temperature or by bootstrapping to successively higher temperatures. 6 figures, 2 tables.

  4. Using computer program RELAP5/MOD2 on microcomputers

    International Nuclear Information System (INIS)

    Grgic, D.; Bajs, T; Cavlina, N.; Debrecin, N.

    1990-01-01

    Our work on installation of RELAP5/MOD2 code on IBM4341, mVAX 11, MGT-386 and COMPAQ-386/20e computers is described. Main characteristics of RELAP5/MOD2 structure programming style and differences between FORTRAN VS, VAX-11 FORTRAN and NDP FORTRAN 386 are presented. We discussed basic philosophy used in modification and testing and test results. (author)

  5. COLLAGE: a numerical code for radionuclide migration through a fractured geosphere in aqueous and colloidal phases

    Energy Technology Data Exchange (ETDEWEB)

    Grindrod, P.; Brown, R.C.; Nicholas, D.G. [Intera Information Technologies, Henley-on-Thames, Oxfordshire (United Kingdom)

    1992-06-01

    Describes the COLLAGE model for radionuclide migration. COLLAGE models a one dimensional breakthrough problem for radionuclides in groundwater containing natural colloids. The program is written in FORTRAN 77.

  6. COLLAGE: a numerical code for radionuclide migration through a fractured geosphere in aqueous and colloidal phases

    International Nuclear Information System (INIS)

    Grindrod, P.; Brown, R.C.; Nicholas, D.G.

    1992-06-01

    Describes the COLLAGE model for radionuclide migration. COLLAGE models a one dimensional breakthrough problem for radionuclides in groundwater containing natural colloids. The program is written in FORTRAN 77

  7. The FSE system for crop simulation, version 2.1

    NARCIS (Netherlands)

    Kraalingen, van D.W.G.

    1995-01-01

    A FORTRAN 77 programming environment for continuous simulation of agro-ecological processes, such as crop growth and calculation of water balances is presented. This system, called FSE (FORTRAN Simulation Environment), consists of a main program, weather data and utilities for performing specific

  8. An Initial Evaluation of the NAG f90 Compiler

    Directory of Open Access Journals (Sweden)

    Michael Metcalf

    1992-01-01

    Full Text Available A few weeks before the formal publication of the ISO Fortran 90 Standard, NAG announced the world's first f90 compiler. We have evaluated the compiler by using it to assess the impact of Fortran 90 on the CERN Program Library.

  9. User manual of FRAPCON-I computer code

    International Nuclear Information System (INIS)

    Chia, C.T.

    1985-11-01

    The manual for using the FRAPCON-I code implanted by Reactor Department of Brazilian-CNEN to convert IBM FORTRAN in FORTRAN 77 of Honeywell Bull computer is presented. The FRAPCON-I code describes the behaviour of fuel rods of PWR type reactors at stationary state during long periods of burnup. (M.C.K.)

  10. hepawk - A language for scanning high energy physics events

    International Nuclear Information System (INIS)

    Ohl, T.

    1992-01-01

    We present the programming language hepawk, designed for convenient scanning of data structures arising in the simulation of high energy physics events. The interpreter for this language has been implemented in FORTRAN-77, therefore hepawk runs on any machine with a FORTRAN-77 compiler. (orig.)

  11. For Trilinos tutorial.

    Energy Technology Data Exchange (ETDEWEB)

    Lemaster, Michelle Nicole; Xu, Xiaofeng (City University of New York); Morris, Karla (City University of New York); Filippone, Salvatore (University of Rome); Xia, Jim (IBM); Rouson, Damian W. I.

    2010-11-01

    The objectives are: (1) To increase the adoption of Trilinos throughout DOE research communities that principally write Fortran, e.g. climate & combustion researchers; and (2) To maintain the OOP philosophy of the Trilinos project while using idioms that feel natural to Fortran programmers.

  12. Computer Programs in Marine Science

    Science.gov (United States)

    1976-04-01

    Technology Room 5-207 Cambridge, HA 02139 Telephone (617) 253-5941 Currcnt Profiles from Tilt Data Language - Hardware - ,.alculate3 current profiles gene ...HORIZCNTAL FANC -E 120 FORTRAN CCC 3800 LINE FRINTER PLOTS 16 FORTRAN CDC 1800 INTERNAL GkAVITY UAVLS CISPER 186 107 FIRTRAN CDC 3800 ANNOTATED TRACK ON

  13. Software Tools for Software Maintenance

    Science.gov (United States)

    1988-10-01

    COMMUNICATIONS, AND COMPUTER SCIENCES I ,(AIRMICS) FO~SOFTWARE TOOLS (.o FOR SOF1 ’ARE MAINTENANCE (ASQBG-1-89-001) October, 1988 DTIC ELECTE -ifB...SUNWW~. B..c Program An~Iysw HA.c C-Tractr C Cobol Stncturing Facility VS Cobol 11 F-Scan Foctma Futbol Cobol Fortran Sltiuc Code Anaiyaer Fortran IS

  14. Linear-Algebra Programs

    Science.gov (United States)

    Lawson, C. L.; Krogh, F. T.; Gold, S. S.; Kincaid, D. R.; Sullivan, J.; Williams, E.; Hanson, R. J.; Haskell, K.; Dongarra, J.; Moler, C. B.

    1982-01-01

    The Basic Linear Algebra Subprograms (BLAS) library is a collection of 38 FORTRAN-callable routines for performing basic operations of numerical linear algebra. BLAS library is portable and efficient source of basic operations for designers of programs involving linear algebriac computations. BLAS library is supplied in portable FORTRAN and Assembler code versions for IBM 370, UNIVAC 1100 and CDC 6000 series computers.

  15. VizieR Online Data Catalog: Habitable zones around main-sequence stars (Kopparapu+, 2014)

    Science.gov (United States)

    Kopparapu, R. K.; Ramirez, R. M.; Schottelkotte, J.; Kasting, J. F.; Domagal-Goldman, S.; Eymet, V.

    2017-08-01

    Language: Fortran 90 Code tested under the following compilers/operating systems: ifort/CentOS linux Description of input data: No input necessary. Description of output data: Output files: HZs.dat, HZ_coefficients.dat System requirements: No major system requirement. Fortran compiler necessary. Calls to external routines: None. Additional comments: None (1 data file).

  16. Software support for irregular and loosely synchronous problems

    Science.gov (United States)

    Choudhary, A.; Fox, G.; Hiranandani, S.; Kennedy, K.; Koelbel, C.; Ranka, S.; Saltz, J.

    1992-01-01

    A large class of scientific and engineering applications may be classified as irregular and loosely synchronous from the perspective of parallel processing. We present a partial classification of such problems. This classification has motivated us to enhance FORTRAN D to provide language support for irregular, loosely synchronous problems. We present techniques for parallelization of such problems in the context of FORTRAN D.

  17. Experiences in Data-Parallel Programming

    Directory of Open Access Journals (Sweden)

    Terry W. Clark

    1997-01-01

    Full Text Available To efficiently parallelize a scientific application with a data-parallel compiler requires certain structural properties in the source program, and conversely, the absence of others. A recent parallelization effort of ours reinforced this observation and motivated this correspondence. Specifically, we have transformed a Fortran 77 version of GROMOS, a popular dusty-deck program for molecular dynamics, into Fortran D, a data-parallel dialect of Fortran. During this transformation we have encountered a number of difficulties that probably are neither limited to this particular application nor do they seem likely to be addressed by improved compiler technology in the near future. Our experience with GROMOS suggests a number of points to keep in mind when developing software that may at some time in its life cycle be parallelized with a data-parallel compiler. This note presents some guidelines for engineering data-parallel applications that are compatible with Fortran D or High Performance Fortran compilers.

  18. Software Engineering Tools for Scientific Models

    Science.gov (United States)

    Abrams, Marc; Saboo, Pallabi; Sonsini, Mike

    2013-01-01

    Software tools were constructed to address issues the NASA Fortran development community faces, and they were tested on real models currently in use at NASA. These proof-of-concept tools address the High-End Computing Program and the Modeling, Analysis, and Prediction Program. Two examples are the NASA Goddard Earth Observing System Model, Version 5 (GEOS-5) atmospheric model in Cell Fortran on the Cell Broadband Engine, and the Goddard Institute for Space Studies (GISS) coupled atmosphere- ocean model called ModelE, written in fixed format Fortran.

  19. ANIBAL - a Hybrid Computer Language for EAI 680-PDP 8/I, FPP 12

    DEFF Research Database (Denmark)

    Højberg, Kristian Søe

    1974-01-01

    and special hybrid computer commands. ANIBAL consists of a general-purpose analog interface subroutine ANI and the macro processor 8BAL (DECUS NO 8-497A.1). When a source program with FORTRAN and 8BAL statements is processed, the FORTRAN statements are transferred unchanged, while the 8BAL code is translated...... essentially to ANI sub-routine calls, which are defined in a macro library. The resulting code is translated by the standard FORTRAN compiler. The language is very flexible as the instructions can be changed and commands can be added to or excluded from the library ....

  20. The Earth Resources Laboratory Applications Software (ELAS) in university research and education: An operator oriented geobased information system

    Science.gov (United States)

    Coker, B. L.; Kind, T. C.; Smith, W. F., Jr.; Weber, N. V.

    1981-01-01

    Created for analyzing and processing digital data such as that collected by multispectral scanners or digitized from maps, ELAS is designed for ease of user operation and includes its own FORTRAN operating monitor and an expandable set of application modules which are FORTRAN overlays. On those machines that do not support FORTRAN overlaying, the modules exist as subprograms. The subsystem can be implemented on most 16-bit or 32-bit machines and is capable of, but not limited to, operating on low-cost minicomputer systems. The recommended hardware configuration for ELAS and a representative listing of some operating and application modules are presented.

  1. Library of subroutines to produce one- and two-dimensional statistical distributions on the ES-1010 computer

    International Nuclear Information System (INIS)

    Vzorov, I.K.; Ivanov, V.V.

    1978-01-01

    A library of subroutines to produce 1- and 2-dimensional distribution on the ES-1010 computer is described. 1-dimensional distribution is represented as the histogram, 2-dimensional one is represented as the table. The library provides such opportunities as booking and deleting, filling and clearing histograms (tables), arithmetic operations with them, and printing histograms (tables) on the computer printer with variable printer line. All subroutines are written in FORTRAN-4 language and can be called from the program written in FORTRAN or in ASSEMBLER. This library can be implemented on all computer systems that offer a FORTRAN-4 compiler

  2. Computer Language For Optimization Of Design

    Science.gov (United States)

    Scotti, Stephen J.; Lucas, Stephen H.

    1991-01-01

    SOL is computer language geared to solution of design problems. Includes mathematical modeling and logical capabilities of computer language like FORTRAN; also includes additional power of nonlinear mathematical programming methods at language level. SOL compiler takes SOL-language statements and generates equivalent FORTRAN code and system calls. Provides syntactic and semantic checking for recovery from errors and provides detailed reports containing cross-references to show where each variable used. Implemented on VAX/VMS computer systems. Requires VAX FORTRAN compiler to produce executable program.

  3. The FLIC1 conversion code

    International Nuclear Information System (INIS)

    Basher, J.C.

    1964-08-01

    This memorandum describes the FORTRAN II programme, FLIC1, which converts programmes written in one dialect of FORTRAN to another dialect of the same language. Particular translation processes considered are those from existing dialects (FORTRAN II and S2) to EGTRAN1 - the dialect to be used initially on the Winfrith KDF9. The basic version of the programme replaces FII or S2 statements where these are different from, but in one-to-one correspondence with, E1 statements. Other statements which need changing are flagged. (author)

  4. Numerical Schemes for Charged Particle Movement in PIC Simulations

    International Nuclear Information System (INIS)

    Kulhanek, P.

    2001-01-01

    A PIC model of plasma fibers is developed in the Department of Physics of the Czech Technical University for several years. The program code was written in FORTRAN 95, free-style (without compulsory columns). Fortran compiler and linker were used from Compaq Visual Fortran 6.1A embedded in the Microsoft Development studio GUI. Fully three-dimensional code with periodical boundary conditions was developed. Electromagnetic fields are localized on a grid and particles move freely through this grid. One of the partial problems of the PIC model is the numerical particle solver, which will be discussed in this paper. (author)

  5. The comparison and selection of programming languages for high energy physics applications

    International Nuclear Information System (INIS)

    White, B.; Stanford Linear Accelerator Center, CA

    1989-01-01

    In this paper a comparison is presented of programming languages in the context of high energy physics software applications. The evaluation method uses was specifically devised to address the issues of particular importance to HEP applications, not just the technical features of the languages considered. The candidate languages evaluated were Ada, C, FORTRAN 77, FORTRAN 8x, Pascal and PL/I. Some conclusions are drawn and recommendations made regarding the role of FORTRAN and other programming languages in the current and future development of HEP software. (orig.)

  6. The FLIC conversion codes

    International Nuclear Information System (INIS)

    Basher, J.C.

    1965-05-01

    This report describes the FORTRAN programmes, FLIC 1 and FLIC 2. These programmes convert programmes coded in one dialect of FORTRAN to another dialect of the same language. FLIC 1 is a general pattern recognition and replacement programme whereas FLIC 2 contains extensions directed towards the conversion of FORTRAN II and S2 programmes to EGTRAN 1 - the dialect now in use on the Winfrith KDF9. FII or S2 statements are replaced where possible by their E1 equivalents; other statements which may need changing are flagged. (author)

  7. The FLIC conversion codes

    Energy Technology Data Exchange (ETDEWEB)

    Basher, J C [General Reactor Physics Division, Atomic Energy Establishment, Winfrith, Dorchester, Dorset (United Kingdom)

    1965-05-15

    This report describes the FORTRAN programmes, FLIC 1 and FLIC 2. These programmes convert programmes coded in one dialect of FORTRAN to another dialect of the same language. FLIC 1 is a general pattern recognition and replacement programme whereas FLIC 2 contains extensions directed towards the conversion of FORTRAN II and S2 programmes to EGTRAN 1 - the dialect now in use on the Winfrith KDF9. FII or S2 statements are replaced where possible by their E1 equivalents; other statements which may need changing are flagged. (author)

  8. The programming language EFL

    Science.gov (United States)

    Feldman, S. I.

    1978-01-01

    EFL is a comprehensive language designed to make it easy to write portable, understandable programs. It provides a rich set of data types and structures, a convenient operator set, and good control flow forms. The lexical form is easy to type and to read. Whenever possible, EFL uses the same forms that Ratfor does; in this sense EFL may be viewed as a superset of Ratfor. EFL is a well-defined language; this distinguishes it from most FORTRAN preprocessors which only add simple flow of control constructs to FORTRAN. The EFL compiler generates (possibly tailored) Standard FORTRAN as its output. EFL should catch and diagnose all syntax errors.

  9. ARC Code TI: CFD Utility Software Library

    Data.gov (United States)

    National Aeronautics and Space Administration — The CFD Utility Software Library consists of nearly 30 libraries of Fortran 90 and 77 subroutines and almost 100 applications built on those libraries. Many of the...

  10. FEMME, a flexible environment for mathematically modelling the environment

    NARCIS (Netherlands)

    Soetaert, K.E.R.; DeClippele, V.; Herman, P.M.J.

    2002-01-01

    A new, FORTRAN-based, simulation environment called FEMME (Flexible Environment for Mathematically Modelling the Environment), designed for implementing, solving and analysing mathematical models in ecology is presented. Three separate phases in ecological modelling are distinguished: (1) the model

  11. Mixed-Language High-Performance Computing for Plasma Simulations

    Directory of Open Access Journals (Sweden)

    Quanming Lu

    2003-01-01

    Full Text Available Java is receiving increasing attention as the most popular platform for distributed computing. However, programmers are still reluctant to embrace Java as a tool for writing scientific and engineering applications due to its still noticeable performance drawbacks compared with other programming languages such as Fortran or C. In this paper, we present a hybrid Java/Fortran implementation of a parallel particle-in-cell (PIC algorithm for plasma simulations. In our approach, the time-consuming components of this application are designed and implemented as Fortran subroutines, while less calculation-intensive components usually involved in building the user interface are written in Java. The two types of software modules have been glued together using the Java native interface (JNI. Our mixed-language PIC code was tested and its performance compared with pure Java and Fortran versions of the same algorithm on a Sun E6500 SMP system and a Linux cluster of Pentium~III machines.

  12. Toepassing van finite difference- en finite element methoden voor het oplossen van een aantal stationaire grondwaterstromingsproblemen

    NARCIS (Netherlands)

    Wesseling, J.G.

    1977-01-01

    In dit verslag worden de oplossingsmethoden met de bijbehorende zelfontwikkelde FORTRAN computerprogramma's van de volgende stationaire grondwaterstromingsgevallen gegeven: - Analyse van de grondwaterstroming in een horizontaal vlak over een gedeelte van de Astense Aa, waar van plaats tot plaats

  13. Theoretical science and the future of large scale computing

    International Nuclear Information System (INIS)

    Wilson, K.G.

    1983-01-01

    The author describes the application of computer simulation to physical problems. In this connection the FORTRAN language is considered. Furthermore the application of computer networks is described whereby the processing of experimental data is considered. (HSI).

  14. Multi-pressure boiler thermodynamics analysis code

    International Nuclear Information System (INIS)

    Lorenzoni, G.

    1992-01-01

    A new method and the relative FORTRAN program for the thermodynamics design analysis of a multipressure boiler are reported. This method permits the thermodynamics design optimization with regard to total exergy production and a preliminary costs

  15. Computer program for afterheat temperature distribution for mobile nuclear power plant

    Science.gov (United States)

    Parker, W. G.; Vanbibber, L. E.

    1972-01-01

    ESATA computer program was developed to analyze thermal safety aspects of post-impacted mobile nuclear power plants. Program is written in FORTRAN 4 and designed for IBM 7094/7044 direct coupled system.

  16. Computer Program For Linear Algebra

    Science.gov (United States)

    Krogh, F. T.; Hanson, R. J.

    1987-01-01

    Collection of routines provided for basic vector operations. Basic Linear Algebra Subprogram (BLAS) library is collection from FORTRAN-callable routines for employing standard techniques to perform basic operations of numerical linear algebra.

  17. Simulation calculations for a catalytic exchange/cryogenic distillation hydrogen isotope separation process

    International Nuclear Information System (INIS)

    Rodman, M.; Howard, D.W.

    1984-01-01

    Some of the aspects of the optimization and simulation calculations for the Moderator Detritiation Plant thay may be applicable to other processes are described. The FORTRAN optimization program and the CPES and PROCESS distillation calculation are covered

  18. Information Technologist (The) - Vol 3, No 1 (2006)

    African Journals Online (AJOL)

    The Information Technologist. ... Labour market expectation of Nigerian computer science / Information Communication Technology (ICT) graduates · EMAIL ... An empirical comparison of Qbasic, FORTRAN, C, Pascal, C, Visual Basic and ...

  19. Chiemeke, SC

    African Journals Online (AJOL)

    The Information Technologist. ... An empirical comparison of Qbasic, FORTRAN, C, Pascal, C++, Visual Basic and Visual C ... Labour market expectation of Nigerian computer science / Information Communication Technology (ICT) graduates

  20. 76 FR 63554 - Transportation Conformity Rule: MOVES Regional Grace Period Extension

    Science.gov (United States)

    2011-10-13

    ... written in FORTRAN and used simple text files for data input and output, MOVES2010a is written in JAVA and uses a relational database structure in MYSQL to handle input and output as data tables. These changes...

  1. 76 FR 63575 - Transportation Conformity Rule: MOVES Regional Grace Period Extension

    Science.gov (United States)

    2011-10-13

    ... written in FORTRAN and used simple text files for data input and output, MOVES2010a is written in JAVA and uses a relational database structure in MYSQL to handle input and output as data tables. These changes...

  2. 77 FR 11394 - Transportation Conformity Rule: MOVES Regional Grace Period Extension

    Science.gov (United States)

    2012-02-27

    ... written in FORTRAN and used simple text files for data input and output, MOVES is written in JAVA and uses a relational database structure in MYSQL to handle input and output as data tables.\\13\\ \\13\\ Some...

  3. LOADING SIMULATION PROGRAM C

    Science.gov (United States)

    LSPC is the Loading Simulation Program in C++, a watershed modeling system that includes streamlined Hydrologic Simulation Program Fortran (HSPF) algorithms for simulating hydrology, sediment, and general water quality

  4. JAVA-Based Implementation of Monterey-Miami Parabolic Equation (MMPE) Model with Enhanced Visualization and Improved Method of Environmental Definition

    National Research Council Canada - National Science Library

    Ha, Yonghoon

    2000-01-01

    .... This approach requires the user to have installed both Matlab and Fortran compilers. The MMPE model and associated acoustic processing tools are now rewritten in the object-oriented language Java...

  5. BUILDING MODEL ANALYSIS APPLICATIONS WITH THE JOINT UNIVERSAL PARAMETER IDENTIFICATION AND EVALUATION OF RELIABILITY (JUPITER) API

    Science.gov (United States)

    The open-source, public domain JUPITER (Joint Universal Parameter IdenTification and Evaluation of Reliability) API (Application Programming Interface) provides conventions and Fortran-90 modules to develop applications (computer programs) for analyzing process models. The input ...

  6. Description and manual for the use of DRIVER - an interactive modelling aid

    CSIR Research Space (South Africa)

    Furniss, PR

    1977-09-01

    Full Text Available The modelling aid DRIVER is described. It permits the interactive manipulation of the parameters and variables of difference models which are implemented as FORTRAN subroutines. Relationships in the model can be expressed as arbitrary functions. A...

  7. Structured Design Language for Computer Programs

    Science.gov (United States)

    Pace, Walter H., Jr.

    1986-01-01

    Box language used at all stages of program development. Developed to provide improved productivity in designing, coding, and maintaining computer programs. BOX system written in FORTRAN 77 for batch execution.

  8. TableSim--A program for analysis of small-sample categorical data.

    Science.gov (United States)

    David J. Rugg

    2003-01-01

    Documents a computer program for calculating correct P-values of 1-way and 2-way tables when sample sizes are small. The program is written in Fortran 90; the executable code runs in 32-bit Microsoft-- command line environments.

  9. A Computer-Assisted Laboratory Sequence for Petroleum Geology.

    Science.gov (United States)

    Lumsden, David N.

    1979-01-01

    Describes a competitive oil-play game for petroleum geology students. It is accompanied by a computer program written in interactive Fortran. The program, however, is not essential, but useful for adding more interest. (SA)

  10. Marshall information retrieval and display system (MIRADS)

    Science.gov (United States)

    Groover, J. L.; Jones, S. C.; King, W. L.

    1974-01-01

    Program for data management system allows sophisticated inquiries while utilizing simplified language. Online system is composed of several programs. System is written primarily in COBOL with routines in ASSEMBLER and FORTRAN V.

  11. ORBITALES. A program for the calculation of wave functions with an analytical central potential

    International Nuclear Information System (INIS)

    Yunta Carretero; Rodriguez Mayquez, E.

    1974-01-01

    In this paper is described the objective, basis, carrying out in FORTRAN language and use of the program ORBITALES. This program calculate atomic wave function in the case of ths analytical central potential (Author) 8 refs

  12. Model Performance Evaluation and Scenario Analysis (MPESA)

    Science.gov (United States)

    Model Performance Evaluation and Scenario Analysis (MPESA) assesses the performance with which models predict time series data. The tool was developed Hydrological Simulation Program-Fortran (HSPF) and the Stormwater Management Model (SWMM)

  13. A random number generator for continuous random variables

    Science.gov (United States)

    Guerra, V. M.; Tapia, R. A.; Thompson, J. R.

    1972-01-01

    A FORTRAN 4 routine is given which may be used to generate random observations of a continuous real valued random variable. Normal distribution of F(x), X, E(akimas), and E(linear) is presented in tabular form.

  14. LOADING SIMULATION PROGRAM C

    Data.gov (United States)

    U.S. Environmental Protection Agency — LSPC is the Loading Simulation Program in C++, a watershed modeling system that includes streamlined Hydrologic Simulation Program Fortran (HSPF) algorithms for...

  15. Modelling and analysis of radial thermal stresses and temperature ...

    African Journals Online (AJOL)

    user

    The temperature field, heat transfer rate and thermal stresses were investigated with numerical simulation models using FORTRAN FE (finite element) software. ...... specific heats, International Communications in Heat and Mass Transfer, Vol.

  16. Determination of wave direction using an orbital following buoy

    Digital Repository Service at National Institute of Oceanography (India)

    Fernandes, A.A.; Almeida, A.M.; Vaithiyanathan, R.; Vethamony, P.

    Software has been developed in FORTRAN language using a personal computer for the determination of wave direction from time series measurements of heave, pitch and roll of an orbital following buoy. The method of digital band pass filtering describ...

  17. Precision Glass Molding: Validation of an FE Model for Thermo-Mechanical Simulation

    DEFF Research Database (Denmark)

    Sarhadi, Ali; Hattel, Jesper Henri; Hansen, Hans Nørgaard

    2014-01-01

    glass molding process including heating, pressing, and cooling stages. Temperature- dependent viscoelastic and structural relaxation behavior of the glass material are implemented through a FORTRAN material subroutine (UMAT) into the commercial FEM program ABAQUS, and the FE model is validated...

  18. Peregrine Software Toolchains | High-Performance Computing | NREL

    Science.gov (United States)

    Group (PGI) C/C++ and Fortran (partially supported) The PGI Accelerator compilers include NVIDIA GPU support via the directive-based OpenACC 2.5 programming model, as well as full support for NVIDIA CUDA C

  19. NLOM - a program for nonlocal optical model calculations

    International Nuclear Information System (INIS)

    Kim, B.T.; Kyum, M.C.; Hong, S.W.; Park, M.H.; Udagawa, T.

    1992-01-01

    A FORTRAN program NLOM for nonlocal optical model calculations is described. It is based on a method recently developed by Kim and Udagawa, which utilizes the Lanczos technique for solving integral equations derived from the nonlocal Schroedinger equation. (orig.)

  20. Fulltext PDF

    Indian Academy of Sciences (India)

    Operations on arrays may be performed without using explicit. DO loops ... Use of IMPLICIT NONE statement forces all variables to be declared thereby providing better security to ... There are several new intrinsic functions in Fortran 90 which.

  1. Computer program for buckling loads of orthotropic laminated stiffened panels subjected to biaxial in-place loads (BUCLASP 2)

    Science.gov (United States)

    Viswanathan, A. V.; Tamekuni, M.

    1974-01-01

    General-purpose program performs exact instability analyses for structures such as unidirectionally-stiffened, rectangular composite panels. Program was written in FORTRAN IV and COMPASS for CDC-series computers.

  2. ForTrilinos

    Energy Technology Data Exchange (ETDEWEB)

    2017-12-31

    'ForTrilinos' is related to The Trilinos Project, which contains a large and growing collection of solver capabilities that can utilize next-generation platforms, in particular scalable multicore, manycore, accelerator and heterogeneous systems. Trilinos is primarily written in C++, including its user interfaces. While C++ is advantageous for gaining access to the latest programming environments, it limits Trilinos usage via Fortran. Sever ad hoc translation interfaces exist to enable Fortran usage of Trilinos, but none of these interfaces is general-purpose or written for reusable and sustainable external use. 'ForTrilinos' provides a seamless pathway for large and complex Fortran-based codes to access Trilinos without C/C++ interface code. This access includes Fortran versions of Kokkos abstractions for code execution and data management.

  3. Computer program for calculation of ideal gas thermodynamic data

    Science.gov (United States)

    Gordon, S.; Mc Bride, B. J.

    1968-01-01

    Computer program calculates ideal gas thermodynamic properties for any species for which molecular constant data is available. Partial functions and derivatives from formulas based on statistical mechanics are provided by the program which is written in FORTRAN 4 and MAP.

  4. Development of the FIFI digital simulation language and an up-to-date users guide

    International Nuclear Information System (INIS)

    Hopkinson, A.

    1976-03-01

    The report describes some recent improvements to the FIFI digital simulation language following its conversion to FORTRAN IV for use on ICL 4-70 computers and including a stand alone guide for users. (author)

  5. DOWNER (version 79-1): group collapse cross section and transfer matrices

    International Nuclear Information System (INIS)

    Cullen, D.E.

    1979-01-01

    FORTRAN-callable subroutines are provided to allow a user to group-collapse cross sections and/or transfer matrices from any arbitrary initial group structure to any arbitrary final group structure. 3 figures

  6. ORBITALES. A program for the calculation of wave functions with an analytical central potential; ORBITALES. Programa de calculo de Funciones de Onda para una Potencial Central Analitico

    Energy Technology Data Exchange (ETDEWEB)

    Carretero, Yunta; Rodriguez Mayquez, E

    1974-07-01

    In this paper is described the objective, basis, carrying out in FORTRAN language and use of the program ORBITALES. This program calculate atomic wave function in the case of ths analytical central potential (Author) 8 refs.

  7. A study of low-cost reliable actuators for light aircraft. Part B: Appendices

    Science.gov (United States)

    Eijsink, H.; Rice, M.

    1978-01-01

    Computer programs written in FORTRAN are given for time response calculations on pneumatic and linear hydraulic actuators. The programs are self-explanatory with comment statements. Program output is also included.

  8. Non-uniform Solar Temperature Field on Large Aperture, Fully ...

    Indian Academy of Sciences (India)

    states for the telescope structure during its operation process, and the .... 4.1 Finite element model (FEM) in solar thermal analysis. Figure 4 ... ysis established in ANSYS, MATLAB and FORTRAN; it was built with specific ... Simulation element.

  9. User Delay Cost Model and Facilities Maintenance Cost Model for a Terminal Control Area : Volume 3. User's Manual and Program Documentation for the Facilities Maintenance Cost Model

    Science.gov (United States)

    1978-05-01

    The Facilities Maintenance Cost Model (FMCM) is an analytic model designed to calculate expected annual labor costs of maintenance within a given FAA maintenance sector. The model is programmed in FORTRAN IV and has been demonstrated on the CDC Krono...

  10. Pascal for Ingeniører

    DEFF Research Database (Denmark)

    Hellesen, Bjarne; Johansen, Gunnar

    1998-01-01

    Applications, software and hardware. Introduction to Pascal. Selection. Loop. Subprograms I. Arrays. Realtime programming. Records. Binary files. Text files. Pointers. Pretty program. Big program. The Turbo Pascal system. A FORTRAN program. Methods in programming. A BASIC program. Conversion...

  11. Fulltext PDF

    Indian Academy of Sciences (India)

    2Department of Metallurgical and Materials Engineering, Indian Institute of ... an analysis of the dynamics of dilute suspensions of periodically forced prolate ..... We developed software using Numerical Recipes in FORTRAN 77 (Press et al ...

  12. A comparison of data management systems used in high energy physics

    International Nuclear Information System (INIS)

    Hansl-Kozanecka, T.

    1992-04-01

    Data-management systems for defining data and manipulating them with FORTRAN programs have become increasingly important. We compare three systems that were developed within the high-energy physics community: BOS, JAZELLE and ZEBRA. (orig.)

  13. The comparison and selection of programming languages for high energy physics applications

    International Nuclear Information System (INIS)

    White, B.

    1991-06-01

    This paper discusses the issues surrounding the comparison and selection of a programming language to be used in high energy physics software applications. The evaluation method used was specifically devised to address the issues of particular importance to high energy physics (HEP) applications, not just the technical features of the languages considered. The method assumes a knowledge of the requirements of current HEP applications, the data-processing environments expected to support these applications and relevant non-technical issues. The languages evaluated were Ada, C, FORTRAN 77, FORTRAN 99 (formerly 8X), Pascal and PL/1. Particular emphasis is placed upon the past, present and anticipated future role of FORTRAN in HEP software applications. Upon examination of the technical and practical issues, conclusions are reached and some recommendations are made regarding the role of FORTRAN and other programming languages in the current and future development of HEP software. 54 refs

  14. Large-Signal Code TESLA: Improvements in the Implementation and in the Model

    National Research Council Canada - National Science Library

    Chernyavskiy, Igor A; Vlasov, Alexander N; Anderson, Jr., Thomas M; Cooke, Simon J; Levush, Baruch; Nguyen, Khanh T

    2006-01-01

    We describe the latest improvements made in the large-signal code TESLA, which include transformation of the code to a Fortran-90/95 version with dynamical memory allocation and extension of the model...

  15. Basic Finite Element Method

    International Nuclear Information System (INIS)

    Lee, Byeong Hae

    1992-02-01

    This book gives descriptions of basic finite element method, which includes basic finite element method and data, black box, writing of data, definition of VECTOR, definition of matrix, matrix and multiplication of matrix, addition of matrix, and unit matrix, conception of hardness matrix like spring power and displacement, governed equation of an elastic body, finite element method, Fortran method and programming such as composition of computer, order of programming and data card and Fortran card, finite element program and application of nonelastic problem.

  16. Using Kokkos for Performant Cross-Platform Acceleration of Liquid Rocket Simulations

    Science.gov (United States)

    2017-05-08

    defined functors (like Thrust or Intel TBB) Backends for Nvidia GPU, Intel Xeon, Xeon Phi , IBM Power8, others. “View” data structure provides optimal... Architecture of my Kokkos framework Designed for minimally-invasive operation alongside large Fortran code. Everything is controlled from Fortran through a...Controls Kokkos initialization/finalization void initialize(…); void finalize(…); TVProperties* gettvproperties(); Architecture of my Kokkos framework

  17. Symbolic/Numeric Approaches to Scientific Computing

    DEFF Research Database (Denmark)

    Sinclair, Robert

    1998-01-01

    A course held at the University of Basel (CH) in the winter semester 1997/98. The coupling of Maple with Fortran 77 code is discussed in detail, with many mathematical applications.......A course held at the University of Basel (CH) in the winter semester 1997/98. The coupling of Maple with Fortran 77 code is discussed in detail, with many mathematical applications....

  18. Computer Program NIKE

    DEFF Research Database (Denmark)

    Spanget-Larsen, Jens

    2014-01-01

    FORTRAN source code for program NIKE (PC version of QCPE 343). Sample input and output for two model chemical reactions are appended: I. Three consecutive monomolecular reactions, II. A simple chain mechanism......FORTRAN source code for program NIKE (PC version of QCPE 343). Sample input and output for two model chemical reactions are appended: I. Three consecutive monomolecular reactions, II. A simple chain mechanism...

  19. Computer calculations of compressibility of natural gas

    Energy Technology Data Exchange (ETDEWEB)

    Abou-Kassem, J.H.; Mattar, L.; Dranchuk, P.M

    An alternative method for the calculation of pseudo reduced compressibility of natural gas is presented. The method is incorporated into the routines by adding a single FORTRAN statement before the RETURN statement. The method is suitable for computer and hand-held calculator applications. It produces the same reduced compressibility as other available methods but is computationally superior. Tabular definitions of coefficients and comparisons of predicted pseudo reduced compressibility using different methods are presented, along with appended FORTRAN subroutines. 7 refs., 2 tabs.

  20. Program MACAN, User's guide

    International Nuclear Information System (INIS)

    Pesic, M.

    1992-01-01

    The MACAN code was developed as an improvement of the previously written code RACAN1. The code is devoted primarily to accident analyses of RA and RB research reactors in Vinca, but could be used for analyses of research reactors with or without forced cooling as well. The code is written in FORTRAN 77 for VAX and FORTRAN V5.0 for IBM PC computer. This report contains detailed instructions for preparing rather complicated input data and running the code

  1. Submarine Structure Modeling and Analysis for Life-Cycle Management: Phase 2

    Science.gov (United States)

    2008-05-01

    tous les emplacements de jauges extensométriques. Un certain nombre d’autres programmes FORTRAN ont également été mis au point pour incorporer dans... jauges extensométriques. Un certain nombre d’autres programmes FORTRAN ont également été mis au point pour incorporer dans les modèles par éléments

  2. User's Manual for FEM-BEM Method. 1.0

    Science.gov (United States)

    Butler, Theresa; Deshpande, M. D. (Technical Monitor)

    2002-01-01

    A user's manual for using FORTRAN code to perform electromagnetic analysis of arbitrarily shaped material cylinders using a hybrid method that combines the finite element method (FEM) and the boundary element method (BEM). In this method, the material cylinder is enclosed by a fictitious boundary and the Maxwell's equations are solved by FEM inside the boundary and by BEM outside the boundary. The electromagnetic scattering on several arbitrarily shaped material cylinders using this FORTRAN code is computed to as examples.

  3. Object oriented programming in simulation of ions transport

    International Nuclear Information System (INIS)

    Zhang Wenyong; Wang Tongquan; Xiao Yabin; Dai Hongyi; Chen Yuzhong

    2001-01-01

    Using Object Oriented Programming (OOP) method can make our program more reliable and easier to read, debug, maintain and upgrade. This paper compared FORTRAN90-the language widely used in science computing with C ++ --An Object Oriented Language, and the conclusion was made that although FORTRAN90 have many deficiencies, it can be used in Object Oriented programming. Then OOP method was used in programming of Monte Carlo simulation of ions transport and the general process of OOP was given

  4. HAPS, a Handy Analog Programming System

    DEFF Research Database (Denmark)

    Højberg, Kristian Søe

    1975-01-01

    HAPS (Hybrid Analog Programming System) is an analog compiler that can be run on a minicomputer in an interactive mode. Essentially HAPS is written in FORTRAN. The equations to be programmed for an ana log computer are read in by using a FORTRAN-like notation. The input must contain maximum...... and emphasizes the limitations HAPS puts on equation structure, types of computing circuit, scaling, and static testing....

  5. A VAX/VMS mapped section/virtual memory utility package: Yucca Mountain Project

    International Nuclear Information System (INIS)

    Yarrington, L.

    1990-02-01

    A VAX/VMS Mapped Section/Virtual Memory Utility Package is a collection of FORTRAN subprograms that allocate virtual memory and, optionally, map that memory to a file. The subprograms use VMS system services and run-time libraries for allocating and mapping memory; therefore, the utility package is system dependent and functional on that platform only. FORTRAN-77 is one of the most widely used languages for computer programming. Languages have been developed in the past few decades that provide more powerful tools than FORTRAN and overcome some of its limitations. Two limitations addressed by this paper which have been a source of frustration to many programmers are that (1) FORTRAN does not provide dynamic array allocation and (2) FORTRAN file input-output is very slow. The solutions presented here are for the VAX/VMS operating system and use system services that are not part of the standard FORTRAN language description. Also discussed in this paper are dynamic array allocation, mapped sections of the program memory, and support modules. 3 refs

  6. ForTrilinos Design Document

    Energy Technology Data Exchange (ETDEWEB)

    Young, Mitchell T. [ORNL; Johnson, Seth R. [ORNL; Prokopenko, Andrey V. [ORNL; Evans, Katherine J. [ORNL; Heroux, Michael A. [Sandia National Laboratories (SNL)

    2017-08-01

    With the development of a Fortran Interface to Trilinos, ForTrilinos, modelers using modern Fortran will beable to provide their codes the capability to use solvers and other capabilities on exascale machines via astraightforward infrastructure that accesses Trilinos. This document outlines what Fortrilinos does andexplains briefly how it works. We show it provides a general access to packages via an entry point and usesan xml file from fortran code. With the first release, ForTrilinos will enable Teuchos to take xml parameterlists from Fortran code and set up data structures. It will provide access to linear solvers and eigensolvers.Several examples are provided to illustrate the capabilities in practice. We explain what the user shouldhave already with their code and what Trilinos provides and returns to the Fortran code. We provideinformation about the build process for ForTrilinos, with a practical example. In future releases, nonlinearsolvers, time iteration, advanced preconditioning techniques, and inversion of control (IoC), to enablecallbacks to Fortran routines, will be available.

  7. Letter report: status on code maintenance (EQ3/6)

    International Nuclear Information System (INIS)

    Wolery, T.J.

    1995-01-01

    EQ3/6 is a software package for geochemical modeling of aqueous systems, such as water/rock or waste/water rock. It is being developed for a variety of applications in geochemical studies for the Yucca Mountain Site Characterization Project. Version 7.2a was the first version of this software to be certified for use in quality- affecting work (originally issued for use in non-quality-affecting work only on 12/28/93; certified on S/17/94). In the past year, the Version 7 line software has been maintained while the new Version 8 line has been developed. In this period, sixteen defect reports have been logged and resolved. Corrected software is being released as Version 7.2b. Defect reporting and resolution for the Version 7 line will continue until all released versions in this line are retired, perhaps six months to a year after Version 8.0 is released later this year. The Version 7 software is written in Fortran 77, technically speaking, but incorporates many aspects of older Fortran. The Version 8 software is written in a much more modern Fortran, technically somewhere between Fortran 77 and Fortran 90. Future code maintenance activities will include a more complete move to Fortran 90, as well as continued maintaining of defect reporting and resolution

  8. BLAS- BASIC LINEAR ALGEBRA SUBPROGRAMS

    Science.gov (United States)

    Krogh, F. T.

    1994-01-01

    The Basic Linear Algebra Subprogram (BLAS) library is a collection of FORTRAN callable routines for employing standard techniques in performing the basic operations of numerical linear algebra. The BLAS library was developed to provide a portable and efficient source of basic operations for designers of programs involving linear algebraic computations. The subprograms available in the library cover the operations of dot product, multiplication of a scalar and a vector, vector plus a scalar times a vector, Givens transformation, modified Givens transformation, copy, swap, Euclidean norm, sum of magnitudes, and location of the largest magnitude element. Since these subprograms are to be used in an ANSI FORTRAN context, the cases of single precision, double precision, and complex data are provided for. All of the subprograms have been thoroughly tested and produce consistent results even when transported from machine to machine. BLAS contains Assembler versions and FORTRAN test code for any of the following compilers: Lahey F77L, Microsoft FORTRAN, or IBM Professional FORTRAN. It requires the Microsoft Macro Assembler and a math co-processor. The PC implementation allows individual arrays of over 64K. The BLAS library was developed in 1979. The PC version was made available in 1986 and updated in 1988.

  9. Compiler issues associated with safety-related software

    International Nuclear Information System (INIS)

    Feinauer, L.R.

    1991-01-01

    A critical issue in the quality assurance of safety-related software is the ability of the software to produce identical results, independent of the host machine, operating system, or compiler version under which the software is installed. A study is performed using the VIPRE-0l, FREY-01, and RETRAN-02 safety-related codes. Results from an IBM 3083 computer are compared with results from a CYBER 860 computer. All three of the computer programs examined are written in FORTRAN; the VIPRE code uses the FORTRAN 66 compiler, whereas the FREY and RETRAN codes use the FORTRAN 77 compiler. Various compiler options are studied to determine their effect on the output between machines. Since the Control Data Corporation and IBM machines inherently represent numerical data differently, methods of producing equivalent accuracy of data representation were an important focus of the study. This paper identifies particular problems in the automatic double-precision option (AUTODBL) of the IBM FORTRAN 1.4.x series of compilers. The IBM FORTRAN version 2 compilers provide much more stable, reliable compilation for engineering software. Careful selection of compilers and compiler options can help guarantee identical results between different machines. To ensure reproducibility of results, the same compiler and compiler options should be used to install the program as were used in the development and testing of the program

  10. Development of the next generation code system as an engineering modeling language. (2). Study with prototyping

    International Nuclear Information System (INIS)

    Yokoyama, Kenji; Uto, Nariaki; Kasahara, Naoto; Ishikawa, Makoto

    2003-04-01

    In the fast reactor development, numerical simulation using analytical codes plays an important role for complementing theory and experiment. It is necessary that the engineering models and analysis methods can be flexibly changed, because the phenomena to be investigated become more complicated due to the diversity of the needs for research. And, there are large problems in combining physical properties and engineering models in many different fields. Aiming to the realization of the next generation code system which can solve those problems, the authors adopted three methods, (1) Multi-language (SoftWIRE.NET, Visual Basic.NET and Fortran) (2) Fortran 90 and (3) Python to make a prototype of the next generation code system. As this result, the followings were confirmed. (1) It is possible to reuse a function of the existing codes written in Fortran as an object of the next generation code system by using Visual Basic.NET. (2) The maintainability of the existing code written by Fortran 77 can be improved by using the new features of Fortran 90. (3) The toolbox-type code system can be built by using Python. (author)

  11. ACCULIB, Program Library of Mathematical Routines

    International Nuclear Information System (INIS)

    Van Kats, J.M.; Rusman, C.J.; Van der Vorst, H.A.

    1987-01-01

    Description of program or function - ACCULIB is a collection of programs and subprograms for: - approximation and interpolation problems; - the evaluation of series of orthogonal polynomials; - evaluation of the complementary error function; - sorting problems and permutations; - differential equation problems; - linear algebra eigenvalue problems; - optimization problems; - fast Fourier transformations and Fourier series; - numerical quadrature of continuous functions; - linear systems and other linear algebra problems; - bit manipulation and character handling/transmission; - systems of nonlinear equations, in particular the determination of zeros of polynomials; - solution of over-complete systems; - plotting routines for contouring and surface representation; - statistical investigation of data. In addition, many utilities such as code conversion, microfiche production, disk file surveys, layout improvements for ALGOL60 and FORTRAN programs, and the conversion of IBM FORTRAN programs to CDC FORTRAN are included in the collection

  12. An Evaluation of Java for Numerical Computing

    Directory of Open Access Journals (Sweden)

    Brian Blount

    1999-01-01

    Full Text Available This paper describes the design and implementation of high performance numerical software in Java. Our primary goals are to characterize the performance of object‐oriented numerical software written in Java and to investigate whether Java is a suitable language for such endeavors. We have implemented JLAPACK, a subset of the LAPACK library in Java. LAPACK is a high‐performance Fortran 77 library used to solve common linear algebra problems. JLAPACK is an object‐oriented library, using encapsulation, inheritance, and exception handling. It performs within a factor of four of the optimized Fortran version for certain platforms and test cases. When used with the native BLAS library, JLAPACK performs comparably with the Fortran version using the native BLAS library. We conclude that high‐performance numerical software could be written in Java if a handful of concerns about language features and compilation strategies are adequately addressed.

  13. WADOSE, Radiation Source in Vitrification Waste Storage Apparatus

    International Nuclear Information System (INIS)

    Morita, Jun-ichi; Tashiro, Shingo; Kikkawa, Shizuo; Tsuboi, Takashi

    2007-01-01

    1 - Description of program or function: This is a radiation shielding program which analyzes unknown dose rates using known radiation sources. It can also evaluate radiation sources from measured dose rates. For instance, dose rates measured at several points in the hot cell of WASTEF are introduced into WADOS, and as a result, Ci of radiation sources and their positions are estimated with structural arrangement data of the WASTEF cells. The later functional addition is very useful for actual operation of a hot cell and others. NEA-1142/02: The code was originally written in non standard Fortran dialect and has been fully translated into Fortran 90, Fortran 77 compatible. 2 - Method of solution: Point kernel ray tracing method (the same method as QAD code). 3 - Restrictions on the complexity of the problem: Modeling of source form for input is available for cylinder, plate, point and others which are simplified geometrically

  14. The RANDOM computer program: A linear congruential random number generator

    Science.gov (United States)

    Miles, R. F., Jr.

    1986-01-01

    The RANDOM Computer Program is a FORTRAN program for generating random number sequences and testing linear congruential random number generators (LCGs). The linear congruential form of random number generator is discussed, and the selection of parameters of an LCG for a microcomputer described. This document describes the following: (1) The RANDOM Computer Program; (2) RANDOM.MOD, the computer code needed to implement an LCG in a FORTRAN program; and (3) The RANCYCLE and the ARITH Computer Programs that provide computational assistance in the selection of parameters for an LCG. The RANDOM, RANCYCLE, and ARITH Computer Programs are written in Microsoft FORTRAN for the IBM PC microcomputer and its compatibles. With only minor modifications, the RANDOM Computer Program and its LCG can be run on most micromputers or mainframe computers.

  15. Reactive Geochemical Transport Modeling of Concentrated AqueousSolutions: Supplement to TOUGHREACT User's Guide for the PitzerIon-Interaction Model

    Energy Technology Data Exchange (ETDEWEB)

    Zhang, Guoxiang; Spycher, Nicolas; Xu, Tianfu; Sonnenthal, Eric; Steefel , Carl

    2006-12-15

    In this report, we present: -- The Pitzer ion-interactiontheory and models -- Input file requirements for using the TOUGHREACTPitzer ion-interaction model and associated databases -- Run-time errormessages -- Verification test cases and application examples. For themain code structure, features, overall solution methods, description ofinput/output files for parameters other than those specific to theimplemented Pitzer model, and error messages, see the TOUGHREACT User'sGuide (Xu et al., 2005). The TOUGHREACT Pitzer version runs on aDEC-alpha architecture CPU, under OSF1 V5.1, with Compaq Digital FortranCompiler. The compiler run-time libraries are required for execution aswell as compilation. The code also runs on Intel Pentium IV andhigher-version CPU-based machines with Compaq Visual Fortran Compiler orIntel Fortran Compiler (integrated with the Microsoft DevelopmentEnvironment). The minimum hardware configuration should include 1 GB RAMand 1 GB (2 GB recommended) of available disk space.

  16. Beam dynamics simulations using a parallel version of PARMILA

    International Nuclear Information System (INIS)

    Ryne, R.D.

    1996-01-01

    The computer code PARMILA has been the primary tool for the design of proton and ion linacs in the United States for nearly three decades. Previously it was sufficient to perform simulations with of order 10000 particles, but recently the need to perform high resolution halo studies for next-generation, high intensity linacs has made it necessary to perform simulations with of order 100 million particles. With the advent of massively parallel computers such simulations are now within reach. Parallel computers already make it possible, for example, to perform beam dynamics calculations with tens of millions of particles, requiring over 10 GByte of core memory, in just a few hours. Also, parallel computers are becoming easier to use thanks to the availability of mature, Fortran-like languages such as Connection Machine Fortran and High Performance Fortran. We will describe our experience developing a parallel version of PARMILA and the performance of the new code

  17. Beam dynamics simulations using a parallel version of PARMILA

    International Nuclear Information System (INIS)

    Ryne, Robert

    1996-01-01

    The computer code PARMILA has been the primary tool for the design of proton and ion linacs in the United States for nearly three decades. Previously it was sufficient to perform simulations with of order 10000 particles, but recently the need to perform high resolution halo studies for next-generation, high intensity linacs has made it necessary to perform simulations with of order 100 million particles. With the advent of massively parallel computers such simulations are now within reach. Parallel computers already make it possible, for example, to perform beam dynamics calculations with tens of millions of particles, requiring over 10 GByte of core memory, in just a few hours. Also, parallel computers are becoming easier to use thanks to the availability of mature, Fortran-like languages such as Connection Machine Fortran and High Performance Fortran. We will describe our experience developing a parallel version of PARMILA and the performance of the new code. (author)

  18. Controlling Laboratory Processes From A Personal Computer

    Science.gov (United States)

    Will, H.; Mackin, M. A.

    1991-01-01

    Computer program provides natural-language process control from IBM PC or compatible computer. Sets up process-control system that either runs without operator or run by workers who have limited programming skills. Includes three smaller programs. Two of them, written in FORTRAN 77, record data and control research processes. Third program, written in Pascal, generates FORTRAN subroutines used by other two programs to identify user commands with device-driving routines written by user. Also includes set of input data allowing user to define user commands to be executed by computer. Requires personal computer operating under MS-DOS with suitable hardware interfaces to all controlled devices. Also requires FORTRAN 77 compiler and device drivers written by user.

  19. Beam dynamics calculations and particle tracking using massively parallel processors

    International Nuclear Information System (INIS)

    Ryne, R.D.; Habib, S.

    1995-01-01

    During the past decade massively parallel processors (MPPs) have slowly gained acceptance within the scientific community. At present these machines typically contain a few hundred to one thousand off-the-shelf microprocessors and a total memory of up to 32 GBytes. The potential performance of these machines is illustrated by the fact that a month long job on a high end workstation might require only a few hours on an MPP. The acceptance of MPPs has been slow for a variety of reasons. For example, some algorithms are not easily parallelizable. Also, in the past these machines were difficult to program. But in recent years the development of Fortran-like languages such as CM Fortran and High Performance Fortran have made MPPs much easier to use. In the following we will describe how MPPs can be used for beam dynamics calculations and long term particle tracking

  20. Robust C subroutines for non-linear optimization

    DEFF Research Database (Denmark)

    Brock, Pernille; Madsen, Kaj; Nielsen, Hans Bruun

    2004-01-01

    This report presents a package of robust and easy-to-use C subroutines for solving unconstrained and constrained non-linear optimization problems. The intention is that the routines should use the currently best algorithms available. All routines have standardized calls, and the user does not have...... by changing 1 to 0. The present report is a new and updated version of a previous report NI-91-03 with the same title, [16]. Both the previous and the present report describe a collection of subroutines, which have been translated from Fortran to C. The reason for writing the present report is that some...... of the C subroutines have been replaced by more effective and robust versions translated from the original Fortran subroutines to C by the Bandler Group, see [1]. Also the test examples have been modi ed to some extent. For a description of the original Fortran subroutines see the report [17]. The software...

  1. Object-Oriented Implementation of Adaptive Mesh Refinement Algorithms

    Directory of Open Access Journals (Sweden)

    William Y. Crutchfield

    1993-01-01

    Full Text Available We describe C++ classes that simplify development of adaptive mesh refinement (AMR algorithms. The classes divide into two groups, generic classes that are broadly useful in adaptive algorithms, and application-specific classes that are the basis for our AMR algorithm. We employ two languages, with C++ responsible for the high-level data structures, and Fortran responsible for low-level numerics. The C++ implementation is as fast as the original Fortran implementation. Use of inheritance has allowed us to extend the original AMR algorithm to other problems with greatly reduced development time.

  2. PDDP, A Data Parallel Programming Model

    Directory of Open Access Journals (Sweden)

    Karen H. Warren

    1996-01-01

    Full Text Available PDDP, the parallel data distribution preprocessor, is a data parallel programming model for distributed memory parallel computers. PDDP implements high-performance Fortran-compatible data distribution directives and parallelism expressed by the use of Fortran 90 array syntax, the FORALL statement, and the WHERE construct. Distributed data objects belong to a global name space; other data objects are treated as local and replicated on each processor. PDDP allows the user to program in a shared memory style and generates codes that are portable to a variety of parallel machines. For interprocessor communication, PDDP uses the fastest communication primitives on each platform.

  3. Use of Wingz spreadsheet as an interface to total-system performance assessment

    International Nuclear Information System (INIS)

    Chambers, W.F.; Treadway, A.H.

    1992-01-01

    A commercial spreadsheet has been used as an interface to a set of simple models to simulate possible nominal flow and failure scenarios at the potential high-level nuclear waste repository at Yucca Mountain, Nevada. Individual models coded in FORTRAN are linked to the spreadsheet. Complementary cumulative probability distribution functions resulting from the models are plotted through scripts associated with the spreadsheet. All codes are maintained under a source code control system for quality assurance. The spreadsheet and the simple models can be run on workstations, PCs, and Macintoshes. The software system is designed so that the FORTRAN codes can be run on several machines if a network environment is available

  4. FORSIM, Solution of Ordinary or Partial Differential Equation with Initial Conditions

    International Nuclear Information System (INIS)

    Carver, M.B.

    1985-01-01

    1 - Description of problem or function: FORSIM is a FORTRAN oriented simulation program which automates the continuous transient solution of systems of ordinary and/or partial differential equations. The user writes his equations in a FORTRAN subroutine, following prescribed rules, and loads this routine along with the executive routines. The executive routines then read in initial data supplied by the user and proceed with the integration. 2 - Method of solution: Partial differential equations are converted to coupled ordinary differential equations by suitable discretization formulae. Integration is done by variable order, variable step-size error controlled algorithms. 3 - Restrictions on the complexity of the problem - Maximum of: 1000 ordinary differential equations

  5. A fast random number generator for the Intel Paragon supercomputer

    Science.gov (United States)

    Gutbrod, F.

    1995-06-01

    A pseudo-random number generator is presented which makes optimal use of the architecture of the i860-microprocessor and which is expected to have a very long period. It is therefore a good candidate for use on the parallel supercomputer Paragon XP. In the assembler version, it needs 6.4 cycles for a real∗4 random number. There is a FORTRAN routine which yields identical numbers up to rare and minor rounding discrepancies, and it needs 28 cycles. The FORTRAN performance on other microprocessors is somewhat better. Arguments for the quality of the generator and some numerical tests are given.

  6. Development of INFRA graphic user interface

    International Nuclear Information System (INIS)

    Yang, Y. S.; Lee, C. B.; Kim, Y. M.; Kim, D. H.; Kim, S. K.

    2004-01-01

    GUI(Graphic User Interface) has been developed for high burnup fuel performance code INFRA. Based upon FORTRAN program language, INFRA was developed by COMPAQ Visual FORTRAN 6.5. Graphic user input and output interface have been developed by using Visual Basic and MDB which are the most widely used program language and database for windows application development. Various input parameters, which are required for INFRA calculation, can be input more conveniently by newly developed input interface. Without any additional data handling, INFRA calculation results can be investigated intuitively by 2D or 3D graphs on screen and animation function

  7. FLOWNET: A Computer Program for Calculating Secondary Flow Conditions in a Network of Turbomachinery

    Science.gov (United States)

    Rose, J. R.

    1978-01-01

    The program requires the network parameters, the flow component parameters, the reservoir conditions, and the gas properties as input. It will then calculate all unknown pressures and the mass flow rate in each flow component in the network. The program can treat networks containing up to fifty flow components and twenty-five unknown network pressures. The types of flow components that can be treated are face seals, narrow slots, and pipes. The program is written in both structured FORTRAN (SFTRAN) and FORTRAN 4. The program must be run in an interactive (conversational) mode.

  8. Version 1.00 programmer's tools used in constructing the INEL RML/analytical radiochemistry sample tracking database and its user interface

    International Nuclear Information System (INIS)

    Femec, D.A.

    1995-09-01

    This report describes two code-generating tools used to speed design and implementation of relational databases and user interfaces: CREATE-SCHEMA and BUILD-SCREEN. CREATE-SCHEMA produces the SQL commands that actually create and define the database. BUILD-SCREEN takes templates for data entry screens and generates the screen management system routine calls to display the desired screen. Both tools also generate the related FORTRAN declaration statements and precompiled SQL calls. Included with this report is the source code for a number of FORTRAN routines and functions used by the user interface. This code is broadly applicable to a number of different databases

  9. Program Package for 3d PIC Model of Plasma Fiber

    Science.gov (United States)

    Kulhánek, Petr; Břeň, David

    2007-08-01

    A fully three dimensional Particle in Cell model of the plasma fiber had been developed. The code is written in FORTRAN 95, implementation CVF (Compaq Visual Fortran) under Microsoft Visual Studio user interface. Five particle solvers and two field solvers are included in the model. The solvers have relativistic and non-relativistic variants. The model can deal both with periodical and non-periodical boundary conditions. The mechanism of the surface turbulences generation in the plasma fiber was successfully simulated with the PIC program package.

  10. Application Portable Parallel Library

    Science.gov (United States)

    Cole, Gary L.; Blech, Richard A.; Quealy, Angela; Townsend, Scott

    1995-01-01

    Application Portable Parallel Library (APPL) computer program is subroutine-based message-passing software library intended to provide consistent interface to variety of multiprocessor computers on market today. Minimizes effort needed to move application program from one computer to another. User develops application program once and then easily moves application program from parallel computer on which created to another parallel computer. ("Parallel computer" also include heterogeneous collection of networked computers). Written in C language with one FORTRAN 77 subroutine for UNIX-based computers and callable from application programs written in C language or FORTRAN 77.

  11. Development of a conversational text editor on MITRA 125 used with a TEKTRONIX 4014 display console

    International Nuclear Information System (INIS)

    Siffre, Evelyne.

    1980-06-01

    The purpose of this study, which falls within the purview of a nuclear physics research laboratory, is the development of a simple to use conversational text editor to mitigate the defects of the MMT2 monitor. The operations to be executed are: - creation of a source file written in FORTRAN - concatenation of the various stages to obtain a workable program: FORTRAN compilation, edition of links, group generation; - execution of this program. These operations are performed in two different ways: 1) by using the system controls as from the teleprinter (this corresponds to the previous use). The sequence of controls to be effected is described; 2) by using the EDI 125 conversational editor [fr

  12. Single Particle energy levels in ODD-A Nuclei

    International Nuclear Information System (INIS)

    Lasijo, R.S.

    1997-01-01

    Singe particle energies for atomic nuclei with odd-A number of nucleons, i.e. nuclei possessing odd number of protons or odd number of neutrons, were calculated based on Nilsson's theory, and then the diagrams were made. the energy diagram is in the from of plot of energies as function of deformations, entities identifying the deviations from the spherical shape. The energy calculations were done using FORTRAN 77 language of PC (Personal Computer) version with Microsoft Fortran Power Station compiler, which was then combined with WORD version 6.0 and EXCEL version 5.0 of WINDOWS WORKGROUP to make the plot

  13. A language for image processing HILLS and its supporting system SDIP

    International Nuclear Information System (INIS)

    Suzuki, H.; Toriwaki, J.

    1984-01-01

    This paper presents a language HILLS and its supporting system SDIP for image processing. HILLS is a key-word type language for describing image processing procedures by using subroutine packages SLIP and SPIDER. SDIP, written in FORTRAN to keep portability, supports programming by HILLS in interactive mode including functions such as editing, translating HILLS into FORTRAN, error detection, and providing manual information. Results of preliminary experiments suggest that HILLS and SDIP are very useful tools for beginners and researchers in application fields of image processing to develop desired image analysis procedures

  14. Program package for multicanonical simulations of U(1) lattice gauge theory-Second version

    Science.gov (United States)

    Bazavov, Alexei; Berg, Bernd A.

    2013-03-01

    A new version STMCMUCA_V1_1 of our program package is available. It eliminates compatibility problems of our Fortran 77 code, originally developed for the g77 compiler, with Fortran 90 and 95 compilers. New version program summaryProgram title: STMC_U1MUCA_v1_1 Catalogue identifier: AEET_v1_1 Licensing provisions: Standard CPC license, http://cpc.cs.qub.ac.uk/licence/licence.html Programming language: Fortran 77 compatible with Fortran 90 and 95 Computers: Any capable of compiling and executing Fortran code Operating systems: Any capable of compiling and executing Fortran code RAM: 10 MB and up depending on lattice size used No. of lines in distributed program, including test data, etc.: 15059 No. of bytes in distributed program, including test data, etc.: 215733 Keywords: Markov chain Monte Carlo, multicanonical, Wang-Landau recursion, Fortran, lattice gauge theory, U(1) gauge group, phase transitions of continuous systems Classification: 11.5 Catalogue identifier of previous version: AEET_v1_0 Journal Reference of previous version: Computer Physics Communications 180 (2009) 2339-2347 Does the new version supersede the previous version?: Yes Nature of problem: Efficient Markov chain Monte Carlo simulation of U(1) lattice gauge theory (or other continuous systems) close to its phase transition. Measurements and analysis of the action per plaquette, the specific heat, Polyakov loops and their structure factors. Solution method: Multicanonical simulations with an initial Wang-Landau recursion to determine suitable weight factors. Reweighting to physical values using logarithmic coding and calculating jackknife error bars. Reasons for the new version: The previous version was developed for the g77 compiler Fortran 77 version. Compiler errors were encountered with Fortran 90 and Fortran 95 compilers (specified below). Summary of revisions: epsilon=one/10**10 is replaced by epsilon/10.0D10 in the parameter statements of the subroutines u1_bmha.f, u1_mucabmha.f, u1wl

  15. Multiple linear regression analysis

    Science.gov (United States)

    Edwards, T. R.

    1980-01-01

    Program rapidly selects best-suited set of coefficients. User supplies only vectors of independent and dependent data and specifies confidence level required. Program uses stepwise statistical procedure for relating minimal set of variables to set of observations; final regression contains only most statistically significant coefficients. Program is written in FORTRAN IV for batch execution and has been implemented on NOVA 1200.

  16. Method for nonlinear exponential regression analysis

    Science.gov (United States)

    Junkin, B. G.

    1972-01-01

    Two computer programs developed according to two general types of exponential models for conducting nonlinear exponential regression analysis are described. Least squares procedure is used in which the nonlinear problem is linearized by expanding in a Taylor series. Program is written in FORTRAN 5 for the Univac 1108 computer.

  17. Evaluation of the discrete vortex wake cross flow model using vector computers. Part 2: User's manual for DIVORCE

    Science.gov (United States)

    Deffenbaugh, F. D.; Vitz, J. F.

    1979-01-01

    The users manual for the Discrete Vortex Cross flow Evaluator (DIVORCE) computer program is presented. DIVORCE was developed in FORTRAN 4 for the DCD 6600 and CDC 7600 machines. Optimal calls to a NASA vector subroutine package are provided for use with the CDC 7600.

  18. Computer simulation of the NASA water vapor electrolysis reactor

    Science.gov (United States)

    Bloom, A. M.

    1974-01-01

    The water vapor electrolysis (WVE) reactor is a spacecraft waste reclamation system for extended-mission manned spacecraft. The WVE reactor's raw material is water, its product oxygen. A computer simulation of the WVE operational processes provided the data required for an optimal design of the WVE unit. The simulation process was implemented with the aid of a FORTRAN IV routine.

  19. Powderspec, a program for the efficient simulation of spectra of electron paramagnetic resonance of powders with orthorhombic symmetry

    International Nuclear Information System (INIS)

    Gonzalez T, L.; Beltran L, V.

    1991-09-01

    In this report a FORTRAN source program which simulates the second order powder pattern and spectrum of electron paramagnetic resonance (EPR) in crystal fields with orthorhombic symmetry using Gauss-Legendre quadratures is given. Also the commentaries which describe each step in detail are presented. (Author)

  20. Efficient computation of Laguerre polynomials

    NARCIS (Netherlands)

    A. Gil (Amparo); J. Segura (Javier); N.M. Temme (Nico)

    2017-01-01

    textabstractAn efficient algorithm and a Fortran 90 module (LaguerrePol) for computing Laguerre polynomials . Ln(α)(z) are presented. The standard three-term recurrence relation satisfied by the polynomials and different types of asymptotic expansions valid for . n large and . α small, are used

  1. GRADSPH: A parallel smoothed particle hydrodynamics code for self-gravitating astrophysical fluid dynamics

    NARCIS (Netherlands)

    Vanaverbeke, S.; Keppens, R.; Poedts, S.; Boffin, H.

    2009-01-01

    We describe the algorithms implemented in the first version of GRADSPH, a parallel, tree-based, smoothed particle hydrodynamics code for simulating self-gravitating astrophysical systems written in FORTRAN 90. The paper presents details on the implementation of the Smoothed Particle Hydro (SPH)

  2. Description of the DLL regulation interface in HAWC

    DEFF Research Database (Denmark)

    Larsen, Torben J.

    2001-01-01

    This report contains a description of the external regulation interface between the aeroelastic code HAWC and a separate regulation unit programmed as a DLL (Dynamic Link Library). Specific HAWC commands used with the regulation as well as simple DLLexamples written in Delphi, Fortran and C...

  3. Using Peephole Optimization on Intermediate Code

    NARCIS (Netherlands)

    Tanenbaum, A.S.; van Staveren, H.; Stevenson, J.W.

    1982-01-01

    Many portable compilers generate an intermediate code that is subsequently translated into the target machine's assembly language. In this paper a stack-machine-based intermediate code suitable for algebraic languages (e.g., PASCAL, C, FORTRAN) and most byte-addressed mini- and microcomputers is

  4. The Resource constrained shortest path problem implemented in a lazy functional language

    NARCIS (Netherlands)

    Hartel, Pieter H.; Glaser, Hugh

    The resource constrained shortest path problem is an NP-hard problem for which many ingenious algorithms have been developed. These algorithms are usually implemented in Fortran or another imperative programming language. We have implemented some of the simpler algorithms in a lazy functional

  5. ASURV: Astronomical SURVival Statistics

    Science.gov (United States)

    Feigelson, E. D.; Nelson, P. I.; Isobe, T.; LaValley, M.

    2014-06-01

    ASURV (Astronomical SURVival Statistics) provides astronomy survival analysis for right- and left-censored data including the maximum-likelihood Kaplan-Meier estimator and several univariate two-sample tests, bivariate correlation measures, and linear regressions. ASURV is written in FORTRAN 77, and is stand-alone and does not call any specialized libraries.

  6. Extended memory management under RTOS

    Science.gov (United States)

    Plummer, M.

    1981-01-01

    A technique for extended memory management in ROLM 1666 computers using FORTRAN is presented. A general software system is described for which the technique can be ideally applied. The memory manager interface with the system is described. The protocols by which the manager is invoked are presented, as well as the methods used by the manager.

  7. Nonclassical Orthogonal Polynomials and Corresponding Quadratures

    CERN Document Server

    Fukuda, H; Alt, E O; Matveenko, A V

    2004-01-01

    We construct nonclassical orthogonal polynomials and calculate abscissas and weights of Gaussian quadrature for arbitrary weight and interval. The program is written by Mathematica and it works if moment integrals are given analytically. The result is a FORTRAN subroutine ready to utilize the quadrature.

  8. Software for noise measurements

    International Nuclear Information System (INIS)

    Zyryanov, V.A.

    1987-01-01

    The CURS program library comprising 38 fortran-programs, designed for processing descrete experimental data in the form of random or determined periodic processes is described. The library is based on the modular construction principle which allows one to create on its base any sets of programs to solve tasks related to NPP operation, and to develop special software

  9. Object-oriented accelerator design with HPF

    International Nuclear Information System (INIS)

    Ji Qiang; Ryne, R.D.; Habib, S.

    1998-01-01

    In this paper, object-oriented design is applied to codes for beam dynamics simulations in accelerators using High Performance Fortran (HPF). This results in good maintainability, reusability, and extensibility of software, combined with the ease of parallel programming provided by HPF

  10. Marine diesel engines exhaust noise. Pt. VII: Calculation of the acoustical performance of diesel engine exhaust systems / Uitlaatgeluid van scheepsdieselmotoren. Dl. VII: Berekening van de akoestische eigenschappen van uitlaatsystemen van dieselmotoren

    NARCIS (Netherlands)

    Buiten, J.; Gerretsen, E.; Vellekoop, J.C.

    1974-01-01

    A method is given lor the calculation of the transfer damping of diesel engine exhaust systems. Also the complete computer program in FORTRAN IV, based on this calculation method is given. The method includes such system elements as chamber resonators, 1,5-pipes, absorbing siìencers and shunts to

  11. Concrete for γ radiation shielding

    International Nuclear Information System (INIS)

    Azevedo e Souza, A.C. de; Rogers, John Douglas

    1980-01-01

    The attenuation characteristics of γ radiation in concrete slabs, considering their mechanical resistence and densities were determined. One heavy concrete which was used, was prepared using as additives iron ore and Fe 2 O 3 pellets in various grain sizes. Fortran programs were used for analysing data and determining the absorption coefficients and attenuation factors. (Author) [pt

  12. THE TRANFT USER'S MANUAL.

    Energy Technology Data Exchange (ETDEWEB)

    BLASKIEWICZ, M.

    2006-08-30

    The Fortran program TRANFT simulates transverse instabilities in circular accelerators using fast Fourier transform algorithms. It may be used for any particle type. Forces from transverse wakefields, longitudinal wakefields, and transverse detuning wakes are included, with linear transverse space charge forces included as a special case. This note describes the algorithms and their implementation in TRANFT.

  13. ACDOS2: an improved neutron-induced dose rate code

    International Nuclear Information System (INIS)

    Lagache, J.C.

    1981-06-01

    To calculate the expected dose rate from fusion reactors as a function of geometry, composition, and time after shutdown a computer code, ACDOS2, was written, which utilizes up-to-date libraries of cross-sections and radioisotope decay data. ACDOS2 is in ANSI FORTRAN IV, in order to make it readily adaptable elsewhere

  14. PPDS compas-primer

    International Nuclear Information System (INIS)

    Alekhin, S.I.; Bazeeva, V.V.; Grudtsin, S.N.

    1987-01-01

    Catalogue of IHEP data bases on particle physics (PPDS) and short guide for unexperienced user are presented. All data bases are under common data base management system and include bibliographic and factographic ones. Binary search and set of applied programs controlling input and formatting output make using of system easy and convenient. Basic programs are developed in FORTRAN

  15. Classification of natural formations based on their optical characteristics using small volumes of samples

    Science.gov (United States)

    Abramovich, N. S.; Kovalev, A. A.; Plyuta, V. Y.

    1986-02-01

    A computer algorithm has been developed to classify the spectral bands of natural scenes on Earth according to their optical characteristics. The algorithm is written in FORTRAN-IV and can be used in spectral data processing programs requiring small data loads. The spectral classifications of some different types of green vegetable canopies are given in order to illustrate the effectiveness of the algorithm.

  16. Modeling indoor air pollution

    National Research Council Canada - National Science Library

    Pepper, D. W; Carrington, David B

    2009-01-01

    ... and ventilation from the more popular textbooks and monographs. We wish to especially acknowledge Dr. Xiuling Wang, who diligently converted many of our old FORTRAN codes into MATLAB files, and also developed the COMSOL example files. Also we thank Ms. Kathryn Nelson who developed the website for the book and indoor air quality computer codes. We are grateful to ...

  17. Hadron collider physics

    Energy Technology Data Exchange (ETDEWEB)

    Pondrom, L.

    1991-10-03

    An introduction to the techniques of analysis of hadron collider events is presented in the context of the quark-parton model. Production and decay of W and Z intermediate vector bosons are used as examples. The structure of the Electroweak theory is outlined. Three simple FORTRAN programs are introduced, to illustrate Monte Carlo calculation techniques. 25 refs.

  18. The dynamic relaxation method in the structural analysis of concrete pressure vessels

    International Nuclear Information System (INIS)

    Davidson, I.; Assis Bastos, M.R. de; Camargo, P.B. de.

    1977-01-01

    The dynamic relaxation method, applied to 3 dimensional concrete structures, especially pressure vessels, is demonstrated. It utilizes the finite difference method and allows the growth of cracks to be followed up to the point of vessel rupture. A FORTRAN IV program is developed, which can also be utilized, with the necessary modifications, for other structure calculations [pt

  19. Computational Simulation of a Water-Cooled Heat Pump

    Science.gov (United States)

    Bozarth, Duane

    2008-01-01

    A Fortran-language computer program for simulating the operation of a water-cooled vapor-compression heat pump in any orientation with respect to gravity has been developed by modifying a prior general-purpose heat-pump design code used at Oak Ridge National Laboratory (ORNL).

  20. The Winfrith DSN programme

    International Nuclear Information System (INIS)

    Francescon, S.

    1963-05-01

    The programme, which is written in the Fortran language, solves the Carlson discrete S n approximation to the Boltzmann transport equation in cylindrical geometry. This report describes the input and output facilities of the WINFRITH DSN programme and the associated editing programme WED. (author)

  1. The Ångström Exponent and Turbidity of Soot Component in the ...

    African Journals Online (AJOL)

    OPAC) using FORTRAN program to model the effect of soot on optical depth, scattering coefficient, absorption coefficient, single scattering albedo, extinction coefficient and asymmetry parameter at spectral range of 0.25 to 1.00 ƒÝm for eight ...

  2. SLED program

    International Nuclear Information System (INIS)

    Farkas, Z.D.

    1977-04-01

    A FORTRAN program is described which, for a given cavity and timing, yields all fields as a (piecewise) function of time, and which, for any mix of SLEDded and non-SLEDded klystrons of any given energy/klystron, yields the SLED operation parameters. The note explains the input and output parameters as they appear in the code output. 3 figures, 19 tables

  3. Hanford tank waste operation simulator operational waste volume projection verification and validation procedure

    International Nuclear Information System (INIS)

    HARMSEN, R.W.

    1999-01-01

    The Hanford Tank Waste Operation Simulator is tested to determine if it can replace the FORTRAN-based Operational Waste Volume Projection computer simulation that has traditionally served to project double-shell tank utilization. Three Test Cases are used to compare the results of the two simulators; one incorporates the cleanup schedule of the Tri Party Agreement

  4. SHREDI a removal diffusion shielding code for x-y and r-z geometries

    International Nuclear Information System (INIS)

    Daneri, A.; Toselli, G.

    1974-01-01

    The SHREDI, a removal diffusion neutron shielding code written in FORTRAN for IBM 370/165, is presented. The code computes neutron fluxes or adjoint fluxes and activations in bidimensional sections of the shield. It is also possible to consider shielding points with the same coordinate (y or z) (monodimensional problems)

  5. Grow--a computer subroutine that projects the growth of trees in the Lake States' forests.

    Science.gov (United States)

    Gary J. Brand

    1981-01-01

    A computer subroutine, Grow, has been written in 1977 Standard FORTRAN to implement a distance-independent, individual tree growth model for Lake States' forests. Grow is a small and easy-to-use version of the growth model. All the user has to do is write a calling program to read initial conditions, call Grow, and summarize the results.

  6. T-H-A-T-S: timber-harvesting-and-transport-simulator: with subroutines for Appalachian logging

    Science.gov (United States)

    A. Jeff Martin

    1975-01-01

    A computer program for simulating harvesting operations is presented. Written in FORTRAN IV, the program contains subroutines that were developed for Appalachian logging conditions. However, with appropriate modifications, the simulator would be applicable for most logging operations and locations. The details of model development and its methodology are presented,...

  7. Determination of the extinction factor in function of the density of dislocations; Determinacion del factor de extincion en funcion de la densidad de dislocaciones

    Energy Technology Data Exchange (ETDEWEB)

    Macias B, L.R

    1991-12-15

    There are exist three basic types of crystalline lattice defects: point, line (or dislocations) and surface defects. Such defects may be incorporated intentionally to produce desired mechanical and physical properties. This report presents a FORTRAN language program to calculate the extinction factor in samples of polycrystalline copper as function of the dislocations density. (Author)

  8. Tokamak Physics EXperiment (TPX): Toroidal field magnet design, development and manufacture. SDRL 29, Analysis results. Volume 3

    International Nuclear Information System (INIS)

    Xu, Minfeng

    1995-01-01

    The electromagnetic analysis is mainly based on model built with 3-D electromagnetic software OPERA/TOSCA. In the process of evaluating the software package, some models are also built with 3-D boundary element electromagnetic software AMPERES. Fortran programs are also developed at B ampersand W to perform Monte-Carlo simulations of the field error analysis to assist tolerance determinations

  9. Interactive Controls Analysis (INCA)

    Science.gov (United States)

    Bauer, Frank H.

    1989-01-01

    Version 3.12 of INCA provides user-friendly environment for design and analysis of linear control systems. System configuration and parameters easily adjusted, enabling INCA user to create compensation networks and perform sensitivity analysis in convenient manner. Full complement of graphical routines makes output easy to understand. Written in Pascal and FORTRAN.

  10. GammaCHI: a package for the inversion and computation of the gamma and chi-square cumulative distribution functions (central and noncentral)

    NARCIS (Netherlands)

    A. Gil (Amparo); J. Segura (Javier); N.M. Temme (Nico)

    2015-01-01

    textabstractA Fortran 90 module GammaCHI for computing and inverting the gamma and chi-square cumulative distribution functions (central and noncentral) is presented. The main novelty of this package is the reliable and accurate inversion routines for the noncentral cumulative distribution

  11. Evolving impact of Ada on a production software environment

    Science.gov (United States)

    Mcgarry, F.; Esker, L.; Quimby, K.

    1988-01-01

    Many aspects of software development with Ada have evolved as our Ada development environment has matured and personnel have become more experienced in the use of Ada. The Software Engineering Laboratory (SEL) has seen differences in the areas of cost, reliability, reuse, size, and use of Ada features. A first Ada project can be expected to cost about 30 percent more than an equivalent FORTRAN project. However, the SEL has observed significant improvements over time as a development environment progresses to second and third uses of Ada. The reliability of Ada projects is initially similar to what is expected in a mature FORTRAN environment. However, with time, one can expect to gain improvements as experience with the language increases. Reuse is one of the most promising aspects of Ada. The proportion of reusable Ada software on our Ada projects exceeds the proportion of reusable FORTRAN software on our FORTRAN projects. This result was noted fairly early in our Ada projects, and experience shows an increasing trend over time.

  12. Development of parallel/serial program analyzing tool

    International Nuclear Information System (INIS)

    Watanabe, Hiroshi; Nagao, Saichi; Takigawa, Yoshio; Kumakura, Toshimasa

    1999-03-01

    Japan Atomic Energy Research Institute has been developing 'KMtool', a parallel/serial program analyzing tool, in order to promote the parallelization of the science and engineering computation program. KMtool analyzes the performance of program written by FORTRAN77 and MPI, and it reduces the effort for parallelization. This paper describes development purpose, design, utilization and evaluation of KMtool. (author)

  13. Computation for the analysis of designed experiments

    CERN Document Server

    Heiberger, Richard

    2015-01-01

    Addresses the statistical, mathematical, and computational aspects of the construction of packages and analysis of variance (ANOVA) programs. Includes a disk at the back of the book that contains all program codes in four languages, APL, BASIC, C, and FORTRAN. Presents illustrations of the dual space geometry for all designs, including confounded designs.

  14. CTD: a computer program to solve the three dimensional multi-group diffusion equation in X, Y, Z, and triangular Z geometries

    Energy Technology Data Exchange (ETDEWEB)

    Fletcher, J K

    1973-05-01

    CTD is a computer program written in Fortran 4 to solve the multi-group diffusion theory equations in X, Y, Z and triangular Z geometries. A power print- out neutron balance and breeding gain are also produced. 4 references. (auth)

  15. Some improvements in the discrete ordinate method of B.G. Carlson for solving the neutron transport equation

    Energy Technology Data Exchange (ETDEWEB)

    Askew, J R; Brissenden, R J [Technical Assessments and Services Division, Atomic Energy Establishment, Winfrith, Dorchester, Dorset (United Kingdom)

    1963-08-15

    This report gives an account of the DSN method for simulating neutron transport, together with methods of solution developed to deal with problems in the physics of thermal reactors, for which previously available computer programmes were unsatisfactory. The methods described are those incorporated in the programmes WINFRITH DSN written in FORTRAN language for the IBM 7090 and STRETCH computers. (author)

  16. The Winfrith DSN programme

    Energy Technology Data Exchange (ETDEWEB)

    Francescon, S [General Reactor Physics Division, Atomic Energy Establishment, Winfrith, Dorchester, Dorset (United Kingdom)

    1963-05-15

    The programme, which is written in the Fortran language, solves the Carlson discrete S{sub n} approximation to the Boltzmann transport equation in cylindrical geometry. This report describes the input and output facilities of the WINFRITH DSN programme and the associated editing programme WED. (author)

  17. Enabling On-Demand Database Computing with MIT SuperCloud Database Management System

    Science.gov (United States)

    2015-09-15

    arc.liv.ac.uk/trac/SGE) provides these services and is independent of programming language (C, Fortran, Java , Matlab, etc) or parallel programming...a MySQL database to store DNS records. The DNS records are controlled via a simple web service interface that allows records to be created

  18. Development of an EDV-supported decision instrument for site-pre-selection of nuclear power plants. EDV-supported instrument for calculation of the space distribution of the collective dose rate and area contamination. Vol. 3. Materials

    Energy Technology Data Exchange (ETDEWEB)

    Bruessermann, K; Eschhaus, M; Kreymborg, A; Muenster, M; Schommer, N

    1980-01-01

    Three FORTRAN-IV program systems have been developed and applied for calculating the radiation exposure due to the release of radioactive products through exhaust air and waste water. The documentation contains the materials from the regional data base, from the methods data base, as well as ecological background data.

  19. Software for handling MFME1

    International Nuclear Information System (INIS)

    Van der Merwe, W.G.

    1984-01-01

    The report deals with SEMFIP, a computer code for determining magnetic field measurements. The program is written in FORTRAN and ASSEMBLER. The preparations for establishing SEMFIP, the actual measurements, data handling and the problems that were experienced are discussed. Details on the computer code are supplied in an appendix

  20. Extracting topographic structure from digital elevation data for geographic information-system analysis

    Science.gov (United States)

    Jenson, Susan K.; Domingue, Julia O.

    1988-01-01

    Software tools have been developed at the U.S. Geological Survey's EROS Data Center to extract topographic structure and to delineate watersheds and overland flow paths from digital elevation models. The tools are specialpurpose FORTRAN programs interfaced with general-purpose raster and vector spatial analysis and relational data base management packages.

  1. Reactor physics of light water power reactors of the WWER-1000 type in the SKODA Trust. Part 2

    International Nuclear Information System (INIS)

    Zbytovsky, A.; Vyskocil, V.; Vacek, J.; Krysl, V.

    1979-01-01

    The system is described of multigroup transport programs and the respective data libraries used at the SKODA WORKS for calculating few-group diffusion constants. The importance is stressed of precisioning nuclear data. The programs for multigroup calculations are mostly written in FORTRAN-1900. The structure of microcalculations is described and the possible cost savings are indicated. (J.P.)

  2. 'Grafic'. A subroutine for the graphic displays

    International Nuclear Information System (INIS)

    Yunta Carretero, J.

    1977-01-01

    The subroutire Grafic allows the drawing of different standard graphics in a pploter Calcomp and avoid the users the preparation of calls to several Plot subroutines, which are necessary for the plotting. The possibilities of this subroutine, user's guide, suggestions about better use and examples, and also the carry out in Fortran language, are described. (author) [es

  3. Programming Models for Three-Dimensional Hydrodynamics on the CM-5 (Part II)

    International Nuclear Information System (INIS)

    Amala, P.A.K.; Rodrigue, G.H.

    1994-01-01

    This is a two-part presentation of a timing study on the Thinking Machines CORP. CM-5 computer. Part II is given in this study and represents domain-decomposition and message-passing models. Part I described computational problems using a SIMD model and connection machine FORTRAN (CMF)

  4. ADGEN: An automated adjoint code generator for large-scale sensitivity analysis

    International Nuclear Information System (INIS)

    Pin, F.G.; Oblow, E.M.; Horwedel, J.E.; Lucius, J.L.

    1987-01-01

    This paper describes a new automated system, named ADGEN, which makes use of the strengths of computer calculus to automate the costly and time-consuming calculation of derivatives in FORTRAN computer codes, and automatically generate adjoint solutions of computer codes

  5. Introductory Linear Regression Programs in Undergraduate Chemistry.

    Science.gov (United States)

    Gale, Robert J.

    1982-01-01

    Presented are simple programs in BASIC and FORTRAN to apply the method of least squares. They calculate gradients and intercepts and express errors as standard deviations. An introduction of undergraduate students to such programs in a chemistry class is reviewed, and issues instructors should be aware of are noted. (MP)

  6. A rigid-body least-squares program with angular and translation scan facilities

    CERN Document Server

    Kutschabsky, L

    1981-01-01

    The described computer program, written in CERN Fortran, is designed to enlarge the convergence radius of the rigid-body least-squares method by allowing a stepwise change of the angular and/or translational parameters within a chosen range. (6 refs).

  7. Computerized techniques for digital filtering and spectral decomposition with applications to nuclear magnetic resonance

    International Nuclear Information System (INIS)

    Murphy, P.D.; Gerstein, B.C.

    1979-02-01

    A report is presented which describes a digital filtering technique using both a bandpass filter and an exponential filter. The properties of Lorentzian and Gaussian lineshapes are discussed. A procedure for decomposing NMR absorption spectra with overlapping lines into Lorentzian and Gaussian components is also described. Finally, two FORTRAN computer programs which implement concepts developed in this report are presented

  8. Automated calculations for massive fermion production with ai-bar Talc

    International Nuclear Information System (INIS)

    Lorca, A.; Riemann, T.

    2004-01-01

    The package ai-bar Talc has been developed for the automated calculation of radiative corrections to two-fermion production at e + e - colliders. The package uses Diana, Qgraf, Form, Fortran, FF, LoopTools, and further unix/linux tools. Numerical results are presented for e + e - -> e + e - , μ + μ - , bs-bar , tc-bar

  9. The package PAKPDF 1.1 of parameterizations of parton distribution functions in the proton

    International Nuclear Information System (INIS)

    Charchula, K.

    1992-01-01

    A FORTRAN package containing parameterizations of parton distribution functions (PDFs) in the proton is described, allows an easy access to PDFs provided by several recent parameterizations and to some parameters characterizing particular parameterization. Some comments about the use of various parameterizations are also included. (orig.)

  10. The package PAKPDF ver. 1.1 of parametrizations of parton distribution functions in the proton

    International Nuclear Information System (INIS)

    Charchula, K.

    1991-08-01

    A FORTRAN package containing parametrizations of parton distribution functions (PDFS) in the proton is described. It allows an easy access to PDFS provided by several recent parametrizations and to some parameters characterizing particular parametrization. Some comments about the use of various parametrizations are also included. (orig.)

  11. Find - a computer program for peak search in gamma-ray spectra measured with Ge (Li) detectors

    International Nuclear Information System (INIS)

    Venturini, L.

    1988-01-01

    The program FIND is a FORTRAN IV computer code for peak search in spectra measured with Ge(Li) detectors. The program gives the position and estimates energy and relative significance for every peak found in the spectrum. The search in done by calculating a negative smoothed second difference of the experimental spectrum, as suggested by Phillips and Marlow (1). (author) [pt

  12. User's guide for SLWDN9, a code for calculating flux-surfaced-averaging of alpha densities, currents, and heating in non-circular tokamaks

    International Nuclear Information System (INIS)

    Hively, L.M.; Miley, G.M.

    1980-03-01

    The code calculates flux-surfaced-averaged values of alpha density, current, and electron/ion heating profiles in realistic, non-circular tokamak plasmas. The code is written in FORTRAN and execute on the CRAY-1 machine at the Magnetic Fusion Energy Computer Center

  13. Kiche: A simulation tool for kinetics of iodine chemistry in the containment of light water reactors under severe accident conditions (Contract research)

    International Nuclear Information System (INIS)

    Moriyama, Kiyofumi; Maruyama, Yu; Nakamura, Hideo

    2011-03-01

    An iodine chemistry simulation tool, Kiche, was developed for analyses of chemical kinetics relevant to iodine volatilization in the containment vessel of light water reactors (LWRs) during a severe accident. It consists of a Fortran code to solve chemical kinetics models, reaction databases written in plain text format, and peripheral tools to convert the reaction databases into Fortran codes to solve corresponding ordinary differential equation sets. Potential advantages of Kiche are the text format reaction database separated from the code that provides flexibility of the chemistry model, and, being a Fortran code which is relatively easily coupled with other Fortran codes such as severe accident analysis codes. This document describes the model, solution method, code structure, and examples of application of Kiche for simulation of experiments. The calculation results by the present model agreed well with the experimental data and it indicates the model properly includes the most important processes in the volatilization of iodine from irradiated iodide solutions with or without organic impurities. The appendixes give practical information for the usage of Kiche. (author)

  14. Integrated Analytical Evaluation and Optimization of Model Parameters against Preprocessed Measurement Data

    Science.gov (United States)

    1989-06-23

    lags in hours for which these maxima occur. Often the night-side results contain two maxima in their dependence on lag, one at zero lag, and the other...Besides the VMS operating system sofware , the workstation also includes a User Interface Services graphics package, which is a collectio;. of FORTRAN

  15. Easy-to-use application programs for decay heat and delayed neutron calculations on personal computers

    Energy Technology Data Exchange (ETDEWEB)

    Oyamatsu, Kazuhiro [Nagoya Univ. (Japan)

    1998-03-01

    Application programs for personal computers are developed to calculate the decay heat power and delayed neutron activity from fission products. The main programs can be used in any computers from personal computers to main frames because their sources are written in Fortran. These programs have user friendly interfaces to be used easily not only for research activities but also for educational purposes. (author)

  16. User's guide to program RCN

    International Nuclear Information System (INIS)

    Cowan, R.D.; Rajnak, K.; Renard, P.

    1976-06-01

    This is a set of three Fortran IV programs, RCN29, HFMOD7, and RCN229, based on the Herman--Skillman and Charlotte Froese Fischer programs, with extensive modifications and additions. The programs compute self-consistent-field radial wave functions and the various radial integrals involved in the computation of atomic energy levels and spectra

  17. Event reconstruction with MarlinReco at the International Linear ...

    Indian Academy of Sciences (India)

    event reconstruction system, based on the particle flow concept. Version 00-02 contains the following processors: Tracker hit digitisation: For the vertex system there are two different digitisers available. A simple digitiser translates simulated .... of showers in the calorimeter. The Fortran-based simulation and reconstruction.

  18. Computer Simulation of Mutagenesis.

    Science.gov (United States)

    North, J. C.; Dent, M. T.

    1978-01-01

    A FORTRAN program is described which simulates point-substitution mutations in the DNA strands of typical organisms. Its objective is to help students to understand the significance and structure of the genetic code, and the mechanisms and effect of mutagenesis. (Author/BB)

  19. A Fast Solution of the Lindley Equations for the M-Group Regression Problem. Technical Report 78-3, October 1977 through May 1978.

    Science.gov (United States)

    Molenaar, Ivo W.

    The technical problems involved in obtaining Bayesian model estimates for the regression parameters in m similar groups are studied. The available computer programs, BPREP (BASIC), and BAYREG, both written in FORTRAN, require an amount of computer processing that does not encourage regular use. These programs are analyzed so that the performance…

  20. Subroutine MLTGRD: a multigrid algorithm based on multiplicative correction and implicit non-stationary iteration

    International Nuclear Information System (INIS)

    Barry, J.M.; Pollard, J.P.

    1986-11-01

    A FORTRAN subroutine MLTGRD is provided to solve efficiently the large systems of linear equations arising from a five-point finite difference discretisation of some elliptic partial differential equations. MLTGRD is a multigrid algorithm which provides multiplicative correction to iterative solution estimates from successively reduced systems of linear equations. It uses the method of implicit non-stationary iteration for all grid levels

  1. Application of HPCN to direct numerical simulation of turbulent flow

    NARCIS (Netherlands)

    Verstappen, RWCP; Veldman, AEP; van Waveren, GM; Hertzberger, B; Sloot, P

    1997-01-01

    This poster shows how HPCN can be used as a path-finding tool for turbulence research. The parallelization of direct numerical simulation of turbulent flow using the data-parallel model and Fortran 95 constructs is treated, both on a shared memory and a distributed memory computer.

  2. Simulation of solvent extraction in reprocessing

    Energy Technology Data Exchange (ETDEWEB)

    Kumar, Shekhar; Koganti, S B [Reprocessing Group, Indira Gandhi Centre for Atomic Research, Kalpakkam (India)

    1994-06-01

    A SIMulation Program for Solvent EXtraction (SIMPSEX) has been developed for simulation of PUREX process used in nuclear fuel reprocessing. This computer program is written in double precision structured FORTRAN77 and at present it is used in DOS environment on a PC386. There is a plan to port it to ND supermini computers in future. (author). 5 refs., 3 figs.

  3. Determination of the extinction factor in function of the density of dislocations

    International Nuclear Information System (INIS)

    Macias B, L.R.

    1991-12-01

    There are exist three basic types of crystalline lattice defects: point, line (or dislocations) and surface defects. Such defects may be incorporated intentionally to produce desired mechanical and physical properties. This report presents a FORTRAN language program to calculate the extinction factor in samples of polycrystalline copper as function of the dislocations density. (Author)

  4. NUCCON

    International Nuclear Information System (INIS)

    Gruber, J.; Lehmann, B.; Schneider, J.

    1979-09-01

    A FORTRAN program for the calculation of the time dependent nuclide concentrations, the activity, the gamma-ray dose rate and the biological hazard potential of fusion reactor materials due to neutron irradiation. (orig.) 891 HP/orig. 892 AMO [de

  5. Uniform random number generators

    Science.gov (United States)

    Farr, W. R.

    1971-01-01

    Methods are presented for the generation of random numbers with uniform and normal distributions. Subprogram listings of Fortran generators for the Univac 1108, SDS 930, and CDC 3200 digital computers are also included. The generators are of the mixed multiplicative type, and the mathematical method employed is that of Marsaglia and Bray.

  6. Column Reduction of Polynomial Matrices; Some Remarks on the Algorithm of Wolovich

    NARCIS (Netherlands)

    Praagman, C.

    1996-01-01

    Recently an algorithm has been developed for column reduction of polynomial matrices. In a previous report the authors described a Fortran implementation of this algorithm. In this paper we compare the results of that implementation with an implementation of the algorithm originally developed by

  7. GRAFLAB 2.3 for UNIX - A MATLAB database, plotting, and analysis tool: User`s guide

    Energy Technology Data Exchange (ETDEWEB)

    Dunn, W.N.

    1998-03-01

    This report is a user`s manual for GRAFLAB, which is a new database, analysis, and plotting package that has been written entirely in the MATLAB programming language. GRAFLAB is currently used for data reduction, analysis, and archival. GRAFLAB was written to replace GRAFAID, which is a FORTRAN database, analysis, and plotting package that runs on VAX/VMS.

  8. A dialog program for the evaluation of multichannel spectra

    International Nuclear Information System (INIS)

    Dietze, G.

    1978-06-01

    The computer code SPEKT is described for the analysis and manipulation of multichannel spectra in neutron dosimetry. It is a dialog system with a simple command string. The code has mainly been written in FORTRAN. Because of the modular structure of the program a user can add new routines in a simple way. (orig./HP) [de

  9. Spectral Demixing and Spectral Index Correlations for Subpixel Quantification of Land-Cover Components from Coarse Resolution Imagery at Fort Bliss, Texas

    Science.gov (United States)

    2003-12-01

    Application to Land-Cover Change in the Brazilian Amazon ,” Remote Sensing of Environment, vol 52, pp 137-154. Anderson, G.L., J.D. Hanson, and R.H. Haas...FORTRAN, Cambridge University Press. Price, K.P., D. A. Pyke,and L. Mendes. 1992. “Shrub Dieback in a Semiarid Ecosystem; The Integration of Remote

  10. ACRO - a computer program for calculating organ doses from acute or chronic inhalation and ingestion of radionuclides

    International Nuclear Information System (INIS)

    Hirayama, Akio; Kishimoto, Yoichiro; Shinohara, Kunihiko.

    1978-01-01

    The computer program ACRO has been developed to calculate organ doses from acute or chronic inhalation and ingestion of radionuclides. The ICRP Task Group Lung Model (TGLM) was used for inhalation model, and a simple one-compartment model for ingestion. This program is written in FORTRAN IV, and can be executed with storage requirements of about 260 K bytes. (auth.)

  11. Code modernization and modularization of APEX and SWAT watershed simulation models

    Science.gov (United States)

    SWAT (Soil and Water Assessment Tool) and APEX (Agricultural Policy / Environmental eXtender) are respectively large and small watershed simulation models derived from EPIC Environmental Policy Integrated Climate), a field-scale agroecology simulation model. All three models are coded in FORTRAN an...

  12. Interactive Graphics Analysis for Aircraft Design

    Science.gov (United States)

    Townsend, J. C.

    1983-01-01

    Program uses higher-order far field drag minimization. Computer program WDES WDEM preliminary aerodynamic design tool for one or two interacting, subsonic lifting surfaces. Subcritical wing design code employs higher-order far-field drag minimization technique. Linearized aerodynamic theory used. Program written in FORTRAN IV.

  13. Practical parallel programming

    CERN Document Server

    Bauer, Barr E

    2014-01-01

    This is the book that will teach programmers to write faster, more efficient code for parallel processors. The reader is introduced to a vast array of procedures and paradigms on which actual coding may be based. Examples and real-life simulations using these devices are presented in C and FORTRAN.

  14. ANIMAL code

    International Nuclear Information System (INIS)

    Lindemuth, I.R.

    1979-01-01

    This report describes ANIMAL, a two-dimensional Eulerian magnetohydrodynamic computer code. ANIMAL's physical model also appears. Formulated are temporal and spatial finite-difference equations in a manner that facilitates implementation of the algorithm. Outlined are the functions of the algorithm's FORTRAN subroutines and variables

  15. Case Studies in Systems Chemistry. Final Report. [Includes Complete Case Study, Carboxylic Acid Equilibria

    Science.gov (United States)

    Fleck, George

    This publication was produced as a teaching tool for college chemistry. The book is a text for a computer-based unit on the chemistry of acid-base titrations, and is designed for use with FORTRAN or BASIC computer systems, and with a programmable electronic calculator, in a variety of educational settings. The text attempts to present computer…

  16. GUI2QAD-3D: A graphical interface program for QAD-CGPIC program

    International Nuclear Information System (INIS)

    Subbaiah, K.V.; Sarangapani, R.

    2006-01-01

    GUI2QAD-3D is graphical user interface developed in Visual Basic (VB) version 6.0 to prepare input for the QAD-CGPIC program. QAD-CGPIC is a FORTRAN code that combines QAD-CGGP (RSICC-CCC-493, USA) and PICTURE [Irving, D.C., Morrison, G.W., 1970. PICTURE-an aid in debugging GEOM input data, ORNL-TM-2892] for neutron and gamma-ray shielding calculations by the point kernel method in a consistent fashion to utilize the capabilities of two independent codes. The FORTRAN code calculates fast neutron and gamma-ray penetration through various shield configurations defined by combinatorial geometry specifications. It has provision to estimate buildup factor either from Geometric Progression (GP) coefficients (ANS-6.4.3, 1990) or from Capos'. Capabilities of the FORTRAN code is extended by modifying it to handle off-centred multiple identical sources. Several standard tests of inputs are carried out to validate the modified code. The FORTRAN code executable is created with a Lahey compiler. The user interface facilitates interactive viewing of the geometry of the system with online context sensitive help. Inputs for several practical problems relating to nuclear fuel reprocessing labs are provided. The software runs on Pentium III computers under windows environment and is transmitted in one CD. The software can be obtained from Radiation Safety Information and Computational Centre (RSICC), ORNL, USA with code package identification number CCC-697

  17. Computer program /P1-GAS/ calculates the P-0 and P-1 transfer matrices for neutron moderation in a monatomic gas

    Science.gov (United States)

    Collier, G.; Gibson, G.

    1968-01-01

    FORTRAN 4 program /P1-GAS/ calculates the P-O and P-1 transfer matrices for neutron moderation in a monatomic gas. The equations used are based on the conditions that there is isotropic scattering in the center-of-mass coordinate system, the scattering cross section is constant, and the target nuclear velocities satisfy a Maxwellian distribution.

  18. Airport Network Flow Simulator

    Science.gov (United States)

    1978-10-01

    The Airport Network Flow Simulator is a FORTRAN IV simulation of the flow of air traffic in the nation's 600 commercial airports. It calculates for any group of selected airports: (a) the landing and take-off (Type A) delays; and (b) the gate departu...

  19. Research and applications: Artificial intelligence

    Science.gov (United States)

    Chaitin, L. J.; Duda, R. O.; Johanson, P. A.; Raphael, B.; Rosen, C. A.; Yates, R. A.

    1970-01-01

    The program is reported for developing techniques in artificial intelligence and their application to the control of mobile automatons for carrying out tasks autonomously. Visual scene analysis, short-term problem solving, and long-term problem solving are discussed along with the PDP-15 simulator, LISP-FORTRAN-MACRO interface, resolution strategies, and cost effectiveness.

  20. TJ-II Library Manual

    International Nuclear Information System (INIS)

    Tribaldos, V.; Milligen, B.Ph., van; Lopez-Fraguas, A.

    1996-01-01

    This report contains a detailed description of the TJ-II library and its routines. The library is written in FORTRAN 77 language and is available in the CRAY J916 and DEC Alpha 8400 computers at CIEMAT. This document also contains some examples of its use. (Author)

  1. Computer program modifications for lung microdosimetry

    International Nuclear Information System (INIS)

    Harty, R.; Hadley, R.T.

    1983-01-01

    A lung model based on statistical studies of beagle dog lung microstructure was incorporated to describe the distributions of tissue, air space, and cell nuclei in pulmonary lung tissue was modified from basic to FORTRAN to shorten time and increase flexibility

  2. European Scientific Notes. Volume 38, Number 5.

    Science.gov (United States)

    1984-05-01

    clinical implications of certain pharma - system to assist molecular biologists is cogenetic diseases, different in approach from similar Department of...grade, theoretical subsequent problems if needed. computing problems are solved. All Graduates of School 444 tutored students learn FORTRAN; other

  3. Calculation of the effective D-d neutron energy distribution incident on a cylindrical shell sample

    International Nuclear Information System (INIS)

    Gotoh, Hiroshi

    1977-07-01

    A method is proposed to calculate the effective energy distribution of neutrons incident on a cylindrical shell sample placed perpendicularly to the direction of the deuteron beam bombarding a deuterium metal target. The Monte Carlo method is used and the Fortran program is contained. (auth.)

  4. HYDROLOGY AND SEDIMENT MODELING USING THE BASINS NON-POINT SOURCE MODEL

    Science.gov (United States)

    The Non-Point Source Model (Hydrologic Simulation Program-Fortran, or HSPF) within the EPA Office of Water's BASINS watershed modeling system was used to simulate streamflow and total suspended solids within Contentnea Creek, North Carolina, which is a tributary of the Neuse Rive...

  5. Estimation of dynamic load of mercury in a river with BASINS-HSPF model

    Science.gov (United States)

    Ying Ouyang; John Higman; Jeff Hatten

    2012-01-01

    Purpose Mercury (Hg) is a naturally occurring element and a pervasive toxic pollutant. This study investigated the dynamic loads of Hg from the Cedar-Ortega Rivers watershed into the Lower St. Johns River (LSJR), Florida, USA, using the better assessment science integrating point and nonpoint sources (BASINS)-hydrologic simulation program - FORTRAN (HSPF) model....

  6. Log-normal spray drop distribution...analyzed by two new computer programs

    Science.gov (United States)

    Gerald S. Walton

    1968-01-01

    Results of U.S. Forest Service research on chemical insecticides suggest that large drops are not as effective as small drops in carrying insecticides to target insects. Two new computer programs have been written to analyze size distribution properties of drops from spray nozzles. Coded in Fortran IV, the programs have been tested on both the CDC 6400 and the IBM 7094...

  7. Geophysical data base

    Science.gov (United States)

    Williamson, M. R.; Kirschner, L. R.

    1975-01-01

    A general data-management system that provides a random-access capability for large amounts of data is described. The system operates on a CDC 6400 computer using a combination of magnetic tape and disk storage. A FORTRAN subroutine package is provided to simplify the maintenance and use of the data.

  8. DYSIM - A Modular Simulation System for Continuous Dynamic Processes

    DEFF Research Database (Denmark)

    Christensen, P. la Cour; Kofoed, J. E.; Larsen, N.

    1986-01-01

    The report describes a revised version of a simulation system for continuous processes, DYSIM. In relation to the previous version, which was developed in 1981, the main changes are conversion to Fortran 77 and introduction of a modular structure. The latter feature gives the user a possibility...

  9. HADES. A computer code for fast neutron cross section from the Optical Model; HADES. Un programa numerico para el calculo de seccciones eficaces neutronicas mediante el modelo optico

    Energy Technology Data Exchange (ETDEWEB)

    Guasp, J; Navarro, C

    1973-07-01

    A FORTRAN V computer code for UNIVAC 1108/6 using a local Optical Model with spin-orbit interaction is described. The code calculates fast neutron cross sections, angular distribution, and Legendre moments for heavy and intermediate spherical nuclei. It allows for the possibility of automatic variation of potential parameters for experimental data fitting. (Author) 55 refs.

  10. A NetCDF version of the two-dimensional energy balance model based on the full multigrid algorithm

    Science.gov (United States)

    Zhuang, Kelin; North, Gerald R.; Stevens, Mark J.

    A NetCDF version of the two-dimensional energy balance model based on the full multigrid method in Fortran is introduced for both pedagogical and research purposes. Based on the land-sea-ice distribution, orbital elements, greenhouse gases concentration, and albedo, the code calculates the global seasonal surface temperature. A step-by-step guide with examples is provided for practice.

  11. Systems Engineering

    Science.gov (United States)

    1989-05-01

    avec la ddfinitias, pour chaquo variable, d’un typo analogue aux d~clsrations de variables FORTRAN, A savoir - Booldes, tableau do hooldons, logique...scnce d’unc ergonomic suffisante) come une "documentation vivante " et reprisentative do syatiime, portable et as ndcesattaot pas de nathricl sp&ctfigue

  12. Factor analysis of multivariate data

    Digital Repository Service at National Institute of Oceanography (India)

    Fernandes, A.A.; Mahadevan, R.

    A brief introduction to factor analysis is presented. A FORTRAN program, which can perform the Q-mode and R-mode factor analysis and the singular value decomposition of a given data matrix is presented in Appendix B. This computer program, uses...

  13. The program RADLST [Radiation Listing

    International Nuclear Information System (INIS)

    Burrows, T.W.

    1988-01-01

    The program RADLST (Radiation Listing) is designed to calculate the nuclear and atomic radiations associated with the radioactive decay of nuclei. It uses as its primary input nuclear decay data in the Evaluated Nuclear Structure Data File (ENSDF) format. The code is written in FORTRAN 77 and, with a few exceptions, is consistent with the ANSI standard. 65 refs

  14. Calculation of radiation heat generation on a graphite reflector side of IAN-R1 Reactor

    International Nuclear Information System (INIS)

    Duque O, J.; Velez A, L.H.

    1987-01-01

    Calculation methods for radiation heat generation in nuclear reactor, based on the point kernel approach are revisited and applied to the graphite reflector of IAN-R1 reactor. A Fortran computer program was written for the determination of total heat generation in the reflector, taking 1155 point in it

  15. Object-oriented accelerator design with HPF

    Energy Technology Data Exchange (ETDEWEB)

    Ji Qiang; Ryne, R.D.; Habib, S.

    1998-12-31

    In this paper, object-oriented design is applied to codes for beam dynamics simulations in accelerators using High Performance Fortran (HPF). This results in good maintainability, reusability, and extensibility of software, combined with the ease of parallel programming provided by HPF.

  16. How to Build MCNP 6.2

    Energy Technology Data Exchange (ETDEWEB)

    Bull, Jeffrey S. [Los Alamos National Lab. (LANL), Los Alamos, NM (United States)

    2017-11-13

    This presentation describes how to build MCNP 6.2. MCNP®* 6.2 can be compiled on Macs, PCs, and most Linux systems. It can also be built for parallel execution using both OpenMP and Messing Passing Interface (MPI) methods. MCNP6 requires Fortran, C, and C++ compilers to build the code.

  17. PLOTGEOMX: a program for display of a neutron target assembly by means of a GHOST plotting system

    International Nuclear Information System (INIS)

    Clarke, J.H.

    1978-02-01

    The program PLOTGEOM has been modified to work on the A.E.R.E., Harwell IBM 370-167 computer using the GHOST graphics package. The control data routine has been altered to permit free format input and the program has been compiled and stored using the extended-H FORTRAN optimising compiler. (author)

  18. Organization of bubble chamber image processing

    International Nuclear Information System (INIS)

    Gritsaenko, I.A.; Petrovykh, L.P.; Petrovykh, Yu.L.; Fenyuk, A.B.

    1985-01-01

    A programme of bubble chamber image processing is described. The programme is written in FORTRAN, it is developed for the DEC-10 computer and is designed for operation of semi-automation processing-measurement projects PUOS-2 and PUOS-4. Fornalization of the image processing permits to use it for different physical experiments

  19. Manual of phosphoric acid fuel cell power plant cost model and computer program

    Science.gov (United States)

    Lu, C. Y.; Alkasab, K. A.

    1984-01-01

    Cost analysis of phosphoric acid fuel cell power plant includes two parts: a method for estimation of system capital costs, and an economic analysis which determines the levelized annual cost of operating the system used in the capital cost estimation. A FORTRAN computer has been developed for this cost analysis.

  20. Computing Thermal Imbalance Forces On Satellites

    Science.gov (United States)

    Vigue, Yvonne; Schutz, Robert E.; Sewell, Granville; Abusali, Pothai A. M.

    1994-01-01

    HEAT.PRO computer program calculates imbalance force caused by heating of surfaces of satellite. Calculates thermal imbalance force and determines its effect on orbit of satellite, especially where shadow cast by Earth Causes periodic changes in thermal environment around satellite. Written in FORTRAN 77.