$SETWIDTH
$FOR/LIS/G WIDTH9
$TYPE WIDTH9
$LINK/MAP WIDTH9,ATLAS9:ATLAS9.OBJ
$TYPE WIDTH9.MAP