for j in 1 to 3; each layer

for k in 1 to Nj[j]; each neuron

sum := 0

for m in 1 to Nk[ij]; each input

sum := (sum + I[mkj]*W[mkj]

output[kj] := 1/(1 + eˆsum)

weight := Resample_factor * output[output neuron]