Translation update pending

The Kannada translation may be out of date because the Japanese source has changed. The existing translation remains available while it is being updated.

!MATERIAL¶

ವಸ್ತು ಗುಣಲಕ್ಷಣಗಳ ವ್ಯಾಖ್ಯಾನ

ವಸ್ತು ಗುಣಲಕ್ಷಣಗಳು ತಾಪಮಾನಾಧಾರಿತವಾಗಿದ್ದರೆ, ಸಂಬಂಧಿತ ಪ್ರತಿಯೊಂದು ತಾಪಮಾನಕ್ಕೆ ಕೋಷ್ಟಕ ರೂಪದಲ್ಲಿ ಇನ್‌ಪುಟ್ ನೀಡಬಹುದು.

1ನೇ ಸಾಲು

!MATERIAL, NAME=<name> [, ಐಚ್ಛಿಕ ಪರಿಮಿತಿ]

ಪರಿಮಿತಿ
`NAME`	ವಸ್ತುವಿನ ಹೆಸರು (ಕಡ್ಡಾಯ)
`ITEM`	ವಸ್ತು ಗುಣಲಕ್ಷಣ ಅಂಶಗಳ ಸಂಖ್ಯೆ (ಐಚ್ಛಿಕ; ಬಿಟ್ಟರೆ "1" ಆಗುತ್ತದೆ)
`INPUT`	ಬಾಹ್ಯ ಫೈಲ್ ಹೆಸರು (ಐಚ್ಛಿಕ)

ಪರಿಮಿತಿ ಹೆಸರು	ಪರಿಮಿತಿ ಮೌಲ್ಯ	ವಿವರಣೆ
`NAME`	<name>	ವಸ್ತುವಿನ ಹೆಸರು
`ITEM`	<ITEMnum>	ಬಳಕೆದಾರ ವ್ಯಾಖ್ಯಾನಿಸಿದ ವಸ್ತು ಗುಣಲಕ್ಷಣ ಅಂಶಗಳ ಸಂಖ್ಯೆ
`INPUT`	<filename>	ಬಾಹ್ಯ ಫೈಲ್ ಹೆಸರು (ಐಚ್ಛಿಕ); 2ನೇ ಹಾಗೂ ನಂತರದ ಸಾಲುಗಳ ಜೊತೆಯಲ್ಲಿಯೂ ಬಳಸಬಹುದು

2ನೇ ಮತ್ತು ನಂತರದ ಸಾಲುಗಳು

(2ನೇ ಸಾಲು) !ITEM=1, SUBITEM=<k>
(3ನೇ ಸಾಲು) VAL1-1-1, VAL1-1-2, … VAL1-1-k, TEMP1-1
(4ನೇ ಸಾಲು) VAL1-2-1, VAL1-2-2, … VAL1-2-k, TEMP1-2
・・

(L+2ನೇ ಸಾಲು)VAL1-L-1, VAL1-L-2, … VAL1-L-k, TEMP1-L

ಕೆಳಗೆ "!ITEM=<ITEMnum>" ವರೆಗೆ ವ್ಯಾಖ್ಯಾನವನ್ನು ಪುನರಾವರ್ತಿಸಿ

ಉಪಪರಿಮಿತಿ (`!ITEM` ಗೆ ಸಂಬಂಧಿಸಿದುದು)
`SUBITEM`	ಪ್ರತಿಯೊಂದು ವಸ್ತು ಗುಣಲಕ್ಷಣ ಅಂಶದಲ್ಲಿ ವ್ಯಾಖ್ಯಾನಿಸಲಾದ ಉಪಗುಣಲಕ್ಷಣ ಅಂಶಗಳ ಸಂಖ್ಯೆ
	(ಐಚ್ಛಿಕ; ಬಿಟ್ಟರೆ "1" ಆಗುತ್ತದೆ.)

