SUBROUTINE SF_APCP
C************************************************************************
C* SF_APCP                                                              *
C*									*
C* This subroutine determines whether the current bulletin is an AFOS	*
C* precipitation bulletin, using the information in COMMON /PASSBULL/ 	*
C*									*
C**									*
C* Log:									*
C* J. Ator/NCEP		03/19						*
C************************************************************************
	INCLUDE		'GEMPRM.PRM'
	INCLUDE		'BRIDGE.PRM'
	INCLUDE		'sfcmn.cmn'
C-----------------------------------------------------------------------
        IF (  ( ( buhd(1:6) .eq. 'ASAK67' ) .or. 
     +          ( buhd(1:6) .eq. 'ASAK68' ) )
     +          .or.
     +        ( ( buhd(1:5) .eq. 'ASUS6' ) .and.
     +          ( LGE ( buhd(6:6), '1' ) ) .and.
     +          ( LLE ( buhd(6:6), '6' ) ) )
     +          .or.
     +        ( ( buhd(1:5) .eq. 'SRUS5' ) .and.
     +          ( LGE ( buhd(6:6), '1' ) ) .and.
     +          ( LLE ( buhd(6:6), '6' ) ) )
     +          .or.
     +        ( ( buhd(1:5) .eq. 'SXUS5' ) .and.
     +          ( LGE ( buhd(6:6), '1' ) ) .and.
     +          ( LLE ( buhd(6:6), '6' ) ) )
     +          .or.
     +        ( ( buhd(1:5) .eq. 'SRUS7' ) .and.
     +          ( LGE ( buhd(6:6), '1' ) ) .and.
     +          ( LLE ( buhd(6:6), '6' ) ) )
     +          .or.
     +        ( buhd(1:6) .eq. 'SXUS72' )
     +          .or.
     +        ( buhd(1:6) .eq. 'SRUS27' )
     +          .or.
     +        ( buhd(1:6) .eq. 'SRHW50' )  )  THEN
             afpcp = .true.
        ELSE        
             afpcp = .false.
        END IF
C*
	RETURN
	END