Changeset 3839 for branches/2011/dev_r2739_LOCEAN8_ZTC/NEMOGCM/NEMO/OPA_SRC/OBS/obs_read_prof.F90

Timestamp:

2013-03-14T19:00:38+01:00 (11 years ago)

Author:

gm

Message:

dev_r2739_LOCEAN8_ZTC (z-tilde): #863 correct bugs and rename some variables

File:

• branches/2011/dev_r2739_LOCEAN8_ZTC/NEMOGCM/NEMO/OPA_SRC/OBS/obs_read_prof.F90 (modified) (1 diff)

branches/2011/dev_r2739_LOCEAN8_ZTC/NEMOGCM/NEMO/OPA_SRC/OBS/obs_read_prof.F90

@@ -793 +793 @@
       !-----------------------------------------------------------------------
       IF ( ldt3d ) THEN
-         CALL obs_level_search( jpk, gdept_0, &
+         CALL obs_level_search( jpk, gdept_1d, &
             & profdata%nvprot(1), profdata%var(1)%vdep, &
             & profdata%var(1)%mvk )
       ENDIF
       IF ( lds3d ) THEN
-         CALL obs_level_search( jpk, gdept_0, &
+         CALL obs_level_search( jpk, gdept_1d, &
             & profdata%nvprot(2), profdata%var(2)%vdep, &
             & profdata%var(2)%mvk )