Facebook
From Wet Curlew, 3 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 50
  1. loat dt = 0.00005
  2. setclock 0 {dt}
  3.  
  4. int min_array_x = 1
  5. int min_array_y = 1
  6. int min_array_z = 1
  7.  
  8. float odl_x = 40e-6
  9. float odl_y = 40e-6
  10. float odl_z = 40e-6
  11.  
  12. include functions.g
  13. include protodefs.g
  14.  
  15. readcell cell.p /cell
  16.  
  17. make_circuit_2d /cell /siatkowka1 5 5
  18. make_circuit_2d /cell /siatkowka2 5 5
  19. make_circuit_2d /cell /siatkowka3 5 5
  20. make_circuit_2d /cell /siatkowka4 5 5
  21.  
  22. make_circuit_3d /cell /kora1 8 8 16
  23. make_circuit_3d /cell /kora2 8 8 16
  24. make_circuit_3d /cell /kora3 8 8 16
  25. make_circuit_3d /cell /kora4 8 8 16
  26.  
  27. randseed
  28. float siatkowka_do_kory = 0.01
  29. float kora_do_kory = 0.01
  30.  
  31. int x1,y1, z1, x2, y2, z2, d
  32.  
  33. for (d =1; d <=4l d={d + 1})
  34.         for (x1=1; x1<=5; x1={x1+1})
  35.                 for (y1=1; y1<=5; y1={y1+1})
  36.                         for(x2=1; x2<=8; x2={x2+1})
  37.                                 for(y2=1; y2<=8; y2={y2+1})
  38.                                         for(z2=1; z2<=16; z2={z2+1})
  39.                                         if ( {rand 0 1} < {siatkowka_do_kory})
  40.                                         make_synapse /retina{d} {x1} {y1}/soma/spike \
  41.                                         /cortex{d} {x2} {y2} {z2}/dent/Ex_channel 2.8 1e-04
  42.                                         end
  43.                                         end
  44.                                 end
  45.                         end
  46.                 end
  47.         end
  48. end
  49.  
  50. reset
  51. check
  52. step 1 -time
  53. quit
  54.