[Getfem-commits] r5479 - in /trunk/getfem/src: getfem/getfem_assembling.h getfem_models.cc

[Yves . Renard]

Author: renard
Date: Sat Nov 12 12:55:26 2016
New Revision: 5479

URL: http://svn.gna.org/viewcvs/getfem?rev=5479&view=rev
Log:
some fixes

Modified:
    trunk/getfem/src/getfem/getfem_assembling.h
    trunk/getfem/src/getfem_models.cc

Modified: trunk/getfem/src/getfem/getfem_assembling.h
URL: 
http://svn.gna.org/viewcvs/getfem/trunk/getfem/src/getfem/getfem_assembling.h?rev=5479&r1=5478&r2=5479&view=diff
==============================================================================
--- trunk/getfem/src/getfem/getfem_assembling.h (original)
+++ trunk/getfem/src/getfem/getfem_assembling.h Sat Nov 12 12:55:26 2016
@@ -863,7 +863,7 @@
                              const mesh_fem &mf_data, const VECT2 &F,
                              const mesh_region &rg) {
     asm_real_or_complex_1_param_vec(B, mim, mf, &mf_data, F, rg,
-                                   "(A.Normal):Test_u");
+                         "(Reshape(A, qdim(u), meshdim).Normal):Test_u");
   }
 
   /** 
@@ -874,7 +874,8 @@
   void asm_homogeneous_normal_source_term
   (VECT1 &B, const mesh_im &mim, const mesh_fem &mf, const VECT2 &F,
    const mesh_region &rg)
-  { asm_real_or_complex_1_param_vec(B, mim, mf, 0,F,rg, "(A.Normal):Test_u"); }
+  { asm_real_or_complex_1_param_vec(B, mim, mf, 0,F,rg,
+                        "(Reshape(A, qdim(u), meshdim).Normal):Test_u"); }
 
   /**
      assembly of @address@hidden

Modified: trunk/getfem/src/getfem_models.cc
URL: 
http://svn.gna.org/viewcvs/getfem/trunk/getfem/src/getfem_models.cc?rev=5479&r1=5478&r2=5479&view=diff
==============================================================================
--- trunk/getfem/src/getfem_models.cc   (original)
+++ trunk/getfem/src/getfem_models.cc   Sat Nov 12 12:55:26 2016
@@ -4642,7 +4642,7 @@
                                            "(A*Test_u).Test2_u");
          else
            asm_real_or_complex_1_param_mat(*B, mim, mf_mult, mf_H, *H, rg,
-                           "(Reshape(A,qdim(u),qdim(u))*Test_u).Test2_u");
+                           "(Reshape(A,qdim(u),qdim(u))*Test_2u).Test_u");
           // if (mf_H)
           //   asm_real_or_complex_1_param
           //     (*B, mim, mf_mult, *mf_H, *H, rg, (mf_u.get_qdim() == 1) ?
@@ -4816,7 +4816,7 @@
                                            "(A*Test_u).Test2_u");
          else
            asm_real_or_complex_1_param_mat(*B, mim, mf_mult, mf_H, *H, rg,
-                           "(Reshape(A,qdim(u),qdim(u))*Test_u).Test2_u");
+                           "(Reshape(A,qdim(u),qdim(u))*Test2_u).Test_u");
           // if (mf_H)
           //   asm_real_or_complex_1_param
           //     (*B, mim, mf_mult, *mf_H, *H, rg, (mf_u.get_qdim() == 1) ?