Hi everyone,
I would like to implement augmented Lagrangian method to enforce incompressibility to my user defined element routine handling Q1P0.
I looked through the formulation from related papers of C. Miehe, J. C. Simo and the FEAP theory manual as well. In theory, it seems to be quite easy to implement it since I have a scalar update algorithm for Q1P0 element. However, when I checked the feap intrinsic element fld3d2.f in the hope of modifying isw.eq.10 so that I could incorporate it with my element routine I got confused with all the variables fp,hr,npm..etc defined and the start/end of this execution flag within the routine. In fact, it is hard to get a clear picture out of that.
I tried to write an another script which calls this element routine within the loop which was supposed to be Uzawa algorithm. Nevertheless, this extra script is obviously omitted by FEAP and the element does not make it through the loop.
Attached I am sending the element routine and the script I wrote which was supposed to be so called Uzawa algorithm.
Has anybody implemented this algorithm for his or her own element subroutine or is there any suggestion and hints you can give in order to modify it from FEAP element routine?
Thanks in advance.