ArrayOperationClass Module

  1. ArrayOperationClass.f90
  2. ArrayOperationClass

Uses


Contents

Interfaces

Functions

Subroutines


Interfaces

public interface MergeArray

  • public subroutine MergeArrayInt(a, b, c)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in) :: a(:,:)
    integer, intent(in) :: b(:,:)
    integer, intent(out), allocatable:: c(:,:)

  • public subroutine MergeArrayReal(a, b, c)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in) :: a(:,:)
    real(kind=8), intent(in) :: b(:,:)
    real(kind=8), intent(out), allocatable:: c(:,:)

public interface CopyArray

  • public subroutine CopyArrayInt(a, ac)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), allocatable:: a(:,:)
    integer, intent(inout), allocatable:: ac(:,:)

  • public subroutine CopyArrayReal(a, ac)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(inout), allocatable:: a(:,:)
    real(kind=8), intent(inout), allocatable:: ac(:,:)

  • public subroutine CopyArrayIntVec(a, ac)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), allocatable:: a(:)
    integer, intent(inout), allocatable:: ac(:)

  • public subroutine CopyArrayRealVec(a, ac)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(inout), allocatable:: a(:)
    real(kind=8), intent(inout), allocatable:: ac(:)

public interface TrimArray

  • public subroutine TrimArrayInt(a, k)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), allocatable:: a(:,:)
    integer, intent(in) :: k

  • public subroutine TrimArrayReal(a, k)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(inout), allocatable:: a(:,:)
    integer, intent(in) :: k

public interface ImportArray

  • public subroutine ImportArrayInt(Mat, OptionalFileHandle, OptionalSizeX, OptionalSizeY)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), allocatable:: Mat(:,:)
    integer, intent(in), optional :: OptionalFileHandle
    integer, intent(in), optional :: OptionalSizeX
    integer, intent(in), optional :: OptionalSizeY

  • public subroutine ImportArrayReal(Mat, OptionalFileHandle, OptionalSizeX, OptionalSizeY)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(inout), allocatable:: Mat(:,:)
    integer, intent(in), optional :: OptionalFileHandle
    integer, intent(in), optional :: OptionalSizeX
    integer, intent(in), optional :: OptionalSizeY

public interface ExportArray

  • public subroutine ExportArrayInt(Mat, OptionalFileHandle)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in) :: Mat(:,:)
    integer, intent(in), optional :: OptionalFileHandle

  • public subroutine ExportArrayReal(Mat, OptionalFileHandle)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in) :: Mat(:,:)
    integer, intent(in), optional :: OptionalFileHandle

public interface ExportArraySize

  • public subroutine ExportArraySizeInt(Mat, RankNum, OptionalFileHandle)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in) :: Mat(:,:)
    integer, intent(in) :: RankNum
    integer, intent(in), optional :: OptionalFileHandle

  • public subroutine ExportArraySizeReal(Mat, RankNum, OptionalFileHandle)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in) :: Mat(:,:)
    integer, intent(in) :: RankNum
    integer, intent(in), optional :: OptionalFileHandle

public interface InOrOut

  • public function InOrOutReal(x, xmax, xmin, DimNum) result(Inside)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in) :: x(:)
    real(kind=8), intent(in) :: xmax(:)
    real(kind=8), intent(in) :: xmin(:)
    integer, intent(in), optional :: DimNum

    Return Value logical

  • public function InOrOutInt(x, xmax, xmin, DimNum) result(Inside)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in) :: x(:)
    integer, intent(in) :: xmax(:)
    integer, intent(in) :: xmin(:)
    integer, intent(in), optional :: DimNum

    Return Value logical

public interface ShowArray

  • public subroutine ShowArrayInt(Mat, IndexArray, FileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in) :: Mat(:,:)
    integer, intent(in), optional :: IndexArray(:,:)
    integer, intent(in), optional :: FileHandle
    character(len=*), intent(in), optional :: Name

  • public subroutine ShowArrayReal(Mat, IndexArray, FileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in) :: Mat(:,:)
    integer, intent(in), optional :: IndexArray(:,:)
    integer, intent(in), optional :: FileHandle
    character(len=*), intent(in), optional :: Name

public interface ShowArraySize

  • public subroutine ShowArraySizeInt(Mat, OptionalFileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in), allocatable:: Mat(:,:)
    integer, intent(in), optional :: OptionalFileHandle
    character(len=*), intent(in), optional :: Name

  • public subroutine ShowArraySizeReal(Mat, OptionalFileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in), allocatable:: Mat(:,:)
    integer, intent(in), optional :: OptionalFileHandle
    character(len=*), intent(in), optional :: Name

  • public subroutine ShowArraySizeIntvec(Mat, OptionalFileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in), allocatable:: Mat(:)
    integer, intent(in), optional :: OptionalFileHandle
    character(len=*), intent(in), optional :: Name

  • public subroutine ShowArraySizeRealvec(Mat, OptionalFileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in), allocatable:: Mat(:)
    integer, intent(in), optional :: OptionalFileHandle
    character(len=*), intent(in), optional :: Name

  • public subroutine ShowArraySizeIntThree(Mat, OptionalFileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in), allocatable:: Mat(:,:,:)
    integer, intent(in), optional :: OptionalFileHandle
    character(len=*), intent(in), optional :: Name

  • public subroutine ShowArraySizeRealThree(Mat, OptionalFileHandle, Name)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(in), allocatable:: Mat(:,:,:,:)
    integer, intent(in), optional :: OptionalFileHandle
    character(len=*), intent(in), optional :: Name

