From 45ab3116f414091d3312afa81560b7c9926c5c41 Mon Sep 17 00:00:00 2001
From: Christophe Geuzaine <cgeuzaine@ulg.ac.be>
Date: Sun, 10 Sep 2006 03:25:11 +0000
Subject: [PATCH] hadle "D" type exponents
---
Geo/GModelIO.cpp | 18 +++++++++++++-----
1 file changed, 13 insertions(+), 5 deletions(-)
diff --git a/Geo/GModelIO.cpp b/Geo/GModelIO.cpp
index bbb37ef6e7..e2c32e730a 100644
--- a/Geo/GModelIO.cpp
+++ b/Geo/GModelIO.cpp
@@ -1,4 +1,4 @@
-// $Id: GModelIO.cpp,v 1.50 2006-09-10 01:49:31 geuzaine Exp $
+// $Id: GModelIO.cpp,v 1.51 2006-09-10 03:25:11 geuzaine Exp $
//
// Copyright (C) 1997-2006 C. Geuzaine, J.-F. Remacle
//
@@ -1446,10 +1446,18 @@ static int getFormatBDF(char *buffer, int &keySize)
static double atofBDF(char *str)
{
int len = strlen(str);
- for(int i = 0; i < len; i++)
- if(str[i] == 'E') return atof(str);
- // treat special Nastran floating point formats (e.g. "-7.-1"
- // instead of "-7.E-01" or "2.3+2" instead of "2.3E+02")
+ // classic numbers with E or D exponent notation
+ for(int i = 0; i < len; i++){
+ if(str[i] == 'E') {
+ return atof(str);
+ }
+ else if(str[i] == 'D'){
+ str[i] = 'E';
+ return atof(str);
+ }
+ }
+ // special Nastran floating point format (e.g. "-7.-1" instead of
+ // "-7.E-01" or "2.3+2" instead of "2.3E+02")
char tmp[32];
int j = 0, leading_minus = 1;
for(int i = 0; i < len; i++){
--
GitLab