#include <LRealConv.d>
#include <__oo2c.h>
#include <setjmp.h>

void LRealConv__ScanReal(OOC_CHAR8 inputCh, OOC_INT8 *chClass, ConvTypes__ScanState *nextState) {
  register OOC_INT64 i0;

  i0 = inputCh;
  Real0__ScanReal(i0, (void*)(OOC_INT64)chClass, (void*)(OOC_INT64)nextState);
  return;
  ;
}

OOC_INT8 LRealConv__FormatReal(const OOC_CHAR8 str__ref[], OOC_LEN str_0d) {
  register OOC_INT64 i0;
  OOC_ALLOCATE_VPAR(str,OOC_CHAR8 ,str_0d)

  OOC_INITIALIZE_VPAR(str__ref,str,OOC_CHAR8 ,str_0d)
  i0 = Real0__FormatReal((void*)(OOC_INT64)str, str_0d, 308, "17976931348623157", 18);
  return i0;
  ;
}

OOC_REAL64 LRealConv__ValueReal(const OOC_CHAR8 str__ref[], OOC_LEN str_0d) {
  register OOC_INT64 i0,i1;
  register OOC_REAL64 d0;
  OOC_ALLOCATE_VPAR(str,OOC_CHAR8 ,str_0d)
  OOC_REAL64 value;

  OOC_INITIALIZE_VPAR(str__ref,str,OOC_CHAR8 ,str_0d)
  i0 = *(OOC_UINT8*)((OOC_INT64)str+(_check_index(0, str_0d, OOC_UINT32, 2440)));
  i0 = CharClass__IsWhiteSpace(i0);
  if (i0) goto l3;
  i0=0;
  goto l9;
l3:
  i0=0;
l4_loop:
  i0 = i0+1;
  i1 = *(OOC_UINT8*)((OOC_INT64)str+(_check_index(i0, str_0d, OOC_UINT32, 2440)));
  i1 = CharClass__IsWhiteSpace(i1);
  if (i1) goto l4_loop;
l9:
  i0 = sscanf(((OOC_INT64)str+(_check_index(i0, str_0d, OOC_UINT32, 2551))), "%lf", (OOC_INT64)&value);
  i0 = i0==1;
  if (i0) goto l12;
  return 0.0000000000000000;
  goto l13;
l12:
  d0 = value;
  return d0;
l13:
  _failed_function(2240); return 0;
  ;
}

OOC_INT16 LRealConv__LengthFloatReal(OOC_REAL64 real, OOC_INT16 sigFigs) {

  _assert(0u, 127, 2897);
  _failed_function(2797); 
  ;
}

OOC_INT16 LRealConv__LengthEngReal(OOC_REAL64 real, OOC_INT16 sigFigs) {

  _assert(0u, 127, 3053);
  _failed_function(2955); 
  ;
}

OOC_INT16 LRealConv__LengthFixedReal(OOC_REAL64 real, OOC_INT16 place) {

  _assert(0u, 127, 3207);
  _failed_function(3109); 
  ;
}

void OOC_LRealConv_init(void) {

  return;
  ;
}

/* --- */
