| [0b990d] | 1 | // | 
|---|
|  | 2 | // bemtest.cc | 
|---|
|  | 3 | // | 
|---|
|  | 4 | // Copyright (C) 1996 Limit Point Systems, Inc. | 
|---|
|  | 5 | // | 
|---|
|  | 6 | // Author: Curtis Janssen <cljanss@limitpt.com> | 
|---|
|  | 7 | // Maintainer: LPS | 
|---|
|  | 8 | // | 
|---|
|  | 9 | // This file is part of the SC Toolkit. | 
|---|
|  | 10 | // | 
|---|
|  | 11 | // The SC Toolkit is free software; you can redistribute it and/or modify | 
|---|
|  | 12 | // it under the terms of the GNU Library General Public License as published by | 
|---|
|  | 13 | // the Free Software Foundation; either version 2, or (at your option) | 
|---|
|  | 14 | // any later version. | 
|---|
|  | 15 | // | 
|---|
|  | 16 | // The SC Toolkit is distributed in the hope that it will be useful, | 
|---|
|  | 17 | // but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
|  | 18 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
|  | 19 | // GNU Library General Public License for more details. | 
|---|
|  | 20 | // | 
|---|
|  | 21 | // You should have received a copy of the GNU Library General Public License | 
|---|
|  | 22 | // along with the SC Toolkit; see the file COPYING.LIB.  If not, write to | 
|---|
|  | 23 | // the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | 
|---|
|  | 24 | // | 
|---|
|  | 25 | // The U.S. Government is granted a limited license as per AL 91-7. | 
|---|
|  | 26 | // | 
|---|
|  | 27 |  | 
|---|
|  | 28 | #include <stdio.h> | 
|---|
|  | 29 | #include <util/misc/ieee.h> | 
|---|
|  | 30 | #include <util/keyval/keyval.h> | 
|---|
|  | 31 | #include <chemistry/molecule/molshape.h> | 
|---|
|  | 32 | #include <chemistry/solvent/bem.h> | 
|---|
|  | 33 |  | 
|---|
|  | 34 | using namespace sc; | 
|---|
|  | 35 |  | 
|---|
|  | 36 | int | 
|---|
|  | 37 | main() | 
|---|
|  | 38 | { | 
|---|
|  | 39 | // Abort on floating point errors. | 
|---|
|  | 40 | ieee_trap_errors(); | 
|---|
|  | 41 |  | 
|---|
|  | 42 | Ref<KeyVal> keyval = new ParsedKeyVal(SRCDIR "/bemtest.in"); | 
|---|
|  | 43 |  | 
|---|
|  | 44 | Ref<BEMSolvent> solvent; | 
|---|
|  | 45 | solvent << keyval->describedclassvalue("solvent"); | 
|---|
|  | 46 |  | 
|---|
|  | 47 | solvent->init(); | 
|---|
|  | 48 | solvent->init_system_matrix(); | 
|---|
|  | 49 | solvent->done(); | 
|---|
|  | 50 |  | 
|---|
|  | 51 | solvent->init(); | 
|---|
|  | 52 | solvent->init_system_matrix(); | 
|---|
|  | 53 | solvent->done(); | 
|---|
|  | 54 |  | 
|---|
|  | 55 | ConnollyShape::print_counts(); | 
|---|
|  | 56 | CS2Sphere::print_counts(); | 
|---|
|  | 57 |  | 
|---|
|  | 58 | return 0; | 
|---|
|  | 59 | } | 
|---|
|  | 60 |  | 
|---|
|  | 61 | ///////////////////////////////////////////////////////////////////////////// | 
|---|
|  | 62 |  | 
|---|
|  | 63 | // Local Variables: | 
|---|
|  | 64 | // mode: c++ | 
|---|
|  | 65 | // c-file-style: "CLJ" | 
|---|
|  | 66 | // End: | 
|---|