;changebadval.pro takes a 1-D array that has given badval flag values
;and changes the badval flag to another value.
;Use is as follows:
;            changebadval,inbadval,outbadval,var
;Where
;   input    |  inbadval = the input badval value (e.g., -99.99)
;            | outbadval = the value to make badvals (e.g., -999.)
;
;input/output|       var = a vector or array
;
;Written by BWBerger 8/18/99

pro changebadval,inbadval,outbadval,var

r=where(var eq inbadval,c)
if c ne 0 then begin
   var(r)=outbadval
endif


return
end