File: mitsyn.g

package info (click to toggle)
genesis 2.1-1.1
  • links: PTS
  • area: main
  • in suites: potato
  • size: 14,288 kB
  • ctags: 10,667
  • sloc: ansic: 111,959; makefile: 2,240; yacc: 1,797; lex: 976; csh: 54; sh: 13
file content (77 lines) | stat: -rw-r--r-- 1,604 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
//genesis

/* FILE INFORMATION
** A couple of synaptic channels for the mitral cell model
** Implemented by Upinder S. Bhalla.
**
** The channels have an alpha_function type conductance change for
** each synaptic event.
**
** Modified by D. Beeman for GENESIS 2.0 syntax and synchan object - 5/19/94
*/

// CONSTANTS
float EGlu = 0.045
float EGABA = -0.090
float SOMA_A = 1e-9
float GGlu = SOMA_A * 50
float GGABA = SOMA_A * 50

//===================================================================
//                     SYNAPTIC CHANNELS   (Values guessed at)
//===================================================================


function make_glu_mit_upi
	if ({exists glu_mit_upi})
		return
	end

	create		synchan	glu_mit_upi
    	setfield	        glu_mit_upi \
		Ek			{EGlu} \
		tau1		{ 2.0e-3 } \	// sec
		tau2		{ 2.0e-3 } \ 	// sec
		gmax		{GGlu} // Siemens
end

function make_GABA_mit_upi
	if ({exists GABA_mit_upi})
		return
	end

	create		synchan	GABA_mit_upi
    	setfield	        GABA_mit_upi \
	Ek			{ EGABA } \
	tau1		{ 20.0e-3 } \	// sec
	tau2		{ 20.0e-3 } \	// sec
	gmax		{GGABA}		// Siemens
end


function make_glu_gran_usb
	if ({exists glu_gran_usb})
		return
	end

	create		synchan	glu_gran_usb
    	setfield	        glu_gran_usb \
		Ek			{EGlu} \
		tau1		{ 2.0e-3 } \	// sec
		tau2		{ 2.0e-3 } \ 	// sec
		gmax		{GGlu} // Siemens
end

function make_GABA_gran_usb
	if ({exists GABA_gran_usb})
		return
	end

	create		synchan	GABA_gran_usb
    	setfield	        GABA_gran_usb \
	Ek			{ EGABA } \
	tau1		{ 20.0e-3 } \	// sec
	tau2		{ 20.0e-3 } \	// sec
	gmax		{GGABA}		// Siemens
end