Changeset 209 for trunk/SRC/ToBeReviewed/TRIANGULATION/triangule.pro

Timestamp:

02/08/07 11:01:49 (17 years ago)

Author:

smasson

Message:

bugfix + introduce C grid based on F, U and V points

File:

• trunk/SRC/ToBeReviewed/TRIANGULATION/triangule.pro (modified) (1 diff)

trunk/SRC/ToBeReviewed/TRIANGULATION/triangule.pro

@@ -73 +73 @@
    if n_elements(key_gridtype) EQ 0 then key_gridtype = 'c'
    if n_elements(maskentree) EQ 0 then maskentree = tmask[*, *, 0]
-   case key_gridtype of
+   case strmid(key_gridtype, 0, 1) of
       'e':res = triangule_e(maskentree, _extra = ex)
       'c':res = triangule_c(maskentree, COINMONTE = coinmonte, COINDESCEND = coindescend, _extra = ex)