;;; -*- Mode:Common-Lisp; Package:USER; Base:10 -*-


(fs:set-logical-pathname-host
  "Bond-Graph-Simulation"
  :Physical-Host "X35"
  :Translations '(("Bond-Graph-Simulation"
		   "Bond-Graph-Simulation.Bond-Graph;"
		  )
		  ("Examples"
		   "Bond-Graph-Simulation.Bond-Graph.examples;"
		  )
		  ("General"
		   "Bond-Graph-Simulation.Bond-Graph.general;"
		  )
		  ("Simulation"
		   "Bond-Graph-Simulation.Bond-Graph.simulation;"
		  )
		  ("State-machine"
		   "Bond-Graph-Simulation.Bond-Graph.state-machine;"
		  )
		 )
)

(fs:set-logical-pathname-host
  "RPAL"
  :Physical-Host "X35"
  :Translations '(("Tools"
		   "Bond-Graph-Simulation.Tools;"
		  )
		 )
)