diff --git a/src/ciderlib/oned/onedopng.c b/src/ciderlib/oned/onedopng.c
index 025ae64b5..24d6e0322 100644
--- a/src/ciderlib/oned/onedopng.c
+++ b/src/ciderlib/oned/onedopng.c
@@ -90,7 +90,7 @@ ONEdopingValue(DOPprofile *pProfile, DOPtable *pTable, double x)
     if (argP > 10.0) {
       value = 0.0;
     } else {
-      value = pProfile->PEAK_CONC * erfc(-argP);
+      value = pProfile->PEAK_CONC * erfc(argP);
     }
     break;
   case LOOKUP:
diff --git a/src/ciderlib/twod/twodopng.c b/src/ciderlib/twod/twodopng.c
index 7b9bbb39d..779831123 100644
--- a/src/ciderlib/twod/twodopng.c
+++ b/src/ciderlib/twod/twodopng.c
@@ -111,7 +111,7 @@ TWOdopingValue(DOPprofile *pProfile, DOPtable *pTable, double x,
     if ( argP > 10.0 ) {
       value = 0.0;
     } else {
-      value = pProfile->PEAK_CONC * erfc( -argP );
+      value = pProfile->PEAK_CONC * erfc( argP );
     }
     break;
   case LOOKUP:
@@ -156,7 +156,7 @@ TWOdopingValue(DOPprofile *pProfile, DOPtable *pTable, double x,
       if ( argP > 10.0 ) {
 	value = 0.0;
       } else {
-	value *= erfc( -argL );
+	value *= erfc( argL );
       }
       break;
     case LOOKUP: