// genesis // Arranging the P23RSb cells in space. echo Creating P23RSb network //float P23RSb_SEPX = 25e-6 //float P23RSb_SEPY = 25e-6 //float P23RSb_NX = 5 //float P23RSb_NY = 5 float originxmin float originymin int ydex float placer float randzpos int i,j int k = 0 placer = {mynode}/{sqrtNnodes} //echo placer= {placer} ydex = { round {placer} } //echo ydex= {ydex} originxmin = ({mynode}-{ydex}*sqrtNnodes)*P23RSb_NX*P23RSb_SEPX //echo originxmin= {originxmin} originymin = {ydex}*P23RSb_NY*P23RSb_SEPY //echo originymin= {originymin} create neutral /P23RSbnet // CREATING THE PLANE OF P23RSb cells //createmap /P23RSb /P23RSbnet \ // {P23RSb_NX} {P23RSb_NY} \ // -delta {P23RSb_SEPX} {P23RSb_SEPY} \ // -origin {originxmin} {originymin} // Note that these cells' positions overlap. This doesn't cause any // problems since we can refer to them as separate groups. for (j = 0; j < P23RSb_NY; j = j+1) for (i = 0; i < P23RSb_NX; i = i+1) randzpos = { rand 1602e-6 2871e-6 } copy /P23RSb /P23RSbnet/P23RSb[{k}] position /P23RSbnet/P23RSb[{k}] \ {originxmin + P23RSb_SEPX*i} {originymin + P23RSb_SEPY*j} {randzpos} k=k+1 end end