tem_create_EndianSuffix Function

public function tem_create_EndianSuffix() result(suffix)

This function returns the string in the line which starts with the specified key string in the text returned from print_self_status. The key string itself is excluded from the returned string. If the specified key is not found in the text an empty string will be returned.

Arguments

None

Return Value character(len=4)


Called by

proc~~tem_create_endiansuffix~~CalledByGraph proc~tem_create_endiansuffix tem_create_EndianSuffix proc~dump_tem_bc_prop dump_tem_BC_prop proc~dump_tem_bc_prop->proc~tem_create_endiansuffix proc~dump_tem_bc_realarray dump_tem_BC_realArray proc~dump_tem_bc_realarray->proc~tem_create_endiansuffix proc~dump_treelmesh dump_treelmesh proc~dump_treelmesh->proc~tem_create_endiansuffix proc~load_tem load_tem proc~load_tem->proc~tem_create_endiansuffix proc~load_treelmesh load_treelmesh proc~load_tem->proc~load_treelmesh proc~tem_load_weights tem_load_weights proc~load_tem->proc~tem_load_weights proc~load_tem_bc_prop load_tem_BC_prop proc~load_tem_bc_prop->proc~tem_create_endiansuffix proc~load_tem_bc_realarray load_tem_BC_realArray proc~load_tem_bc_realarray->proc~tem_create_endiansuffix proc~load_treelmesh->proc~tem_create_endiansuffix proc~tem_load_weights->proc~tem_create_endiansuffix proc~tem_restart_openwrite tem_restart_openWrite proc~tem_restart_openwrite->proc~tem_create_endiansuffix proc~tem_restart_openwrite->proc~dump_treelmesh proc~tem_dump_subtree tem_dump_subTree proc~tem_restart_openwrite->proc~tem_dump_subtree proc~dump_tem_bc_normal dump_tem_BC_normal proc~dump_tem_bc_normal->proc~dump_tem_bc_realarray proc~dump_tem_bc_qval dump_tem_BC_qVal proc~dump_tem_bc_qval->proc~dump_tem_bc_realarray proc~getelemweight getElemWeight proc~getelemweight->proc~tem_load_weights proc~hvs_output_open hvs_output_open proc~hvs_output_open->proc~tem_restart_openwrite proc~init_tem_bc_prop init_tem_bc_prop proc~init_tem_bc_prop->proc~load_tem_bc_prop proc~load_tem_bc_normal load_tem_BC_normal proc~load_tem_bc_normal->proc~load_tem_bc_realarray proc~load_tem_bc_qval load_tem_BC_qVal proc~load_tem_bc_qval->proc~load_tem_bc_realarray proc~tem_adapt_dump_newmesh tem_adapt_dump_newMesh proc~tem_adapt_dump_newmesh->proc~dump_treelmesh proc~tem_dump_subtree->proc~dump_treelmesh proc~tem_restart_readheader tem_restart_readHeader proc~tem_restart_readheader->proc~load_tem proc~hvs_output_init hvs_output_init proc~hvs_output_init->proc~tem_dump_subtree proc~tem_load_restart tem_load_restart proc~tem_load_restart->proc~tem_restart_readheader proc~tem_tracker tem_tracker proc~tem_tracker->proc~hvs_output_open proc~tem_write_debugmesh tem_write_debugMesh proc~tem_write_debugmesh->proc~tem_dump_subtree proc~tem_init_tracker tem_init_tracker proc~tem_init_tracker->proc~hvs_output_init

Source Code

  function tem_create_EndianSuffix()  result(suffix)
    ! ---------------------------------------------------------------------------
    character(len=4) :: suffix
    ! ---------------------------------------------------------------------------

    if (isLittleEndian) then
      suffix = '.lsb'
    else
      suffix = '.msb'
    end if

  end function tem_create_endianSuffix