şimdi bunu yazıya dökmek, sizin istediğiniz pratik formülleri yazmak uzun iş.\r
Bunun formülü P=RxL+Z dir. R belli çaptaki suyun belli hızdaki (metre başına) sürtünmesidir. Z özel kayıplardır. Bunlar cetvellerde verilmektedir.\r
R sürtünme katsayısını hesaplamak için Isıtma boru hesapları hesap bölümlerinde boru çaplarına göre verilmiş cetvellerden alınır. Bu cetveller Colebrook formülü kullanılarak elde edilmişlerdir.\r
Bu formül Reynold sayısı, pürüzlülük, elastite modülü gibi parametrelerin bir fonksiyonudur. Ben de bu formülü Visual basic formatında hazırladığım Delta-T programında şu şekilde sadeleştirerek kullandım. Burada, Formülde kullanılan Lamda sayısı iterasyon kullanılmak suretiyle çözülmektedir. Zira verilen fonksiyonda matematiksel olarak Lamdaların bir tarafa çekilmesi mümkün olamamaktadır. El ile bu formülden sonuç alabilmek için onlarca defa deneme-yanılma kullanmak sorunda kalınabilir. Programlama dili konusunda bilginiz varsa, kaynak kodunu aşağıya yazıyorum. Yoksa daha müsait zamanda daha geniş bir şekilde bilgi verebilirim.\r
\r
EÇap = UygunBoruÇapı / 1000\r
ReSayısı = UygunSuHızı * EÇap / (0.375) * 10 ^ 6\r
LaSayısı = 2\r
LaSayısıFarkı = 3\r
Do Until LaSayısıFarkı < 0.0001\r
Lasa = LaSayısı\r
LaSayısı = 1 / (-2 * (Log(2.51 / (ReSayısı * LaSayısı ^ 0.5) + 0.045 * 10 ^ -3 / (3.72 * EÇap)) / Log(10))) ^ 2\r
LaSayısıFarkı = Abs(Lasa - LaSayısı)\r
Loop\r
RSürtünme = 1000 * LaSayısı * UygunSuHızı ^ 2 / (19.6 * EÇap)\r
\r
\r
Kolay gelsin.\r
\r