Changeset 2358 for branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/OBS/obs_grd_bruteforce.h90

Timestamp:

2010-11-04T19:14:01+01:00 (14 years ago)

Author:

rblod

Message:

Changes to be able to compile v3_3_beta with key_agrif,see ticket #753 ; just compilation fixes, I was to scared to try to run AGRIF

File:

• branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/OBS/obs_grd_bruteforce.h90 (moved) (moved from branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/OBS/obs_grid_search_bruteforce.h90) (2 diffs)

branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/OBS/obs_grd_bruteforce.h90

@@ -1 @@
-   SUBROUTINE obs_grid_search_bruteforce( kpi, kpj, kpiglo, kpjglo,       &
-      &                                   kldi, klei, kldj, klej,         &
-      &                                   kmyproc, ktotproc,              &
-      &                                   pglam, pgphi, pmask,            &
-      &                                   kobs, plam, pphi, kobsi, kobsj, &
+   SUBROUTINE obs_grd_bruteforce( kpi, kpj, kpiglo, kpjglo,       &
+      &                            kldi, klei, kldj, klej,         &
+      &                            kmyproc, ktotproc,              &
+      &                            pglam, pgphi, pmask,            &
+      &                            kobs, plam, pphi, kobsi, kobsj, &
       &                                   kproc)
       !!----------------------------------------------------------------------
-      !!                ***  ROUTINE obs_grid_search_bruteforce ***
+      !!                ***  ROUTINE obs_grd_bruteforce ***
       !!
       !! ** Purpose : Search gridpoints to find the grid box containing
@@ -347 +347 @@
          & )
 
-   END SUBROUTINE obs_grid_search_bruteforce
+   END SUBROUTINE obs_grd_bruteforce