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
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.
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.
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.
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
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
[Review on HSPF model for simulation of hydrology and water quality processes].
Li, Zhao-fu; Liu, Hong-Yu; Li, Yan
2012-07-01
Hydrological Simulation Program-FORTRAN (HSPF), written in FORTRAN, is one ol the best semi-distributed hydrology and water quality models, which was first developed based on the Stanford Watershed Model. Many studies on HSPF model application were conducted. It can represent the contributions of sediment, nutrients, pesticides, conservatives and fecal coliforms from agricultural areas, continuously simulate water quantity and quality processes, as well as the effects of climate change and land use change on water quantity and quality. HSPF consists of three basic application components: PERLND (Pervious Land Segment) IMPLND (Impervious Land Segment), and RCHRES (free-flowing reach or mixed reservoirs). In general, HSPF has extensive application in the modeling of hydrology or water quality processes and the analysis of climate change and land use change. However, it has limited use in China. The main problems with HSPF include: (1) some algorithms and procedures still need to revise, (2) due to the high standard for input data, the accuracy of the model is limited by spatial and attribute data, (3) the model is only applicable for the simulation of well-mixed rivers, reservoirs and one-dimensional water bodies, it must be integrated with other models to solve more complex problems. At present, studies on HSPF model development are still undergoing, such as revision of model platform, extension of model function, method development for model calibration, and analysis of parameter sensitivity. With the accumulation of basic data and imorovement of data sharing, the HSPF model will be applied more extensively in China.
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.
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.
Estimation of dynamic load of mercury in a river with BASINS-HSPF model
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....
High Performance Object-Oriented Scientific Programming in Fortran 90
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.
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
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...
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
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.
Object-Oriented Scientific Programming with Fortran 90
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.
Classical Fortran programming for engineering and scientific applications
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
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
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.
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.
Energy Technology Data Exchange (ETDEWEB)
Biftu, G.F.; Beersing, A.; Wu, S.; Ade, F. [Golder Associates, Calgary, AB (Canada)
2005-07-01
An outline of a new approach to assessing the sensitivity and uncertainty associated with surface water modelling results using Hydrological Simulation Program-Fortran (HSPF) was presented, as well as the results of a sensitivity and uncertainty analysis. The HSPF model is often used to characterize the hydrological processes in watersheds within the oil sands region. Typical applications of HSPF included calibration of the model parameters using data from gauged watersheds, as well as validation of calibrated models with data sets. Additionally, simulations are often conducted to make flow predictions to support the environmental impact assessment (EIA) process. However, a key aspect of the modelling components of the EIA process is the sensitivity and uncertainty of the modelling results as compared to model parameters. Many of the variations in the HSPF model's outputs are caused by a small number of model parameters and outputs. A sensitivity analysis was performed to identify and focus on key parameters and assumptions that have the most influence on the model's outputs. Analysis entailed varying each parameter in turn, within a range, and examining the resulting relative changes in the model outputs. This analysis consisted of the selection of probability distributions to characterize the uncertainty in the model's key sensitive parameters, as well as the use of Monte Carlo and HSPF simulation to determine the uncertainty in model outputs. tabs, figs.
Numerical methods of mathematical optimization with Algol and Fortran programs
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
An Introduction to Fortran Programming: An IPI Approach.
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…
Comparison of and conversion between different implementations of the FORTRAN programming language
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.
PRP: a FORTRAN IV interactive plotting program
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.
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.)
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
A Fortran Program for Deep Space Sensor Analysis.
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
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.)
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
Hydrological Modeling of the Jiaoyi Watershed (China) Using HSPF Model
Yan, Chang-An; Zhang, Wanchang; Zhang, Zhijie
2014-01-01
A watershed hydrological model, hydrological simulation program-Fortran (HSPF), was applied to simulate the spatial and temporal variation of hydrological processes in the Jiaoyi watershed of Huaihe River Basin, the heaviest shortage of water resources and polluted area in China. The model was calibrated using the years 2001–2004 and validated with data from 2005 to 2006. Calibration and validation results showed that the model generally simulated mean monthly and daily runoff precisely due to the close matching hydrographs between simulated and observed runoff, as well as the excellent evaluation indicators such as Nash-Sutcliffe efficiency (NSE), coefficient of correlation (R 2), and the relative error (RE). The similar simulation results between calibration and validation period showed that all the calibrated parameters had a certain representation in Jiaoyi watershed. Additionally, the simulation in rainy months was more accurate than the drought months. Another result in this paper was that HSPF was also capable of estimating the water balance components reasonably and realistically in space through the whole watershed. The calibrated model can be used to explore the effects of climate change scenarios and various watershed management practices on the water resources and water environment in the basin. PMID:25013863
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)
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
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.
Integration of Tidal Prism Model and HSPF for simulating indicator bacteria in coastal watersheds
Sobel, Rose S.; Rifai, Hanadi S.; Petersen, Christina M.
2017-09-01
Coastal water quality is strongly influenced by tidal fluctuations and water chemistry. There is a need for rigorous models that are not computationally or economically prohibitive, but still allow simulation of the hydrodynamics and bacteria sources for coastal, tidally influenced streams and bayous. This paper presents a modeling approach that links a Tidal Prism Model (TPM) implemented in an Excel-based modeling environment with a watershed runoff model (Hydrologic Simulation Program FORTRAN, HSPF) for such watersheds. The TPM is a one-dimensional mass balance approach that accounts for loading from tidal exchange, runoff, point sources and bacteria die-off at an hourly time step resolution. The novel use of equal high-resolution time steps in this study allowed seamless integration of the TPM and HSPF. The linked model was calibrated to flow and E. Coli data (for HSPF), and salinity and enterococci data (for the TPM) for a coastal stream in Texas. Sensitivity analyses showed the TPM to be most influenced by changes in net decay rates followed by tidal and runoff loads, respectively. Management scenarios were evaluated with the developed linked models to assess the impact of runoff load reductions and improved wastewater treatment plant quality and to determine the areas of critical need for such reductions. Achieving water quality standards for bacteria required load reductions that ranged from zero to 90% for the modeled coastal stream.
Conversion of HSPF Legacy Model to a Platform-Independent, Open-Source Language
Heaphy, R. T.; Burke, M. P.; Love, J. T.
2015-12-01
Since its initial development over 30 years ago, the Hydrologic Simulation Program - FORTAN (HSPF) model has been used worldwide to support water quality planning and management. In the United States, HSPF receives widespread endorsement as a regulatory tool at all levels of government and is a core component of the EPA's Better Assessment Science Integrating Point and Nonpoint Sources (BASINS) system, which was developed to support nationwide Total Maximum Daily Load (TMDL) analysis. However, the model's legacy code and data management systems have limitations in their ability to integrate with modern software, hardware, and leverage parallel computing, which have left voids in optimization, pre-, and post-processing tools. Advances in technology and our scientific understanding of environmental processes that have occurred over the last 30 years mandate that upgrades be made to HSPF to allow it to evolve and continue to be a premiere tool for water resource planners. This work aims to mitigate the challenges currently facing HSPF through two primary tasks: (1) convert code to a modern widely accepted, open-source, high-performance computing (hpc) code; and (2) convert model input and output files to modern widely accepted, open-source, data model, library, and binary file format. Python was chosen as the new language for the code conversion. It is an interpreted, object-oriented, hpc code with dynamic semantics that has become one of the most popular open-source languages. While python code execution can be slow compared to compiled, statically typed programming languages, such as C and FORTRAN, the integration of Numba (a just-in-time specializing compiler) has allowed this challenge to be overcome. For the legacy model data management conversion, HDF5 was chosen to store the model input and output. The code conversion for HSPF's hydrologic and hydraulic modules has been completed. The converted code has been tested against HSPF's suite of "test" runs and shown
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
NLEdit: A generic graphical user interface for Fortran programs
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.
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
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
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)
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.)
Aspects of FORTRAN in large-scale programming
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.
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)
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
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
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.
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
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.
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.
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
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.
Nasr, Ahmed; Bruen, Michael; Jordan, Philip; Moles, Richard; Kiely, Gerard; Byrne, Paul
2007-03-01
Recent extensive water quality surveys in Ireland revealed that diffuse phosphorus (P) pollution originating from agricultural land and transported by runoff and subsurface flows is the primary cause of the deterioration of surface water quality. P transport from land to water can be described by mathematical models that vary in modelling approach, complexity and scale (plot, field and catchment). Here, three mathematical models (soil water and analysis tools (SWAT), hydrological simulation program-FORTRAN (HSPF) and système hydrologique Européen TRANsport (SHETRAN)/grid oriented phosphorus component (GOPC)) of diffuse P pollution have been tested in three Irish catchments to explore their suitability in Irish conditions for future use in implementing the European Water Framework Directive. After calibrating the models, their daily flows and total phosphorus (TP) exports are compared and assessed. The HSPF model was the best at simulating the mean daily discharge while SWAT gave the best calibration results for daily TP loads. Annual TP exports for the three models and for two empirical models were compared with measured data. No single model is consistently better in estimating the annual TP export for all three catchments.
specsim: A Fortran-77 program for conditional spectral simulation in 3D
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.
Alacron, Vladimir J.; Nigro, Joseph D.; McAnally, William H.; OHara, Charles G.; Engman, Edwin Ted; Toll, David
2011-01-01
This paper documents the use of simulated Moderate Resolution Imaging Spectroradiometer land use/land cover (MODIS-LULC), NASA-LIS generated precipitation and evapo-transpiration (ET), and Shuttle Radar Topography Mission (SRTM) datasets (in conjunction with standard land use, topographical and meteorological datasets) as input to hydrological models routinely used by the watershed hydrology modeling community. The study is focused in coastal watersheds in the Mississippi Gulf Coast although one of the test cases focuses in an inland watershed located in northeastern State of Mississippi, USA. The decision support tools (DSTs) into which the NASA datasets were assimilated were the Soil Water & Assessment Tool (SWAT) and the Hydrological Simulation Program FORTRAN (HSPF). These DSTs are endorsed by several US government agencies (EPA, FEMA, USGS) for water resources management strategies. These models use physiographic and meteorological data extensively. Precipitation gages and USGS gage stations in the region were used to calibrate several HSPF and SWAT model applications. Land use and topographical datasets were swapped to assess model output sensitivities. NASA-LIS meteorological data were introduced in the calibrated model applications for simulation of watershed hydrology for a time period in which no weather data were available (1997-2006). The performance of the NASA datasets in the context of hydrological modeling was assessed through comparison of measured and model-simulated hydrographs. Overall, NASA datasets were as useful as standard land use, topographical , and meteorological datasets. Moreover, NASA datasets were used for performing analyses that the standard datasets could not made possible, e.g., introduction of land use dynamics into hydrological simulations
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
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
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
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
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
Fortran programs for the time-dependent Gross-Pitaevskii equation in a fully anisotropic trap
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
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.
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
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
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...
ptchg: A FORTRAN program for point-charge calculations of electric field gradients (EFGs)
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.
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
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
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.
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
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.)
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
TSPP - A Collection of FORTRAN Programs for Processing and Manipulating Time Series
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
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
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
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.)
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.
Chalise, D. R.; Haj, Adel E.; Fontaine, T.A.
2018-01-01
The hydrological simulation program Fortran (HSPF) [Hydrological Simulation Program Fortran version 12.2 (Computer software). USEPA, Washington, DC] and the precipitation runoff modeling system (PRMS) [Precipitation Runoff Modeling System version 4.0 (Computer software). USGS, Reston, VA] models are semidistributed, deterministic hydrological tools for simulating the impacts of precipitation, land use, and climate on basin hydrology and streamflow. Both models have been applied independently to many watersheds across the United States. This paper reports the statistical results assessing various temporal (daily, monthly, and annual) and spatial (small versus large watershed) scale biases in HSPF and PRMS simulations using two watersheds in the Black Hills, South Dakota. The Nash-Sutcliffe efficiency (NSE), Pearson correlation coefficient (r">rr), and coefficient of determination (R2">R2R2) statistics for the daily, monthly, and annual flows were used to evaluate the models’ performance. Results from the HSPF models showed that the HSPF consistently simulated the annual flows for both large and small basins better than the monthly and daily flows, and the simulated flows for the small watershed better than flows for the large watershed. In comparison, the PRMS model results show that the PRMS simulated the monthly flows for both the large and small watersheds better than the daily and annual flows, and the range of statistical error in the PRMS models was greater than that in the HSPF models. Moreover, it can be concluded that the statistical error in the HSPF and the PRMSdaily, monthly, and annual flow estimates for watersheds in the Black Hills was influenced by both temporal and spatial scale variability.
OpenMP GNU and Intel Fortran programs for solving the time-dependent Gross-Pitaevskii equation
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
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...
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)
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'
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.
QEDMOD: Fortran program for calculating the model Lamb-shift operator
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.
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.
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.
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.
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)
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.
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
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.
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
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.
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.
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)
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)
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.
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)
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
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...
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
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
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)
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
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
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)
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
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.
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
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
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
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...
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
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
Application of Modern Fortran to Spacecraft Trajectory Design and Optimization
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.
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.
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.
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.
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.
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.
Hydrograph sensitivity to estimates of map impervious cover: a WinHSPF BASINS case study
Endreny, Theodore A.; Somerlot, Christopher; Hassett, James M.
2003-04-01
The BASINS geographic information system hydrologic toolkit was designed to compute total maximum daily loads, which are often derived by combining water quantity estimates with pollutant concentration estimates. In this paper the BASINS toolkit PLOAD and WinHSPF sub-models are briefly described, and then a 0·45 km2 headwater watershed in the New York Croton River area is used for a case study illustrating a full WinHSPF implementation. The goal of the Croton study was to determine the sensitivity of WinHSPF hydrographs to changes in land cover map inputs. This scenario occurs when scaling the WinHSPF model from the smaller 0·45 km2 watershed to the larger 1000 km2 management basin of the entire Croton area. Methods used to test model sensitivity include first calibrating the WinHSPF hydrograph using research-monitored precipitation and discharge data together with high spatial resolution and accuracy land cover data of impervious and pervious areas, and then swapping three separate land cover files, known as GIRAS, MRLC, and DOQQ data, into the calibrated model. Research results indicated that the WinHSPF land cover swapping had peak flow sensitivity in December 2001 hydrographs between 35% underestimation and 20% overestimation, and that errors in land-cover-derived runoff ratios for storm totals and peak flows tracked with the land cover data estimates of impervious area.
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.
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
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
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
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.
Comparison of HSPF and SWAT models performance for runoff and sediment yield prediction.
Im, Sangjun; Brannan, Kevin M; Mostaghimi, Saied; Kim, Sang Min
2007-09-01
A watershed model can be used to better understand the relationship between land use activities and hydrologic/water quality processes that occur within a watershed. The physically based, distributed parameter model (SWAT) and a conceptual, lumped parameter model (HSPF), were selected and their performance were compared in simulating runoff and sediment yields from the Polecat Creek watershed in Virginia, which is 12,048 ha in size. A monitoring project was conducted in Polecat Creek watershed during the period of October 1994 to June 2000. The observed data (stream flow and sediment yield) from the monitoring project was used in the calibration/validations of the models. The period of September 1996 to June 2000 was used for the calibration and October 1994 to December 1995 was used for the validation of the models. The outputs from the models were compared to the observed data at several sub-watershed outlets and at the watershed outlet of the Polecat Creek watershed. The results indicated that both models were generally able to simulate stream flow and sediment yields well during both the calibration/validation periods. For annual and monthly loads, HSPF simulated hydrologic and sediment yield more accurately than SWAT at all monitoring sites within the watershed. The results of this study indicate that both the SWAT and HSPF watershed models performed sufficiently well in the simulation of stream flow and sediment yield with HSPF performing moderately better than SWAT for simulation time-steps greater than a month.
SVM Support in the Vienna Fortran Compilation System
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...
Fortran interface layer of the framework for developing particle simulator FDPS
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++.
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
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
Introduction to modern Fortran for the Earth system sciences
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...
An analysis of representative heating load lines for residential HSPF ratings
Energy Technology Data Exchange (ETDEWEB)
Rice, C. Keith [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Shen, Bo [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States); Shrestha, Som S. [Oak Ridge National Lab. (ORNL), Oak Ridge, TN (United States)
2015-07-01
This report describes an analysis to investigate representative heating loads for single-family detached homes using current EnergyPlus simulations (DOE 2014a). Hourly delivered load results are used to determine binned load lines using US Department of Energy (DOE) residential prototype building models (DOE 2014b) developed by Pacific Northwest National Laboratory (PNNL). The selected residential single-family prototype buildings are based on the 2006 International Energy Conservation Code (IECC 2006) in the DOE climate regions. The resulting load lines are compared with the American National Standards Institute (ANSI)/Air-Conditioning, Heating, and Refrigeration Institute (AHRI) Standard 210/240 (AHRI 2008) minimum and maximum design heating requirement (DHR) load lines of the heating seasonal performance factor (HSPF) ratings procedure for each region. The results indicate that a heating load line closer to the maximum DHR load line, and with a lower zero load ambient temperature, is more representative of heating loads predicted for EnergyPlus prototype residential buildings than the minimum DHR load line presently used to determine HSPF ratings. An alternative heating load line equation was developed and compared to binned load lines obtained from the EnergyPlus simulation results. The effect on HSPF of the alternative heating load line was evaluated for single-speed and two-capacity heat pumps, and an average HSPF reduction of 16% was found. The alternative heating load line relationship is tied to the rated cooling capacity of the heat pump based on EnergyPlus autosizing, which is more representative of the house load characteristics than the rated heating capacity. The alternative heating load line equation was found to be independent of climate for the six DOE climate regions investigated, provided an adjustable zero load ambient temperature is used. For Region IV, the default DOE climate region used for HSPF ratings, the higher load line results in an ~28
Replacing Fortran Namelists with JSON
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.
Fortran 90 for scientists and engineers
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.
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
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 ...
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
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
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
HSPF Modeling for Compliance and Enforcement: An Urban Case Study
Marshalonis, D.
2017-12-01
Stormwater runoff is one of the most significant challenges to water quality facing surface waters globally. In the United States, the Environmental Protection Agency (EPA) regulates stormwater flows through its National Pollutant Discharge Elimination System (NPDES) program permits. When egregious violations occur, EPA may develop its case and prove those violations through the legal dispute process. However, evidence in stormwater-related cases is ephemeral, difficult to collect due to unpredictable weather dynamics, and there are usually no witnesses. The work presented here illustrates an approach EPA takes for certain wet weather cases: introduce results from hydrologic and hydraulic models as evidence to meet legal burden of proof standards. The challenges and opportunities of using models in stormwater discharge modeling are highlighted.
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
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.
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)
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.
Fortran Testing and Refactoring Infrastructure, Phase I
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...
Fortran Testing and Refactoring Infrastructure, Phase II
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...
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
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.
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
Basic linear algebra subprograms for FORTRAN usage
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.
How to Interface Fortran with Matlab
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
IMAGEP - A FORTRAN ALGORITHM FOR DIGITAL IMAGE PROCESSING
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.
Model Performance Evaluation and Scenario Analysis (MPESA)
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)
A FORTRAN realization of the block adjustment of CCD frames
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.
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)
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.
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.
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
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.
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.
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
Innovative Language-Based & Object-Oriented Structured AMR Using Fortran 90 and OpenMP
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.
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.
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.
Computer applications in physics with FORTRAN, BASIC and C
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...
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)
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
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)
A FORTRAN version implementation of block adjustment of CCD frames and its preliminary application
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.
Jackson, M A
1982-01-01
The programmer's task is often taken to be the construction of algorithms, expressed in hierarchical structures of procedures: this view underlies the majority of traditional programming languages, such as Fortran. A different view is appropriate to a wide class of problem, perhaps including some problems in High Energy Physics. The programmer's task is regarded as having three main stages: first, an explicit model is constructed of the reality with which the program is concerned; second, thi...
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
Programação orientada a objetos em FORTRAN
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çã...
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
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)
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)
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.
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.
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
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.
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.
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.
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
Cloudy's Journey from FORTRAN to C, Why and How
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.
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.
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
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.)
Fortran code for SU(3) lattice gauge theory with and without MPI checkerboard parallelization
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
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)
SMMP v. 3.0—Simulating proteins and protein interactions in Python and Fortran
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.
User manual for two simple postscript output FORTRAN plotting routines
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.
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.
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.
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.
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.
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.
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
International Nuclear Information System (INIS)
Jackson, M.A.
1982-01-01
The programmer's task is often taken to be the construction of algorithms, expressed in hierarchical structures of procedures: this view underlies the majority of traditional programming languages, such as Fortran. A different view is appropriate to a wide class of problem, perhaps including some problems in High Energy Physics. The programmer's task is regarded as having three main stages: first, an explicit model is constructed of the reality with which the program is concerned; second, this model is elaborated to produce the required program outputs; third, the resulting program is transformed to run efficiently in the execution environment. The first two stages deal in network structures of sequential processes; only the third is concerned with procedure hierarchies. (orig.)
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.)
A Computer Program to Compile a Flander-Amidon Interaction Analysis Matrix
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)
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.
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.
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.
HYDROLOGY AND SEDIMENT MODELING USING THE BASINS NON-POINT SOURCE MODEL
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...
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...
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.
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)
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)
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.
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)
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.
Comparison of PASCAL and FORTRAN for solving problems in the physical sciences
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.
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...
BADGER v1.0: A Fortran equation of state library
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
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 ...
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)
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.
International Nuclear Information System (INIS)
Rawool-Sullivan, M.W.; Plagnol, E.
1990-01-01
The program AUTO was developed to be used in the analysis of dE vs E type spectra. This program is written in FORTRAN and calculates dE vs E lines in MeV. The provision is also made in the program to convert these lines from MeV to ADC channel numbers to facilitate the comparison with the raw data from the experiments. Currently the output of this program can be plotted with the display program, called VISU, but it can also be used independent of the program VISU, with little or no modification in the actual fortran code. The program AUTO has many useful applications. In this article the program AUTO is described along with its applications
Conversion of the CALAP (Computer Aided Landform Analysis Program) Program from FORTRAN to DUCK.
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
Structured Design Language for Computer Programs
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.
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.
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)
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
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
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.
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)
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
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.
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
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.
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.
DEFF Research Database (Denmark)
Wirz, Lukas; Peter, Schwerdtfeger,; Avery, James Emil
2013-01-01
Fullerene (Version 4.4), is a general purpose open-source program that can generate any fullerene isomer, perform topological and graph theoretical analysis, as well as calculate a number of physical and chemical properties. The program creates symmetric planar drawings of the fullerene graph, an......-Fowler, and Brinkmann-Fowler vertex insertions. The program is written in standard Fortran and C++, and can easily be installed on a Linux or UNIX environment....
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.)
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.
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.
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)
Computer program for calculation of ideal gas thermodynamic data
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.
A browser-based tool for conversion between Fortran NAMELIST and XML/HTML
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.
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
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.
The inverse of winnowing: a FORTRAN subroutine and discussion of unwinnowing discrete data
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.
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
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....
Introduction to parallel programming
Brawer, Steven
1989-01-01
Introduction to Parallel Programming focuses on the techniques, processes, methodologies, and approaches involved in parallel programming. The book first offers information on Fortran, hardware and operating system models, and processes, shared memory, and simple parallel programs. Discussions focus on processes and processors, joining processes, shared memory, time-sharing with multiple processors, hardware, loops, passing arguments in function/subroutine calls, program structure, and arithmetic expressions. The text then elaborates on basic parallel programming techniques, barriers and race
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.
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
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.
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
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)
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.
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.
OpenMP-accelerated SWAT simulation using Intel C and FORTRAN compilers: Development and benchmark
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.
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.
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.
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.
Computer program for afterheat temperature distribution for mobile nuclear power plant
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.
TableSim--A program for analysis of small-sample categorical data.
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.
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
Banta, Edward R.; Poeter, Eileen P.; Doherty, John E.; Hill, Mary C.
2006-01-01
he Joint Universal Parameter IdenTification and Evaluation of Reliability Application Programming Interface (JUPITER API) improves the computer programming resources available to those developing applications (computer programs) for model analysis.The JUPITER API consists of eleven Fortran-90 modules that provide for encapsulation of data and operations on that data. Each module contains one or more entities: data, data types, subroutines, functions, and generic interfaces. The modules do not constitute computer programs themselves; instead, they are used to construct computer programs. Such computer programs are called applications of the API. The API provides common modeling operations for use by a variety of computer applications.The models being analyzed are referred to here as process models, and may, for example, represent the physics, chemistry, and(or) biology of a field or laboratory system. Process models commonly are constructed using published models such as MODFLOW (Harbaugh et al., 2000; Harbaugh, 2005), MT3DMS (Zheng and Wang, 1996), HSPF (Bicknell et al., 1997), PRMS (Leavesley and Stannard, 1995), and many others. The process model may be accessed by a JUPITER API application as an external program, or it may be implemented as a subroutine within a JUPITER API application . In either case, execution of the model takes place in a framework designed by the application programmer. This framework can be designed to take advantage of any parallel processing capabilities possessed by the process model, as well as the parallel-processing capabilities of the JUPITER API.Model analyses for which the JUPITER API could be useful include, for example: Compare model results to observed values to determine how well the model reproduces system processes and characteristics.Use sensitivity analysis to determine the information provided by observations to parameters and predictions of interest.Determine the additional data needed to improve selected model
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.)
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
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
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.
"SMART": A Compact and Handy FORTRAN Code for the Physics of Stellar Atmospheres
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
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
MATH77 - A LIBRARY OF MATHEMATICAL SUBPROGRAMS FOR FORTRAN 77, RELEASE 4.0
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
Programming the finite element method
Smith, I M; Margetts, L
2013-01-01
Many students, engineers, scientists and researchers have benefited from the practical, programming-oriented style of the previous editions of Programming the Finite Element Method, learning how to develop computer programs to solve specific engineering problems using the finite element method. This new fifth edition offers timely revisions that include programs and subroutine libraries fully updated to Fortran 2003, which are freely available online, and provides updated material on advances in parallel computing, thermal stress analysis, plasticity return algorithms, convection boundary c
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.)
The RANDOM computer program: A linear congruential random number generator
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.
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.
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.
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..
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
Introductory Linear Regression Programs in Undergraduate Chemistry.
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)
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
International Nuclear Information System (INIS)
Burow, Burkhard D.
1996-01-01
Computing in the next millennium will be using software from this millennium. Programming languages evolve and new ones continue to be created. The use of legacy code demonstrates why some present and future applications may span programming languages. Even a completely new application may mix programming languages, if it allows its components to be more conveniently expressed. Given the need, mixed language programming should be easy and robust. By resolving a variety of difficulties, the well established cfortran.h package provides, the desired convenient interface across the C and Fortran programming languages, as demonstrated using CERN's Book. (author)
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.
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.
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)
Computerised programming of the Dragon reactor fuel handling operations
International Nuclear Information System (INIS)
Butcher, P.
1976-11-01
Two suites of FORTRAN IV computer programs have been written to produce check lists for the operation of the two remote control fuel handling machines of the Dragon Reactor. This document describes the advantages of these programs over the previous manual system of writing check lists, and provides a detailed guide to the programs themselves. (author)
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.
Programming language structures
Organick, Elliott Irving; Plummer, Robert P
1978-01-01
Programming Language Structures deals with the structures of programming languages and introduces the reader to five important programming languages: Algol, Fortran, Lisp, Snobol, and Pascal. The fundamental similarities and differences among these languages are discussed. A unifying framework is constructed that can be used to study the structure of other languages, such as Cobol, PL/I, and APL. Several of the tools and methodologies needed to construct large programs are also considered.Comprised of 10 chapters, this book begins with a summary of the relevant concepts and principles about al
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
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
Analysis of computer programming languages
International Nuclear Information System (INIS)
Risset, Claude Alain
1967-01-01
This research thesis aims at trying to identify some methods of syntax analysis which can be used for computer programming languages while putting aside computer devices which influence the choice of the programming language and methods of analysis and compilation. In a first part, the author proposes attempts of formalization of Chomsky grammar languages. In a second part, he studies analytical grammars, and then studies a compiler or analytic grammar for the Fortran language
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...
Buckling determination in reflected systems, program FLUXFIT
Energy Technology Data Exchange (ETDEWEB)
Sotic, O [Boris Kidric Institute of Nuclear Sciences Vinca, Beograd (Yugoslavia)
1971-07-01
An improvement in accuracy of determining radial and axial buckling from foil activation distributions measured in reflected cylindrical systems is given. resultant activities are fitted to radial and axial spatial functions derived from homogeneous diffusion theory. A Fortran program FLUXFIT based on the derived method is included. (author)
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)
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...
Slide layout and integrated design (SLIDE) program
International Nuclear Information System (INIS)
Roberts, S.G.
1975-01-01
SLIDE is a FORTRAN IV program for producing 35 mm color slides on the Control Data CYBER-74. SLIDE interfaces with the graphics package, DISSPLA, on the CYBER-74. It was designed so that persons with no previous computer experience can easily and quickly generate their own textual 35 mm color slides for verbal presentations. SLIDE's features include seven different colors, five text sizes, ten tab positions, and two page sizes. As many slides as desired may be produced during any one run of the program. Each slide is designed to represent an 8 1 / 2 in. x 11 in. or an 11 in. x 8 1 / 2 in. page. The input data cards required to run the SLIDE program and the program output are described. Appendixes contain a sample program run showing input, output, and the resulting slides produced and a FORTRAN listing of the SLIDE program. (U.S.)
The KEDAK program compendium. Pt. 2
International Nuclear Information System (INIS)
Krieg, B.
1977-01-01
The structure of the neutron nuclear data library KEDAK and the computer program system KEMA for updating the KEDAK library e.g. for deletion, insertion and change of data records is presented. Besides this the program REFORM for preparation of an input for KEMA is described here. Both programs are written in Fortran IV and are presupposing the direct access form of the KEDAK library as used in Karlsruhe. (orig.) [de
Simulating the effects of ground-water withdrawals on streamflow in a precipitation-runoff model
Zarriello, Philip J.; Barlow, P.M.; Duda, P.B.
2004-01-01
Precipitation-runoff models are used to assess the effects of water use and management alternatives on streamflow. Often, ground-water withdrawals are a major water-use component that affect streamflow, but the ability of surface-water models to simulate ground-water withdrawals is limited. As part of a Hydrologic Simulation Program-FORTRAN (HSPF) precipitation-runoff model developed to analyze the effect of ground-water and surface-water withdrawals on streamflow in the Ipswich River in northeastern Massachusetts, an analytical technique (STRMDEPL) was developed for calculating the effects of pumped wells on streamflow. STRMDEPL is a FORTRAN program based on two analytical solutions that solve equations for ground-water flow to a well completed in a semi-infinite, homogeneous, and isotropic aquifer in direct hydraulic connection to a fully penetrating stream. One analytical method calculates unimpeded flow at the stream-aquifer boundary and the other method calculates the resistance to flow caused by semipervious streambed and streambank material. The principle of superposition is used with these analytical equations to calculate time-varying streamflow depletions due to daily pumping. The HSPF model can readily incorporate streamflow depletions caused by a well or surface-water withdrawal, or by multiple wells or surface-water withdrawals, or both, as a combined time-varying outflow demand from affected channel reaches. These demands are stored as a time series in the Watershed Data Management (WDM) file. This time-series data is read into the model as an external source used to specify flow from the first outflow gate in the reach where these withdrawals are located. Although the STRMDEPL program can be run independently of the HSPF model, an extension was developed to run this program within GenScn, a scenario generator and graphical user interface developed for use with the HSPF model. This extension requires that actual pumping rates for each well be stored
FLOWNET: A Computer Program for Calculating Secondary Flow Conditions in a Network of Turbomachinery
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.
Kim, Sang M; Brannan, Kevin M; Zeckoski, Rebecca W; Benham, Brian L
2014-01-01
The objective of this study was to develop bacteria total maximum daily loads (TMDLs) for the Hardware River watershed in the Commonwealth of Virginia, USA. The TMDL program is an integrated watershed management approach required by the Clean Water Act. The TMDLs were developed to meet Virginia's water quality standard for bacteria at the time, which stated that the calendar-month geometric mean concentration of Escherichia coli should not exceed 126 cfu/100 mL, and that no single sample should exceed a concentration of 235 cfu/100 mL. The bacteria impairment TMDLs were developed using the Hydrological Simulation Program-FORTRAN (HSPF). The hydrology and water quality components of HSPF were calibrated and validated using data from the Hardware River watershed to ensure that the model adequately simulated runoff and bacteria concentrations. The calibrated and validated HSPF model was used to estimate the contributions from the various bacteria sources in the Hardware River watershed to the in-stream concentration. Bacteria loads were estimated through an extensive source characterization process. Simulation results for existing conditions indicated that the majority of the bacteria came from livestock and wildlife direct deposits and pervious lands. Different source reduction scenarios were evaluated to identify scenarios that meet both the geometric mean and single sample maximum E. coli criteria with zero violations. The resulting scenarios required extreme and impractical reductions from livestock and wildlife sources. Results from studies similar to this across Virginia partially contributed to a reconsideration of the standard's applicability to TMDL development.
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)
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)
Secretan, Y.
A discussion of the modular program Mikado is presented. Mikado was developed with the goal of creating a flexible graphic tool to display and help analyze the results of finite element fluid flow computations. Mikado works on unstructured meshes, with elements of mixed geometric type, but also offers the possibility of using structured meshes. The program can be operated by both menu and mouse (interactive), or by command file (batch). Mikado is written in FORTRAN, except for a few system dependent subroutines which are in C. It runs presently on Silicon Graphics' workstations and could be easily ported to the IBM-RISC System/6000 family of workstations.
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)
PAVLOV: An Information Retrieval Program for the Analysis of Learning Data.
Kjeldergaard, Paul M.
1967-01-01
PAVLOV (Paired Associate Verbal Learning Organizational Vehicle) is a Fortran coded program designed to facilitate the analysis of learning data. The program analyzes four classes of information parameters, list order, data format, and data. Utilizing this input, the program performs an in-depth measurement of several dependent variables for each…
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
Nigro, Joseph; Toll, David; Partington, Ed; Ni-Meister, Wenge; Lee, Shihyan; Gutierrez-Magness, Angelica; Engman, Ted; Arsenault, Kristi
2010-01-01
The USEPA has estimated that over 20,000 water bodies within the United States do not meet water quality standards. One of the regulations in the Clean Water Act of 1972 requires states to monitor the total maximum daily load, or the amount of pollution that can be carried by a water body before it is determined to be "polluted," for any watershed in the United States (Copeland, 2005). In response to this mandate, the USEPA developed Better Assessment Science Integrating Nonpoint Sources (BASINS) as a decision support tool for assessing pollution and to guide the decision-making process for improving water quality. One of the models in BASINS, the Hydrological Simulation Program-Fortran (HSPF), computes continuous streamflow rates and pollutant concentration at each basin outlet. By design, precipitation and other meteorological data from weather stations serve as standard model input. In practice, these stations may be unable to capture the spatial heterogeneity of precipitation events, especially if they are few and far between. An attempt was made to resolve this issue by substituting station data with NASA-modified/NOAA precipitation data. Using these data within HSPF, streamflow was calculated for seven watersheds in the Chesapeake Bay Basin during low flow periods, convective storm periods, and annual flows. In almost every case, the modeling performance of HSPF increased when using the NASA-modified precipitation data, resulting in better streamflow statistics and, potentially, in improved water quality assessment.
Ordinary and partial differential equation routines in C, C++, Fortran, Java, Maple, and Matlab
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
Program package for data preparation of RISK events
International Nuclear Information System (INIS)
Denes, E.; Wagner, I.; Nagy, J.
1980-01-01
A FORTRAN program package written for the CDC-6500 computer is presented. The SMHV program is designed to transform data obtained from events of RISK streamer chamber by means of measuring SAMET or PUOS devices to the HEVAS data tormat format needed by the geometrical reconstruction program. Such a transformation provides the standartization of measurement data procession inside the RISK collaboration and capability of the direct input into program of event geometrical reconstruction registered on a film of RISK streamer chamber
Programming for a nuclear reactor instrument simulation
International Nuclear Information System (INIS)
Cohn, C.
1988-01-01
This note discusses 8086/8087 machine-language programming for simulation of nuclear reactor instrument current inputs by means of a digital-analog converter (DAC) feeding a bank of series input resistors. It also shows FORTRAN programming for generating the parameter tales used in the simulation. These techniques would be generally useful for high-speed simulation of quantities varying over many orders of magnitude
Programming Language Software For Graphics Applications
Beckman, Brian C.
1993-01-01
New approach reduces repetitive development of features common to different applications. High-level programming language and interactive environment with access to graphical hardware and software created by adding graphical commands and other constructs to standardized, general-purpose programming language, "Scheme". Designed for use in developing other software incorporating interactive computer-graphics capabilities into application programs. Provides alternative to programming entire applications in C or FORTRAN, specifically ameliorating design and implementation of complex control and data structures typifying applications with interactive graphics. Enables experimental programming and rapid development of prototype software, and yields high-level programs serving as executable versions of software-design documentation.
Program Package for 3d PIC Model of Plasma Fiber
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.
Computer programming and computer systems
Hassitt, Anthony
1966-01-01
Computer Programming and Computer Systems imparts a "reading knowledge? of computer systems.This book describes the aspects of machine-language programming, monitor systems, computer hardware, and advanced programming that every thorough programmer should be acquainted with. This text discusses the automatic electronic digital computers, symbolic language, Reverse Polish Notation, and Fortran into assembly language. The routine for reading blocked tapes, dimension statements in subroutines, general-purpose input routine, and efficient use of memory are also elaborated.This publication is inten
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
A Computer Program to Evaluate Timber Production Investments Under Uncertainty
Dennis L. Schweitzer
1968-01-01
A computer program has been written in Fortran IV to calculate probability distributions of present worths of investments in timber production. Inputs can include both point and probabilistic estimates of future costs, prices, and yields. Distributions of rates of return can also be constructed.
Computer program determines chemical composition of physical system at equilibrium
Kwong, S. S.
1966-01-01
FORTRAN 4 digital computer program calculates equilibrium composition of complex, multiphase chemical systems. This is a free energy minimization method with solution of the problem reduced to mathematical operations, without concern for the chemistry involved. Also certain thermodynamic properties are determined as byproducts of the main calculations.
Computer System Resource Requirements of Novice Programming Students.
Nutt, Gary J.
The characteristics of jobs that constitute the mix for lower division FORTRAN classes in a university were investigated. Samples of these programs were also benchmarked on a larger central site computer and two minicomputer systems. It was concluded that a carefully chosen minicomputer system could offer service at least the equivalent of the…
International Nuclear Information System (INIS)
Herrmannsfeldt, W.B.
1979-11-01
The SLAC Electron Trajectory Program is described and instructions and examples for users are given. The program is specifically written to compute trajectories of charged particles in electrostatic and magnetostatic focusing systems including the effects of space charge and self-magnetic fields. Starting options include Child's Law conditions on cathodes of various shapes. Either rectangular or cylindrically symmetric geometry may be used. Magntic fields may be specified using arbitrary configurations of coils, or the output of a magnet program such as Poisson or by an externally calculated array of the axial fields. The program is available in IBM FORTRAN but can be easily converted for use on other brands of hardware. The program is intended to be used with a plotter whose interface the user must provide
Energy Technology Data Exchange (ETDEWEB)
Herrmannsfeldt, W.B.
1979-11-01
The SLAC Electron Trajectory Program is described and instructions and examples for users are given. The program is specifically written to compute trajectories of charged particles in electrostatic and magnetostatic focusing systems including the effects of space charge and self-magnetic fields. Starting options include Child's Law conditions on cathodes of various shapes. Either rectangular or cylindrically symmetric geometry may be used. Magntic fields may be specified using arbitrary configurations of coils, or the output of a magnet program such as Poisson or by an externally calculated array of the axial fields. The program is available in IBM FORTRAN but can be easily converted for use on other brands of hardware. The program is intended to be used with a plotter whose interface the user must provide.
Energy Technology Data Exchange (ETDEWEB)
Stehfest, E; De Waal, L.
2010-09-15
This document describes the requirements and guidelines for the software of the IMAGE system. The motivation for this report was a substantial restructuring of the source code for IMAGE version 2.5. The requirements and guidelines relate to design considerations as well as to aspects of maintainability and portability. The design considerations determine guidelines about subjects, such as program structure, model hierarchy, the use of data modules, and the error message system. Maintainability and portability aspects determine the guidelines on, for example, the Fortran 90 standard, naming conventions, code lay-out, and internal documentation.
International Nuclear Information System (INIS)
Matyushenko, N.N.; Titov, Yu.G.
1982-01-01
Programs of atom coordinate generation and space symmetry groups in a form of equivalent point systems are presented. Programs of generation and coordinate output from an on-line storage are written in the FORTRAN language for the ES computer. They may be used in laboratories specialized in studying atomic structure and material properties, in colleges and by specialists in other fields of physics and chemistry
Log-normal spray drop distribution...analyzed by two new computer programs
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...
EVALUE : a computer program for evaluating investments in forest products industries
Peter J. Ince; Philip H. Steele
1980-01-01
EVALUE, a FORTRAN program, was developed to provide a framework for cash flow analysis of investment opportunities. EVALUE was designed to assist researchers in evaluating investment feasibility of new technology or new manufacturing processes. This report serves as user documentation for the EVALUE program. EVALUE is briefly described and notes on preparation of a...
International Nuclear Information System (INIS)
Leach, S.J.; Pryke, D.C.
1986-05-01
A simple program, NearSol, has been written in Fortran 77 on the Harwell Central Computer to model the aqueous speciation and solubility of actinides under near-field conditions for disposal using a simple thermodynamic approach. The methodology and running of the program are described together with a worked example. (author)
A manual to the MAXRAY program library for reflective and dispersive ray tracing
International Nuclear Information System (INIS)
Svensson, S.; Nyholm, R.
1985-07-01
A general ray tracing program package for reflective and dispersive X-ray optics is described. The package consists of a number of subroutines written in FORTRAN 77 code giving the necessary tools for ray tracing. The program package is available on request from the authors. (authors)
WAD, a program to calculate the heat produced by alpha decay
International Nuclear Information System (INIS)
Jarvis, R.G.; Bretzlaff, C.I.
1982-09-01
The FORTRAN program WAD (Watts from Alpha Decay) deals with the alpha and beta decay chains to be encountered in advanced fuel cycles for CANDU reactors. The data library covers all necessary alpha-emitting and beta-emitting nuclides and the program calculates the heat produced by alpha decay. Any permissible chain can be constructed very simply
Language constructs for modular parallel programs
Energy Technology Data Exchange (ETDEWEB)
Foster, I.
1996-03-01
We describe programming language constructs that facilitate the application of modular design techniques in parallel programming. These constructs allow us to isolate resource management and processor scheduling decisions from the specification of individual modules, which can themselves encapsulate design decisions concerned with concurrence, communication, process mapping, and data distribution. This approach permits development of libraries of reusable parallel program components and the reuse of these components in different contexts. In particular, alternative mapping strategies can be explored without modifying other aspects of program logic. We describe how these constructs are incorporated in two practical parallel programming languages, PCN and Fortran M. Compilers have been developed for both languages, allowing experimentation in substantial applications.
Geal: A general program for the analysis of alpha spectra
International Nuclear Information System (INIS)
Garcia-Torano, E.; Acena Barrenechea, M.L.
1978-01-01
A computing program for analysis and representation of alpha spectra obtained with surface barrier detectors is described. Several methods for fitting spectra are studied. A monoenergetic line or a doublet previously fitted has been used as a standard for the analyses of all kind of spectra. Some examples of application as well as a list of the program are shown. The program has been written in Fortran V language. (author)
Assembler absolute forward thick-target bremsstrahlung spectra program
International Nuclear Information System (INIS)
Niculescu, V.I.R.; Baciu, G.; Ionescu-Bujor, M.
1981-12-01
The program is intended to compute the absolute forward thick-target bremsstrahlung spectrum for electrons in the energy range 1-24 MeV. The program takes into account the following phenomena: multiple scattering, energy loss and the attenuation of the emitted gamma rays. The computer program is written in Assembler having a higher degree of generality and is more performant than the FORTRAN version. (authors)
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
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
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.)
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)
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
Modular programming method at JAERI
International Nuclear Information System (INIS)
Asai, Kiyoshi; Katsuragi, Satoru
1982-02-01
In this report the histories, concepts and a method for the construction and maintenance of nuclear code systems of Japan Atomic Energy Research Institute (JAERI) are presented. The method is mainly consisted of novel computer features. The development process of the features and experiences with them which required many man-months and efforts of scientists and engineers of JAERI and a computer manufacturer are also described. One of the features is a file handling program named datapool. The program is being used in code systems which are under development at JAERI. The others are computer features such as dynamic linking, reentrant coding of Fortran programs, interactive programming facility, document editor, quick system output viewer and editor, flexible man-machine interactive Fortran executor, and selective use of time-sharing or batch oriented computer in an interactive porgramming environment. In 1980 JAERI has replaced its two old computer systems by three FACOM M-200 computer systems and they have such features as mentioned above. Since 1981 most code systems, or even big single codes can be changed to modular code systems even if the developers or users of the systems will not recognize the fact that they are using modular code systems. The purpose of this report is to describe our methodology of modular programming from aspects of computer features and some of their applications to nuclear codes to get sympathetic understanding of it from persons of organizations who are concerned with the effective use of computers, especially, in nuclear research fields. (author)
A fast circuit analysis program based on microcomputer
International Nuclear Information System (INIS)
Hu Guoji
1988-01-01
A fast circuit analysis program (FCAP) is introduced. The program may be used to analyse DC operating point, frequency and transient response of fast circuit. The feature is that the model of active element is not specified. Users may choose one of many equivalent circuits. Written in FORTRAN 77, FCAP can be run on IBM PC and its compatible computers. It can be used as an assistant tool of analysis and design for fast circuits
Computer Program for Inelastic Neutron Scattering by an Anharmonic Crystal
International Nuclear Information System (INIS)
Bohlin, L.; Ebbsjoe, I.; Hoegberg, T.
1969-02-01
A description is given of the program SAW (Shift and Width), which calculates the energy-dependent shift and width of the intensity peaks obtained for thermal neutrons scattered inelastically by an anharmonic crystal. The program has been coded in FORTRAN IV and may be applied to every solid with a monatomic face-centered cubic lattice where the intermolecular interactions can be described by a centro-symmetrical potential. Interactions beyond third neighbours are neglected
Computer Program for Inelastic Neutron Scattering by an Anharmonic Crystal
Energy Technology Data Exchange (ETDEWEB)
Bohlin, L; Ebbsjoe, I; Hoegberg, T
1969-02-15
A description is given of the program SAW (Shift and Width), which calculates the energy-dependent shift and width of the intensity peaks obtained for thermal neutrons scattered inelastically by an anharmonic crystal. The program has been coded in FORTRAN IV and may be applied to every solid with a monatomic face-centered cubic lattice where the intermolecular interactions can be described by a centro-symmetrical potential. Interactions beyond third neighbours are neglected.
Program for analyzing power boost tests
International Nuclear Information System (INIS)
Wills, C.A.
1982-03-01
A rapid increase of power in a reactor produces a failure in the fuel. Experiments to study the conditions in the NRU reactor after such failures have been planned and carried out. Given the concentrations of specified isotopes at a number of times over the length of an experiment as produced for example, from the program SARGS and the power history of the reactor, this program calculates the release rates, escape rate coefficients, and fractional releases for the isotopes. These values may be optionally printed and plotted. Decay schemes for a limited number of mass numbers are implemented. The program is written in FORTRAN and runs on the CDC 6600 - CYBER 170 system
Utilities programs for the WIMSD4 code
International Nuclear Information System (INIS)
Leszczynski, F.
1990-01-01
The WIMSD4 code is widely known around the world. For its better use, it is convenient to count with auxiliary programs. Two of these programs, developed in FORTRAN 77, in the VAX computer of the Bariloche Atomic Center, are herein presented. WINTER (Wims INTERactive) to generate input data of WIMSD4 in an interactive way, and AMICO (Anisn MIx and COndense) to deal with cross sections data of a multigroup data library and of WIMS output to be used in other programs, such as: ANISN, DOT, CITATION, DIPOBAR, etc. (Author) [es
Introduction to programming multiple-processor computers
International Nuclear Information System (INIS)
Hicks, H.R.; Lynch, V.E.
1985-04-01
FORTRAN applications programs can be executed on multiprocessor computers in either a unitasking (traditional) or multitasking form. The latter allows a single job to use more than one processor simultaneously, with a consequent reduction in wall-clock time and, perhaps, the cost of the calculation. An introduction to programming in this environment is presented. The concepts of synchronization and data sharing using EVENTS and LOCKS are illustrated with examples. The strategy of strong synchronization and the use of synchronization templates are proposed. We emphasize that incorrect multitasking programs can produce irreproducible results, which makes debugging more difficult
Program package for multicanonical simulations of U(1) lattice gauge theory-Second version
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
A rigid-body least-squares program with angular and translation scan facilities
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).
Universal algorithms and programs for calculating the motion parameters in the two-body problem
Bakhshiyan, B. T.; Sukhanov, A. A.
1979-01-01
The algorithms and FORTRAN programs for computing positions and velocities, orbital elements and first and second partial derivatives in the two-body problem are presented. The algorithms are applicable for any value of eccentricity and are convenient for computing various navigation parameters.
TREND: a program using cumulative sum methods to detect long-term trends in data
International Nuclear Information System (INIS)
Cranston, R.J.; Dunbar, R.M.; Jarvis, R.G.
1976-01-01
TREND is a computer program, in FORTRAN, to investigate data for long-term trends that are masked by short-term statistical fluctuations. To do this, it calculates and plots the cumulative sum of deviations from a chosen mean. As a further aid to diagnosis, the procedure can be repeated with a summation of the cumulative sum itself. (author)
Interactive differential equations modeling program
International Nuclear Information System (INIS)
Rust, B.W.; Mankin, J.B.
1976-01-01
Due to the recent emphasis on mathematical modeling, many ecologists are using mathematics and computers more than ever, and engineers, mathematicians and physical scientists are now included in ecological projects. However, the individual ecologist, with intuitive knowledge of the system, still requires the means to critically examine and adjust system models. An interactive program was developed with the primary goal of allowing an ecologist with minimal experience in either mathematics or computers to develop a system model. It has also been used successfully by systems ecologists, engineers, and mathematicians. This program was written in FORTRAN for the DEC PDP-10, a remote terminal system at Oak Ridge National Laboratory. However, with relatively minor modifications, it can be implemented on any remote terminal system with a FORTRAN IV compiler, or equivalent. This program may be used to simulate any phenomenon which can be described as a system of ordinary differential equations. The program allows the user to interactively change system parameters and/or initial conditions, to interactively select a set of variables to be plotted, and to model discontinuities in the state variables and/or their derivatives. One of the most useful features to the non-computer specialist is the ability to interactively address the system parameters by name and to interactively adjust their values between simulations. These and other features are described in greater detail
The Julia programming language: the future of scientific computing
Gibson, John
2017-11-01
Julia is an innovative new open-source programming language for high-level, high-performance numerical computing. Julia combines the general-purpose breadth and extensibility of Python, the ease-of-use and numeric focus of Matlab, the speed of C and Fortran, and the metaprogramming power of Lisp. Julia uses type inference and just-in-time compilation to compile high-level user code to machine code on the fly. A rich set of numeric types and extensive numerical libraries are built-in. As a result, Julia is competitive with Matlab for interactive graphical exploration and with C and Fortran for high-performance computing. This talk interactively demonstrates Julia's numerical features and benchmarks Julia against C, C++, Fortran, Matlab, and Python on a spectral time-stepping algorithm for a 1d nonlinear partial differential equation. The Julia code is nearly as compact as Matlab and nearly as fast as Fortran. This material is based upon work supported by the National Science Foundation under Grant No. 1554149.
Crystallographic and general use programs for the XDS Sigma 5 computer
Snyder, R. L.
1973-01-01
Programs in basic FORTRAN 4 are described, which fall into three catagories: (1) interactive programs to be executed under time sharing (BTM); (2) non interactive programs which are executed in batch processing mode (BPM); and (3) large non interactive programs which require more memory than is available in the normal BPM/BTM operating system and must be run overnight on a special system called XRAY which releases about 45,000 words of memory to the user. Programs in catagories (1) and (2) are stored as FORTRAN source files in the account FSNYDER. Programs in catagory (3) are stored in the XRAY system as load modules. The type of file in account FSNYDER is identified by the first two letters in the name.
International Nuclear Information System (INIS)
Lappa, A.V.; Khadyeva, Z.M.; Burmistrov, D.S.; Vasil'ev, O.N.
1990-01-01
The package of applied XRAY programs is intended for calculating the linear and fluctuation characteristics of photon and electron radiation fields in heterogeneous medium within 1-1000 keV energy range. The XRAY program package consists of moduli written in FORTRAN-IV and data files. 9 refs
Neutron cross-section library for SAND-2 and its service program
International Nuclear Information System (INIS)
Berzonis, M.A.; Bondars, Kh.Ya.; Lapenas, A.A.
1978-01-01
The logical structure of the neutron cross-section library used in the SAND-2 program complex is considered. The organization of the DSIG01 program creating and servicing the neutron cross section library is described. The DSIG 01 program is written on FORTRAN and permits to create the neutron cross section library on the ES computer magnetic discs operating under the control of the ES operating system and to perform certain manipulations therewith
International Nuclear Information System (INIS)
Grudzevich, O.D.; Zelenetskij, A.V.; Pashchenko, A.B.
1986-01-01
The last version of the KOP program for calculating cross sections of neutron and charged particle interaction with atomic nuclei within the scope of the optical model is described. The structure and program organization, library of total parameters of the optical potential, program identificators and peculiarities of its operation, input of source data and output of calculational results for printing are described in detail. The KOP program is described in Fortran- and adapted for EC-1033 computer
VACTIV-DELPHI graphical dialog based program for the analysis of gamma-ray spectra
International Nuclear Information System (INIS)
Zlokazov, V.B.
2002-01-01
The program VACTIV - Visual ACTIV - has been developed for the analysis of gamma-ray spectra and is a standard graphical dialog based Windows XX application, driven by a menu, mouse and keyboard. On the one hand, it is a conversion of an existing Fortran program ACTIV to the DELPHI-5 language; on the other hand, it is a transformation of the sequential syntax of Fortran programming to a new object-oriented style, based on the organization of event interaction. Since VACTIV is seemingly the first attempt of applying the newest programming languages and styles to systems of spectrum analysis, the goal of its creation was both getting a convenient and efficient technique for data processing, their methods and events. Now the program is widely used for the processing of gamma-ray spectra in experiments on activation analysis
Programming a real code in a functional language (part 1)
Energy Technology Data Exchange (ETDEWEB)
Hendrickson, C.P.
1991-09-10
For some, functional languages hold the promise of allowing ease of programming massively parallel computers that imperative languages such as Fortran and C do not offer. At LLNL, we have initiated a project to write the physics of a major production code in Sisal, a functional language developed at LLNL in collaboration with researchers throughout the world. We are investigating the expressibility of Sisal, as well as its performance on a shared-memory multiprocessor, the Y-MP. An interesting aspect of the project is that Sisal modules can call Fortran modules, and are callable by them. This eliminates the rewriting of 80% of the production code that would not benefit from parallel execution. Preliminary results indicate that the restrictive nature of the language does not cause problems in expressing the algorithms we have chosen. Some interesting aspects of programming in a mixed functional-imperative environment have surfaced, but can be managed. 8 refs.
Productive Parallel Programming: The PCN Approach
Directory of Open Access Journals (Sweden)
Ian Foster
1992-01-01
Full Text Available We describe the PCN programming system, focusing on those features designed to improve the productivity of scientists and engineers using parallel supercomputers. These features include a simple notation for the concise specification of concurrent algorithms, the ability to incorporate existing Fortran and C code into parallel applications, facilities for reusing parallel program components, a portable toolkit that allows applications to be developed on a workstation or small parallel computer and run unchanged on supercomputers, and integrated debugging and performance analysis tools. We survey representative scientific applications and identify problem classes for which PCN has proved particularly useful.
The kpx, a program analyzer for parallelization
International Nuclear Information System (INIS)
Matsuyama, Yuji; Orii, Shigeo; Ota, Toshiro; Kume, Etsuo; Aikawa, Hiroshi.
1997-03-01
The kpx is a program analyzer, developed as a common technological basis for promoting parallel processing. The kpx consists of three tools. The first is ktool, that shows how much execution time is spent in program segments. The second is ptool, that shows parallelization overhead on the Paragon system. The last is xtool, that shows parallelization overhead on the VPP system. The kpx, designed to work for any FORTRAN cord on any UNIX computer, is confirmed to work well after testing on Paragon, SP2, SR2201, VPP500, VPP300, Monte-4, SX-4 and T90. (author)
Description of the RZV and RZF programs
International Nuclear Information System (INIS)
Raevskaya, V.E.; Torlin, B.Z.
1980-01-01
An instruction for running the P3B and P3F programs intended for an implementation of a one-group calculation of the neutron field in a polycell with multizone ring blocks in the P 3 approximation. The program is written in the FORTRAN language for the BESM-6 computer. Time for the calculation of one variant constitutes about 20 s for a simple cell and for double lattices for uniform blocks and 40 s - for double lattices from 30-zone blocks. 4 minutes is the maximum time required for the calculation of the 8x8 polycell consisting from 20 nonequivalent 30-zone blocks of 20 kinds
Universal geometrical module for MARS program
International Nuclear Information System (INIS)
Talanov, V.V.
1992-01-01
Geometrical program module for modeling hadron and electromagnetic cascades, which accomplishes comparison of physical coordinates with the particle current state of one of the auxilliary cells, is described. The whole medium wherein the particles are tracked, is divided into a certain number of auxilliary cells. The identification algorithm of the cell, through which the particle trajectory passes, is considered in detail. The described algorithm for cell identification was developed for the MARS program and realized in form of a set of subprograms written in the FORTRAN language. 4 refs., 1 tab
Programming effort analysis of the ELLPACK language
Rice, J. R.
1978-01-01
ELLPACK is a problem statement language and system for elliptic partial differential equations which is implemented by a FORTRAN preprocessor. ELLPACK's principal purpose is as a tool for the performance evaluation of software. However, it is used here as an example with which to study the programming effort required for problem solving. It is obvious that problem statement languages can reduce programming effort tremendously; the goal is to quantify this somewhat. This is done by analyzing the lengths and effort (as measured by Halstead's software science technique) of various approaches to solving these problems.
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.
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.
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)
A links manipulator simulation program interim report
International Nuclear Information System (INIS)
Noble, R.A.
1987-04-01
A computer program to simulate the performance of the Heysham II rail-following manipulator has been developed. The program is being used to develop and test the rail-following control algorithms which will be used to control movements of the manipulator when it is operating below the gas baffle dome. The simulation includes the dynamic responses of the manipulator joint drives, excluding friction, backlash and compliance. It also includes full details of the manipulator's geometry. A method is given whereby the actual manipulator dynamics can be written into the program once these have been established by measurement. The program is written in FORTRAN and runs on a Perkin-Elmer 3220 mini-computer. The simulation program responds to velocity demands on the individual joints. These will normally come from the control program, in which they will be manually controlled by a joystick. A sigma 5664 colour graphics generator is programmed to display the current position of the manipulator. (UK)
PROGRAM HTVOL: The Determination of Tree Crown Volume by Layers
Joseph C. Mawson; Jack Ward Thomas; Richard M. DeGraaf
1976-01-01
A FORTRAN IV computer program calculates, from a few field measurements, the volume of tree crowns. This volume is in layers of a specified thickness of trees or large shrubs. Each tree is assigned one of 15 solid forms, formed by using one of five side shapes (a circle, an ellipse, a neiloid, a triangle, or a parabolalike shape), and one of three bottom shapes (a...
INSPECT: a package of computer programs for planning safeguards inspections
International Nuclear Information System (INIS)
Wincek, M.A.; Mullen, M.F.
1979-04-01
As part of the U.S. program to provide technical assistance to the International Atomic Energy Agency, a package of computer programs was developed for use in planning safeguards inspections of various types of nuclear facilities. The INSPECT software package is a set of five interactive FORTRAN programs which can be used to calculate the variance components of the MUF (Material Unaccounted For) statistic, the variance components of the D (difference) statistic, attribute and variables sampling plans, a measure of the effectiveness of the inspection, and a measurement of the cost of implementing the inspection plan. This report describes the programs and explains how to use them
AMP (Activity Manipulation Program)
International Nuclear Information System (INIS)
Engle, W.W. Jr.
1976-03-01
AMP is a FORTRAN IV program written to handle energy-group structured activity factors such as sources, conversion factors, and response functions, as used by ANISN, DOT III, and other nuclear reactor and shielding codes. Activities may be retrieved from ANISN-type cross-section and activity sets found on cards and tapes, and from tabular-type sets on cards. They may be altered by change of group structure, multiplication by a constant, or multiplication by delta E (the group-energy interval), and then output to ANISN-type cards or tape and tabular-type cards. A full edit of input and output activities is always printed by group and activity number
International Nuclear Information System (INIS)
Androsenko, A.A.; Androsenko, P.A.
1983-01-01
A description is given of the structure, input procedure and recording rules of initial data for the BRAND programme complex intended for the Monte Carlo simulation of neutron physics experiments. The BRAND complex ideology is based on non-analogous simulation of the neutron and photon transport process (statistic weights are used, absorption and escape of particles from the considered region is taken into account, shifted readouts from a coordinate part of transition nucleus density are applied, local estimations, etc. are used). The preparation of initial data for three sections is described in detail: general information for Monte Carlo calculation, source definition and data for describing the geometry of the system. The complex is to be processed with the BESM-6 computer, the basic programming lan-- guage is FORTRAN, volume - more than 8000 operators
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
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
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
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
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
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
International Nuclear Information System (INIS)
Duckworth, G.D.; Fuller, M.E.
1980-01-01
This report presents a mathematical model used to predict brine migration toward a nuclear waste canister in a bedded salt repository. The mathematical model is implemented in a computer program called BRINE. The program is written in FORTRAN and executes in the batch mode on a CDC 7600. A description of the program input requirements and output available is included. Samples of input and output are given
XTAL system of crystallographic programs: programmer's manual
International Nuclear Information System (INIS)
Hall, S.R.; Stewart, J.M.; Norden, A.P.; Munn, R.J.; Freer, S.T.
1980-02-01
This document establishes the basis for collaborative writing of transportable computer programs for x-ray crystallography. The concepts and general-purpose utility subroutines described here can be readily adapted to other scientific calculations. The complete system of crystallographic programs and subroutines is called XTAL and replaces the XRAY (6,7,8) system of programs. The coding language for the XTAL system is RATMAC (5). The XTAL system of programs contains routines for controlling execution of application programs. In this sense it forms a suboperating system that presents the same computational environment to the user and programmer irrespective of the operating system in use at a particular installation. These control routines replace all FORTRAN I/O code, supply character reading and writing, supply binary file reading and writing, serve as a support library for applications programs, and provide for interprogram communication
WIMSTAR-4: a computer program for generating WIMS library data from ENDF/B
International Nuclear Information System (INIS)
Wilkin, G.B.
1981-08-01
WIMSTAR (Version 4) is a FORTRAN-IV computer program developed to generate data files for the WIMS lattice code library from the ENDF/B data base. The program must be used in conjunction with the AMPX-II system and has been designed for implementation as a module of that system. This report describes the structure, implementation and use of the AMPX/WIMSTAR system
International Nuclear Information System (INIS)
Murarka, I.P.; Bodeau, D.J.
1977-11-01
This report contains a description of three computer programs that implement the theory of sampling designs and the methods for estimating fish-impingement at the cooling-water intakes of nuclear power plants as described in companion report ANL/ES-60. Complete FORTRAN listings of these programs, named SAMPLE, ESTIMA, and SIZECO, are given and augmented with examples of how they are used
Medan, R. T.; Ray, K. S.
1974-01-01
A description of and users manual are presented for a U.S.A. FORTRAN 4 computer program which evaluates spanwise and chordwise loading distributions, lift coefficient, pitching moment coefficient, and other stability derivatives for thin wings in linearized, steady, subsonic flow. The program is based on a kernel function method lifting surface theory and is applicable to a large class of planforms including asymmetrical ones and ones with mixed straight and curved edges.
Documentation and analysis of the Schlumberger interactive 1-D inversion program slumb
Energy Technology Data Exchange (ETDEWEB)
Sandberg, S.
1979-09-01
This computer program is designed to accept field data from a Schlumberger resistivity array and invert it in terms of a one-dimensional layered geoelectrical model. Because the inverse problem is non-linear, an initial guess model is required. This input model can be obtained by traditional curve matching, or by repeated use of a forward algorithm. This program was written in FORTRAN V and developed on a UNIVAC 1108 computer.
International Nuclear Information System (INIS)
Ropero, M.
1978-01-01
Efigie is a program written in Fortran V which can calculate the concentration of radionuclides produced by neutron irradiation of a target made of either a single isotope or several isotopes. The program includes optimization criteria that can be applied when the goal is the production of a single nuclide. The effect of a cooling time before chemical processing of the target is also accounted for.(author) [es
On program restructuring, scheduling, and communication for parallel processor systems
Energy Technology Data Exchange (ETDEWEB)
Polychronopoulos, Constantine D. [Univ. of Illinois, Urbana, IL (United States)
1986-08-01
This dissertation discusses several software and hardware aspects of program execution on large-scale, high-performance parallel processor systems. The issues covered are program restructuring, partitioning, scheduling and interprocessor communication, synchronization, and hardware design issues of specialized units. All this work was performed focusing on a single goal: to maximize program speedup, or equivalently, to minimize parallel execution time. Parafrase, a Fortran restructuring compiler was used to transform programs in a parallel form and conduct experiments. Two new program restructuring techniques are presented, loop coalescing and subscript blocking. Compile-time and run-time scheduling schemes are covered extensively. Depending on the program construct, these algorithms generate optimal or near-optimal schedules. For the case of arbitrarily nested hybrid loops, two optimal scheduling algorithms for dynamic and static scheduling are presented. Simulation results are given for a new dynamic scheduling algorithm. The performance of this algorithm is compared to that of self-scheduling. Techniques for program partitioning and minimization of interprocessor communication for idealized program models and for real Fortran programs are also discussed. The close relationship between scheduling, interprocessor communication, and synchronization becomes apparent at several points in this work. Finally, the impact of various types of overhead on program speedup and experimental results are presented.
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)
Nigro, Joseph; Toll, David; Partington, Ed; Ni-Meister, Wenge; Lee, Shihyan; Gutierrez-Magness, Angelica; Engman, Ted; Arsenault, Kristi
2010-01-01
The Environmental Protection Agency (EPA) has estimated that over 20,000 water bodies within the United States do not meet water quality standards. Ninety percent of the impairments are typically caused by nonpoint sources. One of the regulations in the Clean Water Act of 1972 requires States to monitor the Total Maximum Daily Load (TMDL), or the amount of pollution that can be carried by a water body before it is determined to be "polluted", for any watershed in the U.S.. In response to this mandate, the EPA developed Better Assessment Science Integrating Nonpoint Sources (BASINS) as a Decision Support Tool (DST) for assessing pollution and to guide the decision making process for improving water quality. One of the models in BASINS, the Hydrological Simulation Program -- Fortran (HSPF), computes daily stream flow rates and pollutant concentration at each basin outlet. By design, precipitation and other meteorological data from weather stations serve as standard model input. In practice, these stations may be unable to capture the spatial heterogeneity of precipitation events especially if they are few and far between. An attempt was made to resolve this issue by substituting station data with NASA modified/NOAA precipitation data. Using these data within HSPF, stream flow was calculated for seven watersheds in the Chesapeake Bay Basin during low flow periods, convective storm periods, and annual flows. In almost every case, the modeling performance of HSPF increased when using the NASA-modified precipitation data, resulting in better stream flow statistics and, ultimately, in improved water quality assessment.
Soong, David T.; Murphy, Elizabeth A.; Straub, Timothy D.
2009-01-01
The effects of stormwater detention basins with specified release rates are examined on the watershed scale with a Hydrological Simulation Program - FORTRAN (HSPF) continuous-simulation model. Modeling procedures for specifying release rates from detention basins with orifice and weir discharge configurations are discussed in this report. To facilitate future detention modeling as a tool for watershed management, a chart relating watershed impervious area to detention volume is presented. The report also presents a case study of the Blackberry Creek watershed in Kane County, Ill., a rapidly urbanizing area seeking to avoid future flood damages from increased urbanization, to illustrate the effects of various detention basin release rates on flood peaks and volumes and flood frequencies. The case study compares flows simulated with a 1996 land-use HSPF model to those simulated with four different 2020 projected land-use HSPF model scenarios - no detention, and detention basins with release rates of 0.08, 0.10, and 0.12 cubic feet per second per acre (ft3/s-acre), respectively. Results of the simulations for 15 locations, which included the downstream ends of all tributaries and various locations along the main stem, showed that a release rate of 0.10 ft3/s-acre, in general, can maintain postdevelopment 100-year peak-flood discharge at a similar magnitude to that of 1996 land-use conditions. Although the release rate is designed to reduce the 100-year peak flow, reduction of the 2-year peak flow is also achieved for a smaller proportion of the peak. Results also showed that the 0.10 ft3/s-acre release rate was less effective in watersheds with relatively high percentages of preexisting (1996) development than in watersheds with less preexisting development.
CYPROS - Cybernetic Program Packages
Directory of Open Access Journals (Sweden)
Arne Tyssø
1980-10-01
Full Text Available CYPROS is an interactive program system consisting of a number of special purpose packages for simulation, identification, parameter estimation and control system design. The programming language is standard FORTRAN IV and the system is implemented on a medium size computer system (Nord-10. The system is interactive and program control is obtained by the use of numeric terminals. Output is rapidly examined by extensive use of video colour graphics. The subroutines included in the packages are designed and documented according to standardization rules given by the SCL (Scandinavian Control Library organization. This simplifies the exchange of subroutines throughout the SCL system. Also, this makes the packages attractive for implementation by industrial users. In the simulation package, different integration methods are available and it can be easily used for off-line, as well as real time, simulation problems. The identification package consists of programs for single-input/single-output and multivariablc problems. Both transfer function models and state space models can be handled. Optimal test signals can be designed. The control package consists of programs based on multivariable time domain and frequency domain methods for analysis and design. In addition, there is a package for matrix and time series manipulation. CYPROS has been applied successfully to industrial problems of various kinds, and parts of the system have already been implemented on different computers in industry. This paper will, in some detail, describe the use and the contents of the packages and some examples of application will be discussed.
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.
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%
ENDFIC - A program for indexing and intercomparison of ENDFs
International Nuclear Information System (INIS)
Gopalakrishnan, V.; Devan, K.
1995-01-01
The program ENDFIC, a nuclear data utility program in FORTRAN, was written under contract on 'Indexing and Intercomparison Programme of Evaluated Nuclear Data Files' (No. 7866/RB/TC), between Indira Gandhi Centre for Atomic Research, Kalpakkam, and the International Atomic Energy Agency, Vienna. The program can be used for the following two activities: i. INFO activity: to find from a given ENDF/B formatted evaluated nuclear data library, information regarding the contents of the library; ii. COMP activity: to do comparison of cross sections from several given ENDF libraries. 1 ref
An introduction to programming multiple-processor computers
International Nuclear Information System (INIS)
Hicks, H.R.; Lynch, V.E.
1986-01-01
Fortran applications programs can be executed on multiprocessor computers in either a unitasking (traditional) or multitasking form. The later allows a single job to use more than one processor simultaneously, with a consequent reduction in elapsed time and, perhaps, the cost of the calculation. An introduction to programming in this environment is presented. The concept of synchronization and data sharing using EVENTS and LOCKS are illustrated with examples. The strategy of strong synchronization and the use of synchronization templates are proposed. We emphasize that incorrect multitasking programs can produce irreducible results, which makes debugging more difficult
Development of massively parallel quantum chemistry program SMASH
Energy Technology Data Exchange (ETDEWEB)
Ishimura, Kazuya [Department of Theoretical and Computational Molecular Science, Institute for Molecular Science 38 Nishigo-Naka, Myodaiji, Okazaki, Aichi 444-8585 (Japan)
2015-12-31
A massively parallel program for quantum chemistry calculations SMASH was released under the Apache License 2.0 in September 2014. The SMASH program is written in the Fortran90/95 language with MPI and OpenMP standards for parallelization. Frequently used routines, such as one- and two-electron integral calculations, are modularized to make program developments simple. The speed-up of the B3LYP energy calculation for (C{sub 150}H{sub 30}){sub 2} with the cc-pVDZ basis set (4500 basis functions) was 50,499 on 98,304 cores of the K computer.
NEWCAS: an interactive computer program for particle size analysis.
Energy Technology Data Exchange (ETDEWEB)
Hill, M.A.; Watson, C.R.; Moss, O.R.
1977-12-01
NEWCAS, a FORTRAN program executable on PDP 11/70, was used to calculate the respirable fraction of aerosols from cascade impactor data. This report describes how NEWCAS works and how to use it. Included is a complete program listing. A novel feature of the program is the method used to display a log-normal probability plot on an ordinary (non-graphics) computer terminal. Calculations are independent of how the stage activity is measured. NEWCAS always assumes a log-normal distribution. 8 figures. (RWR)
Development of massively parallel quantum chemistry program SMASH
International Nuclear Information System (INIS)
Ishimura, Kazuya
2015-01-01
A massively parallel program for quantum chemistry calculations SMASH was released under the Apache License 2.0 in September 2014. The SMASH program is written in the Fortran90/95 language with MPI and OpenMP standards for parallelization. Frequently used routines, such as one- and two-electron integral calculations, are modularized to make program developments simple. The speed-up of the B3LYP energy calculation for (C 150 H 30 ) 2 with the cc-pVDZ basis set (4500 basis functions) was 50,499 on 98,304 cores of the K computer
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)
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.
An overview of the SAFSIM computer program
International Nuclear Information System (INIS)
Dobranich, D.
1993-01-01
SAFSIM (System Analysis Flow SIMulator) is a FORTRAN computer program that provides engineering simulations of user-specified flow networks at the system level. It includes fluid mechanics, heat transfer, and reactor dynamics capabilities. SAFSIM provides sufficient versatility to allow the simulation of almost any flow system, from a backyard sprinkler system to a clustered nuclear reactor propulsion system. In addition to versatility, speed and robustness are primary goals of SAFSIM development. The current capabilities of SAFSIM are summarized and some sample applications are presented. It is applied here to a nuclear thermal propulsion system and nuclear rocket engine test facility
Program Computes Flows Of Fluids And Heat
Cullimore, Brent; Ring, Steven; Welch, Mark
1993-01-01
SINDA'85/FLUINT incorporates lumped-parameter-network and one-dimensional-flow mathematical models. System enables analysis of mutual influences of thermal and flow phenomena. Offers two finite-difference numerical solution techniques: forward-difference explicit approximation and Crank-Nicholson approximation. Enables simulation of nonuniform heating and facilitates mathematical modeling of thin-walled heat exchangers. Ability to model nonequilibrium behavior within two-phase volumes included. Recent changes in program improve modeling of real evaporator pumps and other capillary-assist evaporators. Written in FORTRAN 77.
Simulation of contaminated sediment transport in White Oak Creek basin
International Nuclear Information System (INIS)
Bao, Y.; Clapp, R.B.; Brenkert, A.L.; Moore, T.D.; Fontaine, T.A.
1995-01-01
This paper presents a systematic approach to management of the contaminated sediments in the White Oak Creek watershed at Oak Ridge National Laboratory near Oak Ridge, Tennessee. The primary contaminant of concern is radioactive cesium-137 ( 137 Cs), which binds to soil and sediment particles. The key components in the approach include an intensive sampling and monitoring system for flood events; modeling of hydrological processes, sediment transport, and contaminant flux movement; and a decision framework with a detailed human health risk analysis. Emphasis is placed on modeling of watershed rainfall-runoff and contaminated sediment transport during flooding periods using the Hydrologic Simulation Program- Fortran (HSPF) model. Because a large number of parameters are required in HSPF modeling, the major effort in the modeling process is the calibration of model parameters to make simulation results and measured values agree as closely as possible. An optimization model incorporating the concepts of an expert system was developed to improve calibration results and efficiency. Over a five-year simulation period, the simulated flows match the observed values well. Simulated total amount of sediment loads at various locations during storms match with the observed values within a factor of 1.5. Simulated annual releases of 137 Cs off-site locations match the data within a factor of 2 for the five-year period. The comprehensive modeling approach can provide a valuable tool for decision makers to quantitatively analyze sediment erosion, deposition, and transport; exposure risk related to radionuclides in contaminated sediment; and various management strategies
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.
International Nuclear Information System (INIS)
Chung, Bub Dong; Lee, Young Jin
2006-01-01
Engineering software for design purpose in nuclear industries have been developed since early 1970s, and well established in 1980s. The most popular and common language for the software development has been FORTRAN series, until the more sophisticated GUI and software coupling is needed. The advanced computer language, such as C++, C has been developed to help the programming for the easy GUI need and reuse of well developed routines, with adopting the objective oriented program. A recent trend of programming becomes objective-oriented since the results are often more intuitive and easier to maintain than procedure program. The main motivation of this work is to capture objective oriented concepts for conventional safety analysis programs which consist of many functions and procedure oriented structures. In this work, the new objective programming with C++ 6.0 language has been tried for the PILOT code written in FORTRAN language, and conceptual OOP design of the system safety analysis code has been done
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)
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.
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)
Development and adjustment of programs for solving systems of linear equations
International Nuclear Information System (INIS)
Fujimura, Toichiro
1978-03-01
Programs for solving the systems of linear equations have been adjusted and developed in expanding the scientific subroutine library SSL. The principal programs adjusted are based on the congruent method, method of product form of the inverse, orthogonal method, Crout's method for sparse system, and acceleration of iterative methods. The programs developed are based on the escalator method, direct parallel residue method and block tridiagonal method for band system. Described are usage of the programs developed and their future improvement. FORTRAN lists with simple examples in tests of the programs are also given. (auth.)
International Nuclear Information System (INIS)
Ezaki, Masahiro; Mitake, Susumu; Ozawa, Tamotsu
1979-06-01
The SCOTCH program solves the one-dimensional (R or Z), two-group reactor kinetics equations with multi-channel temperature transients and fluid dynamics. Sub-program SCOTCH-RX simulates the space-time neutron diffusion in radial direction, and sub-program SCOTCH-AX simulates the same in axial direction. The program has about 8,000 steps of FORTRAN statement and requires about 102 kilo-words of computer memory. (author)
International Nuclear Information System (INIS)
Santoma Juncadella, L.
1972-01-01
The VODAM program is written in FORTRAN IV language and makes a physico-chemical analysis of waters, for an element or a number of them, under investigation. A thermodynamical data files is incorporated, and is useful for a low temperature range. It is the basic nucleus for a series of programs of physico-chemical interpretation of hydrogeochemical data and automatic construction of equilibrium diagrams. (Author) 13 refs
Dunbar, D. N.; Tunnah, B. G.
1978-01-01
The FORTRAN computing program predicts flow streams and material, energy, and economic balances of a typical petroleum refinery, with particular emphasis on production of aviation turbine fuels of varying end point and hydrogen content specifications. The program has a provision for shale oil and coal oil in addition to petroleum crudes. A case study feature permits dependent cases to be run for parametric or optimization studies by input of only the variables which are changed from the base case.
International Nuclear Information System (INIS)
Carcedo, A.; Ladron de Guevara, P.
1973-01-01
Full description of the whole structure and of the operation of every routine is given for both programs, as well as the data setup in punched cards and binary tape. To help the users we present and comment several examples of data sets and the corresponding output plots. The list of instructions in FORTRAN IV language is included. The same version of both programs is operative in the series 7090-94-IBM and 1106-08-UNIVAC. (Author)
Xu, Tianfu; Sonnenthal, Eric; Spycher, Nicolas; Pruess, Karsten
2004-01-01
TOUGHREACT is a numerical simulation program for chemically reactive non-isothermal flows of multiphase fluids in porous and fractured media. The program was written in Fortran 77 and developed by introducing reactive geochemistry into the multiphase fluid and heat flow simulator TOUGH2. A variety of subsurface thermo-physical-chemical processes are considered under a wide range of conditions of pressure, temperature, water saturation, ionic strength, and pH and Eh. Interactions between ...
IMP - INTEGRATED MISSION PROGRAM
Dauro, V. A.
1994-01-01
IMP is a simulation language that is used to model missions around the Earth, Moon, Mars, or other planets. It has been used to model missions for the Saturn Program, Apollo Program, Space Transportation System, Space Exploration Initiative, and Space Station Freedom. IMP allows a user to control the mission being simulated through a large event/maneuver menu. Up to three spacecraft may be used: a main, a target and an observer. The simulation may begin at liftoff, suborbital, or orbital. IMP incorporates a Fehlberg seventh order, thirteen evaluation Runge-Kutta integrator with error and step-size control to numerically integrate the equations of motion. The user may choose oblate or spherical gravity for the central body (Earth, Mars, Moon or other) while a spherical model is used for the gravity of an additional perturbing body. Sun gravity and pressure and Moon gravity effects are user-selectable. Earth/Mars atmospheric effects can be included. The optimum thrust guidance parameters are calculated automatically. Events/maneuvers may involve many velocity changes, and these velocity changes may be impulsive or of finite duration. Aerobraking to orbit is also an option. Other simulation options include line-of-sight communication guidelines, a choice of propulsion systems, a soft landing on the Earth or Mars, and rendezvous with a target vehicle. The input/output is in metric units, with the exception of thrust and weight which are in English units. Input is read from the user's input file to minimize real-time keyboard input. Output includes vehicle state, orbital and guide parameters, event and total velocity changes, and propellant usage. The main output is to the user defined print file, but during execution, part of the input/output is also displayed on the screen. An included FORTRAN program, TEKPLOT, will display plots on the VDT as well as generating a graphic file suitable for output on most laser printers. The code is double precision. IMP is written in
International Nuclear Information System (INIS)
Chung, Bub Dong; Jeong, Jae Jun; Hwang, Moon Kyu
2008-01-01
The system safety analysis code, such as RELAP5, TRAC, CATHARE etc. have been developed based on Fortran language during the past few decades. Refactoring of conventional codes has been also performed to improve code readability and maintenance. TRACE, RELAP5-3D and MARS codes are examples of these activities. The codes were redesigned to have modular structures utilizing Fortran 90 features. However the programming paradigm in software technology has been changed to use objects oriented programming (OOP), which is based on several techniques, including encapsulation, modularity, polymorphism, and inheritance. It was not commonly used in mainstream software application development until the early 1990s. Many modern programming languages now support OOP. Although the recent Fortran language also support the OOP, it is considered to have limited functions compared to the modern software features. In this work, objective oriented program for system safety analysis code has been tried utilizing modern C language feature. The advantage of OOP has been discussed after verification of design feasibility
Program pseudo-random number generator for microcomputers
International Nuclear Information System (INIS)
Ososkov, G.A.
1980-01-01
Program pseudo-random number generators (PNG) intended for the test of control equipment and communication channels are considered. In the case of 8-bit microcomputers it is necessary to assign 4 words of storage to allocate one random number. The proposed economical algorithms of the random number generation are based on the idea of the ''mixing'' of such quarters of the preceeding random number to obtain the next one. Test results of the PNG are displayed for two such generators. A FORTRAN variant of the PNG is presented along with a program realizing the PNG made on the base of the INTEL-8080 autocode
Four-Cylinder Stirling-Engine Computer Program
Daniele, C. J.; Lorenzo, C. F.
1986-01-01
Computer program developed for simulating steady-state and transient performance of four-cylinder Stirling engine. In model, four cylinders interconnected by four working spaces. Each working space contains seven volumes: one for expansion space, heater, cooler, and compression space and three for regenerator. Thermal time constant for regenerator mass associated with each regenator gas volume. Former code generates results very quickly, since it has only 14 state variables with no energy equation. Current code then used to study various aspects of Stirling engine in much more detail. Program written in FORTRAN IV for use on IBM 370 computer.
FASP, an analytic resource appraisal program for petroleum play analysis
Crovelli, R.A.; Balay, R.H.
1986-01-01
An analytic probabilistic methodology for resource appraisal of undiscovered oil and gas resources in play analysis is presented in a FORTRAN program termed FASP. This play-analysis methodology is a geostochastic system for petroleum resource appraisal in explored as well as frontier areas. An established geologic model considers both the uncertainty of the presence of the assessed hydrocarbon and its amount if present. The program FASP produces resource estimates of crude oil, nonassociated gas, dissolved gas, and gas for a geologic play in terms of probability distributions. The analytic method is based upon conditional probability theory and many laws of expectation and variance. ?? 1986.
Program LEPS to addition of gamma spectra from germanium detectors
International Nuclear Information System (INIS)
Romero, L.
1986-01-01
The LEP program, written in FORTRAN IV, performs the addition of two spectra, collected with different detectors, from the same sample. This application, adds the two gamma spectra obtained from two opposite LEPS Germanium Detectors (Low Energy Photon Spectrometer), correcting the differences (channel/energy) between both two spectra, and fitting them before adding. The total-spectrum is recorded at the computer memory as a single spectrum. The necessary equipment, to run this program is: - Two opposite germanium detectors, with their associate electronics. - Multichannel analyzer (2048 memory channel minimum) - Computer on-line interfacing to multichannel analyzer. (Author) 4 refs
A Hartree-Fock program for atomic structure calculations
International Nuclear Information System (INIS)
Mitroy, J.
1999-01-01
The Hartree-Fock equations for a general open shell atom are described. The matrix equations that result when the single particle orbitals are written in terms of a linear combination of analytic basis functions are derived. Attention is paid to the complexities that occur when open shells are present. The specifics of a working FORTRAN program which is available for public use are described. The program has the flexibility to handle either Slater-type orbitals or Gaussian-type orbitals. It can be obtained over the internet at http://lacebark.ntu.edu.au/j_mitroy/research/atomic.htm Copyright (1999) CSIRO Australia
Program for searching for semiempirical parameters by the MNDO method
International Nuclear Information System (INIS)
Bliznyuk, A.A.; Voityuk, A.A.
1987-01-01
The authors describe an program for optimizing atomic models constructed using the MNDO method which varies not only the parameters but also the scope for simple changes in the calculation scheme. The target function determines properties such as formation enthalpies, dipole moments, ionization potentials, and geometrical parameters. Software used to minimize the target function is based on the simplex method on the Nelder-Mead algorithm and on the Fletcher variable-metric method. The program is written in FORTRAN IV and implemented on the ES computer
Energy Technology Data Exchange (ETDEWEB)
Gonzalez T, L.; Beltran L, V
1991-09-15
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)
EDIN0613P weight estimating program. [for launch vehicles
Hirsch, G. N.
1976-01-01
The weight estimating relationships and program developed for space power system simulation are described. The program was developed to size a two-stage launch vehicle for the space power system. The program is actually part of an overall simulation technique called EDIN (Engineering Design and Integration) system. The program sizes the overall vehicle, generates major component weights and derives a large amount of overall vehicle geometry. The program is written in FORTRAN V and is designed for use on the Univac Exec 8 (1110). By utilizing the flexibility of this program while remaining cognizant of the limits imposed upon output depth and accuracy by utilization of generalized input, this program concept can be a useful tool for estimating purposes at the conceptual design stage of a launch vehicle.
The Efficiency of Linda for General Purpose Scientific Programming
Directory of Open Access Journals (Sweden)
Timothy G. Mattson
1994-01-01
Full Text Available Linda (Linda is a registered trademark of Scientific Computing Associates, Inc. is a programming language for coordinating the execution and interaction of processes. When combined with a language for computation (such as C or Fortran, the resulting hybrid language can be used to write portable programs for parallel and distributed multiple instruction multiple data (MIMD computers. The Linda programming model is based on operations that read, write, and erase a virtual shared memory. It is easy to use, and lets the programmer code in a very expressive, uncoupled programming style. These benefits, however, are of little value unless Linda programs execute efficiently. The goal of this article is to demonstrate that Linda programs are efficient making Linda an effective general purpose tool for programming MIMD parallel computers. Two arguments for Linda's efficiency are given; the first is based on Linda's implementation and the second on a range of case studies spanning a complete set of parallel algorithm classes.
BRAND program complex for neutron-physical experiment simulation by the Monte-Carlo method
International Nuclear Information System (INIS)
Androsenko, A.A.; Androsenko, P.A.
1984-01-01
Possibilities of the BRAND program complex for neutron and γ-radiation transport simulation by the Monte-Carlo method are described in short. The complex includes the following modules: geometric module, source module, detector module, modules of simulation of a vector of particle motion direction after interaction and a free path. The complex is written in the FORTRAN langauage and realized by the BESM-6 computer
Program system for processing of spectra obtained on the multidetector correlation device (MUK)
International Nuclear Information System (INIS)
Venos, D.; Adam, J.; Hnatowicz, V.; Honusek, M.
1988-01-01
A program system used by evaluation of multidimensional coincidence spectra is described. The spectra recorded on magnetic tapes are obtained by means of multidetector correlation device (MUK). The angular correlation coefficients A 22 and A 44 for the given cascades of gamma transitions are the final result of the calculations. The system operates in DOS/ES system of the EC-1040 computer with the 1024 Kbyte memeory. All the codes are written in fortran language
BUCKL: a program for rapid calculation of x-ray deposition
International Nuclear Information System (INIS)
Cole, R.K. Jr.
1970-07-01
A computer program is described which has the fast execution time of exponential codes but also evaluates the effects of fluorescence and scattering. The program makes use of diffusion calculations with a buckling correction included to approximate the effects of finite transverse geometry. Theory and derivations necessary for the BUCKL code are presented, and the code results are compared with those of earlier codes for a variety of problems. Inputs and outputs of the program are described, and a FORTRAN listing is provided. Shortcomings of the program are discussed and suggestions are provided for possible future improvement. (U.S.)
Systematic control of large computer programs
International Nuclear Information System (INIS)
Goedbloed, J.P.; Klieb, L.
1986-07-01
A package of CCL, UPDATE, and FORTRAN procedures is described which facilitates the systematic control and development of large scientific computer programs. The package provides a general tool box for this purpose which contains many conveniences for the systematic administration of files, editing, reformating of line printer output files, etc. In addition, a small number of procedures is devoted to the problem of structured development of a large computer program which is used by a group of scientists. The essence of the method is contained in three procedures N, R, and X for the creation of a new UPDATE program library, its revision, and execution, resp., and a procedure REVISE which provides a joint editor - UPDATE session which combines the advantages of the two systems, viz. speed and rigor. (Auth.)
Smith, W.K.
1982-01-01
The mathematical method of determining in-situ stresses by overcoring, using either the U.S. Bureau of Mines Borehole Deformation Gage or the Commonwealth Scientific and Industrial Research Organisation Hollow Inclusion Stress Cell, is summarized, and data reduction programs for each type of instrument, written in BASIC, are presented. The BASIC programs offer several advantages over previously available FORTRAN programs. They can be executed on a desk-top microcomputer at or near the field site, allowing the investigator to assess the quality of the data and make decisions on the need for additional testing while the crew is still in the field. Also, data input is much simpler than with currently available FORTRAN programs; either English or SI units can be used; and standard deviations of the principal stresses are computed as well as those of the geographic components.
Schoen, A. H.; Rosenstein, H.; Stanzione, K.; Wisniewski, J. S.
1980-01-01
This report describes the use of the V/STOL Aircraft Sizing and Performance Computer Program (VASCOMP II). The program is useful in performing aircraft parametric studies in a quick and cost efficient manner. Problem formulation and data development were performed by the Boeing Vertol Company and reflects the present preliminary design technology. The computer program, written in FORTRAN IV, has a broad range of input parameters, to enable investigation of a wide variety of aircraft. User oriented features of the program include minimized input requirements, diagnostic capabilities, and various options for program flexibility.
International Nuclear Information System (INIS)
Kovscek, S.E.; Martin, S.E.
1982-10-01
ROBOT3 is a FORTRAN computer program which is used in conjunction with the CYGRO5 computer program to calculate the time-dependent inelastic bowing of a fuel rod using an incremental finite element method. The fuel rod is modeled as a viscoelastic beam whose material properties are derived as perturbations of the CYGRO5 axisymmetric model. Fuel rod supports are modeled as displacement, force, or spring-type nodal boundary conditions. The program input is described and a sample problem is given
International Nuclear Information System (INIS)
Pendergrass, J.H.
1978-01-01
Three FORTRAN programs, CAPITAL, VENTURE, and INDEXER, have been developed to automate computations used in assessing the economic viability of proposed or conceptual laser fusion and other advanced-technology facilities, as well as conventional projects. The types of calculations performed by these programs are, respectively, capital cost estimation, lifetime economic performance simulation, and computation of cost indexes. The codes permit these three topics to be addressed with considerable sophistication commensurate with user requirements and available data
TAD- THEORETICAL AERODYNAMICS PROGRAM
Barrowman, J.
1994-01-01
This theoretical aerodynamics program, TAD, was developed to predict the aerodynamic characteristics of vehicles with sounding rocket configurations. These slender, axisymmetric finned vehicle configurations have a wide range of aeronautical applications from rockets to high speed armament. Over a given range of Mach numbers, TAD will compute the normal force coefficient derivative, the center-of-pressure, the roll forcing moment coefficient derivative, the roll damping moment coefficient derivative, and the pitch damping moment coefficient derivative of a sounding rocket configured vehicle. The vehicle may consist of a sharp pointed nose of cone or tangent ogive shape, up to nine other body divisions of conical shoulder, conical boattail, or circular cylinder shape, and fins of trapezoid planform shape with constant cross section and either three or four fins per fin set. The characteristics computed by TAD have been shown to be accurate to within ten percent of experimental data in the supersonic region. The TAD program calculates the characteristics of separate portions of the vehicle, calculates the interference between separate portions of the vehicle, and then combines the results to form a total vehicle solution. Also, TAD can be used to calculate the characteristics of the body or fins separately as an aid in the design process. Input to the TAD program consists of simple descriptions of the body and fin geometries and the Mach range of interest. Output includes the aerodynamic characteristics of the total vehicle, or user-selected portions, at specified points over the mach range. The TAD program is written in FORTRAN IV for batch execution and has been implemented on an IBM 360 computer with a central memory requirement of approximately 123K of 8 bit bytes. The TAD program was originally developed in 1967 and last updated in 1972.
Energy Technology Data Exchange (ETDEWEB)
Hubbard, C.R.; Babich, M.W.; Jacobson, R.A.
1977-01-01
A new system of three programs written in PL/1 can calculate symmetry and Patterson superposition maps for triclinic, monoclinic, and orthorhombic space groups as well as any space group reducible to one of these three. These programs are based on a system of FORTRAN programs developed at Ames Laboratory, but are more general and have expanded utility, especially with regard to large unit cells. The program PLIGEN calculates a direct access data set, SYMPL1 calculates a direct access symmetry map, and ALSPL1 calculates a superposition map using one or multiple superpositions. A detailed description of the use of these programs including symbolic program listings is included. 2 tables.
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
A computer program TRACK_P for studying proton tracks in PADC detectors
Directory of Open Access Journals (Sweden)
D. Nikezic
2016-01-01
Full Text Available A computer program for studying proton tracks in solid state nuclear track detectors was developed and described in this paper. The program was written in Fortran 90, with an additional tool for visualizing the track appearance as seen under the optical microscope in the transmission mode, which was written in the Python programming language. Measurable track parameters were determined and displayed in the application window and written in a data file. Three-dimensional representation of tracks was enabled. Examples of calculated tracks were also given in the present paper.
Diversion Path Analysis handbook. Volume 4 (of 4 volumes). Computer Program 2
International Nuclear Information System (INIS)
Schleter, J.C.
1978-11-01
The FORTRAN IV computer program, DPA Computer Program 2 (DPACP-2) is used to produce tables and statistics on modifications identified when performing a Diversion Path Analysis (DPA) in accord with the methodology given in Volume 1. The program requires 259088 bytes exclusive of the operating system. The data assembled and tabulated by DPACP-2 assist the DPA team in analyzing and evaluating modifications to the plant's safeguards system that would eliminate, or reduce the severity of, vulnerabilities identified by means of the DPA. These vulnerabilities relate to the capability of the plant's material control and material accounting subsystems to indicate diversion of special nuclear material (SNM) by a knowledgeable insider
The SIMRAND 1 computer program: Simulation of research and development projects
Miles, R. F., Jr.
1986-01-01
The SIMRAND I Computer Program (Version 5.0 x 0.3) written in Microsoft FORTRAN for the IBM PC microcomputer and its compatibles is described. The SIMRAND I Computer Program comprises eleven modules-a main routine and ten subroutines. Two additional files are used at compile time; one inserts the system or task equations into the source code, while the other inserts the dimension statements and common blocks. The SIMRAND I Computer Program can be run on most microcomputers or mainframe computers with only minor modifications to the computer code.
TMAP/Mod 1: Tritium Migration Analysis Program code description and user's manual
International Nuclear Information System (INIS)
Merrill, B.J.; Jones, J.L.; Holland, D.F.
1986-01-01
The Tritium Migration Analysis Program (TMAP) has been developed by the Fusion Safety Program of EG and G Idaho, Inc., at the Idaho National Engineering Laboratory (INEL) as a safety analysis code to analyze tritium loss from fusion systems during normal operation and under accident conditions. TMAP is a one-dimensional code that determines tritium movement and inventories in a system of interconnected enclosures and wall structures. In addition, the thermal response of structures is modeled to provide temperature information required for calculations of tritium movement. The program is written in FORTRAN 4 and has been implemented on the National Magnetic Fusion Energy Computing Center (NMFECC)
Computer Programs in Marine Science
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
International Nuclear Information System (INIS)
Yamagishi, Kojiro
1978-02-01
The 4096 channel Pulse Height Analyzer (PHA) assembled with CAMAC plug-in units has been developed in JAERI. The PHA consists of ADC unit, CRT-display unit, and CAMAC plug-in units, which are memory-controller, MCA-timer, 4K words RAM memory and CRT-driver. The system is on-line connected to FACOM U-200 Mini-Computer through CAMAC interface unit Crate-controller. The softwares for on-line data acquisition of the system have been developed. These are four utility programs written in FORTRAN and two program packages written in assembler language FASP which are CAMAC Program Package and Basic Input/Output Program Package. CAMAC Program Package has 18 subroutine programs for control of CAMAC plug-in units from FACOM U-200 Mini-Computer; and Basic Input/Output Program Package has 26 subroutine programs to input/output data to/from a typewriter, keyboard, cassette magnetic tape and open reel magnetic tape. These subroutine programs are all FORTRAN callable. The PHA with CAMAC system is first outlined, and then usage is described in detail of four utility programs, CAMAC Program Package and Basic Input/Output Program Package. (auth.)
ALICE - A computer program for nuclear data acquisition
International Nuclear Information System (INIS)
Skaali, T.B.
1981-02-01
This manual contains the users guide and the program documentation for the ALICE data acquisition system. The ALICE Users Guide, which is contained in part 1 of the manual, can be read independently of the program documentation in part 2. The ALICE program is written in the interpretive language NODAL. Due to the inherent slow execution speed of interpreted code time-consuming tasks such as non-linear least squares peak fitting cannot be implemented. On the other hand the special features of the NODAL language have made possible facilities in ALICE which hardly could have been realized by, e.g. a FORTRAN program. The complete system can be divided in two parts, i) the ALICE program written in NODAL, and ii) a data acquisition package which logically represents an extension of the SINTRAN III operating system. The system is thus portable to other NORD- 10/100 installations provided that the floating hardware is 48 bits. (Auth.)
A survey of electric and hybrid vehicle simulation programs
Bevan, J.; Heimburger, D. A.; Metcalfe, M. A.
1978-01-01
Results of a survey conducted within the United States to determine the extent of development and capabilities of automotive performance simulation programs suitable for electric and hybrid vehicle studies are summarized. Altogether, 111 programs were identified as being in a usable state. The complexity of the existing programs spans a range from a page of simple desktop calculator instructions to 300,000 lines of a high-level programming language. The capability to simulate electric vehicles was most common, heat-engines second, and hybrid vehicles least common. Batch-operated programs are slightly more common than interactive ones, and one-third can be operated in either mode. The most commonly used language was FORTRAN, the language typically used by engineers. The higher-level simulation languages (e.g. SIMSCRIPT, GPSS, SIMULA) used by "model builders" were conspicuously lacking.
HEDPIN: a computer program to estimate pinwise power density
International Nuclear Information System (INIS)
Cappiello, M.W.
1976-05-01
A description is given of the digital computer program, HEDPIN. This program, modeled after a previously developed program, POWPIN, provides a means of estimating the pinwise power density distribution in fast reactor triangular pitched pin bundles. The capability also exists for computing any reaction rate of interest at the respective pin positions within an assembly. HEDPIN was developed in support of FTR fuel and test management as well as fast reactor core design and core characterization planning and analysis. The results of a test devised to check out HEDPIN's computational method are given, and the realm of application is discussed. Nearly all programming is in FORTRAN IV. Variable dimensioning is employed to make efficient use of core memory and maintain short running time for small problems. Input instructions, sample problem, and a program listing are also given
Computer programs for eddy-current defect studies
International Nuclear Information System (INIS)
Pate, J.R.; Dodd, C.V.
1990-06-01
Several computer programs to aid in the design of eddy-current tests and probes have been written. The programs, written in Fortran, deal in various ways with the response to defects exhibited by four types of probes: the pancake probe, the reflection probe, the circumferential boreside probe, and the circumferential encircling probe. Programs are included which calculate the impedance or voltage change in a coil due to a defect, which calculate and plot the defect sensitivity factor of a coil, and which invert calculated or experimental readings to obtain the size of a defect. The theory upon which the programs are based is the Burrows point defect theory, and thus the calculations of the programs will be more accurate for small defects. 6 refs., 21 figs
Computer programs for eddy-current defect studies
Energy Technology Data Exchange (ETDEWEB)
Pate, J. R.; Dodd, C. V. [Oak Ridge National Lab., TN (USA)
1990-06-01
Several computer programs to aid in the design of eddy-current tests and probes have been written. The programs, written in Fortran, deal in various ways with the response to defects exhibited by four types of probes: the pancake probe, the reflection probe, the circumferential boreside probe, and the circumferential encircling probe. Programs are included which calculate the impedance or voltage change in a coil due to a defect, which calculate and plot the defect sensitivity factor of a coil, and which invert calculated or experimental readings to obtain the size of a defect. The theory upon which the programs are based is the Burrows point defect theory, and thus the calculations of the programs will be more accurate for small defects. 6 refs., 21 figs.
International Nuclear Information System (INIS)
Drozdowicz, K.; Woznicka, U.
1982-01-01
The program in FORTRAN for the ODRA-1305 computer is described. The dependence of the decay constant of the thermal neutron flux upon the dimensions of the two-region concentric cylindrical system is the result of the program. The solution (with a constant neutron flux in the inner medium assumed) is generally obtained in the one-group diffusion approximation by the method of the perturbation calculation. However, the energy distribution of the thermal neutron flux and the diffusion cooling are taken into account. The program is written for the case when the outer medium is hydrogenous. The listing of the program and an example of calculation results are included. (author)
Cavalier perspective plots of two-dimensional matrices. Program Stereo
International Nuclear Information System (INIS)
Los Arcos Merino, J.M.
1978-01-01
The program Stereo allows representation of a two-dimensional matrix containing numerical data, in the form of a cavalier perspective, isometric or not, with an angle variable between 0 deg and 180 deg. The representation is in histogram form for each matrix row and those curves which fall behind higher curves and therefore would not be seen are suppressed. It has been written in Fortran V for a Calcomp-936 digital plotter operating off-line with a Univac 1106 computer. Drawing method, subroutine structure and running instructions are described in this paper. (author)
Aircraft Configuration Noise Reduction. Volume 3. Computer Program Source Listing
1976-06-01
BANOS.ABU( . C BCF = THE ARRAY OF BAND CEN\\TER FRECUENCIES. AbSOKP I b C T =AMBIENT TEMPERATURE IN’ DEGREES FARENHEIT ABSUtRP 17 C AdSOt(P 18 C OUTPUT...C 1) ARGUMENT (XI REMAINS IUCHANGEC LFI .7 C 2) NO CTHER SUbPROGRAMS REQLIRED C ER STANDARC FORTRAN IV LIbkARY. CFI 28 c 3) ABSOLUTE ERROR IS LESS...MINOR AND MAJOR INDEX CCLtNTERS CORSP. 76 14 NRN = 1 CfjRSPL 7S ICI = 1B129NCOF) CORSPL 8C IF (IGO .GT. 1) GO TO 105 CORSPL 81 C CORSPL 82 C ZERO CUT
Some programming aids for the DEC PDP-10
International Nuclear Information System (INIS)
McNamara, B.
1979-01-01
A simplified system has been written to help in FORTRAN programming of physics and mathematical problems. The system is described in Appendix A. A magnetic tape has been made of the complete system as used on the DEC-10 by M-Division for Magnetic Fusion related calculations. The system turns out to use many of the locally developed goodies, such as the TEDI text editor, the TV80 graphics system, and Tektronix 4012 videos. The facilities are briefly described in the HLP files on the tape
ARIANE: a scientific programming assisting system
International Nuclear Information System (INIS)
Kavenoky, A.; Lautard, J.J.; Robeau, M.F.
1982-06-01
The ARIANE system had been designed to make easier development, maintenance and operation of scientific programs; ARIANE is divided into three elementary functions: 1/ a pre-compiler processes a super-set of FORTRAN allowing virtual memory simulation (LAGD translator) and the OTOMAT library is used at run-time to perform the storage management, 2/ a dynamic loader permits the cancellation of the standard linkage-editor step and of the generation of overlays, 3/ the logical chaining of the mathematical modules is controlled by the ARIANE language: the user submits to the ARIANE compiler a program describing the logical algorithm to be perfomed; the compiler output is executed. The ARIANE system had been designed for IBM computers running under OS/VS1 or VS2; a Cray version had been generated and is now operational [fr
1992-01-09
plotting mode shapes. All programs are written in FORTRAN for use on the VAX system. A flowchart of the entire analytical prediction method is shown...in Figure 1. below. RBDAT.FOR ’Lx [RBIN.DAT RBUP2.FOR ,. MODE.DAT --- ---- -4- -- RBOUT.DAT ~ I MODPLT.PRO II MODPLT.LN3 Figure 1. Flowchart for...CMES is LK Tool’s own derivation of DMIS; therefore, the only documentation is from LK Tool. I received a reference manual and a beginners training
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...
2011-10-24
... pages 2- 3. Both the American Heating and Refrigeration Institute (AHRI) and Trane stated that the... untested split system combinations for SEER and HSPF. \\4\\ ARMs are computer simulations used to rate... procedure, which is detailed in section 0, and comprises whole system testing, not testing or simulation of...
International Nuclear Information System (INIS)
Kuzmitskite, L.L.
1980-01-01
The program is meant for the determination of the semiempirical radial wave functions of the positive ions and the calculation of the radial integrals of the dipole transition. The semiempirical wave functions are calculated using Tomas-Fermi potential with the variable parameter, which provides for the coincidence of the energy obtained with the ionization energy of the state under consideration. The program is written in the FORTRAN language for the BESM-6 computer
International Nuclear Information System (INIS)
Drozdowicz, K.; Krynicka-Drozdowicz, E.
1979-01-01
The LAMA program (in FORTRAN 1900 language), which fits the set of decaying experimental values to the sum of the two (or one) exponentials with background, is described. The method of calculation and its accuracy and the interpretation of the program results are given. The changes and the extensions of the calculation, referred to the dead time effect taken into account for time analysers having the constant dead time after each registered pulse, are described. (author)
Energy Technology Data Exchange (ETDEWEB)
Carcedo, A; Ladron de Guevara, P
1973-07-01
Full description of the whole structure and of the operation of every routine is given for both programs, as well as the data setup in punched cards and binary tape. To help the users we present and comment several examples of data sets and the corresponding output plots. The list of instructions in FORTRAN IV language is included. The same version of both programs is operative in the series 7090-94-IBM and 1106-08-UNIVAC. (Author)
Energy Technology Data Exchange (ETDEWEB)
Santoma Juncadella, L
1972-07-01
The VODAM program is written in FORTRAN IV language and makes a physico-chemical analysis of waters, for an element or a number of them, under investigation. A thermodynamical data files is incorporated, and is useful for a low temperature range. It is the basic nucleus for a series of programs of physico-chemical interpretation of hydrogeochemical data and automatic construction of equilibrium diagrams. (Author) 13 refs.
Fermilab advanced computer program multi-microprocessor project
International Nuclear Information System (INIS)
Nash, T.; Areti, H.; Biel, J.
1985-06-01
Fermilab's Advanced Computer Program is constructing a powerful 128 node multi-microprocessor system for data analysis in high-energy physics. The system will use commercial 32-bit microprocessors programmed in Fortran-77. Extensive software supports easy migration of user applications from a uniprocessor environment to the multiprocessor and provides sophisticated program development, debugging, and error handling and recovery tools. This system is designed to be readily copied, providing computing cost effectiveness of below $2200 per VAX 11/780 equivalent. The low cost, commercial availability, compatibility with off-line analysis programs, and high data bandwidths (up to 160 MByte/sec) make the system an ideal choice for applications to on-line triggers as well as an offline data processor
COLUMN2 - A computer program for simulating migration
International Nuclear Information System (INIS)
Nielsen, O.J.; Bo, P.; Carlsen, L.
1985-10-01
COLUMN2 is a 1D FORTRAN77 computer program designed for studies of the effects of various physicochemical processes on migration. It solves the solute transport equation and cant take into account dispersion, sorption, ion exchange, first and second order homogeneous chemical reactions. Spacial variations of input pulses and retention factors are possible. The method of solution is based on a finite difference discretion followed by the application of the method of characteristics and two separate grid systems. This report explains the mathematical and numerical methods used, describes the necessary input, contains a number of test examples, provides a listing of the program and explains how to acquire the program, adapt it to other computers and run it. This report serves as a manual for the program. (author)
FastScatTM: An Object-Oriented Program for Fast Scattering Computation
Directory of Open Access Journals (Sweden)
Lisa Hamilton
1993-01-01
Full Text Available FastScat is a state-of-the-art program for computing electromagnetic scattering and radiation. Its purpose is to support the study of recent algorithmic advancements, such as the fast multipole method, that promise speed-ups of several orders of magnitude over conventional algorithms. The complexity of these algorithms and their associated data structures led us to adopt an object-oriented methodology for FastScat. We discuss the program's design and several lessons learned from its C++ implementation including the appropriate level for object-orientedness in numeric software, maintainability benefits, interfacing to Fortran libraries such as LAPACK, and performance issues.
A program to compute the area of an irregular polygon on a spheroidal surface
Digital Repository Service at National Institute of Oceanography (India)
Sivakholundu, K.M.; Prabaharan, N.
(MATLAB). Short Note824 lar shapes. The analytical integrations were carried out with the software package MATLAB on a SUN workstation. The comparisons were made to check: 1. The eC128ect of varying strip width for integration. 2. Variation of accuracy... this program can be used to calculate the area on the spheroidal surface for irregular shapes without losing accuracy. REFERENCES Bomford, G. (1977) Geodesy. Oxford University Press, 731 pp. Larkin, B. J. (1988) A FORTRAN 77 program to calcu- late areas...
High Performance Programming Using Explicit Shared Memory Model on the Cray T3D
Saini, Subhash; Simon, Horst D.; Lasinski, T. A. (Technical Monitor)
1994-01-01
The Cray T3D is the first-phase system in Cray Research Inc.'s (CRI) three-phase massively parallel processing program. In this report we describe the architecture of the T3D, as well as the CRAFT (Cray Research Adaptive Fortran) programming model, and contrast it with PVM, which is also supported on the T3D We present some performance data based on the NAS Parallel Benchmarks to illustrate both architectural and software features of the T3D.
International Nuclear Information System (INIS)
Sanfilippo, L.
1987-01-01
A physical model and a computer program have been developed to simulate all the measurement operations involved with the Isotopic Dilution Analysis technique currently applied in the Volume - Concentration method for the Reprocessing Input Accountancy, together with their errors or uncertainties. The simulator is apt to easily solve a number of problems related to the measurement sctivities of the plant operator and the inspector. The program, written in Fortran 77, is based on a particular Montecarlo technique named ''Random Sampling''; a full description of the code is reported
Automatic storage of single gamma spectra on magnetic tape. Programs Longo, Dire
International Nuclear Information System (INIS)
Los Arcos Merino, J.M.
1978-01-01
The program Longo provides the block size and the black number in a binary file on magnetic tape. It has been applied to analyse the structure of the nine-track magnetic tapes storing single or coincidence gamma spectra files, recorded in octet form by a Multi-8 minicomputer in the Nuclear Spectrometry Laboratory of J.E.N. Then the program Dire has been written to transform the single gamma spectra into a new Fastrand disk file, storing the information in 36 bit words. A copy of this file is obtained on magnetic tape and the single gamma spectra are then availables by standard Fortran V reading sentences. (author)
Automatic storing of single gamma spectra on magnetic tape. Programs LONGO, DIRE
International Nuclear Information System (INIS)
Los Arcos Merino, J. M.
1978-01-01
The program LONGO provides the block size and the block number in a binary file on magnetic tape. It has been applied to analyse the structure of the nine-track magnetic tapes storing single or coincidence gamma spectra files, recorded in octet form by a MULTI-8 minicomputer in the Nuclear Spectrometry Laboratory of J.E.N. Then the program DIRE has been written to transform the single gamma spectra into a new FASTRAND disk file, storing the information in-36 bit words. A copy of this file is obtained on magnetic tape and the single gamma spectra are then available by standard FORTRAN V reading sentences. (Author) 3 refs
Energy Technology Data Exchange (ETDEWEB)
Hosogai, Hiromi [Joyo Industries Co. Ltd., Tokai, Ibaraki (Japan); Kasahara, Naoto
1998-07-01
Object Oriented Program `SONSHO` predicts creep fatigue damage factors based on Elevated Temperature Structural Design Guide for `Monju` and other various procedures from stress classification data obtained from structural analysis results. From view point of program implementation, it is required that external programs interface and frequent revise from update of material and creep fatigue evaluation methods. Object oriented approach was continuously introduced to improve these aspects of the program. Version 4.0 has the following new functions. (1) Material strength library was implemented as an independent program module based on Microsoft Active X control and 32bitDLL technologies, which can be accessed by general Windows programs. (2) Self instruction system `Wizard` enables manual less operation. (3) Microsoft common object model (COM) was adopted for program interface, and this program can communicate with Excel sheet data on memory. Sonsho Ver.4.0 can work on Windows 95 or Windows NT4.0. Microsoft Visual Basic 5.0 (Enterprose Edition) and Microsoft FORTRAN Power Station 4.0 were adopted for program. (author)
Hydride heat pump. Volume I. Users manual for HYCSOS system design program. [HYCSOS code
Energy Technology Data Exchange (ETDEWEB)
Gorman, R.; Moritz, P.
1978-05-01
A method for the design and costing of a metal hydride heat pump for residential use and a computer program, HYCSOS, which automates that method are described. The system analyzed is one in which a metal hydride heat pump can provide space heating and space cooling powered by energy from solar collectors and electric power generated from solar energy. The principles and basic design of the system are presented, and the computer program is described giving detailed design and performance equations used in the program. The operation of the program is explained, and a sample run is presented. This computer program is part of an effort to design, cost, and evaluate a hydride heat pump for residential use. The computer program is written in standard Fortran IV and was run on a CDC Cyber 74 and Cyber 174 computer. A listing of the program is included as an appendix. This report is Volume 1 of a two-volume document.
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.
The security analyzer: A security analyzer program written in Prolog
International Nuclear Information System (INIS)
Zimmerman, B.D.; Densley, P.J.
1986-09-01
The Security Analyzer is a software tool capable of analyzing the effectiveness of a facility's security system. It is written in the Prolog logic programming computer language, using entity-relationship data modeling techniques. The program performs the following functions: (1) provides descriptive, locational and operational status information about intrusion detectors and assessment devices (i.e., ''sensors'' and ''cameras'') upon request; (2) provides for storage and retrieval of maintenance history information for various components of the security system (including intrusion detectors), and allows for changing that information as desired; (3) provides a ''search'' mode, wherein all paths are found from any specified physical location to another specified location which satisfy user chosen ''intruder detection'' probability and elapsed time criteria (i.e., the program finds the ''weakest paths'' from a security point of view). The first two of these functions can be provided fairly easily with a conventional database program; the third function could be provided using Fortran or some similar language, though with substantial difficulty. In the Security Analyzer program, all these functions are provided in a simple and straight-forward manner. This simplicity is possible because the program is written in the symbolic (as opposed to numeric) processing language Prolog, and because the knowledge base is structured according to entity-relationship modeling principles. Also, the use of Prolog and the entity-relationship modeling technique allows the capabilities of the Security analyzer program, both for knowledge base interrogation and for searching-type operations, to be easily expanded in ways that would be very difficult for a numeric and more algorithmically deterministic language such as Fortran to duplicate. 4 refs
RAMPRF: A program for synchronous acceleration
International Nuclear Information System (INIS)
Furman, M.A.
1991-05-01
We describe a family of standard FORTRAN programs that calculate bucket-related quantities as a function of time during acceleration, assuming it is adiabatic. The members of the family are distinguished by the type of input: One family member takes energy and total peak voltage as a function of time; another takes momentum and bucket area as a function of time, etc. The input is in free-format tabular form. The output is in standard ASCII form, in multi-column tables and x-y listings appropriate for plotting. Bunch-related quantities, such as energy spread and space-charge tune spread, are also calculated assuming that the bunches have a specified longitudinal emittance, and are small and matched to the bucket. Sample excitation curves for the SSC's low energy booster are presented. 4 refs., 2 figs
MONO: A program to calculate synchrotron beamline monochromator throughputs
International Nuclear Information System (INIS)
Chapman, D.
1989-01-01
A set of Fortran programs have been developed to calculate the expected throughput of x-ray monochromators with a filtered synchrotron source and is applicable to bending magnet and wiggler beamlines. These programs calculate the normalized throughput and filtered synchrotron spectrum passed by multiple element, flat un- focussed monochromator crystals of the Bragg or Laue type as a function of incident beam divergence, energy and polarization. The reflected and transmitted beam of each crystal is calculated using the dynamical theory of diffraction. Multiple crystal arrangements in the dispersive and non-dispersive mode are allowed as well as crystal asymmetry and energy or angle offsets. Filters or windows of arbitrary elemental composition may be used to filter the incident synchrotron beam. This program should be useful to predict the intensities available from many beamline configurations as well as assist in the design of new monochromator and analyzer systems. 6 refs., 3 figs
A SCILAB Program for Computing Rotating Magnetic Compact Objects
Papasotiriou, P. J.; Geroyannis, V. S.
We implement the so-called ``complex-plane iterative technique'' (CIT) to the computation of classical differentially rotating magnetic white dwarf and neutron star models. The program has been written in SCILAB (© INRIA-ENPC), a matrix-oriented high-level programming language, which can be downloaded free of charge from the site http://www-rocq.inria.fr/scilab. Due to the advanced capabilities of this language, the code is short and understandable. Highlights of the program are: (a) time-saving character, (b) easy use due to the built-in graphics user interface, (c) easy interfacing with Fortran via online dynamic link. We interpret our numerical results in various ways by extensively using the graphics environment of SCILAB.
Coon, William F.
2011-01-01
Water-resource managers in Onondaga County, New York, are faced with the challenge of improving the water quality of Onondaga Lake, which has the distinction of being one of the most contaminated lakes in the United States. To assist in this endeavor, during 2003-07 the U.S. Geological Survey (USGS), in cooperation with the Onondaga Lake Partnership, developed a precipitation-runoff model of the 285-square-mile Onondaga Lake Basin with the computer program Hydrological Simulation Program-Fortran (HSPF). The model was intended to provide a tool whereby the processes responsible for the generation of loads of sediment and nutrients that are transported to Onondaga Lake could be better understood. This objective was only partly attained because data for calibration of the model were available from monitoring sites only at or near the mouths of the major tributaries to Onondaga Lake; no calibration data from headwater subbasins, where the loads originated, were available. To address this limitation and thereby decrease the uncertainty in the simulated results that were associated with headwater processes, the USGS conducted a 3-year (2005-08) basinwide study to assess the quality of surface water in the Onondaga Lake Basin. The study quantified the relative contributions of nonpoint sources associated with the major land uses and land covers in the basin and also monitored known sources and presumed sinks of sediment and nutrient loads, which previously had not been evaluated. The use of the newly acquired data to recalibrate the HSPF model resulted in improvements in the simulation of processes in the headwater subbasins, including suspended-sediment, orthophosphate, and phosphorus generation and transport.
Cooke, C. H.
1975-01-01
STICAP (Stiff Circuit Analysis Program) is a FORTRAN 4 computer program written for the CDC-6400-6600 computer series and SCOPE 3.0 operating system. It provides the circuit analyst a tool for automatically computing the transient responses and frequency responses of large linear time invariant networks, both stiff and nonstiff (algorithms and numerical integration techniques are described). The circuit description and user's program input language is engineer-oriented, making simple the task of using the program. Engineering theories underlying STICAP are examined. A user's manual is included which explains user interaction with the program and gives results of typical circuit design applications. Also, the program structure from a systems programmer's viewpoint is depicted and flow charts and other software documentation are given.
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)
1957-2007: 50 Years of Higher Order Programming Languages
Directory of Open Access Journals (Sweden)
Alen Lovrenčić
2009-06-01
Full Text Available Fifty years ago one of the greatest breakthroughs in computer programming and in the history of computers happened -- the appearance of FORTRAN, the first higher-order programming language. From that time until now hundreds of programming languages were invented, different programming paradigms were defined, all with the main goal to make computer programming easier and closer to as many people as possible. Many battles were fought among scientists as well as among developers around concepts of programming, programming languages and paradigms. It can be said that programming paradigms and programming languages were very often a trigger for many changes and improvements in computer science as well as in computer industry. Definitely, computer programming is one of the cornerstones of computer science.Today there are many tools that give a help in the process of programming, but there is still a programming tasks that can be solved only manually. Therefore, programming is still one of the most creative parts of interaction with computers.Programmers should chose programming language in accordance to task they have to solve, but very often, they chose it in accordance to their personal preferences, their beliefs and many other subjective reasons.Nevertheless, the market of programming languages can be merciless to languages as history was merciless to some people, even whole nations. Programming languages and developers get born, live and die leaving more or less tracks and successors, and not always the best survives. The history of programming languages is closely connected to the history of computers and computer science itself. Every single thing from one of them has its reflexions onto the other. This paper gives a short overview of last fifty years of computer programming and computer programming languages, but also gives many ideas that influenced other aspects of computer science. Particularly, programming paradigms are described, their
Computer Program For Linear Algebra
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.
REX - a program for the analysis of X-ray reflectivity data: user guide and programmer manual
International Nuclear Information System (INIS)
Crabb, T.A.; Gibson, P.N.
1992-12-01
A FORTRAN program REX, which has been developed to facilitate the interpretation of X-ray reflectivity data, is described. The program allows the simulation of reflectivity profiles as a function of either incident angle or of energy. Factors such as anomalous dispersion, and surface and interface roughness are taken into account in the model. In addition, experimental data of reflectivity as a function of incident angle can be matched to user-supplied theoretical parameters by a least-squares refinement procedure. Experimental reflectivity data recorded at several X-ray wavelengths can be analysed simultaneously, thus eliminating certain experimental errors. (author)
Spalding, D. B.; Launder, B. E.; Morse, A. P.; Maples, G.
1974-01-01
A guide to a computer program, written in FORTRAN 4, for predicting the flow properties of turbulent mixing with combustion of a circular jet of hydrogen into a co-flowing stream of air is presented. The program, which is based upon the Imperial College group's PASSA series, solves differential equations for diffusion and dissipation of turbulent kinetic energy and also of the R.M.S. fluctuation of hydrogen concentration. The effective turbulent viscosity for use in the shear stress equation is computed. Chemical equilibrium is assumed throughout the flow.
Qiu, Jiali; Shen, Zhenyao; Wei, Guoyuan; Wang, Guobo; Xie, Hui; Lv, Guanping
2018-03-01
The assessment of peak flow rate, total runoff volume, and pollutant loads during rainfall process are very important for the watershed management and the ecological restoration of aquatic environment. Real-time measurements of rainfall-runoff and pollutant loads are always the most reliable approach but are difficult to carry out at all desired location in the watersheds considering the large consumption of material and financial resources. An integrated environmental modeling approach for the estimation of flash streamflow that combines the various hydrological and quality processes during rainstorms within the agricultural watersheds is essential to develop targeted management strategies for the endangered drinking water. This study applied the Hydrological Simulation Program-Fortran (HSPF) to simulate the spatial and temporal variation in hydrological processes and pollutant transport processes during rainstorm events in the Miyun Reservoir watershed, a drinking water resource area in Beijing. The model performance indicators ensured the acceptable applicability of the HSPF model to simulate flow and pollutant loads in the studied watershed and to establish a relationship between land use and the parameter values. The proportion of soil and land use was then identified as the influencing factors of the pollution intensities. The results indicated that the flush concentrations were much higher than those observed during normal flow periods and considerably exceeded the limits of Class III Environmental Quality Standards for Surface Water (GB3838-2002) for the secondary protection zones of the drinking water resource in China. Agricultural land and leached cinnamon soils were identified as the key sources of sediment, nutrients, and fecal coliforms. Precipitation volume was identified as a driving factor that determined the amount of runoff and pollutant loads during rainfall processes. These results are useful to improve the streamflow predictions, provide
Lee, S.; Ni-Meister, W.; Toll, D.; Nigro, J.; Guiterrez-Magness, A.; Engman, T.
2010-01-01
The accuracy of streamflow predictions in the EPA's BASINS (Better Assessment Science Integrating Point and Nonpoint Sources) decision support tool is affected by the sparse meteorological data contained in BASINS. The North American Land Data Assimilation System (NLDAS) data with high spatial and temporal resolutions provide an alternative to the NOAA National Climatic Data Center (NCDC)'s station data. This study assessed the improvement of streamflow prediction of the Hydrological Simulation Program-FORTRAN (HSPF) model contained within BASINS using the NLDAS 118 degree hourly precipitation and evapotranspiration estimates in seven watersheds of the Chesapeake Bay region. Our results demonstrated consistent improvements of daily streamflow predictions in five of the seven watersheds when NLDAS precipitation and evapotranspiration data was incorporated into BASINS. The improvement of using the NLDAS data is significant when watershed's meteorological station is either far away or not in a similar climatic region. When the station is nearby, using the NLDAS data produces similar results. The correlation coefficients of the analyses using the NLDAS data were greater than 0.8, the Nash-Sutcliffe (NS) model fit efficiency greater than 0.6, and the error in the water balance was less than 5%. Our analyses also showed that the streamflow improvements were mainly contributed by the NLDAS's precipitation data and that the improvement from using NLDAS's evapotranspiration data was not significant; partially due to the constraints of current BASINS-HSPF settings. However, NLDAS's evapotranspiration data did improve the baseflow prediction. This study demonstrates the NLDAS data has the potential to improve stream flow predictions, thus aid the water quality assessment in the EPA nonpoint water quality assessment decision tool.
A Guide to Axial-Flow Turbine Off-Design Computer Program AXOD2
Chen, Shu-Cheng S.
2014-01-01
A Users Guide for the axial flow turbine off-design computer program AXOD2 is composed in this paper. This Users Guide is supplementary to the original Users Manual of AXOD. Three notable contributions of AXOD2 to its predecessor AXOD, both in the context of the Guide or in the functionality of the code, are described and discussed in length. These are: 1) a rational representation of the mathematical principles applied, with concise descriptions of the formulas implemented in the actual coding. Their physical implications are addressed; 2) the creation and documentation of an Addendum Listing of input namelist-parameters unique to AXOD2, that differ from or are in addition to the original input-namelists given in the Manual of AXOD. Their usages are discussed; and 3) the institution of proper stoppages of the code execution, encoding termination messaging and error messages of the execution to AXOD2. These measures are to safe-guard the integrity of the code execution, such that a failure mode encountered during a case-study would not plunge the code execution into indefinite loop, or cause a blow-out of the program execution. Details on these are discussed and illustrated in this paper. Moreover, this computer program has since been reconstructed substantially. Standard FORTRAN Langue was instituted, and the code was formatted in Double Precision (REAL*8). As the result, the code is now suited for use in a local Desktop Computer Environment, is perfectly portable to any Operating System, and can be executed by any FORTRAN compiler equivalent to a FORTRAN 9095 compiler. AXOD2 will be available through NASA Glenn Research Center (GRC) Software Repository.
International Nuclear Information System (INIS)
Ingram, W.J.
1987-06-01
The report describes a fiber-optics system model and its computer implementation. This implementation can calculate the bit error ratio (BER) versus time for optical fibers that have been exposed to gamma radiation. The program is designed so that the user may arbitrarily change any or all of the system input variables and produce separate outputs. The primary output of the program is a table of the BER as a function of time. This table may be stored on magnetic media and later incorporated into computer graphic programs. The program was written in FORTRAN 77 for the IBM PC/AT/XT computers. Flow charts and program listings are included in the report
HEXBU-3D, a three-dimensional PWR-simulator program for hexagonal fuel assemblies
International Nuclear Information System (INIS)
Karvinen, E.
1981-06-01
HEXBU-3D is a three-dimensional nodal simulator program for PWR reactors. It is designed for a reactor core that consists of hexagonal fuel assemblies and of big follower-type control assemblies. The program solves two-group diffusion equations in homogenized fuel assembly geometry by a sophisticated nodal method. The treatment of feedback effects from xenon-poisoning, fuel temperature, moderator temperature and density and soluble boron concentration are included in the program. The nodal equations are solved by a fast two-level iteration technique and the eigenvalue can be either the effective multiplication factor or the boron concentration of the moderator. Burnup calculations are performed by tabulated sets of burnup-dependent cross sections evaluated by a cell burnup program. HEXBY-3D has been originally programmed in FORTRAN V for the UNIVAC 1108 computer, but there is also another version which is operable on the CDC CYBER 170 computer. (author)
Sforzini, R. H.
1972-01-01
An analysis and a computer program are presented which represent a compromise between the more sophisticated programs using precise burning geometric relations and the textbook type of solutions. The program requires approximately 900 computer cards including a set of 20 input data cards required for a typical problem. The computer operating time for a single configuration is approximately 1 minute and 30 seconds on the IBM 360 computer. About l minute and l5 seconds of the time is compilation time so that additional configurations input at the same time require approximately 15 seconds each. The program uses approximately 11,000 words on the IBM 360. The program is written in FORTRAN 4 and is readily adaptable for use on a number of different computers: IBM 7044, IBM 7094, and Univac 1108.
TVENT: a computer program for analysis of tornado-induced transients in ventilation systems
International Nuclear Information System (INIS)
Duerre, K.H.; Andrae, R.W.; Gregory, W.S.
1978-07-01
The report describes TVENT, a portable FORTRAN computer program for predicting flows and pressures in a ventilation system subject to a tornado. The pressure and flow values calculated by TVENT can be used as a basis for structural analysis. TVENT is a one-dimensional, lumped-parameter model with incompressible flow augmented by fluid storage. The theoretical basis for the mathematical modeling and analysis is presented, and a description of the input for the computer code is provided. Modeling techniques specific to ventilation systems are described. Sample problems illustrate the use of TVENT in analyzing ventilation systems. Other sample problems illustrate modeling techniques used in reducing complex systems
SAFSIM: A computer program for engineering simulations of space reactor system performance
International Nuclear Information System (INIS)
Dobranich, D.
1992-01-01
SAFSIM (System Analysis Flow SIMulator) is a FORTRAN computer program that provides engineering simulations of user-specified flow networks at the system level. It includes fluid mechanics, heat transfer, and reactor dynamics capabilities. SAFSIM provides sufficient versatility to allow the simulation of almost any flow system, from a backyard sprinkler system to a clustered nuclear reactor propulsion system. In addition to versatility, speed and robustness are primary goals of SAFSIM. The current capabilities of SAFSIM are summarized, and some illustrative example results are presented
SARDAN- A program for the transients simulation in a typical PWR plant
International Nuclear Information System (INIS)
Mattos Santos, R.L.P. de.
1979-10-01
A program in FORTRAN-IV language was developed that simulates the behaviour of the primary circuit in a typical PWR plant during condition II transients, in particular uncontrolled withdrawal of a control rod set, control rod set drops and uncontrolled boron dilution. It the mathematical model adopted the reactor core, the hot piping to which a pressurizer is coupled, the steam generator and the cold piping are considered. The results obtained in the analysis of the mentioned accidents are compared to those present at the Final Safety Analysis Report (FSAR) of the Angra-1 reactor and are considered satisfactory. (F.E.) [pt
DIFMIG - A computer program for calculation of diffusive migration through multi-barrier systems
International Nuclear Information System (INIS)
Bo, P.; Carlsen, L.
1981-11-01
The FORTRAN IV program DIFMIG calculates one-dimensionally (i.e. column) the diffusive migration of single substances through arbitrary multibarrier systems. Time dependent changes in concentration other than dispersion/diffusion (e.g. slow dissolution of a compound from a repository, radioactive decay, and/or build up of daughter products), and possible time dependent variations in the effective dispersion into account. The diffusion equation is solved by a finite difference implicite method, the resulting trigonal matrix equation being solved by standard methods. (author)
A program for the numerical control of a pulse increment system
Energy Technology Data Exchange (ETDEWEB)
Gray, D.C.
1963-08-21
This report will describe the important features of the development of magnetic tapes for the numerical control of a pulse-increment system consisting of a modified Gorton lathe and its associated control unit developed by L. E. Foley of Equipment Development Service, Engineering Services, General Electric Co., Schenectady, N.Y. Included is a description of CUPID (Control and Utilization of Pulse Increment Devices), a FORTRAN program for the design of these tapes on the IBM 7090 computer, and instructions for its operation.
Programs and subroutines for calculating cadmium body burdens based on a one-compartment model
International Nuclear Information System (INIS)
Robinson, C.V.; Novak, K.M.
1980-08-01
A pair of FORTRAN programs for calculating the body burden of cadmium as a function of age is presented, together with a discussion of the assumptions which serve to specify the underlying, one-compartment model. Account is taken of the contributions to the body burden from food, from ambient air, from smoking, and from occupational inhalation. The output is a set of values for ages from birth to 90 years which is either longitudinal (for a given year of birth) or cross-sectional (for a given calendar year), depending on the choice of input parameters
A visual user interface program, EGSWIN, for EGS4
International Nuclear Information System (INIS)
Qiu Rui; Li Junli; Wu Zhen
2005-01-01
To overcome the inconvenience and difficulty in using the EGS4 code by novice users, a visual user interface program, called the EGSWIN system, has been developed by the Monte Carlo Research Center of Tsinghua University in China. EGSWIN allows users to run EGS4 for many applications without any user coding. A mixed-language programming technique with Visual C++ and Visual Fortran is used in order to embed both EGS4 and PEGS4 into EGSWIN. The system has the features of visual geometry input, geometry processing, visual definitions of source, scoring and computing parameters, and particle trajectories display. Comparison between the calculated results with EGS4 and EGSWIN, as well as with FLUKA and GEANT, has been made to validate EGSWIN. (author)
Final Report: Center for Programming Models for Scalable Parallel Computing
Energy Technology Data Exchange (ETDEWEB)
Mellor-Crummey, John [William Marsh Rice University
2011-09-13
As part of the Center for Programming Models for Scalable Parallel Computing, Rice University collaborated with project partners in the design, development and deployment of language, compiler, and runtime support for parallel programming models to support application development for the “leadership-class” computer systems at DOE national laboratories. Work over the course of this project has focused on the design, implementation, and evaluation of a second-generation version of Coarray Fortran. Research and development efforts of the project have focused on the CAF 2.0 language, compiler, runtime system, and supporting infrastructure. This has involved working with the teams that provide infrastructure for CAF that we rely on, implementing new language and runtime features, producing an open source compiler that enabled us to evaluate our ideas, and evaluating our design and implementation through the use of benchmarks. The report details the research, development, findings, and conclusions from this work.
SOLVEX: a computer program for simulation of solvent extraction processes
International Nuclear Information System (INIS)
Scotten, W.C.
1975-09-01
SOLVEX is a FORTRAN IV computer program that simulates the dynamic behavior of solvent extraction processes conducted in mixer-settlers and centrifugal contactors. Two options permit terminating dynamic phases by time or by achieving steady state, and a third option permits artificial rapid close to steady state. Thus the program is well suited to multiple phases of dynamic problems and multiple input of steady state problems. Changes from the previous problem are the only inputs required for each succeeding problem. Distribution data can be supplied by two-variable third-power polynomial equations or by three-variable tables in any one of 16 different combinations involving phase concentrations or distribution coefficients (ratio of phase concentrations) or their logarithms
TEABAGS: computer programs for instrumental neutron activation analysis
Energy Technology Data Exchange (ETDEWEB)
Lindstrom, D J [Washington Univ., St. Louis, MO (USA); Korotev, R L [Washington Univ., St. Louis, MO (USA). McDonnell Center for the Space Sciences
1982-01-01
Described is a series of INAA data reduction programs collectively known as TEABAGS (Trace Element Analysis By Automated Gamma-ray Spectrometry). The programs are written in FORTRAN and run on a Nuclear Data ND-6620 computer system, but should be adaptable to any medium-sized minicomputer. They are designed to monitor the status of all spectra obtained from samples and comparison standards irradiated together and to do all pending calculations without operator intervention. Major emphasis is placed on finding all peaks in the spectrum, properly identifying all nuclides present and all contributors to each peak, determining accurate estimates of the background continua under peaks, and producing realistic uncertainties on peak areas and final abundances.
Physical foundations, use instructions and applications of the Powderspec program
International Nuclear Information System (INIS)
Beltran L, V.; Gonzalez T, L.
1991-09-01
A simple FORTRAN program, called Powderspec, for simulating the second order powder patterns and the electron paramagnetic resonance (EPR) spectra of ions in an orthorhombic crystal field, or nuclear magnetic resonance (NMR) from a crystal with quadrupole interaction, is introduced. Powderspec can be used over the full range 0 to 1/3 of the orthorhombic field parameter λ = E/D, or that of the equivalent asymmetry parameter , η, 0 to 1, which is used in NMR work. This program is about 60 times faster than those based on the 'grid' or on the Monte Carlo methods. It also produces very smooth powder patterns and spectra capable of revealing fine spectral features. (Author)
URSULA2 computer program. Volume 3. User's manual. Final report
International Nuclear Information System (INIS)
Singhal, A.K.
1980-01-01
This report is intended to provide documentation for the users of the URSULA2 code so that they can appreciate its important features such as: code structure, flow chart, grid notations, coding style, usage of secondary storage and its interconnection with the input preparation program (Reference H3201/4). Subroutines and subprograms have been divided into four functional groups. The functions of all subroutines have been explained with particular emphasis on the control subroutine (MAIN) and the data input subroutine (BLOCK DATA). Computations for the flow situations similar to the reference case can be performed simply by making alterations in BLOCK DATA. Separate guides for the preparation of input data and for the interpretation of program output have been provided. Furthermore, two appendices; one for the URSULA2 listing and the second for the glossary of FORTRAN variables, are included to make this report self-sufficient
Practical parallel programming
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.
DEFF Research Database (Denmark)
Spanget-Larsen, Jens
2014-01-01
The LCOAO procedure predicts electronic transitions and MCD B-terms for conjugated organic compounds, see J. Spanget-Larsen, Theor. Chem. Acta 98, 137-153 (1997). This document contains the FORTRAN source code, with input and output for the PAH terrylene. Dr. Bjarke K. V. Hansen is acknowledged ...
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
A comparative study of programming languages for next-generation astrodynamics systems
Eichhorn, Helge; Cano, Juan Luis; McLean, Frazer; Anderl, Reiner
2018-03-01
Due to the computationally intensive nature of astrodynamics tasks, astrodynamicists have relied on compiled programming languages such as Fortran for the development of astrodynamics software. Interpreted languages such as Python, on the other hand, offer higher flexibility and development speed thereby increasing the productivity of the programmer. While interpreted languages are generally slower than compiled languages, recent developments such as just-in-time (JIT) compilers or transpilers have been able to close this speed gap significantly. Another important factor for the usefulness of a programming language is its wider ecosystem which consists of the available open-source packages and development tools such as integrated development environments or debuggers. This study compares three compiled languages and three interpreted languages, which were selected based on their popularity within the scientific programming community and technical merit. The three compiled candidate languages are Fortran, C++, and Java. Python, Matlab, and Julia were selected as the interpreted candidate languages. All six languages are assessed and compared to each other based on their features, performance, and ease-of-use through the implementation of idiomatic solutions to classical astrodynamics problems. We show that compiled languages still provide the best performance for astrodynamics applications, but JIT-compiled dynamic languages have reached a competitive level of speed and offer an attractive compromise between numerical performance and programmer productivity.
Critic: a new program for the topological analysis of solid-state electron densities
Otero-de-la-Roza, A.; Blanco, M. A.; Pendás, A. Martín; Luaña, Víctor
2009-01-01
In this paper we introduce CRITIC, a new program for the topological analysis of the electron densities of crystalline solids. Two different versions of the code are provided, one adapted to the LAPW (Linear Augmented Plane Wave) density calculated by the WIEN2K package and the other to the ab initio Perturbed Ion ( aiPI) density calculated with the PI7 code. Using the converged ground state densities, CRITIC can locate their critical points, determine atomic basins and integrate properties within them, and generate several graphical representations which include topological atomic basins and primary bundles, contour maps of ρ and ∇ρ, vector maps of ∇ρ, chemical graphs, etc. Program summaryProgram title: CRITIC Catalogue identifier: AECB_v1_0 Program summary URL:http://cpc.cs.qub.ac.uk/summaries/AECB_v1_0.html Program obtainable from: CPC Program Library, Queen's University, Belfast, N. Ireland Licensing provisions: GPL, version 3 No. of lines in distributed program, including test data, etc.: 1 206 843 No. of bytes in distributed program, including test data, etc.: 12 648 065 Distribution format: tar.gz Programming language: FORTRAN 77 and 90 Computer: Any computer capable of compiling Fortran Operating system: Unix, GNU/Linux Classification: 7.3 Nature of problem: Topological analysis of the electron density in periodic solids. Solution method: The automatic localization of the electron density critical points is based on a recursive partitioning of the Wigner-Seitz cell into tetrahedra followed by a Newton search from significant points on each tetrahedra. Plotting of and integration on the atomic basins is currently based on a new implementation of Keith's promega algorithm. Running time: Variable, depending on the task. From seconds to a few minutes for the localization of critical points. Hours to days for the determination of the atomic basins shape and properties. Times correspond to a typical 2007 PC.
DATASPACE - A PROGRAM FOR THE LOGARITHMIC INTERPOLATION OF TEST DATA
Ledbetter, F. E.
1994-01-01
Scientists and engineers work with the reduction, analysis, and manipulation of data. In many instances, the recorded data must meet certain requirements before standard numerical techniques may be used to interpret it. For example, the analysis of a linear visoelastic material requires knowledge of one of two time-dependent properties, the stress relaxation modulus E(t) or the creep compliance D(t), one of which may be derived from the other by a numerical method if the recorded data points are evenly spaced or increasingly spaced with respect to the time coordinate. The problem is that most laboratory data are variably spaced, making the use of numerical techniques difficult. To ease this difficulty in the case of stress relaxation data analysis, NASA scientists developed DATASPACE (A Program for the Logarithmic Interpolation of Test Data), to establish a logarithmically increasing time interval in the relaxation data. The program is generally applicable to any situation in which a data set needs increasingly spaced abscissa values. DATASPACE first takes the logarithm of the abscissa values, then uses a cubic spline interpolation routine (which minimizes interpolation error) to create an evenly spaced array from the log values. This array is returned from the log abscissa domain to the abscissa domain and written to an output file for further manipulation. As a result of the interpolation in the log abscissa domain, the data is increasingly spaced. In the case of stress relaxation data, the array is closely spaced at short times and widely spaced at long times, thus avoiding the distortion inherent in evenly spaced time coordinates. The interpolation routine gives results which compare favorably with the recorded data. The experimental data curve is retained and the interpolated points reflect the desired spacing. DATASPACE is written in FORTRAN 77 for IBM PC compatibles with a math co-processor running MS-DOS and Apple Macintosh computers running MacOS. With
TEMP-M program for thermal-hydraulic calculation of fast reactor fuel assemblies
International Nuclear Information System (INIS)
Bogoslovskaya, C.P.; Sorokin, A.P.; Tikhomirov, B.B.; Titov, P.A.; Ushakov, P.A.
1983-01-01
TEMP-M program (Fortran, BESM-6 computer) for thermal-hydraulic calculation of fast reactor fuel assemblies is described. Results of calculation of temperature field in a 127 fuel element assembly of BN-600, reactor accomplished according to TEMP-N program are considered as an example. Algorithm, realized in the program, enables to calculate the distributions of coolant heating, fuel element temperature (over perimeter and length) and assembly shell temperature. The distribution of coolant heating in assembly channels is determined from a solution of the balance equation system which accounts for interchannel exchange, nonadiabatic conditions on the assembly shell. The TEMP-M program gives necessary information for calculation of strength, seviceability of fast reactor core elements, serves an effective instrument for calculations when projecting reactor cores and analyzing thermal-hydraulic characteristics of operating reactor fuel assemblies
Solving inverse problems with the unfolding program TRUEE: Examples in astroparticle physics
International Nuclear Information System (INIS)
Milke, N.; Doert, M.; Klepser, S.; Mazin, D.; Blobel, V.; Rhode, W.
2013-01-01
The unfolding program TRUEE is a software package for the numerical solution of inverse problems. The algorithm was first applied in the FORTRAN 77 program RUN. RUN is an event-based unfolding algorithm which makes use of the Tikhonov regularization. It has been tested and compared to different unfolding applications and stood out with notably stable results and reliable error estimation. TRUEE is a conversion of RUN to C++, which works within the powerful ROOT framework. The program has been extended for more user-friendliness and delivers unfolding results which are identical to RUN. Beside the simplicity of the installation of the software and the generation of graphics, there are new functions, which facilitate the choice of unfolding parameters and observables for the user. In this paper, we introduce the new unfolding program and present its performance by applying it to two exemplary data sets from astroparticle physics, taken with the MAGIC telescopes and the IceCube neutrino detector, respectively.
Geochemical modelling. Column 2: a computer program for simulation of migration
International Nuclear Information System (INIS)
Nielsen, O.J.; Carlsen, L.; Bo, P.
1985-01-01
COLUMN2 is a 1D FORTRAN77 computer program designed for studies of the effects of various physicochemical processes on migration. It solves the solute transport equation and can take into account dispersion, sorption, ion exchange, first and second order homogeneous chemical reactions. Spatial variations of input pulses and retention factors are possible. The method of solution is based on a finite difference discretion followed by the application of the method of characteristics and two separate grid systems. This report explains the mathematical and numerical methods used, describes the necessary input, contains a number of test examples, provides a listing of the program and explains how to acquire the program, adapt it to other computers and run it. This report serves as a manual for the program
Use of the PASKAL' language for programming in experiment automation systems
International Nuclear Information System (INIS)
Ostrovnoj, A.I.
1985-01-01
A complex of standard solutions intended for realization of the main functions is suggested; execution of these solutions is provided by any system for experiment automation. They include: recording and accumulation of experimental data; visualization and preliminary processing of incoming data, interaction with the operator and system control; data filing. It is advisable to use standard software, to represent data processing algorithms as parallel processes, to apply the PASCAL' language for programming. Programming using CAMAC equipment is provided by complex of procedures similar to the set of subprograms in the FORTRAN language. Utilization of a simple data file in accumulation and processing programs ensures unified representation of experimental data and uniform access to them on behalf of a large number of programs operating both on-line and off-line regimes. The suggested approach is realized when developing systems on the base of the SM-3, SM-4 and MERA-60 computers with RAFOS operating system
GENLPLOT: An interactive program for display and analysis of data: User's manual
International Nuclear Information System (INIS)
Sullivan, J.D.; Grisar, C.C.
1987-08-01
GENLPLOT is an interactive program written in FORTRAN and running under VAX/VMS that enables technicians, scientists, engineers, and other users to quickly and accurately examine and analyze data. The current version utilizes the GRAPAC4 plot package, reads a standard input file or permits direct data entry, and is optimized for use with data stored in MDS databases. This program has been the principal interactive data analysis tool used on the Tara Tandem Mirror Experiment and on the Constance II Mirror Experiment. The program is menu driven with options selected on command lines distinguished by various prompts. Subsequent changes and additions to the program will be indicated by a version number greater than that appearing in the welcome message and will be documented in the appropriate menu(s)
Real time programming environment for Windows
Energy Technology Data Exchange (ETDEWEB)
LaBelle, D.R. [LaBelle (Dennis R.), Clifton Park, NY (United States)
1998-04-01
This document provides a description of the Real Time Programming Environment (RTProE). RTProE tools allow a programmer to create soft real time projects under general, multi-purpose operating systems. The basic features necessary for real time applications are provided by RTProE, leaving the programmer free to concentrate efforts on his specific project. The current version supports Microsoft Windows{trademark} 95 and NT. The tasks of real time synchronization and communication with other programs are handled by RTProE. RTProE includes a generic method for connecting a graphical user interface (GUI) to allow real time control and interaction with the programmer`s product. Topics covered in this paper include real time performance issues, portability, details of shared memory management, code scheduling, application control, Operating System specific concerns and the use of Computer Aided Software Engineering (CASE) tools. The development of RTProE is an important step in the expansion of the real time programming community. The financial costs associated with using the system are minimal. All source code for RTProE has been made publicly available. Any person with access to a personal computer, Windows 95 or NT, and C or FORTRAN compilers can quickly enter the world of real time modeling and simulation.
Integration of the TNXYZ computer program inside the platform Salome
International Nuclear Information System (INIS)
Chaparro V, F. J.
2014-01-01
The present work shows the procedure carried out to integrate the code TNXYZ as a calculation tool at the graphical simulation platform Salome. The TNXYZ code propose a numerical solution of the neutron transport equation, in several groups of energy, steady-state and three-dimensional geometry. In order to discretized the variables of the transport equation, the code uses the method of discrete ordinates for the angular variable, and a nodal method for the spatial dependence. The Salome platform is a graphical environment designed for building, editing and simulating mechanical models mainly focused on the industry and unlike other software, in order to form a complete scheme of pre and post processing of information, to integrate and control an external source code. Before the integration the in the Salome platform TNXYZ code was upgraded. TNXYZ was programmed in the 90s using Fortran 77 compiler; for this reason the code was adapted to the characteristics of the current Fortran compilers; in addition, with the intention of extracting partial results over the process sequence, the original structure of the program underwent a modularization process, i.e. the main program was divided into sections where the code performs major operations. This procedure is controlled by the information module (YACS) on Salome platform, and it could be useful for a subsequent coupling with thermal-hydraulics codes. Finally, with the help of the Monte Carlo code Serpent several study cases were defined in order to check the process of integration; the verification process consisted in performing a comparison of the results obtained with the code executed as stand-alone and after modernized, integrated and controlled by the Salome platform. (Author)
International Nuclear Information System (INIS)
Luo, B.; Li, J.B.; Huang, G.H.; Li, H.L.
2006-01-01
This study presents a simulation-based interval two-stage stochastic programming (SITSP) model for agricultural nonpoint source (NPS) pollution control through land retirement under uncertain conditions. The modeling framework was established by the development of an interval two-stage stochastic program, with its random parameters being provided by the statistical analysis of the simulation outcomes of a distributed water quality approach. The developed model can deal with the tradeoff between agricultural revenue and 'off-site' water quality concern under random effluent discharge for a land retirement scheme through minimizing the expected value of long-term total economic and environmental cost. In addition, the uncertainties presented as interval numbers in the agriculture-water system can be effectively quantified with the interval programming. By subdividing the whole agricultural watershed into different zones, the most pollution-related sensitive cropland can be identified and an optimal land retirement scheme can be obtained through the modeling approach. The developed method was applied to the Swift Current Creek watershed in Canada for soil erosion control through land retirement. The Hydrological Simulation Program-FORTRAN (HSPF) was used to simulate the sediment information for this case study. Obtained results indicate that the total economic and environmental cost of the entire agriculture-water system can be limited within an interval value for the optimal land retirement schemes. Meanwhile, a best and worst land retirement scheme was obtained for the study watershed under various uncertainties