IOClass – plantFEM

This module defines a usefull derived type for file-IO.

Uses

Variables

Type	Visibility	Attributes		Name		Initial
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
integer(kind=int32),	public,	parameter	::	KNT_ASCII	=	100

Interfaces

public interface to_vector

convert character array to vector.

public function to_vector_char(line, num_entity) result(ret)

Arguments

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

Return Value real(kind=real64), allocatable, (:)

public interface to_intvector

fill a vector by same integer number.

public function to_intVector_int32(line, num_entity) result(ret)

Arguments

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

Return Value integer(kind=int32), allocatable, (:)

public interface lowercase

Capital to 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 plot

plot array by gnuplot

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

plot array by gnuplot

public subroutine spyRealArray(array)

Arguments

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

public interface open_file

open file

public function open_fileIOandReturn(name, state) result(ret_file)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name
character(len=1),	intent(in),	optional		::	state

Return Value type(IO_)

public interface CaesarCipher

run Caesar cipher

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

JSON to real64-array

public function as_JSONRealArray2(real64Array, name) result(json_format_array)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	real64Array(:,:)
character(len=*),	intent(in)			::	name

Return Value character(len=:), allocatable

public interface parse

parse real64 array

public function parse_fileRealArray(name, row, col, num_col) result(ret)

Arguments

Type	Intent		Name
character(len=*),	intent(in)	::	name
integer(kind=int32),	intent(in)	::	row(2)
integer(kind=int32),	intent(in)	::	col(2)
integer(kind=int32),	intent(in)	::	num_col

Return Value real(kind=real64), allocatable, (:,:)

public interface to_csv

export array to csv file.

public subroutine to_csv_real_array2(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:,:)
logical,	intent(in),	optional	::	no_header

public subroutine to_csv_real_array3(name, a)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name
real(kind=real64),	intent(in)			::	a(:,:,:)

public subroutine to_csv_real_vector(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:)
logical,	intent(in),	optional	::	no_header

public interface to_tsv

export array to tsv file.

public subroutine to_tsv_real_array2(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:,:)
logical,	intent(in),	optional	::	no_header

public subroutine to_tsv_real_array3(name, a)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name
real(kind=real64),	intent(in)			::	a(:,:,:)

public subroutine to_tsv_real_vector(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:)
logical,	intent(in),	optional	::	no_header

public interface from_csv

import array from csv file.

public function from_csv_real_array2(name, n1, n2, header) result(a)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
integer(kind=int32),	intent(in)		::	n1
integer(kind=int32),	intent(in)		::	n2
integer(kind=int32),	intent(in),	optional	::	header(1:2)

Return Value real(kind=real64), allocatable, (:,:)

public function from_csv_real_array3(name, n1, n2, n3, header) result(a)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
integer(kind=int32),	intent(in)		::	n1
integer(kind=int32),	intent(in)		::	n2
integer(kind=int32),	intent(in)		::	n3
integer(kind=int32),	intent(in),	optional	::	header(1:2)

Return Value real(kind=real64), allocatable, (:,:,:)

public function from_csv_real_vector(name, n1, header) result(a)

Arguments

Type	Intent		Name
character(len=*),	intent(in)	::	name
integer(kind=int32),	intent(in)	::	n1
integer(kind=int32),	intent(in)	::	header(1:2)

Return Value real(kind=real64), allocatable, (:)

public function from_CSV_to_vector_simple(name, column) result(column_value)

Arguments

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

Return Value real(kind=real64), allocatable, (:)

Derived Types

type, public :: IO_

This class is usefull for file-IO.

Components

