begintemplate Rod

public soma 
create soma
  
proc init() { local x, y, z
    create soma
	if (numarg() == 3) {
		x = $1
		y = $2
		z = $3
	} else {
		x = 0
		y = 0
		z = 0
	}

    soma {
		L= 12//0.04 
		{ pt3dclear() pt3dadd(x, y, z-L, 1) pt3dadd(x, y, z, 1) }
	
		nseg=9
		diam=4  
	
		cm= 30 //pF
		
		insert Kv
		insert hyper
		insert Kx
		insert Leak
		//insert Ca
		insert Cad
		insert Rod_CPR
		
    }
  }	// end init()

endtemplate Rod