// genesis
echo I5LTS_raninput
// function for setting random network inputs
if ({columntype == 0})
int i,j,dex
float randneur
float CondmaxSPIKEAMPA=0.01e-9
float Ranrate=200 //Random injection frequency
for (i=1;i<=(I5LTS_NY);i=i+1)
for (j=1;j<=(I5LTS_NX);j=j+1)
randneur = { rand 0 1.0 }
if ( {randneur <= neuronfrac} )
dex=(i-1)*I5LTS_NY+(j-1)
ce /I5LTSnet/I5LTS[{dex}]/distdendNlonga
make_Ex_chSPIKEAMPA
setfield /I5LTSnet/I5LTS[{dex}]/distdendNlonga/Ex_chSPIKEAMPA gmax {CondmaxSPIKEAMPA}
addmsg /I5LTSnet/I5LTS[{dex}]/distdendNlonga/Ex_chSPIKEAMPA /I5LTSnet/I5LTS[{dex}]/distdendNlonga CHANNEL Gk Ek
addmsg /I5LTSnet/I5LTS[{dex}]/distdendNlonga /I5LTSnet/I5LTS[{dex}]/distdendNlonga/Ex_chSPIKEAMPA VOLTAGE Vm
ce /
create randomspike /randomspikeI5LTS{dex}
setfield ^ min_amp 1.0 max_amp 1.0 rate {Ranrate} reset 1 reset_value 0
addmsg /randomspikeI5LTS{dex} /I5LTSnet/I5LTS[{dex}]/distdendNlonga/Ex_chSPIKEAMPA SPIKE
//create pulsegen /pulsegenI5LTS{dex}
//setfield ^ level1 {Ranrate} baselevel 0 width1 {stimlen} delay1 {interstimlen} trig_mode 0
//addmsg /pulsegenI5LTS{dex} /randomspikeI5LTS{dex} RATE output
//addmsg /netpulsegen /randomspikeI5LTS{dex} RATE output
setfield /I5LTSnet/I5LTS[{dex}]/distdendNlonga/Ex_chSPIKEAMPA synapse[0].delay 0 synapse[0].weight 1
end
end
end
end
if ({columntype == 1})
int i,j
int k=0
int jstartdex
float randneur
float CondmaxSPIKEAMPA=0.01e-9
float Ranrate=200 //Random injection frequency
for (i=0;i<(I5LTS_NY);i=i+1)
jstartdex = {trunc {i/2}}*2-i+1
for (j=jstartdex;j<(I5LTS_NX);j=j+2)
randneur = { rand 0 1.0 }
if ( {randneur <= neuronfrac} )
ce /I5LTSnet/I5LTS[{k}]/distdendNlonga
make_Ex_chSPIKEAMPA
setfield /I5LTSnet/I5LTS[{k}]/distdendNlonga/Ex_chSPIKEAMPA gmax {CondmaxSPIKEAMPA}
addmsg /I5LTSnet/I5LTS[{k}]/distdendNlonga/Ex_chSPIKEAMPA /I5LTSnet/I5LTS[{k}]/distdendNlonga CHANNEL Gk Ek
addmsg /I5LTSnet/I5LTS[{k}]/distdendNlonga /I5LTSnet/I5LTS[{k}]/distdendNlonga/Ex_chSPIKEAMPA VOLTAGE Vm
ce /
create randomspike /randomspikeI5LTS{k}
setfield ^ min_amp 1.0 max_amp 1.0 rate {Ranrate} reset 1 reset_value 0
addmsg /randomspikeI5LTS{k} /I5LTSnet/I5LTS[{k}]/distdendNlonga/Ex_chSPIKEAMPA SPIKE
//create pulsegen /pulsegenI5LTS{k}
//setfield ^ level1 {Ranrate} baselevel 0 width1 {stimlen} delay1 {interstimlen} trig_mode 0
//addmsg /pulsegenI5LTS{k} /randomspikeI5LTS{k} RATE output
//addmsg /netpulsegen /randomspikeI5LTS{k} RATE output
setfield /I5LTSnet/I5LTS[{k}]/distdendNlonga/Ex_chSPIKEAMPA synapse[0].delay 0 synapse[0].weight 1
end
k=k+1
end
end
end
|