root/src/exo.h

/* [<][>][^][v][top][bottom][index][help] */

INCLUDED FROM


   1 /*     Calculix - A 3-dimensional finite element program                 */
   2 /*              Copyright (C) 1998-2014 Guido Dhondt                     */
   3 /*     This subroutine                                                   */
   4 /*              Copyright (C) 2013-2014 Peter A. Gustafson               */
   5 /*                                                                       */
   6 /*     This program is free software; you can redistribute it and/or     */
   7 /*     modify it under the terms of the GNU General Public License as    */
   8 /*     published by the Free Software Foundation(version 2);    */
   9 /*                                                                       */
  10 
  11 /*     This program is distributed in the hope that it will be useful,   */
  12 /*     but WITHOUT ANY WARRANTY; without even the implied warranty of    */ 
  13 /*     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the      */
  14 /*     GNU General Public License for more details.                      */
  15 
  16 /*     You should have received a copy of the GNU General Public License */
  17 /*     along with this program; if not, write to the Free Software       */
  18 /*     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.         */
  19 
  20 void exo(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne0,
  21          double *v,double *stn,ITG *inum,ITG *nmethod,ITG *kode,
  22          char *filab,double *een,double *t1,double *fn,double *time,
  23          double *epn,ITG *ielmat,char *matname,double *enern,
  24          double *xstaten,ITG *nstate_,ITG *istep,ITG *iinc,
  25          ITG *ithermal,double *qfn,ITG *mode,ITG *noddiam,
  26          double *trab,ITG *inotr,ITG *ntrans,double *orab,
  27          ITG *ielorien,ITG *norien,char *description,ITG *ipneigh,
  28          ITG *neigh,ITG *mi,double *stx,double *vr,double *vi,
  29          double *stnr,double *stni,double *vmax,double *stnmax,
  30          ITG *ngraph,double *veold,double *ener,ITG *ne,double *cs,
  31          char *set,ITG *nset,ITG *istartset,ITG *iendset,ITG *ialset,
  32          double *eenmax,double *fnr,double *fni,double *emn,
  33          double *thicke,char *jobnamec,char *output,double *qfx,
  34          double *cdn,ITG *mortar,double *cdnr,double *cdni,ITG *nmat);
  35 
  36 void exosetfind(char *set, ITG *nset, ITG *ialset, ITG *istartset, ITG *iendset, 
  37                 ITG *num_ns, ITG *num_ss, ITG *num_es, ITG *num_fs, ITG *node_map_inv,
  38                 int exoid, int store, ITG *nk);
  39 
  40 ITG exoset_check(ITG n, ITG *node_map_inv, ITG *nk, int *dropped, int *unidentified);
  41 
  42 void exovector(double *v,ITG *iset,ITG *ntrans,char * filabl,ITG *nkcoords,
  43                ITG *inum,ITG *inotr,double *trab,double *co,
  44                ITG *istartset,ITG *iendset,ITG *ialset,ITG *mi,ITG *ngraph,
  45                int, ITG time_step, int countvar, ITG nout);
  46 
  47 void exoselect(double *field1,double *field2,ITG *iset,ITG *nkcoords,ITG *inum,
  48                ITG *istartset,ITG *iendset,ITG *ialset,ITG *ngraph,ITG *ncomp,
  49                ITG *ifield,ITG *icomp,ITG *nfield,ITG *iselect,ITG exoid,
  50                ITG time_step, int countvar, ITG nout);

/* [<][>][^][v][top][bottom][index][help] */