anchor.diff:  			
   					! If flag for LBL is ON and Boundary Layer Trip is OFF, then compute LBL
                       IF ( (p%ILAM .EQ. 1) .AND. (p%ITRIP .EQ. 0) )  THEN
  +                        IF (p%AweightFlag .eqv. .TRUE.) THEN
  +                            m%SPLLBL(III) = m%SPLLBL(III) + p%Aweight(III)              ! A-weighting
  +                        ENDIF
  +                        
                           PLBL = 10.0_ReKi**(m%SPLLBL(III)/10.0_ReKi)						! SPL to Sound Pressure (P) Conversion for III Frequency
                           
   						PtotalLBL = PtotalLBL + PLBL									! Sum of Current LBL with LBL Running Total
  
positive.code: 	DO K = 1,p%NrObsLoc
  		DO III = 1,size(p%FreqList)
  			DO oi = 1,7
  				IF (y%SumSpecNoiseSep(oi,K,III)  .EQ. 0.) y%SumSpecNoiseSep(oi,K,III) =1 
  			ENDDO
  		ENDDO
  	ENDDO
  
negative.code: 		DO K = 1,p%NrObsLoc
  			DO III=1,size(p%FreqList)
  				IF (y%PtotalFreq(K,III) .EQ. 0.)	    y%PtotalFreq(K,III) = 1
                  y%PtotalFreq(K,III)    = 10.*LOG10(y%PtotalFreq(K,III))					! P to SPL conversion
  			ENDDO
  		ENDDO
      ENDIF
  