FANG$* EQU 0400310 PIRCB$* EQU 0400163 END .