terminalControler_m Module

ターミナル操作を扱うモジュール

Example

program sample
   use terminalControler_m

   call set_formatTC('("PROGRESS [ #progress : ",i6," / ",i6," ]")')
   do i = 1, imax
       call print_progress([i, imax])
   end do

end program sample

Used by

  • module~~terminalcontroler_m~~UsedByGraph module~terminalcontroler_m terminalControler_m proc~get_fph_adjacentcellids SCF_file_reader_m::scf_grid_t%get_fph_adjacentCellIDs proc~get_fph_adjacentcellids->module~terminalcontroler_m proc~kdtree_ kdTree_m::kdTree_ proc~kdtree_->module~terminalcontroler_m proc~search_nodeinfo CUBE2USG::search_nodeInfo proc~search_nodeinfo->module~terminalcontroler_m proc~set_cell2faces SCF_file_reader_m::scf_grid_t%set_cell2faces proc~set_cell2faces->module~terminalcontroler_m program~boxflowfield boxFlowField program~boxflowfield->module~terminalcontroler_m

Contents

Interfaces

Subroutines


Interfaces

public interface print_progress

進捗を表示する

  • private subroutine print_progress_int(array)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: array(:)

  • private subroutine print_progress_real(array)

    Arguments

    Type IntentOptional Attributes Name
    real, intent(in) :: array(:)

Subroutines

public subroutine reset_formatTC()

Arguments

None

public subroutine set_formatTC(fmt_str)

進捗を表示するためのフォーマットを指定 指定時に改行が起こる（あとで戻ってくるため）

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: fmt_str

public subroutine print_sameLine(str)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: str