ಉಪಪರಿಮಿತಿ ಹೆಸರು	ಪರಿಮಿತಿ ಮೌಲ್ಯ	ವಿವರಣೆ
`SUBITEM`	<subITEMnum>	ಬಳಕೆದಾರ ವ್ಯಾಖ್ಯಾನಿಸಿದ ಉಪಗುಣಲಕ್ಷಣ ಅಂಶಗಳ ಸಂಖ್ಯೆ

(mನೇ ವಸ್ತು ಗುಣಲಕ್ಷಣವು ತಾಪಮಾನಾಧಾರಿತವಾಗಿರುವಾಗ)

ತಾಪಮಾನಾಧಾರಿತ ಕೋಷ್ಟಕದ ಅಂಶಗಳ ಸಂಖ್ಯೆ N ಆಗಿದ್ದರೆ, ಕೆಳಗಿನಂತೆ ಇನ್‌ಪುಟ್ ನೀಡಿ:

!ITEM=m, SUBITEM=k
VALm1-1, ..., VALm1-k, TEMPm1
VALm2-1, ..., VALm2-k, TEMPm2
...
VALmN-1, ..., VALmN-k, TEMPm-N

ಚರದ ಹೆಸರು	ಗುಣಧರ್ಮ	ವಿವರಣೆ
VALmn-k	R	ವಸ್ತು ಗುಣಲಕ್ಷಣದ ಮೌಲ್ಯ (ತಾಪಮಾನಾಧಾರಿತ)
TEMPmn	R	ಸಂಬಂಧಿತ ತಾಪಮಾನ

TEMPm1 < TEMPm2 < ... < TEMPmN ಆಗಿರಬೇಕು.

ತಾಪಮಾನವು TEMPm1 ಕ್ಕಿಂತ ಕಡಿಮೆ ಅಥವಾ ಸಮನಾಗಿದ್ದರೆ VALm1 ಅನ್ನು, TEMPmN ಕ್ಕಿಂತ ಹೆಚ್ಚು ಅಥವಾ ಸಮನಾಗಿದ್ದರೆ VALmN ಅನ್ನು ಬಳಸಲಾಗುತ್ತದೆ.

(mನೇ ವಸ್ತು ಗುಣಲಕ್ಷಣವು ತಾಪಮಾನಾಧಾರಿತವಾಗಿಲ್ಲದಾಗ)

!ITEM=m, SUBITEM=k
VALm1-1, ..., VALm1-k
VALm2-1, ..., VALm2-k
...
VALmN-1, ..., VALmN-k

ಚರದ ಹೆಸರು	ಗುಣಧರ್ಮ	ವಿವರಣೆ
VALmn-k	R	ವಸ್ತು ಗುಣಲಕ್ಷಣದ ಮೌಲ್ಯ (ತಾಪಮಾನಾಧಾರಿತವಲ್ಲ)

ಗಮನಿಸಿ:

ವಸ್ತುವಿನ ಹೆಸರುಗಳು ನಕಲಾಗಿದ್ದರೆ ದೋಷ ಉಂಟಾಗುತ್ತದೆ.

!SECTION ಆಯ್ಕೆಯಲ್ಲಿ ಉಲ್ಲೇಖಿಸಲಾದ MATERIAL ಅನ್ನು ವ್ಯಾಖ್ಯಾನಿಸದಿದ್ದರೆ ದೋಷ ಉಂಟಾಗುತ್ತದೆ.

!ELEMENT ಆಯ್ಕೆಯಲ್ಲಿ MATITEM ಪರಿಮಿತಿಯನ್ನು ಬಳಸಿ ಪ್ರತಿಯೊಂದು ಅಂಶಕ್ಕೆ ವಸ್ತು ಗುಣಲಕ್ಷಣಗಳನ್ನು ಇನ್‌ಪುಟ್ ಮಾಡಿದರೆ, ಆ ಮೌಲ್ಯಗಳಿಗೆ ಆದ್ಯತೆ ನೀಡಲಾಗುತ್ತದೆ. ಈ ಸಂದರ್ಭದಲ್ಲಿ !MATERIAL ಆಯ್ಕೆಯಿಂದ ಇನ್‌ಪುಟ್ ಮಾಡಿದ ವಸ್ತು ಗುಣಲಕ್ಷಣ ಮೌಲ್ಯಗಳನ್ನು ಬಳಸಲಾಗುವುದಿಲ್ಲ.

