System variables that control drawing units :
AUNITS - controls angular units. Set to 2 for grads
AUPREC - Angular unit precision. Set to 4
ANGDIR - Angle direction. Set to 1 for clockwise
ANGBASE - Sets the base angle to 0 with respect to the current UCS. For North this will be (/ pi 2)
LUNITS - controls Length units. Set to 2 for decimal
LUPREC - Length precision. Set to 3
INSUNITS - Specifies a drawing-units value for automatic scaling of blocks, images, or xrefs inserted or attached to a drawing. Set to 6 for metres.
(mapcar 'setvar (list 'aunits 'auprec 'angdir 'angbase 'lunits 'luprec 'insunits) (list 2 4 1 (/ pi 2) 2 3 6))