? Creating variable for occupation
? occ = 0, if service; = 1, if white; = 2, if blue.

CREATE ; OCC = OCCW + 2*OCCB $

? Choose employed only

REJECT; EMP = 0 $

? Do MLM
? Coefficients for OCC = 0 are set to zeros.

NAMELIST; X = ONE,ED,URB,MINOR,LOFINC $
LOGIT ; LHS = OCC ; RHS = X ; MARGIN  $

? MLM with restriction b_1 = b2

CALC  ; K = COL(X) $
LOGIT ; LHS = OCC ; RHS = X
      ; RST = K_B,K_B $

SAMPLE ; ALL $