!ITEM=m ಉಪಆಯ್ಕೆಗಳ ಸಂಖ್ಯೆ ಮತ್ತು ITEM ಪರಿಮಿತಿಯ ಸಂಖ್ಯೆ ಹೊಂದಿಕೆಯಾಗದಿದ್ದರೆ, ಅಥವಾ ವ್ಯಾಖ್ಯಾನಿಸದ ಉಪಆಯ್ಕೆ ಇದ್ದರೆ ದೋಷ ಉಂಟಾಗುತ್ತದೆ.

!ITEM=m ಉಪಆಯ್ಕೆಗಳನ್ನು m ನ ಚಿಕ್ಕ ಮೌಲ್ಯದಿಂದ ದೊಡ್ಡ ಮೌಲ್ಯದ ಕ್ರಮದಲ್ಲೇ ಜೋಡಿಸಬೇಕೆಂಬ ಅಗತ್ಯವಿಲ್ಲ.

SUBITEM=k ಉಪಆಯ್ಕೆ ಮತ್ತು ತಾಪಮಾನ ಅವಲಂಬಿತತೆಯನ್ನು ಬಳಸುವಾಗ, ಬಿಟ್ಟಿರುವ ಮೌಲ್ಯವು "0.0" ಆಗುತ್ತದೆ.

ತಾಪಮಾನ ಅವಲಂಬಿತತೆಯನ್ನು ಬಳಸುವಾಗ, ಕಡಿಮೆ ತಾಪಮಾನದಿಂದ ಹೆಚ್ಚಿನ ತಾಪಮಾನಕ್ಕೆ ಕ್ರಮವಾಗಿ ವ್ಯಾಖ್ಯಾನಿಸಬೇಕು.

ತಾಪಮಾನ ಅವಲಂಬಿತತೆಯನ್ನು ಬಳಸುವಾಗ, ಒಂದೇ ತಾಪಮಾನವನ್ನು 2 ಬಾರಿ ಅಥವಾ ಹೆಚ್ಚು ಬಳಸಿದರೆ ದೋಷ ಉಂಟಾಗುತ್ತದೆ.

ಬಳಕೆಯ ಉದಾಹರಣೆ

!MATERIAL, NAME= STEEL, ITEM= 2
!ITEM=1 ತಾಪಮಾನ ಅವಲಂಬಿತತೆ ಇಲ್ಲ
35.0
!ITEM=2
40.0, 0.0
45.0, 100.0
50.0, 200.0

!MATERIAL, NAME= COPPER         ಅಂಶಗಳ ಸಂಖ್ಯೆ = 1 (ಡೀಫಾಲ್ಟ್ ಮೌಲ್ಯ)
!ITEM=1 ತಾಪಮಾನ ಅವಲಂಬಿತತೆ ಇಲ್ಲ
80.0

ತಪ್ಪಾದ ಬಳಕೆಯ ಉದಾಹರಣೆಗಳು

ಉದಾಹರಣೆ 1(ITEM ಪರಿಮಿತಿ ಮತ್ತು !ITEM=m ಉಪಆಯ್ಕೆಗಳ ಸಂಖ್ಯೆಗಳು ಹೊಂದಿಕೆಯಾಗುವುದಿಲ್ಲ -1)

!MATERIAL, NAME= STEEL, ITEM= 2
!ITEM=3
20.0
!ITEM=1
35.0
!ITEM= 2
40.0

ಉದಾಹರಣೆ 2(ITEM ಪರಿಮಿತಿ ಮತ್ತು !ITEM=m ಉಪಆಯ್ಕೆಗಳ ಸಂಖ್ಯೆಗಳು ಹೊಂದಿಕೆಯಾಗುವುದಿಲ್ಲ -2)

!MATERIAL, NAME= STEEL, ITEM= 3
!ITEM=3
20.0
!ITEM= 2
40.0
!MATERIAL, NAME= COPPER
...

