Searched refs:nsidt (Results 1 – 1 of 1) sorted by relevance
538 integer nsidt ! sum of all nsidl's local620 nsidt=0622 nsidt=nsidt+nsid(j)627 nsidt=nsidl629 if(nsidt.gt.0) then635 allocate (temp(nsidt))671 do j = 2, nsidt ! loop over ID's681 nsidg=nsidt ! assume there are no duplicate SurfID's682 do j = 2, nsidt689 do j = 2, nsidt