FUNCTION logy2y, data0, REVERSE=reverse

@solabu_var
solabu

;make local copy
IF N_ELEMENTS(data0) NE 0 THEN data=data0

IF N_ELEMENTS(reverse) EQ 0 THEN reverse=0
IF reverse THEN BEGIN
   data.abu=alog10(data.abu)
   data.sigma=ALOG10(ABS(data.sigma)/data.abu+1.D0)
   data.sigma*=SGN(data0.sigma)
ENDIF ELSE BEGIN
   data.abu=10.D0^(data.abu)
   data.sigma=(10.D0^(ABS(data.sigma))-1.D0)*data.abu
   data.sigma*=SGN(data0.sigma)
ENDELSE

RETURN, data
END