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

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

**Mental Abstraction

COMPUTE Furn=MEAN(stove, fan, telephone). 
EXECUTE. 

COMPUTE Veh=MEAN(camel, feet, elevator). 
EXECUTE. 

COMPUTE Veg=MEAN(pickles, seaweed, rice). 
EXECUTE.

COMPUTE Abs_M=MEAN(stove, fan, telephone, camel, feet, elevator, pickles, seaweed, rice). 
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.