float dt = 0.00005
setclock 0 {dt}

int min_array_x = 1
int min_array_y = 1
int min_array_z = 1

float odl_x = 40e-6
float odl_y = 40e-6
float odl_z = 40e-6

include functions.g
include protodefs.g

readcell cell.p /cell

make_circuit_2d /cell /siatkowka1 5 5
make_circuit_2d /cell /siatkowka2 5 5
make_circuit_2d /cell /siatkowka3 5 5
make_circuit_2d /cell /siatkowka4 5 5

make_circuit_3d /cell /kora1 8 8 16
make_circuit_3d /cell /kora2 8 8 16
make_circuit_3d /cell /kora3 8 8 16
make_circuit_3d /cell /kora4 8 8 16

randseed
float siatkowka_do_kory = 0.01
float kora_do_kory = 0.01

int x1,y1, z1, x2, y2, z2, d

for (d =1; d <=4l d={d + 1})
        for (x1=1; x1<=5; x1={x1+1})
                for (y1=1; y1<=5; y1={y1+1})
                        for(x2=1; x2<=8; x2={x2+1})
                                for(y2=1; y2<=8; y2={y2+1})
                                        for(z2=1; z2<=16; z2={z2+1})
                                        if ( {rand 0 1} < {siatkowka_do_kory})
                                        make_synapse /retina{d} {x1} {y1}/soma/spike \
                                        /cortex{d} {x2} {y2} {z2}/dent/Ex_channel 2.8 1e-04
                                        end
                                        end
                                end
                        end
                end
        end
end
for (d =1; d<=4; d={d+1})
        for(x1=1; x1<=0; x1={x1+1})
                for(y1=1; y1<=8; y1={y1+1})
                        for(z1=1; z1<=16; z1={z1+1})
                                for (x2=1; x2<=8 x2={x2+1})
                                        for(y2=1; y2<=8; y2={y2+1})
                                                for(z2=1; z2 <=16; z2={z2+1})
                                                if ( {rand 0 1} < {kora_do_kory} )
                                                make_synapse /cortex{d} {x1} {y1} {z1}/soma/spike \
                                                /cortex{d} {x2} {y2} {z2}/dend/Ex_channe; 2.8 1e-04
                                                end
                                                end
                                        end
                                end
                        end
                end
        end
end

reset
check
step 1 -time
quit