FrontISTR 5.2.0
Large-scale structural analysis program with finit element method
Loading...
Searching...
No Matches
heat_mat_ass_boundary.f90
Go to the documentation of this file.
1!-------------------------------------------------------------------------------
2! Copyright (c) 2019 FrontISTR Commons
3! This software is released under the MIT License, see LICENSE.txt
4!-------------------------------------------------------------------------------
8contains
9
10 subroutine heat_mat_ass_boundary(hecMESH, hecMAT, hecMESHmpc, hecMATmpc, fstrHEAT, next_time, delta_time)
11 use m_fstr
17 implicit none
18 type(fstr_heat) :: fstrHEAT
19 type(hecmwst_matrix) :: hecMAT
20 type(hecmwst_matrix), pointer :: hecMATmpc
21 type(hecmwst_local_mesh) :: hecMESH
22 type(hecmwst_local_mesh), pointer :: hecMESHmpc
23 real(kind=kreal) :: next_time, delta_time, beta
24
25 beta = fstrheat%beta
26
28 call heat_mat_ass_bc_cflux(hecmat, fstrheat, next_time, delta_time, beta)
29
31 call heat_mat_ass_bc_dflux(hecmesh, hecmat, fstrheat, next_time, delta_time, beta)
32
34 call heat_mat_ass_bc_film(hecmesh, hecmat, fstrheat, next_time, delta_time, beta)
35
37 call heat_mat_ass_bc_radiate(hecmesh, hecmat, fstrheat, next_time, delta_time, beta)
38
40 call hecmw_mpc_mat_ass(hecmesh, hecmat, hecmeshmpc, hecmatmpc)
41 call hecmw_mpc_trans_rhs(hecmesh, hecmat, hecmatmpc)
42
44 call heat_mat_ass_bc_fixt(hecmatmpc, fstrheat, next_time, delta_time, beta)
45
46 end subroutine heat_mat_ass_boundary
This module defined coomon data and basic structures for analysis.
Definition: m_fstr.f90:15
This module provides a subroutine for setting concerntrated heat flux boundary conditions.
subroutine heat_mat_ass_bc_cflux(hecmat, fstrheat, ctime, dtime, beta)
This module provides a subroutine for setting distributed heat flux boundary conditions.
subroutine heat_mat_ass_bc_dflux(hecmesh, hecmat, fstrheat, ctime, dtime, beta)
This module provides a subroutine for setting heat transfer boundary conditions.
subroutine heat_mat_ass_bc_film(hecmesh, hecmat, fstrheat, ctime, dtime, beta)
This module provides a subroutine for setting fixed temperature boundary conditions.
subroutine heat_mat_ass_bc_fixt(hecmat, fstrheat, ctime, dtime, beta)
This module provides a subroutine for setting heat radiate boundary conditions.
subroutine heat_mat_ass_bc_radiate(hecmesh, hecmat, fstrheat, ctime, dtime, beta)
This module provides a subroutine for all boundary conditions needed in heat anaylsis.
subroutine heat_mat_ass_boundary(hecmesh, hecmat, hecmeshmpc, hecmatmpc, fstrheat, next_time, delta_time)
Data for HEAT ANSLYSIS (fstrHEAT)
Definition: m_fstr.f90:394