Type	Visibility	Attributes		Name		Initial
integer,	public		::	fh	=	100	File handler
logical,	public		::	active	=	.false.	If file is opened, the active=.true.
logical,	public		::	EOF	=	.true.	If the reader reaches the end of file, the EOF = .true.
character(len=1),	public		::	state			state of the opened file ("w"::write-only , "a"::append , or "r"::read-only.)
character(len=200),	public		::	path			Triplet for identifing a file, but "name" and "extention" will be deplicated.
character(len=200),	public		::	name			Triplet for identifing a file, but "name" and "extention" will be deplicated.
character(len=200),	public		::	extention			Triplet for identifing a file, but "name" and "extention" will be deplicated.
character(len=:),	public,	allocatable	::	title			File title
character(len=:),	public,	allocatable	::	xlabel			It will be deplicated.
character(len=:),	public,	allocatable	::	ylabel			It will be deplicated.
character(len=:),	public,	allocatable	::	zlabel			It will be deplicated.
character(len=:),	public,	allocatable	::	filename			It will be deplicated.
character(len=3),	public		::	async	=	"no "	For async read/write
integer(kind=int32),	public		::	lastModifiedTime	=	0	It will be deplicated.
logical,	public		::	json_mode	=	.false.	Read/write a file as a JSON file. It will be deplicated.
logical,	public		::	activate_rule	=	.false.	if a rule should be set, following parameter should be modified.
integer(kind=int32),	public		::	header
integer(kind=int32),	public		::	offset
integer(kind=int32),	public,	allocatable	::	content_type(:)
logical,	public		::	binary	=	.false.

Type-Bound Procedures

