Changeset 43 for trunk/src/paper01/fig2/read_sw.pro

Timestamp:

04/11/11 18:05:51 (13 years ago)

Author:

pinsard

Message:

add minimal header in paper01 IDL files

File:

• trunk/src/paper01/fig2/read_sw.pro (modified) (4 diffs)

trunk/src/paper01/fig2/read_sw.pro

@@ -1 @@
-;-------------------------------------------------------------------------------------------------
-pro read_sw, csite,date1,date2,box, $
-                        sw
+;+
+; .. _read_sw.pro
 ;
-;-------------------------------------------------------------------------------------------------
+; ===========
+; read_sw.pro
+; ===========
+;
+; DESCRIPTION
+; ===========
+;
+; SEE ALSO
+; ========
+;
+; :ref:`tropflux_profile.sh`
+;
+; EXAMPLES
+; ========
+;
+; ::
+;
+;  IDL> @tropflux_init
+;  IDL> csite=++
+;  IDL> ++
+;  IDL> read_sw, csite, date1, date2, box, sw
+;
+; EVOLUTIONS
+; ==========
+;
+; $Id$
+;
+; - fplod 20110411T142955Z aedon.locean-ipsl.upmc.fr (Darwin)
+;
+;   * minimal header
+;
+;-
+pro read_sw, csite, date1, date2, box, sw
+;
 @common
 
@@ -48 +80 @@
 ;
 ;tsvars=['at','bf','bp','dyn','emp','evap','heat','iso','sw','swnet','qlat','qsen','sw', $
-;        'swnet','rain','rf','rh','ssd','sss','sst','swnet','tx','ty','wu','wv','ws','lat','lon'] 
+;        'swnet','rain','rf','rh','ssd','sss','sst','swnet','tx','ty','wu','wv','ws','lat','lon']
 ;depvars=['u','v','d','t','s']
 vars=['sw']
@@ -63 +95 @@
 sw=smooth(sw,nsmooth,/nan)
 
-;-------------------------------------------------------------------------------------------------
 
 
-;-------------------------------------------------------------------------------------------------
 function time_lec, fi
 tt=ncdf_lec(fi,var='time')
@@ -78 +108 @@
 return, tt
 end
-;-------------------------------------------------------------------------------------------------