IO_ – plantFEM

type, public :: IO_

Variables

fh active EOF state path name extention title xlabel ylabel zlabel filename lastModifiedTime json_mode activate_rule header offset content_type

Type-Bound Procedures

unit numLine flush rule ResetRule openIOchar openIOstring parseIOChar200 parseIO2keysChar200 parse open diff updated FileDateTime LastModified owner size rewind goBack goForward writeIOcharcharchar writeIOcharchar writeIOchar writeIOstringstringstring writeIOstringstring writeIOstring dumpIOJSON_Key_Vector dumpIOJSON_Key_VectorRe32 dumpIOJSON_Key_VectorInt32 dumpIOJSON_Key_value dumpIOJSON_Key_valueRe32 dumpIOJSON_Key_valueRe64 dumpIOJSON_Key_valueChar dumpIOJSON_Key_ArrayRe64 dumpIOJSON_Key_ArrayInt32 dump arg writeIOint32re64 writeIOint32re64vector writeIOint32int32vector writeIOint32 writeIOint32int32 writeIOint32int32int32 writeIOint32int32int32int32 writeIOint32int32int32int32int32 writeIOint32int32int32int32int32int32 writeIOint32Vector writeIOint32Vectorint32Vector writeIOint32Vectorint32Vectorint32Vector writeIOint32Vectorint32Vectorre64Vector writeIOint32Vectorre64Vector writeIOre64Vectorre64Vector writeIOre64Vectorre64Vectorre64Vector writeIOint32Array writeIOre64 writeIOre64re64 writeIOre64re64re64 writeIOre64re64re64re64 writeIOre64re64re64re64re64 writeIOre64re64re64re64re64re64 writeIOre64Vector writeIOre64Array writeIOcomplex64 writeIOcomplex64Vector writeIOcomplex64Array write readIOchar readIOInt readIOIntVector readIOIntArray readIOReal64 readIOReal64Vector readIOReal64Array read plotIO plotIODirect plotIODirectReal32 plot splot readline close

Components

Type	Visibility	Attributes		Name		Initial
integer,	public		::	fh	=	100
logical,	public		::	active	=	.false.
logical,	public		::	EOF	=	.true.
character(len=1),	public		::	state
character(len=200),	public		::	path
character(len=200),	public		::	name
character(len=200),	public		::	extention
character(len=:),	public,	allocatable	::	title
character(len=:),	public,	allocatable	::	xlabel
character(len=:),	public,	allocatable	::	ylabel
character(len=:),	public,	allocatable	::	zlabel
character(len=:),	public,	allocatable	::	filename
integer(kind=int32),	public		::	lastModifiedTime	=	0
logical,	public		::	json_mode	=	.false.
logical,	public		::	activate_rule	=	.false.
integer(kind=int32),	public		::	header
integer(kind=int32),	public		::	offset
integer(kind=int32),	public,	allocatable	::	content_type(:)

Type-Bound Procedures

procedure, public :: unit => unitIO

public function unitIO(obj) result(unit)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

Return Value integer(kind=int32)

procedure, public :: numLine => numLineIO

public function numLineIO(obj, name) result(line)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in) :: name

Return Value integer(kind=int32)

procedure, public :: flush => flushIO

public subroutine flushIO(obj)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(in)			::	obj

procedure, public :: rule => ruleIO

public subroutine ruleIO(obj, header, offset, content_type)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	header
integer(kind=int32),	intent(in)	::	offset
integer(kind=int32),	intent(in)	::	content_type(:)

procedure, public :: ResetRule => ResetRuleIO

public subroutine ResetRuleIO(obj, header, offset, content_type)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	header
integer(kind=int32),	intent(in)	::	offset
integer(kind=int32),	intent(in)	::	content_type(:)

procedure, public, pass :: openIOchar

public recursive subroutine openIOchar(obj, path, state, name, extention, fh)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	path
character(len=1),	intent(in),	optional	::	state
character(len=*),	intent(in),	optional	::	name
character(len=*),	intent(in),	optional	::	extention
integer(kind=int32),	intent(in),	optional	::	fh

