congen_pagecontrol Module Reference

Page control. More...

Functions/Subroutines
subroutine, public	addl (lines)
	Add blank lines to output. More...
subroutine, public	ctlpg1 (lpp, h1, nh1, h2, nh2)
	Controls page layout and counting. More...
subroutine, public	newpg
	Start new page of output. More...
subroutine, public	space (lines)
	Add blank lines to output. More...
subroutine, public	taddl (lines, lt)
	Add blank lines to output. More...
subroutine, public	taddl1 (lines, lt)
	Check available lines. More...

Detailed Description

Set of routines for pagination of the text output from the program. Every couple of lines a page header is produced.

Function/Subroutine Documentation

addl()

subroutine, public congen_pagecontrol::addl

(

integer, intent(in)

lines

)

Increments the output line counter by the given number of lines. If the result exceeds the built-in limit, a new page header is printed. Note that the lines are virtual, none is actually printed if the pagination threshold is not reached.

This function is mostly used before writing a known number of lines, so that all lines to be written appear on the same page.

Definition at line 49 of file congen_pagecontrol.f90.

References congen_data::head, congen_data::lppmax, congen_data::lppr, congen_data::nftw, and congen_data::npage.

Referenced by congen_driver::csfgen(), congen_distribution::print1(), congen_distribution::print2(), congen_distribution::print3(), congen_distribution::print4(), congen_distribution::print5(), congen_driver::stwrit(), and congen_driver::wvwrit().

Here is the caller graph for this function:

ctlpg1()

subroutine, public congen_pagecontrol::ctlpg1	(	integer, intent(in)	lpp,
		character(len=1), dimension(nh1), intent(in)	h1,
		integer, intent(in)	nh1,
		character(len=1), dimension(nh2), intent(in)	h2,
		integer, intent(in)	nh2
	)

Definition at line 72 of file congen_pagecontrol.f90.

References congen_data::head, congen_data::lppmax, congen_data::lppr, and congen_data::npage.

Referenced by congen_driver::stwrit().

Here is the caller graph for this function:

newpg()

subroutine, public congen_pagecontrol::newpg

Resets the line counter, increments the page counter and prints the page header on standard output.

Definition at line 120 of file congen_pagecontrol.f90.

References congen_data::head, congen_data::lppr, congen_data::nftw, and congen_data::npage.

Referenced by congen_driver::csfgen(), congen_distribution::print1(), congen_driver::stwrit(), and congen_driver::wvwrit().

Here is the caller graph for this function:

space()

subroutine, public congen_pagecontrol::space

(

integer, intent(in)

lines

)

Increments the global line counter by the given number of lines. If the pagination limit is not reached, it will actually write those empty lines (containing one space each) to output.

Parameters

lines

Number of blank lines

Definition at line 143 of file congen_pagecontrol.f90.

References congen_data::lppmax, congen_data::lppr, and congen_data::nftw.

Referenced by congen_driver::csfgen(), congen_distribution::print1(), congen_distribution::print2(), congen_distribution::print3(), congen_distribution::print4(), congen_driver::stwrit(), and congen_driver::wvwrit().

Here is the caller graph for this function:

taddl()

subroutine, public congen_pagecontrol::taddl	(	integer, intent(in)	lines,
		integer, intent(out)	lt
	)

Advance the internal output line counter and check if pagination limit has been hit.

Parameters

lines	Number of lines to add
lt	Output status: 0 for no lines added (would overflow page), 1 for all lines added.

Definition at line 169 of file congen_pagecontrol.f90.

References congen_data::lppmax, and congen_data::lppr.

Referenced by congen_distribution::print1(), and congen_distribution::print3().

Here is the caller graph for this function:

taddl1()

subroutine, public congen_pagecontrol::taddl1	(	integer, intent(in)	lines,
		integer, intent(out)	lt
	)

Checks if the given number of lines fits to page.

Parameters

lines	Number of lines to test.
lt	On return 0 if lines do not fit on page, 1 if they do.

Definition at line 192 of file congen_pagecontrol.f90.

References congen_data::lppmax, and congen_data::lppr.

Referenced by congen_distribution::print1().

Here is the caller graph for this function: