mrg_mod Module



Subroutines

public subroutine mrg_x2a_run_mct(cdata_a, l2x_a, o2x_a, xao_a, i2x_a, fractions_a, x2a_a)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_a
type(AttrVect), intent(in) :: l2x_a
type(AttrVect), intent(in) :: o2x_a
type(AttrVect), intent(in) :: xao_a
type(AttrVect), intent(in) :: i2x_a
type(AttrVect), intent(in) :: fractions_a
type(AttrVect), intent(inout) :: x2a_a

public subroutine mrg_x2i_run_mct(cdata_i, a2x_i, o2x_i, x2i_i)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_i
type(AttrVect), intent(in) :: a2x_i
type(AttrVect), intent(in) :: o2x_i
type(AttrVect), intent(inout) :: x2i_i

public subroutine mrg_x2r_run_mct(cdata_r, l2x_r, fractions_r, x2r_r)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_r
type(AttrVect), intent(in) :: l2x_r
type(AttrVect), intent(in) :: fractions_r
type(AttrVect), intent(inout) :: x2r_r

public subroutine mrg_x2l_run_mct(cdata_l, a2x_l, r2l_l, x2l_l)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_l
type(AttrVect), intent(in) :: a2x_l
type(AttrVect), intent(in) :: r2l_l
type(AttrVect), intent(inout) :: x2l_l

public subroutine mrg_x2o_run_mct(cdata_o, a2x_o, i2x_o, w2x_o, xao_o, fractions_o, x2o_o)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_o
type(AttrVect), intent(in) :: a2x_o
type(AttrVect), intent(in) :: i2x_o
type(AttrVect), intent(in) :: w2x_o
type(AttrVect), intent(in) :: xao_o
type(AttrVect), intent(in) :: fractions_o
type(AttrVect), intent(inout) :: x2o_o

public subroutine mrg_x2g_run_mct(cdata_g, s2x_g, x2g_g)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_g
type(AttrVect), intent(inout) :: s2x_g
type(AttrVect), intent(inout) :: x2g_g

public subroutine mrg_x2s_run_mct(cdata_s, g2x_s, x2s_s)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_s
type(AttrVect), intent(inout) :: g2x_s
type(AttrVect), intent(inout) :: x2s_s

public subroutine mrg_x2w_run_mct(cdata_w, a2x_w, o2x_w, i2x_w, frac_w, x2w_w)

Arguments

Type IntentOptional Attributes Name
type(seq_cdata), intent(in) :: cdata_w
type(AttrVect), intent(inout) :: a2x_w
type(AttrVect), intent(inout) :: o2x_w
type(AttrVect), intent(inout) :: i2x_w
type(AttrVect), intent(inout) :: frac_w
type(AttrVect), intent(inout) :: x2w_w