IOClass – plantFEM

Uses

- IFPORT
- MathClass
- iso_fortran_env
- StringClass

Variables

STAT_ARRAY_SIZE STAT_ARRAY_SIZE PF_JSON PF_CSV PF_real64 PF_int32 PF_char

Interfaces

lowercase print disp plot spy CaesarCipher

Derived Types

IO_

Functions

numLineIO readlineIO unitIO parseIOChar200 parseIO2keysChar200 FileDateTimeIO ownerIO sizeIO diffIO argIO NumberOfArgIO lowercaseChar lowercaseString CaesarCipherChar cyclic

Subroutines

readIOInt readIOIntVector readIOIntArray readIOReal64 readIOReal64Vector readIOReal64Array openIOchar openIOstring writeIOchar writeIOcharchar writeIOcharcharchar writeIOint32 writeIOint32re64 writeIOint32int32 writeIOint32int32int32 writeIOint32int32int32int32 writeIOint32int32int32int32int32 writeIOint32int32int32int32int32int32 writeIOint32Vector writeIOint32VectorInt32vector writeIOint32VectorInt32vectorInt32Vector writeIOint32VectorInt32vectorre64Vector writeIOint32VectorRe64vector writeIORe64VectorRe64vector writeIORe64VectorRe64vectorRe64vector writeIOint32int32vector writeIOint32re64Vector writeIOint32Array writeIOre64 writeIOre64re64 writeIOre64re64re64 writeIOre64re64re64re64 writeIOre64re64re64re64re64 writeIOre64re64re64re64re64re64 writeIOre64Vector writeIOre64Array writeIOcomplex64 writeIOcomplex64Vector writeIOcomplex64Array writeIOstring writeIOstringstring writeIOstringstringstring readIOchar closeIO printChar printCharAndIntVector printReal64 printComplex64 printReal32 printint64 printint32 printint32int32 plotRealArray spyRealArray plotIODirect plotIODirectReal32 plotIO splotIO flushIO rewindIO goBackIO goForwardIO dumpIOJSON_Key_Vector dumpIOJSON_Key_VectorRe32 dumpIOJSON_Key_VectorInt32 dumpIOJSON_Key_ArrayInt32 dumpIOJSON_Key_ArrayRe64 dumpIOJSON_Key_value dumpIOJSON_Key_valueRe64 dumpIOJSON_Key_valueRe32 dumpIOJSON_Key_valueChar ruleIO ResetRuleIO

Variables

Type	Visibility	Attributes		Name		Initial
integer(kind=int32),	public,	parameter	::	STAT_ARRAY_SIZE	=	13
integer(kind=int32),	public,	parameter	::	STAT_ARRAY_SIZE	=	12
integer(kind=int32),	public,	parameter	::	PF_JSON	=	1
integer(kind=int32),	public,	parameter	::	PF_CSV	=	2
integer(kind=int32),	public,	parameter	::	PF_real64	=	1
integer(kind=int32),	public,	parameter	::	PF_int32	=	2
integer(kind=int32),	public,	parameter	::	PF_char	=	3

Interfaces

public interface lowercase

public pure function lowercaseChar(line) result(ret)

Arguments

Type Intent Optional Attributes Name

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

Return Value character(len=:), allocatable
public pure function lowercaseString(line) result(ret)

Arguments

Type Intent Optional Attributes Name

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

Return Value character(len=:), allocatable

public interface print

public subroutine printChar(char)

Arguments

Type Intent Optional Attributes Name

character(len=*), intent(in) :: char
public subroutine printReal64(re64)

Arguments

Type Intent Optional Attributes Name

real(kind=real64), intent(in) :: re64
public subroutine printComplex64(re64)

Arguments

Type Intent Optional Attributes Name

complex(kind=real64), intent(in) :: re64
public subroutine printReal32(re32)

Arguments

Type Intent Optional Attributes Name

real(kind=real32), intent(in) :: re32
public subroutine printint64(in64)

Arguments

Type Intent Optional Attributes Name

integer(kind=int64), intent(in) :: in64
public subroutine printint32(in32)

Arguments

Type Intent Optional Attributes Name

integer(kind=int32), intent(in) :: in32
public subroutine printint32int32(in32, int32_c)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=int32), intent(in) :: int32_c
public subroutine printCharAndIntVector(char, IntVec)

Arguments

Type Intent Optional Attributes Name

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

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

public interface disp

public subroutine printChar(char)

Arguments

Type Intent Optional Attributes Name

character(len=*), intent(in) :: char
public subroutine printReal64(re64)

Arguments

Type Intent Optional Attributes Name

real(kind=real64), intent(in) :: re64
public subroutine printReal32(re32)

Arguments

Type Intent Optional Attributes Name

real(kind=real32), intent(in) :: re32
public subroutine printint64(in64)

Arguments

Type Intent Optional Attributes Name

integer(kind=int64), intent(in) :: in64
public subroutine printint32(in32)

Arguments

Type Intent Optional Attributes Name

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

public interface plot

