0001 function upVector = computeUpVector(pbeDef, hcMatrix, zerotol)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018
0019
0020
0021 if pbeDef.dec.isProper
0022 upVector = computePartitionIndexDec(pbeDef.dec, hcMatrix, zerotol, 1);
0023 elseif pbeDef.dec.isComplete && ~pbeDef.dec.isProper
0024 if pbeDef.optionStruct.useEmbeddingPartitions
0025 hcMatrix = mapToValidityCone(...
0026 pbeDef.dec.properData.mappingNewToProper*hcMatrix, ...
0027 pbeDef.dec.properData, zerotol);
0028 upVector = computePartitionIndexDec(pbeDef.dec.properData, ...
0029 hcMatrix, zerotol, 1);
0030 else
0031 upVector = computePartitionIndexDec(pbeDef.dec, hcMatrix, zerotol, 1);
0032 end
0033 elseif ~pbeDef.dec.isComplete
0034 upVector(1, end + (1:nNew)) = 1;
0035 else
0036 error('elk:pbeSolver:inputError', ['The given representation is neither ' ...
0037 'proper, nor improper but complete, nor incomplete. This does not ' ...
0038 'makes sense. Please check your decomposition, dude.']);
0039 end