anchor.diff:          22\tFoul-FFL
           3\tSDIP private drainage
           33\tSDIP
  -        4\tPlotLevel +/-50mm\n
  +        4\tPlotLevel +/-50mm
  +        44\tChange Private Sewer Gradient\n
       Create:
           pa\tparking arrow
           ra\troad arrow\n
  
positive.code: 	; 	gradient [real] - Slope, being the slope 1/gradient
  
  	; SAVE SETTINGS
  	(save_environment (list "nomutt"))
  
  	; CHANGE SETTINGS
  	(setvar "nomutt" 1)
  
negative.code:   "))
    (princ "\nENGINEERING SETUP COMPLETED")(princ)
  
    ; v0.3 - 2017.03.10 - Change Private Sewer Gradient added
    ; v0.2 - 2017.03.09 - scale management added to c:ra
    ; v0.1 - 2017.02.21 - Cheatsheet added
    ; v0.0 - 2017.01.29 - First issue
    ; Author: David Torralba
    ; Last revision: 2017.03.10
  )
  (defun c:WorkSet ()
    ; Working Drawing setup
  