/* * $RCSfile: add.idl,v $ $Revision: 1.3 $ $Date: 2003/11/05 09:44:41 $ * $AIST_Release: 4.2.4 $ * $AIST_Copyright: * Copyright 2003, 2004, 2005, 2006 Grid Technology Research Center, * National Institute of Advanced Industrial Science and Technology * Copyright 2003, 2004, 2005, 2006 National Institute of Informatics * * Licensed 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. * $ */ Module add; Globals { int x,y,z; } Define dadd(IN int n, IN double A[n][n], IN double B[n][n], OUT double C[n][n]) " This is double add test ..." /* Backend "blacs" */ Required "dadd.o" Calls "C" dadd(n, A, B, C);