procedure, public, pass :: openIOstring

public subroutine openIOstring(obj, path_s, state, name_s, extention_s, fh)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
type(string_),	intent(in)		::	path_s
character(len=1),	intent(in),	optional	::	state
type(string_),	intent(in),	optional	::	name_s
type(string_),	intent(in),	optional	::	extention_s
integer(kind=int32),	intent(in),	optional	::	fh

procedure, public, pass :: parseIOChar200

public function parseIOChar200(obj, filename, fileformat, key1, debug) result(ret)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	filename
integer(kind=int32),	intent(in),	optional	::	fileformat
character(len=*),	intent(in)		::	key1
logical,	intent(in),	optional	::	debug

Return Value character(len=:), allocatable

procedure, public, pass :: parseIO2keysChar200

public function parseIO2keysChar200(obj, filename, fileformat, key1, key2, debug) result(ret)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	filename
integer(kind=int32),	intent(in),	optional	::	fileformat
character(len=*),	intent(in)		::	key1
character(len=*),	intent(in)		::	key2
logical,	intent(in),	optional	::	debug

Return Value character(len=200)

generic, public :: parse => parseIOChar200, parseIO2keysChar200

public function parseIOChar200(obj, filename, fileformat, key1, debug) result(ret)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	filename
integer(kind=int32),	intent(in),	optional	::	fileformat
character(len=*),	intent(in)		::	key1
logical,	intent(in),	optional	::	debug

Return Value character(len=:), allocatable

public function parseIO2keysChar200(obj, filename, fileformat, key1, key2, debug) result(ret)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	filename
integer(kind=int32),	intent(in),	optional	::	fileformat
character(len=*),	intent(in)		::	key1
character(len=*),	intent(in)		::	key2
logical,	intent(in),	optional	::	debug

Return Value character(len=200)

generic, public :: open => openIOchar, openIOstring

public recursive subroutine openIOchar(obj, path, state, name, extention, fh)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	path
character(len=1),	intent(in),	optional	::	state
character(len=*),	intent(in),	optional	::	name
character(len=*),	intent(in),	optional	::	extention
integer(kind=int32),	intent(in),	optional	::	fh

public subroutine openIOstring(obj, path_s, state, name_s, extention_s, fh)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
type(string_),	intent(in)		::	path_s
character(len=1),	intent(in),	optional	::	state
type(string_),	intent(in),	optional	::	name_s
type(string_),	intent(in),	optional	::	extention_s
integer(kind=int32),	intent(in),	optional	::	fh

procedure, public :: diff => diffIO

public function diffIO(obj, name) result(ret)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in), optional :: name

Return Value logical

procedure, public :: updated => diffIO

public function diffIO(obj, name) result(ret)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in), optional :: name

Return Value logical

procedure, public :: FileDateTime => FileDateTimeIO

public function FileDateTimeIO(obj, name) result(ret)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in), optional :: name

Return Value integer(kind=int32)

procedure, public :: LastModified => FileDateTimeIO

public function FileDateTimeIO(obj, name) result(ret)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in), optional :: name

Return Value integer(kind=int32)

procedure, public :: owner => ownerIO

public function ownerIO(obj, name) result(ret)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in), optional :: name

Return Value integer(kind=int32)

procedure, public :: size => sizeIO

public function sizeIO(obj, name) result(ret)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in), optional :: name

Return Value integer(kind=int32)

procedure, public :: rewind => rewindIO

public subroutine rewindIO(obj)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

procedure, public :: goBack => goBackIO

public subroutine goBackIO(obj, lines)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in), optional :: lines

procedure, public :: goForward => goForwardIO

public subroutine goForwardIO(obj, lines)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in), optional :: lines

procedure, public, pass :: writeIOcharcharchar