procedure, public :: unit => unitIO	../../../ It returns a file handler.
procedure, public :: numLine => numLineIO	../../../ It returns a number of line in the file.
procedure, public :: flush => flushIO	../../../ It flushes all buffered content.
procedure, public :: search_line => search_lineIO	../../../ It counts the number of line in a file.
procedure, public :: exists => existsIO	../../../ If file exists, it returns .true.
procedure, public :: cp => cpIO	../../../ File copy
procedure, public :: ls => ls_IO	../../../ ls command
procedure, public :: zip => zip_IOClass	../../../ zip command
procedure, public :: unzip => unzip_IOClass	../../../ unzip command
procedure, public :: download => downloadIO	../../../ download a file
procedure, public :: rule => ruleIO	../../../ set rule
procedure, public :: ResetRule => ResetRuleIO	../../../ reset rule
procedure, public, pass :: openIOchar	../../../ file open
procedure, public, pass :: openIOstring	../../../ file open
procedure, public, pass :: parseIOChar200	../../../ parser
procedure, public, pass :: parseIO2keysChar200	../../../ parser
procedure, public, pass :: importIOReal64ArrayAsTxt	../../../ Import real64-type array from txt file
procedure, public, pass :: importIOReal64VectorAsTxt	../../../ Import real64-type array from txt file
procedure, public, pass :: importIOReal64VectorAsTxtWithIndex	../../../ Import real64-type array from txt file
procedure, public, pass :: importIODataFromFormatted	../../../ Import real64-type array from txt file
generic, public :: import => importIOReal64VectorAsTxt, importIOReal64ArrayAsTxt, importIOReal64VectorAsTxtWithIndex, importIODataFromFormatted	../../../ Import real64-type array from txt file
procedure, public, pass :: exportIOReal64ArrayAsTxt	../../../ Exmport real64-type array from txt file
procedure, public, pass :: exportIOReal64VectorAsTxt	../../../ Exmport real64-type array from txt file
procedure, public, pass :: exportIOReal64VectorAsTxtWithIndex	../../../ Exmport real64-type array from txt file
generic, public :: export => exportIOReal64VectorAsTxt, exportIOReal64ArrayAsTxt, exportIOReal64VectorAsTxtWithIndex	../../../ Exmport real64-type array from txt file
generic, public :: parse => parseIOChar200, parseIO2keysChar200	../../../ Parser
procedure, public, pass :: parse_json_IOClass	../../../ Json parser
generic, public :: parse_json => parse_json_IOClass	../../../ Json parser
generic, public :: parse => parse_json_IOClass	../../../ Json parser
generic, public :: open => openIOchar, openIOstring	../../../ File open
procedure, public :: rewind => rewindIO	../../../ Due to stupidness of GNU and Intel, We cannot use lstat by single code without ifdef so I expired them. Rewind file
procedure, public :: goBack => goBackIO	../../../ Go back to some lines.
procedure, public :: goForward => goForwardIO	../../../ Skip some lines.
procedure, public, pass :: writeIOcharcharchar	../../../ Write
procedure, public, pass :: writeIOcharchar
procedure, public, pass :: writeIOchar
procedure, public, pass :: writeIOstringstringstring	Write Read more…
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	../../../ JSON dump.
procedure, public :: arg => argIO	../../../ WRITE operation
procedure, public, pass :: writeIOint32re64	../../../ WRITE operation
procedure, public, pass :: writeIOint32re64vector => writeIOint32re64Vector	../../../ WRITE operation
procedure, public, pass :: writeIOint32int32vector	../../../ WRITE operation
procedure, public, pass :: writeIOint32	../../../ WRITE operation
procedure, public, pass :: writeIOint32int32	../../../ WRITE operation
procedure, public, pass :: writeIOint32int32int32	../../../ WRITE operation
procedure, public, pass :: writeIOint32int32int32int32	../../../ WRITE operation
procedure, public, pass :: writeIOint32int32int32int32int32	../../../ WRITE operation
procedure, public, pass :: writeIOint32int32int32int32int32int32	../../../ WRITE operation
procedure, public, pass :: writeIOint32Vector	../../../ WRITE operation
procedure, public, pass :: writeIOint64Vector	../../../ WRITE operation
procedure, public, pass :: writeIOint32Vectorint32Vector => writeIOint32VectorInt32vector	../../../ WRITE operation
procedure, public, pass :: writeIOint32Vectorint32Vectorint32Vector => writeIOint32VectorInt32vectorInt32Vector	../../../ WRITE operation
procedure, public, pass :: writeIOint32Vectorint32Vectorre64Vector => writeIOint32VectorInt32vectorre64Vector	../../../ WRITE operation
procedure, public, pass :: writeIOint32Vectorre64Vector => writeIOint32VectorRe64vector	../../../ WRITE operation
procedure, public, pass :: writeIOre64Vectorre64Vector => writeIORe64VectorRe64vector	../../../ WRITE operation
procedure, public, pass :: writeIOre64Vectorre64Vectorre64Vector => writeIORe64VectorRe64vectorRe64vector	../../../ WRITE operation
procedure, public, pass :: writeIOint32Array	../../../ WRITE operation
procedure, public, pass :: writeIOre64	../../../ WRITE operation
procedure, public, pass :: writeIOre64re64	../../../ WRITE operation
procedure, public, pass :: writeIOre64re64re64	../../../ WRITE operation
procedure, public, pass :: writeIOre64re64re64re64	../../../ WRITE operation
procedure, public, pass :: writeIOre64re64re64re64re64	../../../ WRITE operation
procedure, public, pass :: writeIOre64re64re64re64re64re64	../../../ WRITE operation
procedure, public, pass :: writeIOre64Vector	../../../ WRITE operation
procedure, public, pass :: writeIOre64Array	../../../ WRITE operation
procedure, public, pass :: writeIO_re64Vector_re64Array	../../../ WRITE operation
procedure, public, pass :: writeIOcomplex64	../../../ WRITE operation
procedure, public, pass :: writeIOcomplex64Vector	../../../ WRITE operation
procedure, public, pass :: writeIOcomplex64Array	../../../ WRITE operation
procedure, public, pass :: writeIOchar_real64Array_real64Array	../../../ WRITE operation
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, writeIOchar_real64Array_real64Array, writeIO_re64Vector_re64Array	WRITE operation Read more…
procedure, public, pass :: readIOchar
procedure, public, pass :: readIOInt	../../../ READ operation
procedure, public, pass :: readIOIntVector	../../../ READ operation
procedure, public, pass :: readIOIntArray	../../../ READ operation
procedure, public, pass :: readIOReal64	../../../ READ operation
procedure, public, pass :: readIOReal64Vector	../../../ READ operation
procedure, public, pass :: readIOReal64VectorVector	../../../ READ operation
procedure, public, pass :: readIOReal64Array	../../../ READ operation
generic, public :: read => readIOchar, readIOInt, readIOIntVector, readIOIntArray, readIOReal64, readIOReal64Vector, readIOReal64VectorVector, readIOReal64Array	../../../ READ operation
procedure, public, pass :: plotIO	../../../ Write and plot by gnuplot.
procedure, public, pass :: plotIODirect	../../../ Write and plot by gnuplot.
procedure, public, pass :: plotIODirectReal32	../../../ Write and plot by gnuplot.
generic, public :: plot => plotIO, plotIODirect, plotIODirectReal32	../../../ Write and plot by gnuplot.
procedure, public, pass :: replotIO	../../../ Write and replot by gnuplot.
procedure, public, pass :: replotIODirect	../../../ Write and replot by gnuplot.
generic, public :: replot => replotIO, replotIODirect	../../../ Write and replot by gnuplot.
procedure, public :: splot => splotIO	../../../ Write and 3D-plot by gnuplot.
procedure, public :: readline => readlineIO	../../../ read a line
procedure, public :: close => closeIO	../../../ close file
procedure, public :: to_Array => to_Array_real64_IOClass	../../../ convert file content to real64-array
procedure, public :: to_list => to_list_IOClass	../../../ convert file content to list
procedure, public :: bin2vector => bin2vector_real64_IOClass	../../../ convert file content written in binary to vector
procedure, public :: vector2bin => vector2bin_real64_IOClass	../../../ convert file content written in real64 vector to binary
procedure, public :: wait => wait_async_IOClass	../../../ wait for async (only for async read/write)

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

