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

     1  //This file is part of EESLISM.
     2  //
     3  //Foobar is free software : you can redistribute itand /or modify
     4  //it under the terms of the GNU General Public License as published by
     5  //the Free Software Foundation, either version 3 of the License, or
     6  //(at your option) any later version.
     7  //
     8  //Foobar is distributed in the hope that it will be useful,
     9  //but WITHOUT ANY WARRANTY; without even the implied warranty of
    10  //MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.See the
    11  //GNU General Public License for more details.
    12  //
    13  //You should have received a copy of the GNU General Public License
    14  //along with Foobar.If not, see < https://www.gnu.org/licenses/>.
    15  
    16  /*   bl_roomcf.c  */
    17  
    18  package eeslism
    19  
    20  // 熱伝達率の計算
    21  
    22  func eeroomcf(Wd *WDAT, Exs *EXSFS, Rmvls *RMVLS, nday int, mt int) {
    23  	// 熱伝達率の計算
    24  
    25  	// 表面熱伝達率（対流・放射））の計算
    26  	Rmhtrcf(Exs, Rmvls.Emrk, Rmvls.Room, Rmvls.Sd, Wd)
    27  
    28  	if DEBUG {
    29  		// 表面熱伝達率の表示
    30  		xpralph(Rmvls.Room, Rmvls.Sd)
    31  	}
    32  
    33  	// 熱貫流率の計算
    34  	Rmhtrsmcf(Rmvls.Sd)
    35  
    36  	// 透過日射、相当外気温度の計算
    37  	Rmexct(Rmvls.Room, Rmvls.Sd, Wd, Exs.Exs, Rmvls.Snbk, Rmvls.Qrm, nday, mt)
    38  
    39  	// 室の係数（壁体熱伝導等））、定数項の計算
    40  	Roomcf(Rmvls.Mw, Rmvls.Room, Rmvls.Rdpnl, Wd, Exs)
    41  
    42  	xprroom(Rmvls.Room)
    43  	xprxas(Rmvls.Room, Rmvls.Sd)
    44  }