print_short_block_summary Subroutine

public subroutine print_short_block_summary(jtot_, parity_exponent_, count_blocks_, number_of_channels_)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: jtot_

total angular momentum
integer(kind=int32), intent(in) :: parity_exponent_

parity exponent of the block (0 if p = +1, 1 if p = -1)
integer(kind=int32), intent(in) :: count_blocks_
integer(kind=int32), intent(in) :: number_of_channels_

number of channels in the block

Calls

proc~~print_short_block_summary~~CallsGraph proc~print_short_block_summary print_short_block_summary proc~integer_to_character integer_to_character proc~print_short_block_summary->proc~integer_to_character proc~write_message write_message proc~print_short_block_summary->proc~write_message

Called by

proc~~print_short_block_summary~~CalledByGraph proc~print_short_block_summary print_short_block_summary program~scattering SCATTERING program~scattering->proc~print_short_block_summary

Contents