ಸ್ಥಿತಿಸ್ಥಾಪಕ ಸ್ಥಿರ ವಿಶ್ಲೇಷಣೆ ಮತ್ತು ಮೋಡಲ್ ವಿಶ್ಲೇಷಣೆ¶

!MATERIAL, NAME=<name>, ITEM=<ITEMnum>
!ITEM=1, SUBITEM=2
<Young_modulus>, <Poisson_ratio>
!ITEM=2
<Density>
!ITEM=3
<Expansion_coeff>

ಪರಿಮಿತಿ ಹೆಸರು	ಪರಿಮಿತಿ ಮೌಲ್ಯ	ವಿವರಣೆ
NAME	<name>	ವಸ್ತುವಿನ ಹೆಸರು; !SECTION ನ MATERIAL ಗೆ ಹೊಂದುತ್ತದೆ
ITEM	<ITEMnum>	ಬಳಕೆದಾರ ವ್ಯಾಖ್ಯಾನಿಸಿದ ವಸ್ತು ಗುಣಲಕ್ಷಣ ಅಂಶಗಳ ಸಂಖ್ಯೆ (1 ಅಥವಾ ಹೆಚ್ಚು) <Young_modulus>-----ಯಂಗ್ ಮಾಡ್ಯುಲಸ್ (ಕಡ್ಡಾಯ) <Poisson_ratio>-------ಪಾಯ್ಸನ್ ಅನುಪಾತ (ಕಡ್ಡಾಯ) <Density>--------------ದ್ರವ್ಯರಾಶಿ ಸಾಂದ್ರತೆ (ITEMnum=2 ಆಗಿದ್ದರೆ ಕಡ್ಡಾಯ) < Expansion_coeff >--ರೇಖೀಯ ವಿಸ್ತರಣೆ ಗುಣಾಂಕ (ITEMnum=3 ಆಗಿದ್ದರೆ)

(ಉದಾಹರಣೆ)

!MATERIAL, NAME=M1,
ITEM=3                   --- ವಸ್ತು M1 ಗೆ 3 ವಿಧದ ಗುಣಲಕ್ಷಣ ಮೌಲ್ಯಗಳನ್ನು ವ್ಯಾಖ್ಯಾನಿಸುತ್ತದೆ
!ITEM=1, SUBITEM=2       --- !ITEM=1 ನಲ್ಲಿ ಯಂಗ್ ಮಾಡ್ಯುಲಸ್ ಮತ್ತು ಪಾಯ್ಸನ್ ಅನುಪಾತವನ್ನು ವ್ಯಾಖ್ಯಾನಿಸಲಾಗುತ್ತದೆ (ಕಡ್ಡಾಯ)
4000.0, 0.3
!ITEM=2                  --- !ITEM=2 ನಲ್ಲಿ ದ್ರವ್ಯರಾಶಿ ಸಾಂದ್ರತೆಯನ್ನು ವ್ಯಾಖ್ಯಾನಿಸಬೇಕು (ITEM=2 ಆಗಿದ್ದರೆ ಕಡ್ಡಾಯ)
8.0102E-0
!ITEM=3                  --- !ITEM=3 ನಲ್ಲಿ ರೇಖೀಯ ವಿಸ್ತರಣೆ ಗುಣಾಂಕವನ್ನು ವ್ಯಾಖ್ಯಾನಿಸಬೇಕು
1.0E-5

ಗಮನಿಸಿ:

ಮೋಡಲ್ ವಿಶ್ಲೇಷಣೆಯಲ್ಲಿ ತಾಪಮಾನಾಧಾರಿತ ವಸ್ತುಗಳನ್ನು ಬಳಸಲಾಗುವುದಿಲ್ಲ.

ಉಷ್ಣ ವಹನ ವಿಶ್ಲೇಷಣೆ¶

ಲಿಂಕ್, ಸಮತಲ, ಘನ ಮತ್ತು 3-ಆಯಾಮದ ಪ್ಲೇಟ್ ಅಂಶಗಳಿಗಾಗಿ

