/[escript]/trunk/esys2/finley/src/finleyC/System_setValues.c
ViewVC logotype

Diff of /trunk/esys2/finley/src/finleyC/System_setValues.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 97 by jgs, Tue Dec 14 05:39:33 2004 UTC revision 123 by jgs, Fri Jul 8 04:08:13 2005 UTC
# Line 19  Line 19 
19  /**************************************************************/  /**************************************************************/
20    
21  void  Finley_SystemMatrix_setValues(Finley_SystemMatrix* in,double value) {  void  Finley_SystemMatrix_setValues(Finley_SystemMatrix* in,double value) {
22    maybelong i,j,iptr;    dim_t i,j;
23      index_t iptr;
24    #pragma omp parallel for private(i,iptr,j) schedule(static)    #pragma omp parallel for private(i,iptr,j) schedule(static)
25    for (i=0;i< in->pattern->n_ptr;++i) {    for (i=0;i< in->pattern->n_ptr;++i) {
26       for (iptr=(in->pattern->ptr[i])-PTR_OFFSET;iptr<(in->pattern->ptr[i+1])-PTR_OFFSET;++iptr) {       for (iptr=(in->pattern->ptr[i])-PTR_OFFSET;iptr<(in->pattern->ptr[i+1])-PTR_OFFSET;++iptr) {
# Line 29  void  Finley_SystemMatrix_setValues(Finl Line 30  void  Finley_SystemMatrix_setValues(Finl
30  }  }
31  /*  /*
32   * $Log$   * $Log$
33   * Revision 1.2  2004/12/14 05:39:31  jgs   * Revision 1.5  2005/07/08 04:07:59  jgs
34     * Merge of development branch back to main trunk on 2005-07-08
35     *
36     * Revision 1.4  2004/12/15 07:08:34  jgs
37   * *** empty log message ***   * *** empty log message ***
38     * Revision 1.1.1.1.2.2  2005/06/29 02:34:57  gross
39     * some changes towards 64 integers in finley
40   *   *
41   * Revision 1.1.1.1.2.1  2004/11/12 06:58:19  gross   * Revision 1.1.1.1.2.1  2004/11/12 06:58:19  gross
42   * a lot of changes to get the linearPDE class running: most important change is that there is no matrix format exposed to the user anymore. the format is chosen by the Domain according to the solver and symmetry   * a lot of changes to get the linearPDE class running: most important change is that there is no matrix format exposed to the user anymore. the format is chosen by the Domain according to the solver and symmetry
43   *   *
  * Revision 1.1.1.1  2004/10/26 06:53:57  jgs  
  * initial import of project esys2  
  *  
  * Revision 1.1  2004/07/02 04:21:13  gross  
  * Finley C code has been included  
44   *   *
45   *   *
46   */   */

Legend:
Removed from v.97  
changed lines
  Added in v.123

  ViewVC Help
Powered by ViewVC 1.1.26