;;; -*- Mode: LISP; Syntax: Common-lisp; Package: MU; Base: 10 -*-

;;; This file imports important functions from various CM packages.  
;;; It is part of mike-utils7.  It must be loaded AFTER the CMV system, but
;;; before any other files in mike-utils7.

(in-package 'mu)

(use-package :*lisp)

(eval-when (compile load eval)
  (mapcar #'(lambda (x) (import (intern (first x) (second x)) 'mu))
	  '(("WITH-TEMP-PVARS" "*LX")
	    ("*DEF-BOOLEAN" "*LX")
	    ("*DEF-FIELD" "*LX")
	    ("*DEF-SIGNED" "*LX")
	    ("*READ-RASTER-FROM-CM-GRID" "CMV")
	    ("*WRITE-RASTER-TO-CM-GRID" "CMV")
	    ("WRITE-RASTER-TO-CM-GRID!!" "CMV")
	    ("*ALL-ALLOCATE!!-PVARS*" "*LISP-I")
	    ("*DEFAULT-USER-DEFVARS*" "*LISP-I"))))