Create process grid dimensions corresponding to one dimension of the matrix representation of a tensor, imposing that no process grid dimension is greater than the corresponding tensor dimension.
Type  Intent  Optional  Attributes  Name  

integer,  intent(in)  ::  nodes 
Total number of nodes available for this matrix dimension 

integer,  intent(inout),  DIMENSION(:)  ::  dims 
process grid dimension corresponding to tensor_dims 

integer,  intent(in),  DIMENSION(:)  ::  tensor_dims 
tensor dimensions 

real(kind=real_8),  intent(in),  optional  ::  lb_ratio 
load imbalance acceptance factor 