¿Cómo cargar una función autolisp dentro de otra?

Tengo una función definida como:

(Defun c:acotado (/ pt1 pt2)
(Setq pt1 ("Primer Punto:")
Pt2 ("Segundo Punto:")
Pt3 (polar pt1 (* pi 0.50) 0.50)
)
(Command "_dimlinear" pt1 pt2 pt3 "")
(Princ "")
)

Y tengo otra que trabaja en otro archivo y requerie llamar a la anterior para trabajar ok

(Defun c:prueba (/ p1 p2)
(Setq p1 (getpoint "Inicio de la linea:")
P2 (getpoint "Fin de la Linea")
)
(command "_linea" p1 p2 "")

;;**********AQUI DEBE LLAMAR A LA FUNCION c:acotado y acotar la linea creada***************
;;**********definiendo como los puntos de acotacion el inicio y fin de la linea ***********
(setq pt1 p1
pt2 p2
);;*****aqui coloco como variables pt1 el punto p1 de la linea pero como abrir y cargar el archivo con la funcion c:acotado?