[MAP Logo]

Materials Algorithms Project
Program Library


Subroutine MAP_STEEL_DIFFRACT_AUSTENITE

  1. Provenance of code.
  2. Purpose of code.
  3. Specification.
  4. Description of subroutine's operation.
  5. References.
  6. Parameter descriptions.
  7. Error indicators.
  8. Accuracy estimate.
  9. Any additional information.
  10. Example of code
  11. Auxiliary subroutines required.
  12. Keywords.
  13. Download source code.
  14. Links.

Provenance of Source Code

Saurabh Kundu and H. K. D. H. Bhadeshia
Materials Science and Metallurgy, University of Cambridge, U. K.

E-mail: saurabhkn@yahoo.com

Added to MAP: May, 2007.

Top | Next

Purpose

Calculation of Debye X-ray diffraction rings for polycrystalline austenite. The sample may be textured.

Top | Next | Prev

Specification

Language: FORTRAN

Top | Next | Prev

Description

This program has the inputs consisting of the habit planes, displacement direction and the crystallographic orientation (gamma-J-alpha).

  1. Following the Bragg law expressed in reciprocal space, this program gives the diffraction rings due to polycrystalline austenite exposed to a beam of X-rays.
  2. Austenite may or may not be textured. The program takes this as input.
  3. The diffraction rings can indicate the crystallographic texture of the austenite
  4. The incident beam is assumed to be parallel to the Z-axis in the sample reference frame.
  5. The axis of stress in the austenite phase is assumed to be in the direction of X-axis in the sample reference frame.

Inputs when running the program

WHAT IS THE STARTING TEXTURE OF AUSTENITE:
0=RANDOM
1=COPPER
2=BRASS
3=GOSS
4=CUBE
5={110}<111>
6=MIXTURE
0
FOR (200) POLE FIG PUT 200 :
FOR (111) POLE FIG PUT 111 :
FOR (220) POLE FIG PUT 220 :
200
HOW MANY GRAINS?
1000

Name

difdfract.for

This is a source code of this program. For the execution, it needs to be compiled.
compile example :
g77 diffract.for -o name.out

Top | Next | Prev

References

Top | Next | Prev

Parameters

HABIT# - double precision array of dimension 24X3, # represents numbers.
Matrix that stores 24 habit planes.

DIRECTION# - Double precision array of dimension 24X3
Matrix that stores 24 displacement directions for 24 variants of martensite.

GM_J_AL# - Double precision array of dimension 72X3.
It contains 24 matrix representing orientation relationship between martensite and austenite, following Bowles and MacKenzie notation can be written as (gamma J alpha).

AL_J_GM# - Double precision array of dimension 72X3.
It contains 24 matrix representing orientation relationship between martensite and austenite, following Bowles and MacKenzie notation can be written as (alpha J gamma).

AL# - Double precision array of dimension 30X3.
It stores all the plane indices for plotting pole figure.

DEF_MAT# - Double precision array of dimension 3X3.
DEF_MAT# This matrix stores stress tensor of the applied stress in the crystal axis.

STRESS_TENSOR - Double precision array of dimension 3X3.
Matrix represents the stress tensor in trhe sample axis.

TRANS_MATRIX - Double precision array of dimension 3X3.
Rotational matrix represnting the orientation relationship between any austenite grain with the sample axis.

X_ST, Y_ST - DOUBLE PRECISION
X and Y corordinate of any point in the pole figure.

INS_BEAM# - double precision array of dimension 1X3, # represents numbers.
Store the incident beam vector.

DIFF_BEAM# - double precision array of dimension 1X3, # represents numbers.
Store the diffratced beam vector.

N# - double precision array of dimension 1X3, # represents numbers.
Store the vector for normal to the habit plane in reciprocal lattice space.

Top | Next | Prev

Error Indicators

None.

Top | Next | Prev

Accuracy

No information.

Top | Next | Prev

Further Comments

None.

Top | Next | Prev

Example

1. Program Compile

 g77 [sourcecode name] -o [executable file name]

2. Program menu

3. Program data


 Auto generated.

4. Program results

Top | Next | Prev

Auxiliary Routines

No auxiliary routines

Top | Next | Prev

Keywords

Transformation texture, martensite, stainless steels, crystallography

Top | Next | Prev

Download

Download source code

Top | Prev

MAP originated from a joint project of the National Physical Laboratory and the University of Cambridge.

Top | MAP Homepage