anchor.diff:  		gradient	; Real gradient
   	);END list
   
  +  ; v0.3 - 2017.03.28 - Error management updated
     ; v0.2 - 2017.03.10 - Turn off OSnap when selecting target labels to be updated
     ; v0.2 - 2017.01.30 - Gradient to absolute value
     ; v0.1 - 2017.01.28 - DT:ChangePrivateSewerGradient implementation
  
positive.code: 					(progn (princ "\nNo sewer label selected.\n"))
  				);END if
  				; If no gradient:
          (progn (princ "\nERROR @ c:SDIPforPrivateDrainage > gradient = nil"))
        );END if
      );END subcond
      ; If not private manhole label selected:
  
negative.code: 	;										- CommandLine messages suppressed
    ; v0.0 - 2017.01.23 - First issue
    ; Author: David Torralba
    ; Last revision: 2017.03.28
  )
  (defun c:garden_gradient (
                            /
  