function swt(cnum)
    int cnum, imes
    int i

    imes = {getfield /pyr_layer/pyr[{cnum}]/apical/AMPA_channel nsynapses} - 1
    for(i = 0; i <= imes; i = i + 1)
	echo {getfield /pyr_layer/pyr[{cnum}]/apical/AMPA_channel synapse[{i}].weight}
    end

end