Changeset 332 for trunk/SOURCES/flottab2-0.7.f90

Timestamp:

01/28/21 17:08:50 (3 years ago)

Author:

aquiquet

Message:

Dragging: distinction between drag computation and mask update / flottab only updates masks

File:

• trunk/SOURCES/flottab2-0.7.f90 (modified) (1 diff)

trunk/SOURCES/flottab2-0.7.f90

@@ -486 +486 @@
     ! 5- calcule les noeuds qui sont streams a l'interieur et donne le betamx et betamy
     !----------------------------------------------------------------------------------
-    call dragging          
+    call mstream_dragging          
     
     if (itracebug.eq.1)  call tracebug(' routine flottab apres call dragging')