public subroutine plotRealArray(x, y, z, xr, yr, zr)

Arguments

Type	Intent	Optional		Name
real(kind=real64),	intent(in)		::	x(:)
real(kind=real64),	intent(in)		::	y(:)
real(kind=real64),	intent(in),	optional	::	z(:)
character(len=*),	intent(in),	optional	::	xr
character(len=*),	intent(in),	optional	::	yr
character(len=*),	intent(in),	optional	::	zr

public interface spy

public subroutine spyRealArray(array)

Arguments

Type Intent Optional Attributes Name

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

public interface CaesarCipher

public function CaesarCipherChar(line, fshift) result(ret)

Arguments

Type Intent Optional Attributes Name

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

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

Return Value character(len=:), allocatable

Derived Types

type, public :: IO_

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
procedure, public :: numLine => numLineIO
procedure, public :: flush => flushIO
procedure, public :: rule => ruleIO
procedure, public :: ResetRule => ResetRuleIO
procedure, public, pass :: openIOchar
procedure, public, pass :: openIOstring
procedure, public, pass :: parseIOChar200
procedure, public, pass :: parseIO2keysChar200
generic, public :: parse => parseIOChar200, parseIO2keysChar200
generic, public :: open => openIOchar, openIOstring
procedure, public :: diff => diffIO
procedure, public :: updated => diffIO
procedure, public :: FileDateTime => FileDateTimeIO
procedure, public :: LastModified => FileDateTimeIO
procedure, public :: owner => ownerIO
procedure, public :: size => sizeIO
procedure, public :: rewind => rewindIO
procedure, public :: goBack => goBackIO
procedure, public :: goForward => goForwardIO
procedure, public, pass :: writeIOcharcharchar
procedure, public, pass :: writeIOcharchar
procedure, public, pass :: writeIOchar
procedure, public, pass :: writeIOstringstringstring
procedure, public, pass :: writeIOstringstring
procedure, public, pass :: writeIOstring
procedure, public, pass :: dumpIOJSON_Key_Vector
procedure, public, pass :: dumpIOJSON_Key_VectorRe32
procedure, public, pass :: dumpIOJSON_Key_VectorInt32
procedure, public, pass :: dumpIOJSON_Key_value
procedure, public, pass :: dumpIOJSON_Key_valueRe32
procedure, public, pass :: dumpIOJSON_Key_valueRe64
procedure, public, pass :: dumpIOJSON_Key_valueChar
procedure, public, pass :: dumpIOJSON_Key_ArrayRe64
procedure, public, pass :: dumpIOJSON_Key_ArrayInt32
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
procedure, public :: arg => argIO
procedure, public, pass :: writeIOint32re64
procedure, public, pass :: writeIOint32re64vector => writeIOint32re64Vector
procedure, public, pass :: writeIOint32int32vector
procedure, public, pass :: writeIOint32
procedure, public, pass :: writeIOint32int32
procedure, public, pass :: writeIOint32int32int32
procedure, public, pass :: writeIOint32int32int32int32
procedure, public, pass :: writeIOint32int32int32int32int32
procedure, public, pass :: writeIOint32int32int32int32int32int32
procedure, public, pass :: writeIOint32Vector
procedure, public, pass :: writeIOint32Vectorint32Vector => writeIOint32VectorInt32vector
procedure, public, pass :: writeIOint32Vectorint32Vectorint32Vector => writeIOint32VectorInt32vectorInt32Vector
procedure, public, pass :: writeIOint32Vectorint32Vectorre64Vector => writeIOint32VectorInt32vectorre64Vector
procedure, public, pass :: writeIOint32Vectorre64Vector => writeIOint32VectorRe64vector
procedure, public, pass :: writeIOre64Vectorre64Vector => writeIORe64VectorRe64vector
procedure, public, pass :: writeIOre64Vectorre64Vectorre64Vector => writeIORe64VectorRe64vectorRe64vector
procedure, public, pass :: writeIOint32Array
procedure, public, pass :: writeIOre64
procedure, public, pass :: writeIOre64re64
procedure, public, pass :: writeIOre64re64re64
procedure, public, pass :: writeIOre64re64re64re64
procedure, public, pass :: writeIOre64re64re64re64re64
procedure, public, pass :: writeIOre64re64re64re64re64re64
procedure, public, pass :: writeIOre64Vector
procedure, public, pass :: writeIOre64Array
procedure, public, pass :: writeIOcomplex64
procedure, public, pass :: writeIOcomplex64Vector
procedure, public, pass :: writeIOcomplex64Array
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
procedure, public, pass :: readIOchar
procedure, public, pass :: readIOInt
procedure, public, pass :: readIOIntVector
procedure, public, pass :: readIOIntArray
procedure, public, pass :: readIOReal64
procedure, public, pass :: readIOReal64Vector
procedure, public, pass :: readIOReal64Array
generic, public :: read => readIOchar, readIOInt, readIOIntVector, readIOIntArray, readIOReal64, readIOReal64Vector, readIOReal64Array
procedure, public, pass :: plotIO
procedure, public, pass :: plotIODirect
procedure, public, pass :: plotIODirectReal32
generic, public :: plot => plotIO, plotIODirect, plotIODirectReal32
procedure, public :: splot => splotIO
procedure, public :: readline => readlineIO
procedure, public :: close => closeIO

