virusDroplet_t Derived Type
type, public :: virusDroplet_t
ウイルス飛沫構造体
Components
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| double precision, | public | :: | position(3) | ||||
| double precision, | public | :: | velocity(3) | = | 0.d0 | ||
| integer, | public | :: | coalesID | = | 0 | ||
| integer, | public | :: | refCellID | = | 0 | ||
| integer, | public | :: | adhesBoundID | = | 0 |
Type-Bound Procedures
procedure, public, :: isFloating => isDropletFloating
-
private function isDropletFloating(self)
飛沫が浮遊しているか否かを返す
Arguments
Type Intent Optional Attributes Name class(virusDroplet_t), intent(in) :: self Return Value logical
procedure, public, :: coalescenceID => dropletCoalescneceID
-
private function dropletCoalescneceID(self)
合体飛沫の合体先のIDを返す
Arguments
Type Intent Optional Attributes Name class(virusDroplet_t), intent(in) :: self Return Value integer
procedure, public, :: get_radius
-
private function get_radius(self)
現時刻の飛沫半径を返す
Arguments
Type Intent Optional Attributes Name class(virusDroplet_t), intent(in) :: self Return Value doubleprecision
procedure, public, :: evaporation
-
private subroutine evaporation(self, dr)
蒸発の処理を行う
Arguments
Type Intent Optional Attributes Name class(virusDroplet_t) :: self double precision, intent(in) :: dr 半径変化量（蒸発ならマイナスの値を指定）
procedure, public, :: isEvaporating
-
private function isEvaporating(self)
飛沫が限界まで蒸発したか否かを返す
Arguments
Type Intent Optional Attributes Name class(virusDroplet_t), intent(in) :: self Return Value logical
procedure, public, :: stop_droplet
-
private subroutine stop_droplet(self, status)
飛沫を静止させる
Arguments
Type Intent Optional Attributes Name class(virusDroplet_t) :: self character(len=*), intent(in), optional :: status