anchor.diff:  		DO K = 1,p%NrObsLoc
   			DO III=1,size(p%FreqList)
   				IF (y%PtotalFreq(K,III) .EQ. 0.)	    y%PtotalFreq(K,III) = 1
  -				! If A-weighting flag is ON, combine PtotalFreq with Aweight
  -				IF (p%AweightFlag .eqv. .TRUE.) THEN
  -					y%PtotalFreq(K,III)    = 10.*LOG10(y%PtotalFreq(K,III))+p%Aweight(III)	! P to SPL conversion
  -				ELSE
  -					y%PtotalFreq(K,III)    = 10.*LOG10(y%PtotalFreq(K,III))					! P to SPL conversion
  -				ENDIF
  +                y%PtotalFreq(K,III)    = 10.*LOG10(y%PtotalFreq(K,III))					! P to SPL conversion
   			ENDDO
   		ENDDO
       ENDIF
  
positive.code: 
  					! If flag for TBL is ON, compute Pressure, Suction, and AoA contributions
                      IF ( p%ITURB .GT. 0 )  THEN
                          PTBLP = 10.0_ReKi**(m%SPLP(III)/10.0_ReKi)							! SPL to P Conversion for III Frequency
                          PTBLS = 10.0_ReKi**(m%SPLS(III)/10.0_ReKi)							! SPL to P Conversion for III Frequency
                          PTBLALH = 10.0_ReKi**(m%SPLALPH(III)/10.0_ReKi)						! SPL to P Conversion for III Frequency
  
negative.code: 
  					! If flag for Tip is ON and the current blade node (J) is the last node (tip), compute Tip contribution
                      IF ( (p%ITIP .GT. 0) .AND. (J .EQ. p%NumBlNds) )  THEN					! NOTE: .EQ. 1 would again be more accurate
                          IF (p%AweightFlag .eqv. .TRUE.) THEN
                              m%SPLTIP(III) = m%SPLTIP(III) + p%Aweight(III)                  ! A-weighting
                          ENDIF
                          
                          PTip = 10.0_ReKi**(m%SPLTIP(III)/10.0_ReKi)							! SPL to P Conversion for III Frequency
                          
  						PtotalTip = PtotalTip + PTip										! Sum of Current Tip with Tip Running Total
  