facat
/
conductor_tension
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

覆冰水平荷载的导线体型系数用u表示。 

Signed-off-by: facat <facat@facat.com>
This commit is contained in:
facat 2020-04-19 21:59:05 +08:00
parent 1e53b4e343
commit f1c85ecf61
2 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Test/CheckAgainstExcelFixture.cs
View File

@ -50,7 +50,7 @@ namespace Test
Assert.AreEqual(cal_value, excel_value, 1); Assert.AreEqual(cal_value, excel_value, 1);
} }
[Test, Combinatorial] [Test, Combinatorial]
public void WindTest_D_Variable([Values(10, 17, 18)] double d, [Values(10, 20, 21, 27, 29, 31.5, 32)] double velocity,[Values(0,5,10,,13,15,,18,20,23,25)] double ice)//导线外径和风速、有冰无冰测试变化测试 public void WindTest_D_Variable([Values(10, 17, 18)] double d, [Values(10, 20, 21, 27, 29, 31.5, 32)] double velocity,[Values(0,3,5,8,10,13,15,18,20,23,25,27,30)] double ice)//导线外径和风速、有冰无冰测试变化测试
{ {
//修改Eecel线径 //修改Eecel线径
double org_d; double org_d;
@ -170,7 +170,7 @@ namespace Test
objApp = new Microsoft.Office.Interop.Excel.Application(); objApp = new Microsoft.Office.Interop.Excel.Application();
objBook = objApp.Application.Workbooks.Add(@"d:\code\conductortension\学习-张力计算(临界档距公式法V20090602)-送电室版-Unittest.xls"); objBook = objApp.Application.Workbooks.Add(@"d:\code\conductortension\学习-张力计算(临界档距公式法V20090602)-送电室版-Unittest.xls");
w_sheet = objBook.Sheets["三维平台测试"] as Microsoft.Office.Interop.Excel.Worksheet; w_sheet = objBook.Sheets["三维平台测试"] as Microsoft.Office.Interop.Excel.Worksheet;
objApp.Visible = true; //objApp.Visible = true;
double E; double E;
E = (double)(w_sheet.get_Range("J5", Missing.Value).Value2); E = (double)(w_sheet.get_Range("J5", Missing.Value).Value2);
double alpha;//膨胀系数 double alpha;//膨胀系数

5
core.cs
View File

@ -300,7 +300,7 @@ namespace conductortension
double ChuiZhiHeZai = 0; //垂直荷载=自重荷载+9.80665*0.9*PI*待求工况覆冰厚度*(待求工况覆冰厚度+导线直径)/1000 double ChuiZhiHeZai = 0; //垂直荷载=自重荷载+9.80665*0.9*PI*待求工况覆冰厚度*(待求工况覆冰厚度+导线直径)/1000
double ZiZhongHeZai = 0; //自重荷载=导线单位重量*9.80665/1000/ double ZiZhongHeZai = 0; //自重荷载=导线单位重量*9.80665/1000/
double bi = 1;//覆冰增大系数B double bi = 1;//覆冰增大系数B
//导线力学计算不考虑覆冰增大系数 by 杜孟远 20200406 //导线力学计算不考虑覆冰增大系数 by 杜孟远 2020.04.06
double u;//体型系数 double u;//体型系数
if (inPut.DaiBing > 0 || inPut.WaiJing < 17) if (inPut.DaiBing > 0 || inPut.WaiJing < 17)
@ -333,8 +333,7 @@ namespace conductortension
} }
else else
{ {
//a = 1; // '有冰工况定义风压不均匀系数a=1 dx3 = u * Math.Pow(wind_v, 2) * (inPut.WaiJing + 2 * inPut.DaiBing) * a * bi / 1600; // '导线有冰风荷载
dx3 = 1.2 * Math.Pow(wind_v, 2) * (inPut.WaiJing + 2 * inPut.DaiBing) * a * bi / 1600; // '导线有冰风荷载
} }
HeZai = Math.Sqrt(Math.Pow((ZiZhongHeZai + ChuiZhiHeZai), 2) + Math.Pow(dx3, 2));// '存储导线荷载 HeZai = Math.Sqrt(Math.Pow((ZiZhongHeZai + ChuiZhiHeZai), 2) + Math.Pow(dx3, 2));// '存储导线荷载