!MATERIAL, NAME=<name>, ITEM=3
!ITEM=1, SUBITEM=2
<Density>, <Temperature>

!ITEM=2, SUBITEM=2
<Specific_heat>, <Temperature>

!ITEM=3, SUBITEM=2
<Conductivity>, <Temperature>

ಪರಿಮಿತಿ ಹೆಸರು	ಪರಿಮಿತಿ ಮೌಲ್ಯ	ವಿವರಣೆ
`NAME`	<name>	ವಸ್ತುವಿನ ಹೆಸರು; !SECTION ನ MATERIAL ಗೆ ಹೊಂದುತ್ತದೆ
`ITEM`	<ITEMnum>	ಬಳಕೆದಾರ ವ್ಯಾಖ್ಯಾನಿಸಿದ ವಸ್ತು ಗುಣಲಕ್ಷಣ ಅಂಶಗಳ ಸಂಖ್ಯೆ (ಯಾವಾಗಲೂ 3) <Density>----------ಸಾಂದ್ರತೆ <Specific_heat>----ವಿಶಿಷ್ಟ ಉಷ್ಣ <Conductivity>-----ಉಷ್ಣ ವಾಹಕತೆ <Temperature>------ತಾಪಮಾನ

(ಉದಾಹರಣೆ)

!MATERIAL, NAME=M1,
ITEM=3                   ---　ವಸ್ತು M1 ಗೆ 3 ವಿಧದ ಗುಣಲಕ್ಷಣ ಮೌಲ್ಯಗಳನ್ನು ವ್ಯಾಖ್ಯಾನಿಸುತ್ತದೆ

!ITEM=1, SUBITEM=1       ---　!ITEM=1 ನಲ್ಲಿ ಸಾಂದ್ರತೆ ಮತ್ತು ತಾಪಮಾನವನ್ನು ವ್ಯಾಖ್ಯಾನಿಸಲಾಗುತ್ತದೆ (ಕಡ್ಡಾಯ)
7850., 300.
7790., 500.
7700., 800.

!ITEM=2, SUBITEM=1       ---　!ITEM=2 ನಲ್ಲಿ ವಿಶಿಷ್ಟ ಉಷ್ಣ ಮತ್ತು ತಾಪಮಾನವನ್ನು ವ್ಯಾಖ್ಯಾನಿಸಲಾಗುತ್ತದೆ (ಕಡ್ಡಾಯ)
0.465, 300.
0.528, 500.
0.622, 800.

!ITEM=3                  ---　!ITEM=3 ನಲ್ಲಿ ಉಷ್ಣ ವಾಹಕತೆ ಮತ್ತು ತಾಪಮಾನವನ್ನು ವ್ಯಾಖ್ಯಾನಿಸಲಾಗುತ್ತದೆ (ಕಡ್ಡಾಯ)
43., 300.
38.6, 500.
27.7, 800.

ಇಂಟರ್ಫೇಸ್ ಅಂಶಗಳಿಗಾಗಿ

!SECTION ಹೆಡರ್‌ನಲ್ಲಿ ವ್ಯಾಖ್ಯಾನಿಸಿ. (ವಸ್ತು ಡೇಟಾ ಅಗತ್ಯವಿಲ್ಲ)

(ಉದಾಹರಣೆ)

!SECTION, TYPE=INTERFACE, EGRP=GAP   ---　ವಿಭಾಗದ ವ್ಯಾಖ್ಯಾನ
1.0, 20.15, 8.99835E-9, 8.99835E-9

ಮೇಲಿನ !SECTION ನಲ್ಲಿ, ಇಂಟರ್ಫೇಸ್ ಅಂಶಗಳಲ್ಲಿ ಗುಂಪಿನ ಹೆಸರು=GAP ಗೆ ಸೇರಿದ ಅಂಶಗಳ ಗ್ಯಾಪ್ ಪರಿಮಿತಿಗಳನ್ನು ವ್ಯಾಖ್ಯಾನಿಸಲಾಗಿದೆ.