public subroutine writeIOcharcharchar(obj, char1, char2, char3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	char1
character(len=*),	intent(in)	::	char2
character(len=*),	intent(in)	::	char3

procedure, public, pass :: writeIOcharchar

public subroutine writeIOcharchar(obj, char1, char2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	char1
character(len=*),	intent(in)	::	char2

procedure, public, pass :: writeIOchar

public subroutine writeIOchar(obj, char, append, advance)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in)		::	char
logical,	intent(in),	optional	::	append
logical,	intent(in),	optional	::	advance

procedure, public, pass :: writeIOstringstringstring

public subroutine writeIOstringstringstring(obj, string1, string2, string3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
type(string_),	intent(in)	::	string1
type(string_),	intent(in)	::	string2
type(string_),	intent(in)	::	string3

procedure, public, pass :: writeIOstringstring

public subroutine writeIOstringstring(obj, string1, string2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
type(string_),	intent(in)	::	string1
type(string_),	intent(in)	::	string2

procedure, public, pass :: writeIOstring

public subroutine writeIOstring(obj, string)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

type(string_), intent(in) :: string

procedure, public, pass :: dumpIOJSON_Key_Vector

public subroutine dumpIOJSON_Key_Vector(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real64),	intent(in)	::	valueVector(:)

procedure, public, pass :: dumpIOJSON_Key_VectorRe32

public subroutine dumpIOJSON_Key_VectorRe32(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real32),	intent(in)	::	valueVector(:)

procedure, public, pass :: dumpIOJSON_Key_VectorInt32

public subroutine dumpIOJSON_Key_VectorInt32(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
integer(kind=int32),	intent(in)	::	valueVector(:)

procedure, public, pass :: dumpIOJSON_Key_value

public subroutine dumpIOJSON_Key_value(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
integer(kind=int32),	intent(in)	::	value

procedure, public, pass :: dumpIOJSON_Key_valueRe32

public subroutine dumpIOJSON_Key_valueRe32(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real32),	intent(in)	::	value

procedure, public, pass :: dumpIOJSON_Key_valueRe64

public subroutine dumpIOJSON_Key_valueRe64(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real64),	intent(in)	::	value

procedure, public, pass :: dumpIOJSON_Key_valueChar

public subroutine dumpIOJSON_Key_valueChar(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
character(len=*),	intent(in)	::	value

procedure, public, pass :: dumpIOJSON_Key_ArrayRe64

public subroutine dumpIOJSON_Key_ArrayRe64(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real64),	intent(in)	::	valueVector(:,:)

procedure, public, pass :: dumpIOJSON_Key_ArrayInt32

public subroutine dumpIOJSON_Key_ArrayInt32(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
integer(kind=int32),	intent(in)	::	valueVector(:,:)

generic, public :: dump => dumpIOJSON_Key_Vector, dumpIOJSON_Key_VectorRe32, dumpIOJSON_Key_VectorInt32, dumpIOJSON_Key_value, dumpIOJSON_Key_valueRe32, dumpIOJSON_Key_valueRe64, dumpIOJSON_Key_valueChar, dumpIOJSON_Key_ArrayRe64, dumpIOJSON_Key_ArrayInt32

public subroutine dumpIOJSON_Key_Vector(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real64),	intent(in)	::	valueVector(:)

public subroutine dumpIOJSON_Key_VectorRe32(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real32),	intent(in)	::	valueVector(:)

public subroutine dumpIOJSON_Key_VectorInt32(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
integer(kind=int32),	intent(in)	::	valueVector(:)

public subroutine dumpIOJSON_Key_value(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
integer(kind=int32),	intent(in)	::	value

public subroutine dumpIOJSON_Key_valueRe32(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real32),	intent(in)	::	value

public subroutine dumpIOJSON_Key_valueRe64(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real64),	intent(in)	::	value

public subroutine dumpIOJSON_Key_valueChar(obj, key, value)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
character(len=*),	intent(in)	::	value

public subroutine dumpIOJSON_Key_ArrayRe64(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
real(kind=real64),	intent(in)	::	valueVector(:,:)

public subroutine dumpIOJSON_Key_ArrayInt32(obj, key, valueVector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	key
integer(kind=int32),	intent(in)	::	valueVector(:,:)

procedure, public :: arg => argIO

public function argIO(obj, id) result(arg)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

integer(kind=int32), intent(in) :: id

Return Value character(len=200)

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(in)			::	obj
integer(kind=int32),	intent(in)			::	id

procedure, public, pass :: writeIOint32re64

public subroutine writeIOint32re64(obj, in32, re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32
real(kind=real64),	intent(in)	::	re64

procedure, public, pass :: writeIOint32re64vector => writeIOint32re64Vector

public subroutine writeIOint32re64Vector(obj, in32_1, re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
real(kind=real64),	intent(in)	::	re64(:)

procedure, public, pass :: writeIOint32int32vector

public subroutine writeIOint32int32vector(obj, in32_1, in32)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32(:)

procedure, public, pass :: writeIOint32

public subroutine writeIOint32(obj, in32)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in) :: in32

procedure, public, pass :: writeIOint32int32

public subroutine writeIOint32int32(obj, in32_1, in32_2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2

procedure, public, pass :: writeIOint32int32int32

public subroutine writeIOint32int32int32(obj, in32_1, in32_2, in32_3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3

procedure, public, pass :: writeIOint32int32int32int32

public subroutine writeIOint32int32int32int32(obj, in32_1, in32_2, in32_3, in32_4)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3
integer(kind=int32),	intent(in)	::	in32_4

procedure, public, pass :: writeIOint32int32int32int32int32

public subroutine writeIOint32int32int32int32int32(obj, in32_1, in32_2, in32_3, in32_4, in32_5)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3
integer(kind=int32),	intent(in)	::	in32_4
integer(kind=int32),	intent(in)	::	in32_5

procedure, public, pass :: writeIOint32int32int32int32int32int32

public subroutine writeIOint32int32int32int32int32int32(obj, in32_1, in32_2, in32_3, in32_4, in32_5, in32_6)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3
integer(kind=int32),	intent(in)	::	in32_4
integer(kind=int32),	intent(in)	::	in32_5
integer(kind=int32),	intent(in)	::	in32_6

procedure, public, pass :: writeIOint32Vector

public subroutine writeIOint32Vector(obj, in32)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in) :: in32(:)

procedure, public, pass :: writeIOint32Vectorint32Vector => writeIOint32VectorInt32vector

public subroutine writeIOint32VectorInt32vector(obj, in32, in32_c)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
integer(kind=int32),	intent(in)	::	in32_c(:)

procedure, public, pass :: writeIOint32Vectorint32Vectorint32Vector => writeIOint32VectorInt32vectorInt32Vector

public subroutine writeIOint32VectorInt32vectorInt32Vector(obj, in32, in32_c, in32_cc)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
integer(kind=int32),	intent(in)	::	in32_c(:)
integer(kind=int32),	intent(in)	::	in32_cc(:)

procedure, public, pass :: writeIOint32Vectorint32Vectorre64Vector => writeIOint32VectorInt32vectorre64Vector

public subroutine writeIOint32VectorInt32vectorre64Vector(obj, in32, in32_c, re64_cc)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
integer(kind=int32),	intent(in)	::	in32_c(:)
real(kind=real64),	intent(in)	::	re64_cc(:)

procedure, public, pass :: writeIOint32Vectorre64Vector => writeIOint32VectorRe64vector

public subroutine writeIOint32VectorRe64vector(obj, in32, Re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
real(kind=real64),	intent(in)	::	Re64(:)

procedure, public, pass :: writeIOre64Vectorre64Vector => writeIORe64VectorRe64vector

public subroutine writeIORe64VectorRe64vector(obj, Re64_c, Re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	Re64_c(:)
real(kind=real64),	intent(in)	::	Re64(:)

procedure, public, pass :: writeIOre64Vectorre64Vectorre64Vector => writeIORe64VectorRe64vectorRe64vector

public subroutine writeIORe64VectorRe64vectorRe64vector(obj, Re64_cc, Re64_c, Re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	Re64_cc(:)
real(kind=real64),	intent(in)	::	Re64_c(:)
real(kind=real64),	intent(in)	::	Re64(:)

procedure, public, pass :: writeIOint32Array

public subroutine writeIOint32Array(obj, in32)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in) :: in32(:,:)

procedure, public, pass :: writeIOre64

public subroutine writeIOre64(obj, re64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

real(kind=real64), intent(in) :: re64

procedure, public, pass :: writeIOre64re64

public subroutine writeIOre64re64(obj, re64_1, re64_2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2

procedure, public, pass :: writeIOre64re64re64

public subroutine writeIOre64re64re64(obj, re64_1, re64_2, re64_3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3

procedure, public, pass :: writeIOre64re64re64re64

public subroutine writeIOre64re64re64re64(obj, re64_1, re64_2, re64_3, re64_4)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3
real(kind=real64),	intent(in)	::	re64_4

procedure, public, pass :: writeIOre64re64re64re64re64

public subroutine writeIOre64re64re64re64re64(obj, re64_1, re64_2, re64_3, re64_4, re64_5)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3
real(kind=real64),	intent(in)	::	re64_4
real(kind=real64),	intent(in)	::	re64_5

procedure, public, pass :: writeIOre64re64re64re64re64re64

public subroutine writeIOre64re64re64re64re64re64(obj, re64_1, re64_2, re64_3, re64_4, re64_5, re64_6)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3
real(kind=real64),	intent(in)	::	re64_4
real(kind=real64),	intent(in)	::	re64_5
real(kind=real64),	intent(in)	::	re64_6

procedure, public, pass :: writeIOre64Vector

public subroutine writeIOre64Vector(obj, re64, sparse)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	re64(:)
logical,	intent(in),	optional	::	sparse

procedure, public, pass :: writeIOre64Array

public subroutine writeIOre64Array(obj, re64, sparse)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	re64(:,:)
logical,	intent(in),	optional	::	sparse

procedure, public, pass :: writeIOcomplex64

public subroutine writeIOcomplex64(obj, complex64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

complex(kind=kind(0d0)), intent(in) :: complex64

procedure, public, pass :: writeIOcomplex64Vector

public subroutine writeIOcomplex64Vector(obj, complex64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

complex(kind=kind(0d0)), intent(in) :: complex64(:)

procedure, public, pass :: writeIOcomplex64Array

public subroutine writeIOcomplex64Array(obj, complex64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

complex(kind=kind(0d0)), intent(in) :: complex64(:,:)

generic, public :: write => writeIOchar, writeIOstring, writeIOre64, writeIOre64Vector, writeIOre64Array, writeIOint32, writeIOint32Vector, writeIOint32Array, writeIOre64re64, writeIOre64re64re64, writeIOre64re64re64re64, writeIOre64re64re64re64re64, writeIOre64re64re64re64re64re64, writeIOint32int32, writeIOint32int32int32, writeIOint32int32int32int32, writeIOint32int32int32int32int32, writeIOint32int32int32int32int32int32, writeIOstringstring, writeIOstringstringstring, writeIOcharchar, writeIOcharcharchar, writeIOint32re64vector, writeIOint32int32vector, writeIOint32re64, writeIOcomplex64, writeIOcomplex64Vector, writeIOcomplex64Array, writeIOint32Vectorint32Vector, writeIOint32Vectorre64Vector, writeIOre64Vectorre64Vector, writeIOre64Vectorre64Vectorre64Vector, writeIOint32Vectorint32Vectorint32Vector, writeIOint32Vectorint32Vectorre64Vector

public subroutine writeIOchar(obj, char, append, advance)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in)		::	char
logical,	intent(in),	optional	::	append
logical,	intent(in),	optional	::	advance

public subroutine writeIOstring(obj, string)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

type(string_), intent(in) :: string
public subroutine writeIOre64(obj, re64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

real(kind=real64), intent(in) :: re64

public subroutine writeIOre64Vector(obj, re64, sparse)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	re64(:)
logical,	intent(in),	optional	::	sparse

public subroutine writeIOre64Array(obj, re64, sparse)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	re64(:,:)
logical,	intent(in),	optional	::	sparse

public subroutine writeIOint32(obj, in32)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in) :: in32
public subroutine writeIOint32Vector(obj, in32)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in) :: in32(:)
public subroutine writeIOint32Array(obj, in32)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

integer(kind=int32), intent(in) :: in32(:,:)

public subroutine writeIOre64re64(obj, re64_1, re64_2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2

public subroutine writeIOre64re64re64(obj, re64_1, re64_2, re64_3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3

public subroutine writeIOre64re64re64re64(obj, re64_1, re64_2, re64_3, re64_4)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3
real(kind=real64),	intent(in)	::	re64_4

public subroutine writeIOre64re64re64re64re64(obj, re64_1, re64_2, re64_3, re64_4, re64_5)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3
real(kind=real64),	intent(in)	::	re64_4
real(kind=real64),	intent(in)	::	re64_5

public subroutine writeIOre64re64re64re64re64re64(obj, re64_1, re64_2, re64_3, re64_4, re64_5, re64_6)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	re64_1
real(kind=real64),	intent(in)	::	re64_2
real(kind=real64),	intent(in)	::	re64_3
real(kind=real64),	intent(in)	::	re64_4
real(kind=real64),	intent(in)	::	re64_5
real(kind=real64),	intent(in)	::	re64_6

public subroutine writeIOint32int32(obj, in32_1, in32_2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2

public subroutine writeIOint32int32int32(obj, in32_1, in32_2, in32_3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3

public subroutine writeIOint32int32int32int32(obj, in32_1, in32_2, in32_3, in32_4)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3
integer(kind=int32),	intent(in)	::	in32_4

public subroutine writeIOint32int32int32int32int32(obj, in32_1, in32_2, in32_3, in32_4, in32_5)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3
integer(kind=int32),	intent(in)	::	in32_4
integer(kind=int32),	intent(in)	::	in32_5

public subroutine writeIOint32int32int32int32int32int32(obj, in32_1, in32_2, in32_3, in32_4, in32_5, in32_6)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32_2
integer(kind=int32),	intent(in)	::	in32_3
integer(kind=int32),	intent(in)	::	in32_4
integer(kind=int32),	intent(in)	::	in32_5
integer(kind=int32),	intent(in)	::	in32_6

public subroutine writeIOstringstring(obj, string1, string2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
type(string_),	intent(in)	::	string1
type(string_),	intent(in)	::	string2

public subroutine writeIOstringstringstring(obj, string1, string2, string3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
type(string_),	intent(in)	::	string1
type(string_),	intent(in)	::	string2
type(string_),	intent(in)	::	string3

public subroutine writeIOcharchar(obj, char1, char2)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	char1
character(len=*),	intent(in)	::	char2

public subroutine writeIOcharcharchar(obj, char1, char2, char3)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	char1
character(len=*),	intent(in)	::	char2
character(len=*),	intent(in)	::	char3

public subroutine writeIOint32re64Vector(obj, in32_1, re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
real(kind=real64),	intent(in)	::	re64(:)

public subroutine writeIOint32int32vector(obj, in32_1, in32)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32_1
integer(kind=int32),	intent(in)	::	in32(:)

public subroutine writeIOint32re64(obj, in32, re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32
real(kind=real64),	intent(in)	::	re64

public subroutine writeIOcomplex64(obj, complex64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

complex(kind=kind(0d0)), intent(in) :: complex64
public subroutine writeIOcomplex64Vector(obj, complex64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

complex(kind=kind(0d0)), intent(in) :: complex64(:)
public subroutine writeIOcomplex64Array(obj, complex64)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

complex(kind=kind(0d0)), intent(in) :: complex64(:,:)

public subroutine writeIOint32VectorInt32vector(obj, in32, in32_c)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
integer(kind=int32),	intent(in)	::	in32_c(:)

public subroutine writeIOint32VectorRe64vector(obj, in32, Re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
real(kind=real64),	intent(in)	::	Re64(:)

public subroutine writeIORe64VectorRe64vector(obj, Re64_c, Re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	Re64_c(:)
real(kind=real64),	intent(in)	::	Re64(:)

public subroutine writeIORe64VectorRe64vectorRe64vector(obj, Re64_cc, Re64_c, Re64)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
real(kind=real64),	intent(in)	::	Re64_cc(:)
real(kind=real64),	intent(in)	::	Re64_c(:)
real(kind=real64),	intent(in)	::	Re64(:)

public subroutine writeIOint32VectorInt32vectorInt32Vector(obj, in32, in32_c, in32_cc)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
integer(kind=int32),	intent(in)	::	in32_c(:)
integer(kind=int32),	intent(in)	::	in32_cc(:)

public subroutine writeIOint32VectorInt32vectorre64Vector(obj, in32, in32_c, re64_cc)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
integer(kind=int32),	intent(in)	::	in32(:)
integer(kind=int32),	intent(in)	::	in32_c(:)
real(kind=real64),	intent(in)	::	re64_cc(:)

procedure, public, pass :: readIOchar

public subroutine readIOchar(obj, char)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=200) :: char

procedure, public, pass :: readIOInt

public subroutine readIOInt(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

integer(kind=int32), intent(inout) :: val

procedure, public, pass :: readIOIntVector

public subroutine readIOIntVector(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

integer(kind=int32), intent(inout) :: val(:)

procedure, public, pass :: readIOIntArray

public subroutine readIOIntArray(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

integer(kind=int32), intent(inout) :: val(:,:)

procedure, public, pass :: readIOReal64

public subroutine readIOReal64(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

real(kind=real64), intent(inout) :: val

procedure, public, pass :: readIOReal64Vector

public subroutine readIOReal64Vector(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

real(kind=real64), intent(inout) :: val(:)

procedure, public, pass :: readIOReal64Array

public subroutine readIOReal64Array(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

real(kind=real64), intent(inout) :: val(:,:)

generic, public :: read => readIOchar, readIOInt, readIOIntVector, readIOIntArray, readIOReal64, readIOReal64Vector, readIOReal64Array

public subroutine readIOchar(obj, char)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=200) :: char
public subroutine readIOInt(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

integer(kind=int32), intent(inout) :: val
public subroutine readIOIntVector(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

integer(kind=int32), intent(inout) :: val(:)
public subroutine readIOIntArray(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

integer(kind=int32), intent(inout) :: val(:,:)
public subroutine readIOReal64(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

real(kind=real64), intent(inout) :: val
public subroutine readIOReal64Vector(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

real(kind=real64), intent(inout) :: val(:)
public subroutine readIOReal64Array(obj, val)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(in) :: obj

real(kind=real64), intent(inout) :: val(:,:)

procedure, public, pass :: plotIO

public subroutine plotIO(obj, name, option, logscale)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	name
character(len=*),	intent(in),	optional	::	option
logical,	intent(in),	optional	::	logscale

procedure, public, pass :: plotIODirect

public subroutine plotIODirect(obj, x, Fx, option, logscale)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	x(:)
real(kind=real64),	intent(in)		::	Fx(:)
character(len=*),	intent(in),	optional	::	option
logical,	intent(in),	optional	::	logscale

procedure, public, pass :: plotIODirectReal32

public subroutine plotIODirectReal32(obj, x, Fx, option, logscale)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real32),	intent(in)		::	x(:)
real(kind=real32),	intent(in)		::	Fx(:)
character(len=*),	intent(in),	optional	::	option
logical,	intent(in),	optional	::	logscale

generic, public :: plot => plotIO, plotIODirect, plotIODirectReal32

public subroutine plotIO(obj, name, option, logscale)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	name
character(len=*),	intent(in),	optional	::	option
logical,	intent(in),	optional	::	logscale

public subroutine plotIODirect(obj, x, Fx, option, logscale)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	x(:)
real(kind=real64),	intent(in)		::	Fx(:)
character(len=*),	intent(in),	optional	::	option
logical,	intent(in),	optional	::	logscale

public subroutine plotIODirectReal32(obj, x, Fx, option, logscale)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real32),	intent(in)		::	x(:)
real(kind=real32),	intent(in)		::	Fx(:)
character(len=*),	intent(in),	optional	::	option
logical,	intent(in),	optional	::	logscale

procedure, public :: splot => splotIO

public subroutine splotIO(obj, name, option, logscale)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in),	optional	::	name
character(len=*),	intent(in),	optional	::	option
logical,	intent(in),	optional	::	logscale

procedure, public :: readline => readlineIO

public function readlineIO(obj) result(ret)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

Return Value character(len=:), allocatable

procedure, public :: close => closeIO

public subroutine closeIO(obj, status)

Arguments

Type Intent Optional Attributes Name

class(IO_), intent(inout) :: obj

character(len=*), intent(in), optional :: status

IO_ Derived Type

Contents

Variables

Type-Bound Procedures

type, public :: IO_

Contents

Variables

Type-Bound Procedures

Components

Type-Bound Procedures

procedure, public :: unit => unitIO

public function unitIO(obj) result(unit)

Arguments

Return Value integer(kind=int32)

procedure, public :: numLine => numLineIO

public function numLineIO(obj, name) result(line)

Arguments

Return Value integer(kind=int32)

procedure, public :: flush => flushIO

public subroutine flushIO(obj)

Arguments

procedure, public :: rule => ruleIO

public subroutine ruleIO(obj, header, offset, content_type)

Arguments

procedure, public :: ResetRule => ResetRuleIO

public subroutine ResetRuleIO(obj, header, offset, content_type)

Arguments

procedure, public, pass :: openIOchar

public recursive subroutine openIOchar(obj, path, state, name, extention, fh)

Arguments

procedure, public, pass :: openIOstring

public subroutine openIOstring(obj, path_s, state, name_s, extention_s, fh)

Arguments

procedure, public, pass :: parseIOChar200

public function parseIOChar200(obj, filename, fileformat, key1, debug) result(ret)

Arguments

Return Value character(len=:), allocatable

procedure, public, pass :: parseIO2keysChar200

public function parseIO2keysChar200(obj, filename, fileformat, key1, key2, debug) result(ret)

Arguments

Return Value character(len=200)

generic, public :: parse => parseIOChar200, parseIO2keysChar200

public function parseIOChar200(obj, filename, fileformat, key1, debug) result(ret)

Arguments

Return Value character(len=:), allocatable

public function parseIO2keysChar200(obj, filename, fileformat, key1, key2, debug) result(ret)

Arguments

Return Value character(len=200)

generic, public :: open => openIOchar, openIOstring

public recursive subroutine openIOchar(obj, path, state, name, extention, fh)

Arguments

public subroutine openIOstring(obj, path_s, state, name_s, extention_s, fh)

Arguments

procedure, public :: diff => diffIO

public function diffIO(obj, name) result(ret)

Arguments

Return Value logical

procedure, public :: updated => diffIO

public function diffIO(obj, name) result(ret)

Arguments

Return Value logical

procedure, public :: FileDateTime => FileDateTimeIO

public function FileDateTimeIO(obj, name) result(ret)

Arguments

Return Value integer(kind=int32)

procedure, public :: LastModified => FileDateTimeIO

public function FileDateTimeIO(obj, name) result(ret)

Arguments

Return Value integer(kind=int32)

procedure, public :: owner => ownerIO

public function ownerIO(obj, name) result(ret)

Arguments

Return Value integer(kind=int32)

procedure, public :: size => sizeIO

public function sizeIO(obj, name) result(ret)

Arguments

Return Value integer(kind=int32)

procedure, public :: rewind => rewindIO

public subroutine rewindIO(obj)

Arguments