// $Id: EC_to_pyr.g,v 16.1 2000/03/02 14:43:39 ajay Exp $
// genesis
// EC_to_pyr.g  HIPPO model 
// synaptic connections from EC cells to pyr layer (AMPA_channel of apical_2 on pyr cells).
// Each EC cell represents one learnt sequence and connects to all ILN pyr cells.

echo Making connections from EC layer to pyr layer....

function make_EC_pyr_conn
  int ecnum, pyrnum, sidx

  for (ecnum = 0; ecnum < NEC; ecnum = ecnum+1)
    for (pyrnum = 0; pyrnum < num_ILN; pyrnum = pyrnum+1)
//    for (pyrnum = 0; pyrnum < {NPYR}; pyrnum = pyrnum+1)

	addmsg /EC_layer/EC[{ecnum}]/soma/spike /pyr_layer/pyr[{pyrnum}]/apical_2/AMPA_channel SPIKE

	// get index number of this newly added synapse
	sidx = {getsynindex /EC_layer/EC[{ecnum}]/soma/spike /pyr_layer/pyr[{pyrnum}]/apical_2/AMPA_channel}

	// set delay field of this synapse.
	setfield /pyr_layer/pyr[{pyrnum}]/apical_2/AMPA_channel synapse[{sidx}].delay {EC_to_p_syndelay}

	// set weight field of this synapse. 
	setfield /pyr_layer/pyr[{pyrnum}]/apical_2/AMPA_channel synapse[{sidx}].weight {pyr_EC_wt}
    end
  end
end

make_EC_pyr_conn