1ನೇ ಪರಿಮಿತಿ: ಗ್ಯಾಪ್ ಅಗಲ
2ನೇ ಪರಿಮಿತಿ: ಗ್ಯಾಪ್ ಉಷ್ಣ ವರ್ಗಾವಣಾ ಗುಣಾಂಕ
3ನೇ ಪರಿಮಿತಿ: ಗ್ಯಾಪ್ ವಿಕಿರಣ ಗುಣಾಂಕ 1
4ನೇ ಪರಿಮಿತಿ: ಗ್ಯಾಪ್ ವಿಕಿರಣ ಗುಣಾಂಕ 2

ಉಲ್ಲೇಖ¶

program TEST
use hecmw
implicit REAL*8 (A-H,O-Z)
type (hecmwT_local_mesh) :: hecMESH

!C
!C    !MATERIAL, NAME=SUS304, ITEM=3
!C    !ITEM=1, SUBITEM= 3
!C      100.0, 200.0, 300.0, 0.00
!C      101.0, 210.0, 301.0, 1.00
!C      102.0, 220.0, 302.0, 2.00
!C      103.0, 230.0, 303.0, 3.00
!C    !ITEM=3, SUBITEM= 2
!C      1000.0, , 0.00
!C      1001.0, 1., 1.00
!C      1002.0, 2., 2.00
!C      1003.0, 3., 3.00
!C    !ITEM=2
!C      5000.0
!C
!C    !MATERIAL, NAME=FEC, ITEM=2
!C    !ITEM=1, SUBITEM= 3
!C      2100.0, 2200.0, 2300.0, 0.00
!C      2101.0, 2210.0, 2301.0, 1.00
!C      2102.0, 2220.0, 2302.0, 2.00
!C      2103.0, 2230.0, 2303.0, 3.00
!C      3103.0, 3230.0, 2304.0, 4.00
!C    !ITEM=2
!C      6000.0, 10.0
!C      6500.0, 30.0
!C

hecMESH%material%n_mat = 2

nn= hecMESH%material%n_mat
allocate (hecMESH%material%mat_name(nn))

hecMESH%material%mat_name(1)= 'SUS304'
hecMESH%material%mat_name(2)= 'FEC'

nn= hecMESH%material%n_mat
allocate (hecMESH%material%mat_ITEM_index(0:nn))
hecMESH%material%mat_ITEM_index(0)= 0
hecMESH%material%mat_ITEM_index(1)= 3
hecMESH%material%mat_ITEM_index(2)= hecMESH%material%mat_ITEM_index(1) + 2

hecMESH%material%n_mat_ITEM= hecMESH%material%mat_ITEM_index(hecMESH%material%n_mat)

nn= hecMESH%material%n_mat_ITEM
allocate (hecMESH%material%mat_subITEM_index(0:nn))

hecMESH%material%mat_subITEM_index(0)= 0
hecMESH%material%mat_subITEM_index(1)= 3
hecMESH%material%mat_subITEM_index(2)= hecMESH%material%mat_subITEM_index(1) + 1
hecMESH%material%mat_subITEM_index(3)= hecMESH%material%mat_subITEM_index(2) + 2
hecMESH%material%mat_subITEM_index(4)= hecMESH%material%mat_subITEM_index(3) + 3
hecMESH%material%mat_subITEM_index(5)= hecMESH%material%mat_subITEM_index(4) + 1

hecMESH%material%n_mat_subITEM=
&        hecMESH%material%mat_subITEM_index(hecMESH%material%n_mat_ITEM)

