Materials Algorithms Project Program Library

Subroutine MAP_STEEL_TEXTURE2

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 orientation relationship matrices in a polycrystalline austenite sample with a texture. It is possible therefore, to mathematically create polycrystalline austenite containing a non-random crystallographic-distribution of grains. Examples are the Copper or Cube textured austenite.

Top | Next | Prev

Specification

 Language: FORTRAN

Top | Next | Prev

Description

The parallel directions in sample and crystal axes are taken as input in the program.

1. This program calculates the coordinate transformation matrices between two given reference frames.
2. the transformation matrix is obtained as MatB-J-MatA (GRAIN J SAMPLE).
3. This way orientation relationship matrix in a polycrystalline material can be obtained which has a bias, for example Cu or Cube texture.

Inputs when running the program

INPUT direction of crystal A (sample axis):
1 0 0
INPUT direction of crystal B (crystal axis) which is parallel to A:
0 0 1
INPUT direction of crystal A (sample axis):
0 0 1
INPUT direction of crystal B (crystal axis) which is parallel to A:
1 0 0
INPUT number of grains
500
Which pole you want to print: 100, 110 or 111
100
WHICH HEMISPHERE: UPPER = 1 LOWER = 0 BOTH = 2
0

Name

trans_plast_tensor.for

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

Top | Next | Prev

References

Top | Next | Prev

Parameters

MAT_A# - Double precision array of dimension 3X3.
MAT_B# - Double precision array of dimension 3X3.
IN_MATA# Double precision array of dimension 3X3.
CONV_MAT# Double precision array of dimension 3X3.
ROTATION_MAT# Double precision array of dimension 3X3.

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]
```

```

```

```
Auto generated.

```

4. Program results

```

```

Top | Next | Prev

Auxiliary Routines

No auxiliary routines

Top | Next | Prev

Keywords

Transformation strain, martensite, 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.