dc_string::stod Interface Reference

Public Member Functions
real(dp) function	atod_scalar (string_in)

Detailed Description

Definition at line 117 of file dc_string.f90.

Member Function/Subroutine Documentation

atod_scalar()

real(dp) function dc_string::stod::atod_scalar

(

character(len = *), intent(in)

string_in

)

Convert string to double precision real

Converts the character variable string_in to double precision real. If string cannot be converted, returns 0.0.

Parameters

[in]

string_in

String to convert

Returns

Double precision real value

Definition at line 716 of file dc_string.f90.

    use dc_types, only: string
    character(len = *), intent(in):: string_in
    integer:: ios
    character(len = STRING):: buffer
    integer:: ipoint, iexp
    intrinsic scan
    continue
    buffer = string_in
    ! もし整定数をいれてしまった場合は小数点を附加
    if (index(buffer, '.') == 0) then
      iexp = scan(buffer, "eEdD")
      if (iexp /= 0) then
        buffer(iexp+1: len(buffer)) = buffer(iexp: len(buffer)-1)
        ipoint = iexp
      else
        ipoint = len_trim(buffer) + 1
      endif
      buffer(ipoint: ipoint) = '.'
    endif
    read(unit=buffer, fmt="(g80.10)", iostat=ios) result
    if (ios /= 0) result = 0.0

References dc_types::string.

---

The documentation for this interface was generated from the following file:

• /build/gtool5-1.0.0~rc5/debian/build-parallel/src/dc_utils/dc_string.f90