public function as_JSONRealArray2(real64Array, name) result(json_format_array)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	real64Array(:,:)
character(len=*),	intent(in)			::	name

Return Value character(len=:), allocatable

public function importIOReal64VectorAsTxt(obj, name) result(real64Vector)

Arguments

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

Return Value real(kind=real64), allocatable, (:)

public recursive function importIOReal64ArrayAsTxt(obj, name, num_column) result(real64Array)

Arguments

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

Return Value real(kind=real64), allocatable, (:,:)

public function importIOReal64VectorAsTxtWithIndex(obj, name, with_index) result(real64Vector)

Arguments

Type	Intent		Name
class(IO_),	intent(inout)	::	obj
character(len=*),	intent(in)	::	name
logical,	intent(in)	::	with_index

Return Value real(kind=real64), allocatable, (:)

public function importIODataFromFormatted(obj, format, name) result(real64Array)

Arguments

Type	Intent		Name
class(IO_),	intent(in)	::	obj
integer(kind=int32),	intent(in)	::	format
character(len=*),	intent(in)	::	name

Return Value real(kind=real64), allocatable, (:,:)

public function open_fileIOandReturn(name, state) result(ret_file)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name
character(len=1),	intent(in),	optional		::	state

Return Value type(IO_)

public function parse_fileRealArray(name, row, col, num_col) result(ret)

Arguments

Type	Intent		Name
character(len=*),	intent(in)	::	name
integer(kind=int32),	intent(in)	::	row(2)
integer(kind=int32),	intent(in)	::	col(2)
integer(kind=int32),	intent(in)	::	num_col

Return Value real(kind=real64), allocatable, (:,:)

public function to_vector_char(line, num_entity) result(ret)

Arguments

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

Return Value real(kind=real64), allocatable, (:)

public function to_intVector_int32(line, num_entity) result(ret)

Arguments

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

Return Value integer(kind=int32), allocatable, (:)

public function from_csv_real_array3(name, n1, n2, n3, header) result(a)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
integer(kind=int32),	intent(in)		::	n1
integer(kind=int32),	intent(in)		::	n2
integer(kind=int32),	intent(in)		::	n3
integer(kind=int32),	intent(in),	optional	::	header(1:2)

Return Value real(kind=real64), allocatable, (:,:,:)

public function from_csv_real_array2(name, n1, n2, header) result(a)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
integer(kind=int32),	intent(in)		::	n1
integer(kind=int32),	intent(in)		::	n2
integer(kind=int32),	intent(in),	optional	::	header(1:2)

Return Value real(kind=real64), allocatable, (:,:)

public function from_CSV_to_vector_simple(name, column) result(column_value)

Arguments

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

Return Value real(kind=real64), allocatable, (:)

public function from_csv_real_vector(name, n1, header) result(a)

Arguments

Type	Intent		Name
character(len=*),	intent(in)	::	name
integer(kind=int32),	intent(in)	::	n1
integer(kind=int32),	intent(in)	::	header(1:2)

Return Value real(kind=real64), allocatable, (:)

public function existsIO(this, filename) result(exist_then_true)

Arguments

Type	Intent	Optional	Attributes		Name
class(IO_)				::	this
character(len=*),	intent(in)			::	filename

Return Value logical

public function to_Array_real64_IOClass(this, name, column, header, upsampling, debug) result(ret)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	this
character(len=*),	intent(in)		::	name
integer(kind=int32),	intent(in)		::	column(:)
integer(kind=int32),	intent(in)		::	header
integer(kind=int32),	intent(in),	optional	::	upsampling
logical,	intent(in),	optional	::	debug

Return Value real(kind=real64), allocatable, (:,:)

