;;; -*- Mode:Lisp; Base:10.; Package:User -*- 


(fs:set-logical-pathname-host "SIMKIT1"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("SIMKIT1" "simkit13.loader;")
		  ("PATCHES" "simkit13.patches;")))


(fs:set-logical-pathname-host "COMPOSITES"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("composites" "simkit13.composite;")))

(fs:set-logical-pathname-host "RELED"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("reled" "simkit13.reled;")))

(fs:set-logical-pathname-host "KBVERIFIER"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("kbverifier" "simkit13.verifier;")))

(fs:set-logical-pathname-host "DC"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("dc" "simkit13.dc;")))

(fs:set-logical-pathname-host "SKCONV"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("skconv" "simkit13.conversion;")))

(fs:set-logical-pathname-host "gen"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("gen" "simkit13.gen;")))

(fs:set-logical-pathname-host "simkit"
  :physical-host (send (sys:parse-host "KSL-EXP-34") :host)
  :translations '(("core" "simkit13.core;")
		  ("int" "simkit13.int;")
		  ("examples" "simkit13.examples;")
		  ("moded" "simkit13.moded;")))