Contact: | Jeff Anderson |
Reviewers: | |
Revision: | $Revision: 1.3 $ |
Change Date: | $Date: 2002/07/11 21:09:47 $ |
Change history: | see CVS log (cop-out, I know) |
A note about documentation style. Optional arguments are enclosed in brackets [like this].
Provides a representation of a physical location on a one dimensional periodic domain. A type that abstracts the location is provided along with operators to compute the distance between two locations. This is a member of a class of similar location modules that provide the same abstraction for different represenations of physical space (for instance a three dimensional shell on a sphere).
types_mod utilities_mod random_seq_mod
use xxxxxxx, only : | location_type & |
get_dist & | |
get_location & | |
set_location | |
write_location | |
read_location | |
interactive_location |
Optional namelist interface &atmosphere_nml may be read from file input.nml.
fill in text here
type location_type private real(r8) :: x end type location_type
Provides an abstract representation of physical location on a one dimensional periodic domain.
Component | Description |
---|---|
x | the nondimensional distance [0,1] |
integer, intent(in) :: file type(location_type), intent(inout) :: loc
Given an integer IO channel of an open file and a location, writes the location to this file.
file | the unit number of the open file. |
loc | location type to be written. |
Eventually, a more general file descriptor type should replace the use of the integer unit number.
type(location_type), intent(in) :: loc1, loc2 real(r8) :: var
Returns the distance between two locations.
loc1 | first location. |
loc2 | second location. |
var | distance between loc1 and loc2. |
Code | Routine | Condition |
---|---|---|
xxxx | yyyyy | size of [argument] is incorrect The size of [argument] must be between 1 and 4. |
xxxx | yyyyy | bad judgement What were you thinking? |
None.
type location_type private real(r8) :: x end type location_type