SUBROUTINE ad_congrad
      RETURN
      END SUBROUTINE ad_congrad