// This function specifies the number of segments in all sections of the cell
// edited by Yiota Poirazi, July 2001, poirazi@LNC.usc.edu
// edited by Fiona Muellner, Mar 2015, fiona.muellner@gmail.com

proc cut_sections_sel2() {  
  strdef namecopy
  forall {
	 swvar = 1
	 namecopy = secname()
	 forsec myseclist {
  	 if (strcmp(namecopy,secname())) {
	 	swvar = 0
	 }
	 if (swvar == 1) {
	      nseg=1+(1+int(L/$1/2))*2
	 }
  	 }
   }
}