rearrange_2d_1d Subroutine

public subroutine rearrange_2d_1d(val2d, val1d)

Rearrange 2d variable to 1d variable (i,j -> i*j)

Arguments

Type IntentOptional Attributes Name
double precision, intent(in) :: val2d(:,:)

Input

double precision, intent(out) :: val1d(size(val2d,1)*size(val2d,2))

Output