public interface ExtendArray

  • public subroutine ExtendArrayReal(mat, extend1stColumn, extend2ndColumn, DefaultValue)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(inout), allocatable:: mat(:,:)
    logical, intent(in), optional :: extend1stColumn
    logical, intent(in), optional :: extend2ndColumn
    real(kind=8), intent(in), optional :: DefaultValue

  • public subroutine ExtendArrayInt(mat, extend1stColumn, extend2ndColumn, DefaultValue)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), allocatable:: mat(:,:)
    logical, intent(in), optional :: extend1stColumn
    logical, intent(in), optional :: extend2ndColumn
    integer, intent(in), optional :: DefaultValue

public interface insertArray

  • public subroutine insertArrayInt(mat, insert1stColumn, insert2ndColumn, DefaultValue, NextOf)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), allocatable:: mat(:,:)
    logical, intent(in), optional :: insert1stColumn
    logical, intent(in), optional :: insert2ndColumn
    integer, intent(in), optional :: DefaultValue
    integer, intent(in), optional :: NextOf

  • public subroutine insertArrayReal(mat, insert1stColumn, insert2ndColumn, DefaultValue, NextOf)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(inout), allocatable:: mat(:,:)
    logical, intent(in), optional :: insert1stColumn
    logical, intent(in), optional :: insert2ndColumn
    real(kind=8), intent(in), optional :: DefaultValue
    integer, intent(in), optional :: NextOf

public interface removeArray

  • public subroutine removeArrayReal(mat, remove1stColumn, remove2ndColumn, NextOf)

    Arguments

    Type IntentOptional AttributesName
    real(kind=8), intent(inout), allocatable:: mat(:,:)
    logical, intent(in), optional :: remove1stColumn
    logical, intent(in), optional :: remove2ndColumn
    integer, intent(in), optional :: NextOf

  • public subroutine removeArrayInt(mat, remove1stColumn, remove2ndColumn, NextOf)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), allocatable:: mat(:,:)
    logical, intent(in), optional :: remove1stColumn
    logical, intent(in), optional :: remove2ndColumn
    integer, intent(in), optional :: NextOf

Functions

public function InOrOutReal(x, xmax, xmin, DimNum) result(Inside)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in) :: x(:)
real(kind=8), intent(in) :: xmax(:)
real(kind=8), intent(in) :: xmin(:)
integer, intent(in), optional :: DimNum

Return Value logical

public function InOrOutInt(x, xmax, xmin, DimNum) result(Inside)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: x(:)
integer, intent(in) :: xmax(:)
integer, intent(in) :: xmin(:)
integer, intent(in), optional :: DimNum

Return Value logical


Subroutines

public subroutine MergeArrayInt(a, b, c)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: a(:,:)
integer, intent(in) :: b(:,:)
integer, intent(out), allocatable:: c(:,:)

public subroutine MergeArrayReal(a, b, c)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in) :: a(:,:)
real(kind=8), intent(in) :: b(:,:)
real(kind=8), intent(out), allocatable:: c(:,:)

public subroutine CopyArrayInt(a, ac)

Arguments

Type IntentOptional AttributesName
integer, intent(inout), allocatable:: a(:,:)
integer, intent(inout), allocatable:: ac(:,:)

public subroutine CopyArrayReal(a, ac)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(inout), allocatable:: a(:,:)
real(kind=8), intent(inout), allocatable:: ac(:,:)

public subroutine CopyArrayIntVec(a, ac)

Arguments

Type IntentOptional AttributesName
integer, intent(inout), allocatable:: a(:)
integer, intent(inout), allocatable:: ac(:)

public subroutine CopyArrayRealVec(a, ac)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(inout), allocatable:: a(:)
real(kind=8), intent(inout), allocatable:: ac(:)

public subroutine TrimArrayInt(a, k)

Arguments

Type IntentOptional AttributesName
integer, intent(inout), allocatable:: a(:,:)
integer, intent(in) :: k

public subroutine TrimArrayReal(a, k)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(inout), allocatable:: a(:,:)
integer, intent(in) :: k

public subroutine ImportArrayInt(Mat, OptionalFileHandle, OptionalSizeX, OptionalSizeY)

Arguments

Type IntentOptional AttributesName
integer, intent(inout), allocatable:: Mat(:,:)
integer, intent(in), optional :: OptionalFileHandle
integer, intent(in), optional :: OptionalSizeX
integer, intent(in), optional :: OptionalSizeY

public subroutine ImportArrayReal(Mat, OptionalFileHandle, OptionalSizeX, OptionalSizeY)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(inout), allocatable:: Mat(:,:)
integer, intent(in), optional :: OptionalFileHandle
integer, intent(in), optional :: OptionalSizeX
integer, intent(in), optional :: OptionalSizeY

