right_justify Subroutine

public subroutine right_justify(array)

Arguments

Type IntentOptional Attributes Name
character(len=NUM_DIGIT_KEY), intent(inout) :: array(:)