* Encoding: UTF-8.
**Formality of Clothing

COMPUTE Clothing=SUM(cloth1, coth2). 
EXECUTE.

COMPUTE Clothing_r=Clothing - 51. 
EXECUTE.

**Mental Abstraction

RECODE BIF2 BIF3 BIF5 BIF6 BIF8 BIF9 (1=0) (2=1) (ELSE=SYSMIS) INTO BIF2r BIF3r BIF5r BIF6r BIF8r 
    BIF9r. 
EXECUTE.

RECODE BIF1 BIF4 BIF7 BIF10 (1=1) (2=0) (ELSE=SYSMIS) INTO BIF1r BIF4r BIF7r BIF10r. 
EXECUTE.

COMPUTE BIF=SUM(BIF2r, BIF3r, BIF5r, BIF6r, BIF8r, BIF9r, BIF1r, BIF4r, BIF7r, BIF10r). 
EXECUTE.

**Social Distance

RECODE SD1 SD2 SD3 SD4 SD5 SD6 SD7 SD8 SD9 SD10 (0=SYSMIS). 
EXECUTE. 

COMPUTE Commonality=MEAN(SD1, SD2, SD3). 
EXECUTE.

COMPUTE Closeness=MEAN(SD4, SD5, SD6, SD7). 
EXECUTE.

COMPUTE Intimacy=MEAN(SD8, SD9, SD10). 
EXECUTE.

COMPUTE SD_M=MEAN(SD1, SD2, SD3, SD4, SD5, SD6, SD7, SD8, SD9, SD10). 
EXECUTE.

**SES

RECODE SES1 SES2 SES3 SES4 SES5 SES6 (0=SYSMIS). 
EXECUTE.
 
COMPUTE SES_C=MEAN(SES1, SES2, SES3). 
EXECUTE.

COMPUTE SES_CF=MEAN(SES4, SES5, SES6). 
EXECUTE.
 
COMPUTE SES_M=MEAN(SES1, SES2, SES3, SES4, SES5, SES6). 
EXECUTE.

**Sociometric Status

RECODE SMS1 SMS2 SMS3 SMS4 SMS5 SMS6 SMS7 SMS8 SMS9 SMS10 SMS11 SMS12 (0=SYSMIS). 
EXECUTE.

COMPUTE SMS_M=MEAN(SMS1, SMS2, SMS3, SMS4, SMS5, SMS6, SMS7, SMS8, SMS9, SMS10, SMS11, SMS12). 
EXECUTE.

**Accessibility

RECODE Acc1 Acc2 Acc3 Acc4 Acc5 (0=SYSMIS). 
EXECUTE.
 
RECODE Acc3 (1=7) (2=6) (3=5) (4=4) (5=3) (6=2) (7=1) INTO Acc3r. 
EXECUTE. 

COMPUTE Acc_M=MEAN(Acc1, Acc2, Acc3r, Acc4, Acc5). 
EXECUTE.