Dear Riadh, Many thanks for your quick answer.
I have used the direct option but nothing change. This is weird because it should have some change for the next code in prosou.f and the area of my element is not equal to 1.
IF(OPTSOU.EQ.1) THEN
! "NORMAL" VERSION
SMH%R(IR)=SMH%R(IR)-DBUS(I)*UNSV2D%R(IR)
ELSE
! "DIRAC" VERSION
SMH%R(IR)=SMH%R(IR)-DBUS(I)
ENDIF
Sorry I still don't understand why the intergral of the boundary result in this problem. Do you mind to give me more detailes about this?
Regards,
Bin