unspread Interface

public interface unspread

Functions

private module function unspread_array(source, index, dim, new_size) result(c)

Arguments

Type IntentOptional Attributes Name
class(array_type), intent(in), target :: source
integer, intent(in) :: index
integer, intent(in) :: dim
integer, intent(in) :: new_size

Return Value type(array_type), pointer