github.com/archlabjp/eeslism-go@v0.0.0-20231109122333-4bb7bfcdf292/eeslism/eepthene.go (about)

     1  package eeslism
     2  
     3  /* 経路に沿ったシステム要素の熱量計算 */
     4  
     5  func Pathheat(Mpath []*MPATH) {
     6  	for _, mpath := range Mpath {
     7  		c := Spcheat(mpath.Fluid)
     8  		for _, Pli := range mpath.Plist {
     9  			cG := c * Pli.G
    10  			for _, Pelm := range Pli.Pelm {
    11  				if Pelm.Cmp.Eqptype == DIVERG_TYPE || Pelm.Cmp.Eqptype == CONVRG_TYPE ||
    12  					Pelm.Cmp.Eqptype == DIVGAIR_TYPE || Pelm.Cmp.Eqptype == CVRGAIR_TYPE {
    13  					Pelm.Out.Q = 0.0
    14  				} else if Pelm.Out.Control == OFF_SW {
    15  					Pelm.Out.Q = 0.0
    16  				} else {
    17  					Pelm.Out.Q = cG * (Pelm.Out.Sysv - Pelm.In.Sysvin)
    18  				}
    19  			}
    20  		}
    21  	}
    22  }