define_tag(
		'navigation',
		-namespace='results_',
		-opt='found', -type='integer',
		-opt='shown', -type='integer',
		-opt='skipped', -type='integer',
		-opt='range', -type='integer',		
		-opt='id', -type='string',
		-priority='replace',
		-description='Generates links for found set navigation.'
	);
		!local_defined('id') ? local('id' = lasso_uniqueid);
	
		local(
			'found_count' = (local_defined('found') ? #found | found_count),
			'shown_count' = (local_defined('shown') ? #shown | maxrecords_value),
			'shown_page' = integer,
			'skip_counts' = array,
			'skip' = (local_defined('skipped') ? #skipped | skiprecords_value),
			'counter' = 0,
			'radius' = 2,
			'display' = string,
			'prev' = string,
			'next' = string,
			'first' = string,
			'last' = string,
			'lower' = integer,
			'upper' = integer,
			'out' = string
		);

		// no navigation is needed if #found_count < #shown_count
		if(#found_count > #shown_count);
			// range defaults to 5
			!local_defined('range') ? local('range' = 5);		
			#radius = #range / 2;
		
			// generate form to preserve search params
			local('form' = '\


	
\			');
			
			iterate(client_params, local('this'));
				if(!#this->isa('pair'));
					#form += '\t\n';
				else((: '-skiprows') !>> #this->first);
					#form += '\t\n';
				/if;
			/iterate;
			
			#form += '
\n';
			
			// calculate number of pages
			local('pages' = #found_count / #shown_count);	
			#found_count % #shown_count > 0 ? #pages += 1;
			
			// calculate skip count for each page
			loop(#pages);
				#skip_counts->insert(#counter);
				#counter += #shown_count;
			/loop;
			
			// find the current page
			#shown_page = #skip_counts->findposition(#skip)->get(1);
	
			// determine range of pages to show
			#lower = #skip - (#shown_count * #radius);
			#upper = #skip + (#shown_count * #radius);
		
			// find previous/next, first/last links
			if(#shown_page > 1);
				// #prev = '< Previous  ';
				// #first = '<< First  ';		
				#prev = '< Previous  ';
				#first = '<< First  ';		
			/if;
			
			if(#shown_page < #skip_counts->size);
				// #next = '  Next >';
				// #last = '  Last >>';
				#next = '  Next >';
				#last = '  Last >>';
			/if;
				
			// generate individual page nav links
			iterate(#skip_counts, local('this'));
				if(#this >= #lower && #this <= #upper);
					// #display += '';		
					#display += '';		
					#shown_page == loop_count ? #display += '';
					#display += loop_count;
					#shown_page == loop_count ? #display += '';	
					#display += '';			
					(#this < #upper && #this != #skip_counts->last) ? #display += ' | ';
				/if;
			/iterate;
			
			#out = #form + '
' + #first + #prev + #display + #next + #last + '
\n';
			
			return(@#out);
		/if;
	/define_tag;