!MATERIAL¶

Materjaliomaduste määratlus

Kui materjaliomadused sõltuvad temperatuurist, saab need sisestada vastavate temperatuuride tabelina.

Esimene rida

!MATERIAL, NAME=<name> [, valikuline parameeter]

Parameeter
`NAME`	Materjali nimi (kohustuslik)
`ITEM`	Materjaliomaduste üksuste arv (valikuline; väljajätmisel vaikimisi "1")
`INPUT`	Välise faili nimi (valikuline)

Parameetri nimi	Parameetri väärtus	Kirjeldus
`NAME`	<name>	Materjali nimi
`ITEM`	<ITEMnum>	Kasutaja määratud materjaliomaduste üksuste arv
`INPUT`	<filename>	Välise faili nimi (valikuline); võib kasutada ka koos 2. ja järgnevate ridadega

Teine ja järgnevad read

(2. rida) !ITEM=1, SUBITEM=<k>
(3. rida) VAL1-1-1, VAL1-1-2, … VAL1-1-k, TEMP1-1
(4. rida) VAL1-2-1，VAL1-2-2, … VAL1-2-k, TEMP1-2
・・

(Rida L+2)VAL1-L-1，VAL1-L-2, … VAL1-L-k, TEMP1-L

Korrake definitsiooni kuni !ITEM=<ITEMnum>

Alamparameeter (`!ITEM` jaoks)
`SUBITEM`	Iga materjaliomaduse üksuse jaoks määratletud alamomaduste arv
	(valikuline; väljajätmisel vaikimisi "1")

Alamparameetri nimi	Parameetri väärtus	Kirjeldus
`SUBITEM`	<subITEMnum>	Kasutaja määratud alamomaduste arv

[Kui m-nda materjali omadus sõltub temperatuurist]

Kui temperatuurisõltuv tabel sisaldab N kirjet, sisestage need järgmiselt:

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

Muutuja nimi	Atribuut	Kirjeldus
VALmn-k	R	Materjaliomaduse väärtus (temperatuurist sõltuv)
TEMPmn	R	Vastav temperatuur

Peab kehtima TEMPm1 < TEMPm2 < ... < TEMPmN.

Kui temperatuur on TEMPm1 või madalam, kasutatakse VALm1; kui temperatuur on TEMPmN või kõrgem, kasutatakse VALmN.

[Kui m-nda materjali omadus ei sõltu temperatuurist]

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

Muutuja nimi	Atribuut	Kirjeldus
VALmn-k	R	Materjaliomaduse väärtus (temperatuurist sõltumatu)

Märkus:

Materjalinimede dubleerimine põhjustab vea.

Viga tekib, kui suvand !SECTION viitab määratlemata MATERIAL väärtusele.

Kui suvandis !ELEMENT sisestatakse iga elemendi materjaliomadused parameetriga MATITEM, on neil väärtustel prioriteet. Sel juhul suvandiga !MATERIAL sisestatud materjaliomadusi ei kasutata.

Viga tekib, kui alamvalikute !ITEM=m arv ei vasta parameetrile ITEM või kui alamvalik on määratlemata.

Alamvalikuid !ITEM=m ei pea järjestama m kasvavas järjekorras.

Kui kasutatakse alamvalikut SUBITEM=k ja temperatuurisõltuvust, seatakse väljajäetud väärtused väärtusele "0.0".

Temperatuurisõltuvuse kasutamisel tuleb definitsioonid anda temperatuuri kasvavas järjekorras.

Temperatuurisõltuvuse kasutamisel tekib viga, kui sama temperatuuri kasutatakse kaks või enam korda.

Kasutusnäide

!MATERIAL, NAME= STEEL, ITEM= 2
!ITEM=1 Temperatuurisõltuvus puudub
35.0
!ITEM=2
40.0, 0.0
45.0, 100.0
50.0, 200.0

!MATERIAL, NAME= COPPER         Üksuste arv = 1 (vaikeväärtus)
!ITEM=1 Temperatuurisõltuvus puudub
80.0

Vale kasutuse näited

Näide 1 [Parameetrite ITEM arv ja alamvalikute !ITEM=m arv ei vasta -1]

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

Näide 2 [ITEM parameetrite arv ja !ITEM=m alamvalikute arv ei vasta -2]

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

Lineaarne staatiline analüüs ja modaalanalüüs¶

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

Parameetri nimi	Parameetri väärtus	Kirjeldus
NAME	<name>	Materjali nimi; vastab !SECTION väärtusele MATERIAL
ITEM	<ITEMnum>	Kasutaja määratud materjaliomaduste üksuste arv (1 või rohkem) <Young_modulus>-----Youngi moodul (kohustuslik) <Poisson_ratio>-------Poissoni tegur (kohustuslik) <Density>--------------Massitihedus (kohustuslik, kui ITEMnum=2) < Expansion_coeff >--Lineaarse paisumise tegur (kui ITEMnum=3)

(Näide)

!MATERIAL, NAME=M1,
ITEM=3                   --- Materjalile M1 määratakse kolm tüüpi omadusväärtusi
!ITEM=1, SUBITEM=2       --- !ITEM=1 määrab Youngi mooduli ja Poissoni teguri (kohustuslik)
4000.0, 0.3
!ITEM=2                  --- !ITEM=2 määrab massitiheduse (kohustuslik, kui ITEM=2)
8.0102E-0
!ITEM=3                  --- !ITEM=3 määrab lineaarse paisumise teguri
1.0E-5

Märkus:

Temperatuurist sõltuvaid materjale ei saa modaalanalüüsis kasutada.

Soojusjuhtivuse analüüs¶

Link-, tasapinnaliste, tahkete ja kolmemõõtmeliste plaatelementide jaoks

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

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

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

Parameetri nimi	Parameetri väärtus	Kirjeldus
`NAME`	<name>	Materjali nimi; vastab !SECTION väärtusele MATERIAL
`ITEM`	<ITEMnum>	Kasutaja määratud materjaliomaduste üksuste arv (alati 3) <Density>----------Tihedus <Specific_heat>----Erisoojus <Conductivity>-----Soojusjuhtivus <Temperature>------Temperatuur

(Näide)

!MATERIAL, NAME=M1,
ITEM=3　　　             ---　Materjalile M1 määratakse kolm tüüpi omadusväärtusi

!ITEM=1, SUBITEM=１　 　 ---　!ITEM=1 määrab tiheduse ja temperatuuri (kohustuslik)
7850., 300.
7790., 500.
7700., 800.

!ITEM=2, SUBITEM=1       ---　!ITEM=2 määrab erisoojuse ja temperatuuri (kohustuslik)
0.465, 300.
0.528, 500.
0.622, 800.

!ITEM=3                  ---　!ITEM=3 määrab soojusjuhtivuse ja temperatuuri (kohustuslik)
43., 300.
38.6, 500.
27.7, 800.

Liideselementide jaoks

Määrake see !SECTION päises. (Materjaliandmeid ei nõuta.)

(Näide)

!SECTION, TYPE=INTERFACE, EGRP=GAP　 ---　Sektsiooni definitsioon
1.0, 20.15, 8.99835E-9, 8.99835E-9

Ülalolev !SECTION määratleb piluparameetrid elemendirühma nimega GAP kuuluvatele liideselementidele.

1. parameeter: pilu laius
1. parameeter: pilu soojusülekandetegur
1. parameeter: pilu kiirgustegur 1
1. parameeter: pilu kiirgustegur 2

Viide¶

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