// $Id: initxstim.hoc,v 1.2 2005/09/10 23:02:15 ted Exp $
// Modified by Zhen Qi
// Calculate transmembrane potential of a cell with extracellular stimulation

begintemplate Location2
	public secRef, loc
	objref secRef
	proc init() {
		secRef = new SectionRef()
		loc = $1
	}
endtemplate Location2

load_file("nrngui.hoc")
load_file("stdlib.hoc")
load_file("import3d.hoc")

load_file("importswc.hoc")      // Load topology from a .swc file
load_file("parameters.hoc")     // Set up geometry and membrane parameters and mechanisms
load_file("interpxyz.hoc")	    // Only interpolate sections that have extracellular
load_file("setpointers.hoc")	// Automatically call grindaway() in interpxyz.hoc
load_file("exportLocs_seg.hoc") // Export node positions, diameters   

print "After any change to cell geometry or nseg, be sure to invoke setpointers()"

parameters()                    // In parameters.hoc
setpointers()                   // In setpointers.hoc
exportLocs_seg()                // In exportLocs_seg.hoc
quit()