public subroutine ExportArraySizeInt(Mat, RankNum, OptionalFileHandle)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: Mat(:,:)
integer, intent(in) :: RankNum
integer, intent(in), optional :: OptionalFileHandle

public subroutine ExportArraySizeReal(Mat, RankNum, OptionalFileHandle)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in) :: Mat(:,:)
integer, intent(in) :: RankNum
integer, intent(in), optional :: OptionalFileHandle

public subroutine ExportArrayInt(Mat, OptionalFileHandle)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: Mat(:,:)
integer, intent(in), optional :: OptionalFileHandle

public subroutine ExportArrayReal(Mat, OptionalFileHandle)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in) :: Mat(:,:)
integer, intent(in), optional :: OptionalFileHandle

public subroutine ShowArrayInt(Mat, IndexArray, FileHandle, Name)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: Mat(:,:)
integer, intent(in), optional :: IndexArray(:,:)
integer, intent(in), optional :: FileHandle
character(len=*), intent(in), optional :: Name

public subroutine ShowArrayReal(Mat, IndexArray, FileHandle, Name)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in) :: Mat(:,:)
integer, intent(in), optional :: IndexArray(:,:)
integer, intent(in), optional :: FileHandle
character(len=*), intent(in), optional :: Name

public subroutine ShowArraySizeInt(Mat, OptionalFileHandle, Name)

Arguments

Type IntentOptional AttributesName
integer, intent(in), allocatable:: Mat(:,:)
integer, intent(in), optional :: OptionalFileHandle
character(len=*), intent(in), optional :: Name

public subroutine ShowArraySizeReal(Mat, OptionalFileHandle, Name)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in), allocatable:: Mat(:,:)
integer, intent(in), optional :: OptionalFileHandle
character(len=*), intent(in), optional :: Name

public subroutine ShowArraySizeIntvec(Mat, OptionalFileHandle, Name)

Arguments

Type IntentOptional AttributesName
integer, intent(in), allocatable:: Mat(:)
integer, intent(in), optional :: OptionalFileHandle
character(len=*), intent(in), optional :: Name

public subroutine ShowArraySizeRealvec(Mat, OptionalFileHandle, Name)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in), allocatable:: Mat(:)
integer, intent(in), optional :: OptionalFileHandle
character(len=*), intent(in), optional :: Name

public subroutine ShowArraySizeIntThree(Mat, OptionalFileHandle, Name)

Arguments

Type IntentOptional AttributesName
integer, intent(in), allocatable:: Mat(:,:,:)
integer, intent(in), optional :: OptionalFileHandle
character(len=*), intent(in), optional :: Name

public subroutine ShowArraySizeRealThree(Mat, OptionalFileHandle, Name)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(in), allocatable:: Mat(:,:,:,:)
integer, intent(in), optional :: OptionalFileHandle
character(len=*), intent(in), optional :: Name

public subroutine ExtendArrayReal(mat, extend1stColumn, extend2ndColumn, DefaultValue)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(inout), allocatable:: mat(:,:)
logical, intent(in), optional :: extend1stColumn
logical, intent(in), optional :: extend2ndColumn
real(kind=8), intent(in), optional :: DefaultValue

public subroutine ExtendArrayInt(mat, extend1stColumn, extend2ndColumn, DefaultValue)

Arguments

Type IntentOptional AttributesName
integer, intent(inout), allocatable:: mat(:,:)
logical, intent(in), optional :: extend1stColumn
logical, intent(in), optional :: extend2ndColumn
integer, intent(in), optional :: DefaultValue

public subroutine insertArrayInt(mat, insert1stColumn, insert2ndColumn, DefaultValue, NextOf)

Arguments

Type IntentOptional AttributesName
integer, intent(inout), allocatable:: mat(:,:)
logical, intent(in), optional :: insert1stColumn
logical, intent(in), optional :: insert2ndColumn
integer, intent(in), optional :: DefaultValue
integer, intent(in), optional :: NextOf

public subroutine insertArrayReal(mat, insert1stColumn, insert2ndColumn, DefaultValue, NextOf)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(inout), allocatable:: mat(:,:)
logical, intent(in), optional :: insert1stColumn
logical, intent(in), optional :: insert2ndColumn
real(kind=8), intent(in), optional :: DefaultValue
integer, intent(in), optional :: NextOf

public subroutine removeArrayInt(mat, remove1stColumn, remove2ndColumn, NextOf)

Arguments

Type IntentOptional AttributesName
integer, intent(inout), allocatable:: mat(:,:)
logical, intent(in), optional :: remove1stColumn
logical, intent(in), optional :: remove2ndColumn
integer, intent(in), optional :: NextOf

public subroutine removeArrayReal(mat, remove1stColumn, remove2ndColumn, NextOf)

Arguments

Type IntentOptional AttributesName
real(kind=8), intent(inout), allocatable:: mat(:,:)
logical, intent(in), optional :: remove1stColumn
logical, intent(in), optional :: remove2ndColumn
integer, intent(in), optional :: NextOf