??
字號:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Stress 程序輸入數據說明</title>
</head>
<body>
<p align="center" style="text-align:center"><b><span lang="EN-US" style="font-size:
13.5pt;font-family:"Times New Roman";mso-fareast-font-family:System;color:blue">Stress</span><span lang="EN-US" style="font-size:13.5pt;font-family:System;color:blue">
</span><span style="font-size:13.5pt;color:blue">程序輸入數據說明<span lang="EN-US"><o:p>
</o:p>
</span></span></b></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">READ (8,*) NPROB</span><span lang="EN-US" style="font-family:"Times New Roman"">
</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";color:red">!
</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">所需計算的問題數</span><span style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";color:red">
</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">現在程序限定為</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">1<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">DO IPROB=1,NPROB<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">READ
(8,"(17A4)") TITLE</span><span lang="EN-US" style="font-family:"Times New Roman"">
</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">! </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">所計算問題的標題</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">中英文均可</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">READ (8,*)
NPOIN,NELEM,NVFIX,NCASE,NTYPE,NNODE, & <o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">NDOFN,NMATS,NPROP,NGAUS,NDIME,NSTRE<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="mso-bidi-font-size:
7.5pt;font-family:"Times New Roman";color:red">! </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">控制數據</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red">: NPOIN </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">結點總數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red">, NELEM </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">單元總數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red">, NVFIX </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">被約束結點數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red">, NCASE </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">荷載工況數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red">, <o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="mso-bidi-font-size:
7.5pt;font-family:"Times New Roman";color:red">! NTYPE </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">問題單元類型</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">: 1 </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">平面應力</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, 2 </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">平面應變</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, 3 </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">軸對稱</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, 4 </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">八結點空間</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, 5 20</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">結點空間</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">,<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="mso-bidi-font-size:
7.5pt;font-family:"Times New Roman";color:red">! NNODE </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">單元結點數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, NDOFN </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">結點自由度數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, NMATS </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">材料種類數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, NPROP </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">材料特性個數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">, NGAUS<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="mso-bidi-font-size:
7.5pt;font-family:"Times New Roman";color:red">! </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">高斯點數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red">, NDIME </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">結點坐標數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red">, NSTRE </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">結點應力數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">READ (8,*) NAUTO,MX</span><span lang="EN-US" style="font-family:"Times New Roman"">
</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";color:red">!
</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">是否規則網格自動生成信息</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">(NAUTO = 0 </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">規則</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">), MX X</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">單元數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">DO IELEM=1,NELEM </span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red">! </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:
"Times New Roman";mso-hansi-font-family:"Times New Roman";color:red">對單元循環</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">IF (NAUTO /= 0) THEN
</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
mso-fareast-font-family:System;color:red">! </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">非自動生成</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">READ (8,*)
NUMEL,MATNO(NUMEL), &<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">(LNODS(NUMEL,INODE),INODE=1,NNODE)<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="mso-bidi-font-size:
7.5pt;font-family:"Times New Roman";mso-fareast-font-family:System;color:red">!
</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">單元號，單元材料號，</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="mso-bidi-font-size:
7.5pt;font-family:"Times New Roman";mso-fareast-font-family:System;color:red">!
</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">單元連接的相關結點號</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">END IF<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">END DO<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">READ (8,*)
NCONT,NCREA</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
mso-fareast-font-family:System;color:red"> ! </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">控制結點數和生成結點類數</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";mso-fareast-font-family:System;color:red">(</span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">含義同平面問題</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
mso-fareast-font-family:System;color:red">)<o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">IF (NTYPE <= 3
.AND. NCONT /= 0) THEN </span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:
"Times New Roman";mso-fareast-font-family:System;color:red">! </span><span style="mso-bidi-font-size:7.5pt;mso-ascii-font-family:"Times New Roman";
mso-hansi-font-family:"Times New Roman";color:red">平面或軸對稱且有控制結點</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">DO IJ=1,NCONT </span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;font-family:"Times New Roman";
mso-fareast-font-family:System;color:red">! </span><span style="mso-bidi-font-size:
7.5pt;mso-ascii-font-family:"Times New Roman";mso-hansi-font-family:"Times New Roman";
color:red">對控制結點循環</span><span lang="EN-US" style="mso-bidi-font-size:7.5pt;
font-family:"Times New Roman";color:red"><o:p>
</o:p>
</span></p>
<p style="margin:0cm;margin-bottom:.0001pt"><span lang="EN-US" style="font-family:
"Times New Roman";mso-fareast-font-family:System">READ (8,*)
IJT,COORD(IJT,1),COORD(IJT,2)</span><span lang="EN-US" style="mso-bidi-font-size:
7.5pt;font-family:"Times New Roman";mso-fareast-font-family:System;color:red">
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -