!MATERIAL¶

सामग्री के भौतिक गुणों की परिभाषा

यदि कोई भौतिक गुण तापमान-निर्भर हो, तो संबंधित प्रत्येक तापमान के लिए तालिका इनपुट दिया जा सकता है।

पहली पंक्ति

!MATERIAL, NAME=<name> [, optional parameter]

पैरामीटर
`NAME`	सामग्री नाम (आवश्यक)
`ITEM`	भौतिक गुण मदों की संख्या (वैकल्पिक; छोड़े जाने पर "1")
`INPUT`	बाहरी फ़ाइल नाम (वैकल्पिक)

पैरामीटर नाम	पैरामीटर मान	विवरण
`NAME`	<name>	सामग्री नाम
`ITEM`	<ITEMnum>	उपयोगकर्ता-परिभाषित भौतिक गुण मदों की संख्या
`INPUT`	<filename>	बाहरी फ़ाइल नाम (वैकल्पिक); दूसरी और बाद की पंक्तियों के साथ भी उपयोग किया जा सकता है

दूसरी और बाद की पंक्तियाँ

(दूसरी पंक्ति) !ITEM=1, SUBITEM=<k>
(तीसरी पंक्ति) VAL1-1-1, VAL1-1-2, … VAL1-1-k, TEMP1-1
(चौथी पंक्ति) 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	भौतिक गुण मान (तापमान-निर्भर नहीं)

Note:

सामग्री नाम दोहराए जाने पर त्रुटि होती है।

यदि !SECTION विकल्प द्वारा संदर्भित MATERIAL परिभाषित न हो, तो त्रुटि होती है।

यदि !ELEMENT विकल्प के MATITEM पैरामीटर का उपयोग करके प्रत्येक एलिमेंट के लिए भौतिक गुण दर्ज किए गए हों, तो वे मान प्राथमिकता से उपयोग होते हैं। इस स्थिति में !MATERIAL विकल्प से दर्ज भौतिक गुण मान उपयोग नहीं होते।

यदि !ITEM=m उप-विकल्पों की संख्या ITEM पैरामीटर में निर्दिष्ट संख्या से मेल न खाए, या कोई उप-विकल्प अपरिभाषित हो, तो त्रुटि होती है।

!ITEM=m उप-विकल्पों को बढ़ते m के क्रम में रखना आवश्यक नहीं है।

SUBITEM=k उप-विकल्प और तापमान निर्भरता का उपयोग करते समय छोड़े गए मान "0.0" हो जाते हैं।

तापमान निर्भरता का उपयोग करते समय परिभाषाएँ तापमान के आरोही क्रम में दी जानी चाहिए।

तापमान निर्भरता का उपयोग करते समय एक ही तापमान दो या अधिक बार देने पर त्रुटि होती है।

उदाहरण

!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>-----Young मापांक (आवश्यक) <Poisson_ratio>-------Poisson अनुपात (आवश्यक) <Density>--------------द्रव्यमान घनत्व (ITEMnum=2 होने पर आवश्यक) < Expansion_coeff >--रैखिक तापीय प्रसार गुणांक (ITEMnum=3 होने पर)

(उदाहरण)

!MATERIAL, NAME=M1,
ITEM=3                   --- सामग्री M1 के लिए तीन प्रकार के गुण मान परिभाषित करता है
!ITEM=1, SUBITEM=2       --- !ITEM=1 में Young मापांक और Poisson अनुपात परिभाषित करता है (आवश्यक)
4000.0, 0.3
!ITEM=2                  --- !ITEM=2 में द्रव्यमान घनत्व परिभाषित करता है (ITEM=2 होने पर आवश्यक)
8.0102E-0
!ITEM=3                  --- !ITEM=3 में रैखिक तापीय प्रसार गुणांक परिभाषित करता है
1.0E-5

Note:

मोडल विश्लेषण में तापमान-निर्भर सामग्री का उपयोग नहीं किया जा सकता।

ऊष्मा चालन विश्लेषण¶

लिंक, समतल, ठोस और त्रि-आयामी प्लेट एलिमेंटों के लिए

!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 के लिए तीन प्रकार के गुण मान परिभाषित करता है

!ITEM=1, SUBITEM=１　 　 ---　!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

संदर्भ¶

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