Index: poi/src/java/org/apache/poi/ss/formula/atp/AnalysisToolPak.java IDEA additional info: Subsystem: com.intellij.openapi.diff.impl.patch.CharsetEP <+>UTF-8 =================================================================== --- poi/src/java/org/apache/poi/ss/formula/atp/AnalysisToolPak.java (revision 1490713) +++ poi/src/java/org/apache/poi/ss/formula/atp/AnalysisToolPak.java (revision ) @@ -123,7 +123,7 @@ r(m, "IMLOG2", null); r(m, "IMPOWER", null); r(m, "IMPRODUCT", null); - r(m, "IMREAL", null); + r(m, "IMREAL", ImReal.instance); r(m, "IMSIN", null); r(m, "IMSQRT", null); r(m, "IMSUB", null); Index: poi/src/testcases/org/apache/poi/ss/formula/functions/TestImRealFunctionsFromSpreadsheet.java IDEA additional info: Subsystem: com.intellij.openapi.diff.impl.patch.CharsetEP <+>UTF-8 =================================================================== --- poi/src/testcases/org/apache/poi/ss/formula/functions/TestImRealFunctionsFromSpreadsheet.java (revision ) +++ poi/src/testcases/org/apache/poi/ss/formula/functions/TestImRealFunctionsFromSpreadsheet.java (revision ) @@ -0,0 +1,30 @@ +/* ==================================================================== + Licensed to the Apache Software Foundation (ASF) under one or more + contributor license agreements. See the NOTICE file distributed with + this work for additional information regarding copyright ownership. + The ASF licenses this file to You under the Apache License, Version 2.0 + (the "License"); you may not use this file except in compliance with + the License. You may obtain a copy of the License at + + http://www.apache.org/licenses/LICENSE-2.0 + + Unless required by applicable law or agreed to in writing, software + distributed under the License is distributed on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + See the License for the specific language governing permissions and + limitations under the License. +==================================================================== */ + +package org.apache.poi.ss.formula.functions; + +/** + * Tests ImReal() as loaded from a test data spreadsheet.

+ * + * @author cedric dot walter @ gmail dot com + */ +public class TestImRealFunctionsFromSpreadsheet extends BaseTestFunctionsFromSpreadsheet { + + protected String getFilename() { + return "ImRealFunctionTestCaseData.xls"; + } +} \ No newline at end of file Index: poi/src/java/org/apache/poi/ss/formula/functions/ImReal.java IDEA additional info: Subsystem: com.intellij.openapi.diff.impl.patch.CharsetEP <+>UTF-8 =================================================================== --- poi/src/java/org/apache/poi/ss/formula/functions/ImReal.java (revision ) +++ poi/src/java/org/apache/poi/ss/formula/functions/ImReal.java (revision ) @@ -0,0 +1,95 @@ +/* ==================================================================== + Licensed to the Apache Software Foundation (ASF) under one or more + contributor license agreements. See the NOTICE file distributed with + this work for additional information regarding copyright ownership. + The ASF licenses this file to You under the Apache License, Version 2.0 + (the "License"); you may not use this file except in compliance with + the License. You may obtain a copy of the License at + + http://www.apache.org/licenses/LICENSE-2.0 + + Unless required by applicable law or agreed to in writing, software + distributed under the License is distributed on an "AS IS" BASIS, + WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. + See the License for the specific language governing permissions and + limitations under the License. +==================================================================== */ + +package org.apache.poi.ss.formula.functions; + +import org.apache.poi.ss.formula.OperationEvaluationContext; +import org.apache.poi.ss.formula.eval.*; + +import java.util.regex.Matcher; +import java.util.regex.Pattern; + +/** + * Implementation for Excel ImReal() function.

+ *

+ * Syntax:
ImReal (Inumber)
+ *

+ * Returns the real coefficient of a complex number in x + yi or x + yj text format. + *

+ * Inumber A complex number for which you want the real coefficient. + *

+ * Remarks + *

+ * + * @author cedric dot walter @ gmail dot com + */ +public class ImReal extends Fixed1ArgFunction implements FreeRefFunction { + + public static final FreeRefFunction instance = new ImReal(); + + public ValueEval evaluate(int srcRowIndex, int srcColumnIndex, ValueEval inumberVE) { + ValueEval veText1; + try { + veText1 = OperandResolver.getSingleValue(inumberVE, srcRowIndex, srcColumnIndex); + } catch (EvaluationException e) { + return e.getErrorEval(); + } + String iNumber = OperandResolver.coerceValueToString(veText1); + + Matcher m = Imaginary.COMPLEX_NUMBER_PATTERN.matcher(iNumber); + boolean result = m.matches(); + + String real = ""; + if (result == true) { + String realGroup = m.group(2); + boolean hasRealPart = realGroup.length() != 0; + + if (realGroup.length() == 0) { + return new StringEval(String.valueOf(0)); + } + + if (hasRealPart) { + String sign = ""; + String realSign = m.group(Imaginary.GROUP1_REAL_SIGN); + if (realSign.length() != 0 && !(realSign.equals("+"))) { + sign = realSign; + } + + String groupRealNumber = m.group(Imaginary.GROUP2_IMAGINARY_INTEGER_OR_DOUBLE); + if (groupRealNumber.length() != 0) { + real = sign + groupRealNumber; + } else { + real = sign + "1"; + } + } + } else { + return ErrorEval.NUM_ERROR; + } + + return new StringEval(real); + } + + public ValueEval evaluate(ValueEval[] args, OperationEvaluationContext ec) { + if (args.length != 1) { + return ErrorEval.VALUE_INVALID; + } + return evaluate(ec.getRowIndex(), ec.getColumnIndex(), args[0]); + } +}