Changeset 1158 for XIOS/dev/dev_olga/extern/remap/src/elt.hpp

Timestamp:

06/06/17 17:58:16 (7 years ago)

Author:

oabramkina

Message:

Two server levels: merging with trunk r1137.
There are bugs.

File:

• XIOS/dev/dev_olga/extern/remap/src/elt.hpp (modified) (1 diff)

XIOS/dev/dev_olga/extern/remap/src/elt.hpp

@@ -105 +105 @@
         }
 
+  void insert_vertex(int i, const Coord& v)
+  {
+    for(int j=n; j > i ; j--)
+    {
+      vertex[j]=vertex[j-1] ;
+      edge[j]=edge[j-1] ;
+      d[j]=d[j-1] ;
+      neighbour[j]=neighbour[j-1] ;
+    }
+    vertex[i+1]=v ;
+    n++ ;
+  }
+  
         int neighbour[NMAX];
         double d[NMAX]; /**< distance of centre of small circle to origin, zero if great circle */