function y = variasi_Ra2007(x) if x > 0 y=x; else y=0; end