public function to_list_IOClass(this, name, column, header, separator, debug) result(ret)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	this
character(len=*),	intent(in)		::	name
integer(kind=int32),	intent(in)		::	column
integer(kind=int32),	intent(in)		::	header
character(len=*),	intent(in)		::	separator
logical,	intent(in),	optional	::	debug

Return Value type(List_)

public function to_upsampling_ioclass(dataframe, upsampling) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=Real64),	intent(in)			::	dataframe(:,:)
integer(kind=int32),	intent(in)			::	upsampling

Return Value real(kind=real64), allocatable, (:,:)

public function ls_IO(this, name) result(list)

Arguments

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(inout)			::	this
character(len=*),	intent(in)			::	name

Return Value type(List_)

public recursive function parse_json_IOClass(this, filename, keys, from_line_idx) result(ret)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	this
character(len=*),	intent(in)		::	filename
type(List_),	intent(in)		::	keys
integer(kind=int32),	intent(in),	optional	::	from_line_idx

Return Value character(len=:), allocatable

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 readIOReal64VectorVector(obj, val, val2)

Arguments

Type	Intent	Attributes		Name
class(IO_),	intent(in)		::	obj
real(kind=real64),	intent(inout),	allocatable	::	val(:)
real(kind=real64),	intent(inout),	allocatable	::	val2(:)

public subroutine readIOReal64Array(obj, val)

Arguments

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

public subroutine search_lineIO(obj, name, n)

Arguments

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

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

! 意味不明なので削除@20240614

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
logical,	intent(in),	optional	::	binary
character(len=*),	intent(in),	optional	::	async
integer(kind=int32),	intent(in),	optional	::	fh

public subroutine openIOstring(obj, path_s, state, name_s, extention_s, binary, 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
logical,	intent(in),	optional	::	binary
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 writeIOchar_real64Array_real64Array(obj, char, vec1, vec2, append, advance, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in)		::	char
real(kind=real64),	intent(in)		::	vec1(:)
real(kind=real64),	intent(in)		::	vec2(:)
logical,	intent(in),	optional	::	append
logical,	intent(in),	optional	::	advance
character(len=*),	intent(in),	optional	::	separator

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, separator)

Arguments

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

