def SGPtGroup(SGData):
    """
    Determine point group of the space group - done after space group symbol has
    been evaluated by SpcGroup. Only short symbols are allowed
    
    :param SGData: from :func SpcGroup
    :returns: SSGPtGrp & SSGKl (only defaults for Mono & Ortho)
    """
    Flds = SGData['SpGrp'].split()
    if len(Flds) < 2:
        return '', []
    if SGData['SGLaue'] == '-1':
        if '-' in Flds[1]:
            return '-1', [-1]
        else:
            return '1', [1]
    elif SGData['SGLaue'] == '2/m':
        if '/' in SGData['SpGrp']:
            return '2/m', [-1, 1]
        elif '2' in SGData['SpGrp']:
            return '2', [-1]
        else:
            return 'm', [1]
    elif SGData['SGLaue'] == 'mmm':
        if SGData['SpGrp'].count('2') == 3:
            return '222', [-1, -1, -1]
        elif SGData['SpGrp'].count('2') == 1:
            if SGData['SGPolax'] == 'x':
                return '2mm', [-1, 1, 1]
            elif SGData['SGPolax'] == 'y':
                return 'm2m', [1, -1, 1]
            elif SGData['SGPolax'] == 'z':
                return 'mm2', [1, 1, -1]
        else:
            return 'mmm', [1, 1, 1]
    elif SGData['SGLaue'] == '4/m':
        if '/' in SGData['SpGrp']:
            return '4/m', [1, -1]
        elif '-' in Flds[1]:
            return '-4', [-1]
        else:
            return '4', [1]
    elif SGData['SGLaue'] == '4/mmm':
        if '/' in SGData['SpGrp']:
            return '4/mmm', [1, -1, 1, 1]
        elif '-' in Flds[1]:
            if '2' in Flds[2]:
                return '-42m', [-1, -1, 1]
            else:
                return '-4m2', [-1, 1, -1]
        elif '2' in Flds[2:]:
            return '422', [1, -1, -1]
        else:
            return '4mm', [1, 1, 1]
    elif SGData['SGLaue'] in ['3', '3R']:
        if '-' in Flds[1]:
            return '-3', [-1]
        else:
            return '3', [1]
    elif SGData['SGLaue'] == '3mR' or 'R' in Flds[0]:
        if '2' in Flds[2]:
            return '32', [1, -1]
        elif '-' in Flds[1]:
            return '-3m', [-1, 1]
        else:
            return '3m', [1, 1]
    elif SGData['SGLaue'] == '3m1':
        if '2' in Flds[2]:
            return '321', [1, -1, 1]
        elif '-' in Flds[1]:
            return '-3m1', [-1, 1, 1]
        else:
            return '3m1', [1, 1, 1]
    elif SGData['SGLaue'] == '31m':
        if '2' in Flds[3]:
            return '312', [1, 1, -1]
        elif '-' in Flds[1]:
            return '-31m', [-1, 1, 1]
        else:
            return '31m', [1, 1, 1]
    elif SGData['SGLaue'] == '6/m':
        if '/' in SGData['SpGrp']:
            return '6/m', [1, -1]
        elif '-' in SGData['SpGrp']:
            return '-6', [-1]
        else:
            return '6', [1]
    elif SGData['SGLaue'] == '6/mmm':
        if '/' in SGData['SpGrp']:
            return '6/mmm', [1, -1, 1, 1]
        elif '-' in Flds[1]:
            if '2' in Flds[2]:
                return '-62m', [-1, -1, 1]
            else:
                return '-6m2', [-1, 1, -1]
        elif '2' in Flds[2:]:
            return '622', [1, -1, -1]
        else:
            return '6mm', [1, 1, 1]
    elif SGData['SGLaue'] == 'm3':
        if '2' in Flds[1]:
            return '23', []
        else:
            return 'm3', []
    elif SGData['SGLaue'] == 'm3m':
        if '4' in Flds[1]:
            if '-' in Flds[1]:
                return '-43m', []
            else:
                return '432', []
        else:
            return 'm3m', []
