Changeset 161 for trunk/tools/density_binning/density_bin_IDL_gm/msfs.pro

Timestamp:

11/12/09 17:15:09 (15 years ago)

Author:

pinsard

Message:

conversion from IDL help header syntax to IDLDOC 2. header syntax

File:

• trunk/tools/density_binning/density_bin_IDL_gm/msfs.pro (modified) (4 diffs)

trunk/tools/density_binning/density_bin_IDL_gm/msfs.pro

@@ -10 +10 @@
 tmask=replicate(1b,jpi,jpj,jpk)
 domdef,0,jpi-1,0,jpj-1,0,jpk-1,/index
-
-
 if keyword_set(mask) then begin
       print, 'subdomain: use of mask argument'
@@ -20 +18 @@
 msf=total(msf*(e1v[*]#replicate(1,jpk)),1,/nan)
 msf=1e-6*msf
-
 mmsk=msf
 indm=where(mmsk NE 0 )
 mmsk(indm)=1
-
 msf=total(msf,2,/cumulative)
 ;msf=total(msf,2,/cumulative,/nan)
@@ -36 +32 @@
         endfor
 endif
-
 ; mask the msf
 msf=msf*mmsk
-
 varname='Meridional Stream Function'
 varunit='Sv'
 vargrid='W'
-
-
 if keyword_set(orca) then begin
         case orca of
@@ -61 +53 @@
 ;if n_elements(valmask) eq 0 then valmask=1e20
 ;if terre[0] ne -1 then msf[terre]=valmask
-
 ;------------------------
 return, msf