IO Module file:IO


Module to wrap output functions
Replace file e.g. to store output in a pipline database (indexed by filename)
Valid handles must be /=0

Dependencies

Subroutines Expand Arguments

  • IO_OutputChainRow(F, mult, like, values)
    • TFileStream   :: F
    • real(mcp)  :: mult
    • real(mcp)  :: like
    • real(mcp)  :: values(:)
  • IO_OutputMargeStats(Names, froot, num_vars, num_contours, has_limits_bot, has_limits_top, mean, sddev, cont_lines, contours_str, colix, labels)
    • TParamNames   :: Names
    • character(LEN=*) intent(in) :: froot
    • integer intent(in) :: num_vars
    • integer intent(in) :: num_contours
    • logical intent(in) :: has_limits_bot(:,:)
    • logical intent(in) :: has_limits_top(:,:)
    • real(mcp) intent(in) :: mean(*)
    • real(mcp) intent(in) :: sddev(*)
    • real(mcp) intent(in) :: cont_lines(:,:,:)
    • character(LEN=*) intent(in) :: contours_str
    • integer intent(in) :: colix(*)
    • character(LEN=128)  :: labels(*)
  • IO_OutputParamNames(Names, fname, indices, add_derived)
    • TParamNames   :: Names
    • character(len=*) intent(in) :: fname
    • integer intent(in), optional :: indices(:)
    • logical intent(in), optional :: add_derived
  • IO_ReadLastChainParams(name, mult, like, values, params_used)
    • character(LEN=*) intent(in) :: name
    • real(mcp) intent(out) :: mult
    • real(mcp) intent(out) :: like
    • real(mcp) intent(out) :: values(:)
    • integer intent(in) :: params_used(:)
  • IO_ReadParamNames(Names, in_root, prior_ranges)
    • TParamNames   :: Names
    • character(LEN=*) intent(in) :: in_root
    • real(mcp)  :: prior_ranges(:,:)
  • IO_ReadProposeMatrix(NameMapping, pmat, prop_mat)
    • TParamNames   :: NameMapping
    • real(mcp)  :: pmat(:,:)
    • character(LEN=*) intent(in) :: prop_mat
  • IO_WriteBounds(Names, fname, limmin, limmax, limbot, limtop, indices)
    • TParamNames   :: Names
    • character(LEN=*) intent(in) :: fname
    • real(mcp) intent(in) :: limmin(:)
    • real(mcp) intent(in) :: limmax(:)
    • logical intent(in) :: limbot(:)
    • logical intent(in) :: limtop(:)
    • integer intent(in) :: indices(:)
  • IO_WriteProposeMatrix(pmat, prop_mat, comment)
    • real(mcp)  :: pmat(:,:)
    • character(LEN=*) intent(in) :: prop_mat
    • character(LEN=*) optional, intent(in) :: comment

    Functions  Expand Arguments

  • logical IO_ReadChainRow(F, mult, like, values, params_used, samples_chains)

    Returns OK=false if end of file or if not enough values on each line, otherwise OK = true Returns chainOK = false if bad line or NaN, chainOK=false and OK=true for NaN (continue reading)

    • TTextFile   :: F
    • real(mcp) intent(out) :: mult
    • real(mcp) intent(out) :: like
    • real(mcp) intent(out) :: values(:)
    • integer intent(in) :: params_used(:)
    • logical optional, intent(in) :: samples_chains
  • logical IO_ReadChainRows(in_root, chain_ix, chain_num, max_rows, ignorerows, ncols, samples_are_chains, noerror, nrows)

    OK = false if chain not found or not enough samples

    • character(LEN=*) intent(in) :: in_root
    • integer intent(in) :: chain_ix
    • integer intent(in) :: chain_num
    • integer intent(in) :: max_rows
    • integer intent(in) :: ignorerows
    • integer intent(in) :: ncols
    • logical intent(in) :: samples_are_chains
    • logical intent(in) :: noerror
    • integer intent(inout) :: nrows