00001 /*************************************************************************** 00002 ** 00003 ** This file is part of DinverCore. 00004 ** 00005 ** This file may be distributed and/or modified under the terms of the 00006 ** GNU General Public License version 2 or 3 as published by the Free 00007 ** Software Foundation and appearing in the file LICENSE.GPL included 00008 ** in the packaging of this file. 00009 ** 00010 ** This file is distributed in the hope that it will be useful, but WITHOUT 00011 ** ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 00012 ** FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for 00013 ** more details. 00014 ** 00015 ** You should have received a copy of the GNU General Public License 00016 ** along with this program. If not, see <http://www.gnu.org/licenses/>. 00017 ** 00018 ** See http://www.geopsy.org for more information. 00019 ** 00020 ** Created : 2009-05-18 00021 ** Authors: 00022 ** Marc Wathelet 00023 ** Marc Wathelet (LGIT, Grenoble, France) 00024 ** 00025 ***************************************************************************/ 00026 00027 #ifndef DINVERFORTRAN_H 00028 #define DINVERFORTRAN_H 00029 00030 #ifndef __cplusplus 00031 # error 00032 #endif 00033 00034 #include "AbstractForward.h" 00035 #include "DinverInterface.h" 00036 00037 namespace DinverCore { 00038 00039 extern "C" { 00040 00041 class AbstractForward; 00042 00043 typedef AbstractForward * DinverForward; 00044 00045 const char * dinver_plugin_tag(); 00046 const char * dinver_plugin_title(); 00047 const char * dinver_plugin_version(); 00048 const char * dinver_plugin_description(); 00049 00050 void dinver_init_global_(); 00051 void dinver_init_run_(DinverForward run); 00052 void dinver_forward_(int * nd, float * model, int * ok, float * misfit); 00053 00054 void dinver_set_parameter_count_(DinverForward forward, int * n); 00055 void dinver_set_range_(DinverForward forward, int * paramIndex, float * min, float * max, int * scale, float * precision); 00056 void dinver_add_less_than_condition_(DinverForward forward, int * p1Index, float * a, int * p2Index, float * b); 00057 void dinver_add_greater_than_condition_(DinverForward forward, int * p1Index, float * a, int * p2Index, float * b); 00058 } 00059 00060 } // namespace DinverCore 00061 00062 #endif // DINVERFORTRAN_H
