001 /* 002 * Licensed to the Apache Software Foundation (ASF) under one or more 003 * contributor license agreements. See the NOTICE file distributed with 004 * this work for additional information regarding copyright ownership. 005 * The ASF licenses this file to You under the Apache License, Version 2.0 006 * (the "License"); you may not use this file except in compliance with 007 * the License. You may obtain a copy of the License at 008 * 009 * http://www.apache.org/licenses/LICENSE-2.0 010 * 011 * Unless required by applicable law or agreed to in writing, software 012 * distributed under the License is distributed on an "AS IS" BASIS, 013 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 014 * See the License for the specific language governing permissions and 015 * limitations under the License. 016 */ 017 package org.apache.commons.nabla.algorithmic.forward.functions; 018 019 import org.apache.commons.nabla.algorithmic.forward.analysis.MethodDifferentiator; 020 import org.objectweb.asm.Opcodes; 021 import org.objectweb.asm.tree.InsnList; 022 import org.objectweb.asm.tree.InsnNode; 023 import org.objectweb.asm.tree.MethodInsnNode; 024 025 /** Differentiation transformer for the atanh function invocation instructions. 026 * <p>As of java 6, the JVM does not supply an inverse hyperbolic 027 * tangent function (see <a 028 * href="http://bugs.sun.com/bugdatabase/view_bug.do?bug_id=4919337">bug 029 * 4919337</a>), so this generator will not be triggered for java 6 and below.</p> 030 */ 031 public class AtanhTransformer implements MathInvocationTransformer { 032 033 /** {@inheritDoc} */ 034 public InsnList getReplacementList(final String owner, final MethodDifferentiator methodDifferentiator) { 035 036 // generate differential code 037 // ... u0, u1 --> ... atanh(u0), u1 / (1 - u0 * u0) 038 final InsnList list = new InsnList(); 039 list.add(new InsnNode(Opcodes.DUP2_X2)); 040 list.add(new InsnNode(Opcodes.POP2)); 041 list.add(new InsnNode(Opcodes.DUP2_X2)); 042 list.add(new InsnNode(Opcodes.DUP2)); 043 list.add(new InsnNode(Opcodes.DMUL)); 044 list.add(new InsnNode(Opcodes.DCONST_1)); 045 list.add(new InsnNode(Opcodes.DSUB)); 046 list.add(new InsnNode(Opcodes.DNEG)); 047 list.add(new InsnNode(Opcodes.DDIV)); 048 list.add(new InsnNode(Opcodes.DUP2_X2)); 049 list.add(new InsnNode(Opcodes.POP2)); 050 list.add(new MethodInsnNode(Opcodes.INVOKESTATIC, owner, "atanh", D_RETURN_D_DESCRIPTOR)); 051 list.add(new InsnNode(Opcodes.DUP2_X2)); 052 list.add(new InsnNode(Opcodes.POP2)); 053 return list; 054 055 } 056 }