begintemplate Bip

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=16
		{ pt3dclear() pt3dadd(x, y, z-L, 1) pt3dadd(x, y, z, 1) }
		diam=5 
		nseg=9
		
		insert pas
		e_pas=-41
		g_pas=.0077
		insert bip_ih
		insert bip_cad
		depth_bip_cad = 0.025
		taur_bip_cad=0.8
		insert bip_tsbp
		insert bip_IA
		insert bip_IKv
		ek_IKv = -58

    }
  }	// end init()

endtemplate Bip