Functions

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)

public function readlineIO(obj) result(ret)

Arguments

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

Return Value character(len=:), allocatable

public function unitIO(obj) result(unit)

Arguments

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

Return Value integer(kind=int32)

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)

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)

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)

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)

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

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)

public function NumberOfArgIO(obj) result(ret)

Arguments

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

Return Value integer(kind=int32)

public pure function lowercaseChar(line) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	line

Return Value character(len=:), allocatable

public pure function lowercaseString(line) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
type(string_),	intent(in)			::	line

Return Value character(len=:), allocatable

public function CaesarCipherChar(line, fshift) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	line
integer(kind=int32),	intent(in)			::	fshift

Return Value character(len=:), allocatable

public pure function cyclic(num, max) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	num
integer(kind=int32),	intent(in)			::	max

Return Value integer(kind=int32)

Subroutines

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(:,:)

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

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 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 writeIOint32(obj, in32)

Arguments

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(inout)			::	obj
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 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 writeIOint32Vector(obj, in32)

Arguments

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

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 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(:)

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 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 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 writeIOint32Array(obj, in32)

Arguments

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

public subroutine writeIOre64(obj, re64)

Arguments

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

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 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 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 writeIOstring(obj, string)

Arguments

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(inout)			::	obj
type(string_),	intent(in)			::	string

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 readIOchar(obj, char)

Arguments

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(inout)			::	obj
character(len=200)				::	char

public subroutine closeIO(obj, status)

Arguments

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(inout)			::	obj
character(len=*),	intent(in),	optional		::	status

public subroutine printChar(char)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	char

public subroutine printCharAndIntVector(char, IntVec)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	char
integer(kind=int32),	intent(in)			::	IntVec(:)

public subroutine printReal64(re64)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	re64

public subroutine printComplex64(re64)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=real64),	intent(in)			::	re64

public subroutine printReal32(re32)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real32),	intent(in)			::	re32

public subroutine printint64(in64)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	in64

public subroutine printint32(in32)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	in32

public subroutine printint32int32(in32, int32_c)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	in32
integer(kind=int32),	intent(in)			::	int32_c

public subroutine plotRealArray(x, y, z, xr, yr, zr)

Arguments

Type	Intent	Optional		Name
real(kind=real64),	intent(in)		::	x(:)
real(kind=real64),	intent(in)		::	y(:)
real(kind=real64),	intent(in),	optional	::	z(:)
character(len=*),	intent(in),	optional	::	xr
character(len=*),	intent(in),	optional	::	yr
character(len=*),	intent(in),	optional	::	zr

public subroutine spyRealArray(array)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	array(:,:)

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

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 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

public subroutine flushIO(obj)

Arguments

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

public subroutine rewindIO(obj)

Arguments

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

public subroutine goBackIO(obj, lines)

Arguments

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

public subroutine goForwardIO(obj, lines)

Arguments

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

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_ArrayInt32(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_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_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_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_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_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 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(:)

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(:)

IOClass Module

Contents

Uses

Contents

Variables

Interfaces

public interface lowercase

public pure function lowercaseChar(line) result(ret)

Arguments

Return Value character(len=:), allocatable

public pure function lowercaseString(line) result(ret)

Arguments

Return Value character(len=:), allocatable

public interface print

public subroutine printChar(char)

Arguments

public subroutine printReal64(re64)

Arguments

public subroutine printComplex64(re64)

Arguments

public subroutine printReal32(re32)

Arguments

public subroutine printint64(in64)

Arguments

public subroutine printint32(in32)

Arguments

public subroutine printint32int32(in32, int32_c)

Arguments

public subroutine printCharAndIntVector(char, IntVec)

Arguments

public interface disp

public subroutine printChar(char)

Arguments

public subroutine printReal64(re64)

Arguments

public subroutine printReal32(re32)

Arguments

public subroutine printint64(in64)

Arguments

public subroutine printint32(in32)

Arguments

public interface plot

public subroutine plotRealArray(x, y, z, xr, yr, zr)

Arguments

public interface spy

public subroutine spyRealArray(array)

Arguments

public interface CaesarCipher

public function CaesarCipherChar(line, fshift) result(ret)

Arguments

Return Value character(len=:), allocatable

Derived Types

type, public :: IO_

Components

Type-Bound Procedures

Functions

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

Arguments

Return Value integer(kind=int32)

public function readlineIO(obj) result(ret)

Arguments

Return Value character(len=:), allocatable

public function unitIO(obj) result(unit)

Arguments

Return Value integer(kind=int32)

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)

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

Arguments

Return Value integer(kind=int32)

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

Arguments

Return Value integer(kind=int32)

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

Arguments

Return Value integer(kind=int32)