anchor.diff:  
   %% Initialize the PWM peripheral
   init() ->
  -%%       pwm:load_nif(),
  -%%       pwm:init().
  -    pwm:start_link().
  +    pwm_sup:start_link([{pwm1, "/dev/pwm1"}]).
   
   %% Run the demo
   start() ->
  
positive.code: 
  %% Release the PWM peripheral
  stop() ->
  %%	pwm:release(),
      pwm:stop(),
      bye.
  
  %% Change the value of the led from the min value to the max value
  fade_in(X) when X =< ?MAX_PWM ->
  	 pwm:value(X),
  	 timer:sleep(2),
  	 fade_in(X+1);
  fade_in(_X) ->
  
negative.code: %%% @author Ivan Iacono <ivan.iacono@erlang-solutions.com> - Erlang Solutions Ltd
  %%% @copyright (C) 2013, Erlang Solutions Ltd
  %%% @doc Changes the brightness of led from the min value to the max value and
  %%% and come back.
  %%% @end
  
  -module(pwm_demo).
  