public subroutine writeIOint32(obj, in32, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32re64(obj, in32, re64, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32
real(kind=real64),	intent(in)		::	re64
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32int32(obj, in32_1, in32_2, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32_1
integer(kind=int32),	intent(in)		::	in32_2
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32Vector(obj, in32, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32(:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint64Vector(obj, in64, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in64(:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32VectorInt32vector(obj, in32, in32_c, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32(:)
integer(kind=int32),	intent(in)		::	in32_c(:)
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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(:)
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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(:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32VectorRe64vector(obj, in32, Re64, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32(:)
real(kind=real64),	intent(in)		::	Re64(:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIORe64VectorRe64vector(obj, Re64_c, Re64, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	Re64_c(:)
real(kind=real64),	intent(in)		::	Re64(:)
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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(:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32int32vector(obj, in32_1, in32, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32_1
integer(kind=int32),	intent(in)		::	in32(:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32re64Vector(obj, in32_1, re64, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32_1
real(kind=real64),	intent(in)		::	re64(:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOint32Array(obj, in32, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
integer(kind=int32),	intent(in)		::	in32(:,:)
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOre64(obj, re64, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	re64
character(len=*),	intent(in),	optional	::	separator

public subroutine writeIOre64re64(obj, re64_1, re64_2, separator)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
real(kind=real64),	intent(in)		::	re64_1
real(kind=real64),	intent(in)		::	re64_2
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

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

Arguments

Type	Intent	Optional		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
character(len=*),	intent(in),	optional	::	separator

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, separator)

Arguments

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

public subroutine writeIO_re64Vector_re64Array(obj, re64v, re64, sparse, separator)

Arguments

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

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, name)

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
character(len=*),	intent(in),	optional	::	name

public subroutine replotIODirect(obj, x, Fx, option, logscale, name)

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
character(len=*),	intent(in),	optional	::	name

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

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
character(len=*),	intent(in),	optional	::	name

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

public subroutine exportIOReal64VectorAsTxt(obj, name, real64Vector)

Arguments

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

public subroutine exportIOReal64ArrayAsTxt(obj, name, real64Array, num_column)

Arguments

Type	Intent	Optional		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	real64Array(:,:)
integer(kind=int32),	intent(in),	optional	::	num_column

public subroutine exportIOReal64VectorAsTxtWithIndex(obj, name, real64Vector, with_index)

Arguments

Type	Intent	Attributes		Name
class(IO_),	intent(inout)		::	obj
character(len=*),	intent(in)		::	name
real(kind=real64),		allocatable	::	real64Vector(:)
logical,	intent(in)		::	with_index

public subroutine to_csv_real_array3(name, a)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name
real(kind=real64),	intent(in)			::	a(:,:,:)

public subroutine to_tsv_real_array3(name, a)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	name
real(kind=real64),	intent(in)			::	a(:,:,:)

public subroutine to_tsv_real_array2(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:,:)
logical,	intent(in),	optional	::	no_header

public subroutine to_tsv_real_vector(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:)
logical,	intent(in),	optional	::	no_header

public subroutine to_csv_real_array2(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:,:)
logical,	intent(in),	optional	::	no_header

public subroutine to_csv_real_vector(name, a, no_header)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	a(:)
logical,	intent(in),	optional	::	no_header

public subroutine downloadIO(this, from)

Arguments

Type	Intent	Optional	Attributes		Name
class(IO_),	intent(in)			::	this
character(len=*),	intent(in)			::	from

public subroutine cpIO(this, from, to)

Arguments

Type	Intent		Name
class(IO_)		::	this
character(len=*),	intent(in)	::	from
character(len=*),	intent(in)	::	to

public subroutine extractStepResponse(name, trigger_level, buffer_size, segment_length, segment_num, dt)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(in)		::	trigger_level
integer(kind=int32),	intent(in)		::	buffer_size
integer(kind=int32),	intent(in)		::	segment_length
integer(kind=int32),	intent(inout),	optional	::	segment_num
real(kind=real64),	intent(in),	optional	::	dt

public subroutine wait_async_IOClass(this)

Arguments

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

public subroutine zip_IOClass(this, zipfile, filename)

Arguments

Type	Intent		Name
class(IO_),	intent(in)	::	this
character(len=*),	intent(in)	::	zipfile
character(len=*),	intent(in)	::	filename

public subroutine unzip_IOClass(this, zipfile, filename)

Arguments

Type	Intent		Name
class(IO_),	intent(in)	::	this
character(len=*),	intent(in)	::	zipfile
character(len=*),	intent(in)	::	filename

public subroutine vector2bin_real64_IOClass(this, name, vec)

Arguments

Type	Intent		Name
class(IO_),	intent(in)	::	this
character(len=*),	intent(in)	::	name
real(kind=real64),	intent(in)	::	vec(:)

public subroutine bin2vector_real64_IOClass(this, name, vec)

Arguments

Type	Intent	Attributes		Name
class(IO_),	intent(in)		::	this
character(len=*),	intent(in)		::	name
real(kind=real64),	intent(inout),	allocatable	::	vec(:)

IOClass Module

Contents

Variables

Interfaces

Derived Types

Functions

Subroutines

Uses

Variables

Interfaces

public interface to_vector

public function to_vector_char(line, num_entity) result(ret)

Arguments

Return Value real(kind=real64), allocatable, (:)

public interface to_intvector

public function to_intVector_int32(line, num_entity) result(ret)

Arguments

Return Value integer(kind=int32), allocatable, (:)

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 plot

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

Arguments

public interface spy

public subroutine spyRealArray(array)

Arguments

public interface open_file

public function open_fileIOandReturn(name, state) result(ret_file)

Arguments

Return Value type(IO_)

public interface CaesarCipher

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

Arguments

Return Value character(len=:), allocatable

public interface as_JSON

public function as_JSONRealArray2(real64Array, name) result(json_format_array)

Arguments

Return Value character(len=:), allocatable

public interface parse

public function parse_fileRealArray(name, row, col, num_col) result(ret)

Arguments

Return Value real(kind=real64), allocatable, (:,:)

public interface to_csv

public subroutine to_csv_real_array2(name, a, no_header)

Arguments

public subroutine to_csv_real_array3(name, a)

Arguments

public subroutine to_csv_real_vector(name, a, no_header)

Arguments

public interface to_tsv

public subroutine to_tsv_real_array2(name, a, no_header)

Arguments

public subroutine to_tsv_real_array3(name, a)

Arguments

public subroutine to_tsv_real_vector(name, a, no_header)

Arguments

public interface from_csv

public function from_csv_real_array2(name, n1, n2, header) result(a)