nn= hecMESH%material%n_mat_subITEM
allocate (hecMESH%material%mat_TABLE_index(0:nn))
hecMESH%material%mat_TABLE_index( 0)= 0
hecMESH%material%mat_TABLE_index( 1)= 4
hecMESH%material%mat_TABLE_index( 2)= hecMESH%material%mat_TABLE_index( 1) + 4
hecMESH%material%mat_TABLE_index( 3)= hecMESH%material%mat_TABLE_index( 2) + 4
hecMESH%material%mat_TABLE_index( 4)= hecMESH%material%mat_TABLE_index( 3) + 1
hecMESH%material%mat_TABLE_index( 5)= hecMESH%material%mat_TABLE_index( 4) + 4
hecMESH%material%mat_TABLE_index( 6)= hecMESH%material%mat_TABLE_index( 5) + 4
hecMESH%material%mat_TABLE_index( 7)= hecMESH%material%mat_TABLE_index( 6) + 5
hecMESH%material%mat_TABLE_index( 8)= hecMESH%material%mat_TABLE_index( 7) + 5
hecMESH%material%mat_TABLE_index( 9)= hecMESH%material%mat_TABLE_index( 8) + 5
hecMESH%material%mat_TABLE_index(10)= hecMESH%material%mat_TABLE_index( 9) + 2

hecMESH%material%n_mat_TABLE=
&        hecMESH%material%mat_TABLE_index(hecMESH%material%n_mat_subITEM)

nn= hecMESH%material%n_mat_TABLE
allocate (hecMESH%material%mat_VAL (nn))
allocate (hecMESH%material%mat_TEMP(nn))

hecMESH%material%mat_VAL = 0.d0
hecMESH%material%mat_TEMP= 0.d0

hecMESH%material%mat_VAL ( 1)= 100.0d0
hecMESH%material%mat_TEMP( 1)=   0.0d0
hecMESH%material%mat_VAL ( 2)= 101.0d0
hecMESH%material%mat_TEMP( 2)=   1.0d0
hecMESH%material%mat_VAL ( 3)= 102.0d0
hecMESH%material%mat_TEMP( 3)=   2.0d0
hecMESH%material%mat_VAL ( 4)= 103.0d0
hecMESH%material%mat_TEMP( 4)=   3.0d0

hecMESH%material%mat_VAL ( 5)= 200.0d0
hecMESH%material%mat_TEMP( 5)=   0.0d0

hecMESH%material%mat_VAL (13)= 5000.0d0

hecMESH%material%mat_VAL (14)= 1000.0d0
hecMESH%material%mat_TEMP (14)=   0.0d0
hecMESH%material%mat_VAL (15)= 1001.0d0
hecMESH%material%mat_TEMP (15)=   1.0d0
hecMESH%material%mat_VAL (16)= 1002.0d0
hecMESH%material%mat_TEMP (16)=   2.0d0
hecMESH%material%mat_VAL (17)= 1003.0d0
hecMESH%material%mat_TEMP (17)=   3.0d0

hecMESH%material%mat_VAL (18)=  0.0d0
hecMESH%material%mat_TEMP (18)= 0.0d0
hecMESH%material%mat_VAL (19)=  1.0d0
hecMESH%material%mat_TEMP (19)= 1.0d0
hecMESH%material%mat_VAL (20)=  2.0d0
hecMESH%material%mat_TEMP (20)= 2.0d0
hecMESH%material%mat_VAL (21)=  3.0d0
hecMESH%material%mat_TEMP (21)= 3.0d0

hecMESH%material%mat_VAL (22)= 2100.0d0
hecMESH%material%mat_TEMP (22)=   0.0d0
hecMESH%material%mat_VAL (23)= 2101.0d0
hecMESH%material%mat_TEMP (23)=   1.0d0
hecMESH%material%mat_VAL (24)= 2102.0d0
hecMESH%material%mat_TEMP (24)=   2.0d0
hecMESH%material%mat_VAL (25)= 2103.0d0
hecMESH%material%mat_TEMP (25)=   3.0d0
hecMESH%material%mat_VAL (26)= 3103.0d0
hecMESH%material%mat_TEMP (26)=   4.0d0

write (*,'(a,i10)') '%n_mat_ITEM ', hecMESH%material%n_mat_ITEM
write (*,'(a,i10)') '%n_mat_subITEM', hecMESH%material%n_mat_subITEM
write (*,'(a,i10)') '%n_mat_TABLE ', hecMESH%material%n_mat_TABLE

end program TEST