Changeset 371 for trunk/SRC/Utilities


Ignore:
Timestamp:
08/07/08 11:32:02 (16 years ago)
Author:
pinsard
Message:

improvements of headers (alignments of IDL prompt in examples)

Location:
trunk/SRC/Utilities
Files:
17 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/Utilities/createfunc.pro

    r327 r371  
    2626; 
    2727; @examples 
    28 ; IDL> print, createfunc('3*2', FILENAMEIN='test') 
    29 ; IDL> print, createfunc('3*two', FILENAMEIN='test' $ 
    30 ; IDL>                          , KWDLIST='two = two', TWO=2) 
     28; 
     29;   IDL> print, createfunc('3*2', FILENAMEIN='test') 
     30;   IDL> print, createfunc('3*two', FILENAMEIN='test' $ 
     31;   IDL>                          , KWDLIST='two = two', TWO=2) 
    3132; 
    3233; @history 
  • trunk/SRC/Utilities/createpro.pro

    r327 r371  
    2929; 
    3030; @examples 
    31 ; IDL> createpro, ['print,''OK'''], FILENAMEIN='test' 
    32 ; IDL> createpro, ['if keyword_set(ok) then print,''OK'' else print, ''No'''] $ 
    33 ; IDL>   , FILENAMEIN='test', KWDLIST =', ok = ok' 
    34 ; IDL> createpro, ['if keyword_set(ok) then print,''OK'' else print, ''No'''] $ 
    35 ; IDL>   , FILENAMEIN='test', KWDLIST= ', ok = ok', /ok 
     31; 
     32;   IDL> createpro, ['print,''OK'''], FILENAMEIN='test' 
     33;   IDL> createpro, ['if keyword_set(ok) then print,''OK'' else print, ''No'''] $ 
     34;   IDL>   , FILENAMEIN='test', KWDLIST =', ok = ok' 
     35;   IDL> createpro, ['if keyword_set(ok) then print,''OK'' else print, ''No'''] $ 
     36;   IDL>   , FILENAMEIN='test', KWDLIST= ', ok = ok', /ok 
    3637; 
    3738; @history 
  • trunk/SRC/Utilities/def_myuniquetmpdir.pro

    r325 r371  
    99; 
    1010; @examples 
    11 ; IDL> def_myuniquetmpdir 
     11; 
     12;   IDL> def_myuniquetmpdir 
    1213; 
    1314; @uses 
    14 ; cm_general 
     15; <pro>cm_general</pro> 
    1516; 
    1617; @history 
  • trunk/SRC/Utilities/demomode_compatibility.pro

    r325 r371  
    55; 
    66; @uses 
    7 ; cm_general 
     7; <pro>cm_general</pro> 
    88; 
    99; @version 
  • trunk/SRC/Utilities/find.pro

    r327 r371  
    7272; 
    7373; @examples 
    74 ; IDL> print, find('*loadct') 
     74; 
     75;   IDL> print, find('*loadct') 
    7576;   /usr/local/rsi/idl_6.0/lib/utilities/xloadct.pro 
    7677;   /usr/local/rsi/idl_6.0/lib/loadct.pro 
    77 ; IDL> print, find('*loadct', iodir=!dir,/recursive) 
     78;   IDL> print, find('*loadct', iodir=!dir,/recursive) 
    7879;   /usr/local/rsi/idl_6.0/lib/loadct.pro 
    7980;   /usr/local/rsi/idl_6.0/lib/utilities/xloadct.pro 
    80 ; IDL> print, find('*loadct.pro') 
     81;   IDL> print, find('*loadct.pro') 
    8182;   /usr/local/rsi/idl_6.0/lib/utilities/xloadct.pro 
    8283;   /usr/local/rsi/idl_6.0/lib/loadct.pro 
    83 ; IDL> print, find('*loadct',/nopro) 
     84;   IDL> print, find('*loadct',/nopro) 
    8485;   NOT FOUND 
    85 ; IDL> print, find('*loadct', iodir = '/usr/local/rsi/idl_6.0/lib') 
     86;   IDL> print, find('*loadct', iodir = '/usr/local/rsi/idl_6.0/lib') 
    8687;   /usr/local/rsi/idl_6.0/lib/loadct.pro 
    87 ; IDL> print, find('*loadct', iodir = '/usr/local/rsi/idl_6.0/lib', /test_write) 
     88;   IDL> print, find('*loadct', iodir = '/usr/local/rsi/idl_6.0/lib', /test_write) 
    8889;   NOT FOUND 
    89 ; IDL> print, find('*loadct', iodir = '/usr/local/rsi/idl_6.0/lib', /recursive) 
     90;   IDL> print, find('*loadct', iodir = '/usr/local/rsi/idl_6.0/lib', /recursive) 
    9091;   /usr/local/rsi/idl_6.0/lib/loadct.pro 
    9192;   /usr/local/rsi/idl_6.0/lib/utilities/xloadct.pro 
    92 ; IDL> print, find('mesh*', iodirectory = [iodir, !path]) 
     93;   IDL> print, find('mesh*', iodirectory = [iodir, !path]) 
    9394;   /Users/sebastie/DATA/ORCA2/meshmaskORCA2closea.nc 
    9495;   /Users/sebastie/IDL/meshmaskclosesea.pro 
  • trunk/SRC/Utilities/fitintobox.pro

    r327 r371  
    9393; 
    9494; @returns 
    95 ; an array with dimensions matching the domain 
    96 ; or -1 if there is an error... 
     95; an array with dimensions matching the domain or -1 if there is an error. 
    9796; 
    9897; @uses 
    99 ; cm_4mesh 
    100 ; cm_4cal 
     98; <pro>cm_4mesh</pro> 
     99; <pro>cm_4cal</pro> 
    101100; 
    102101; @examples 
    103 ; IDL> help, fitintobox(findgen(jpi,jpj)) 
     102; 
     103;   IDL> help, fitintobox(findgen(jpi,jpj)) 
    104104; <Expression>    FLOAT     = Array[41, 3] 
    105 ; IDL> help, fitintobox(findgen(jpi,jpj,78)) 
     105;   IDL> help, fitintobox(findgen(jpi,jpj,78)) 
    106106; Error: 
    107107; the array dimensions [180,148,78] are incompatible 
  • trunk/SRC/Utilities/isadirectory.pro

    r327 r371  
    2727; @examples 
    2828; 
    29 ; IDL> print, !dir 
     29;   IDL> print, !dir 
    3030;    /usr/local/rsi/idl_6.0 
    31 ; IDL> print, isadirectory(!dir) 
     31;   IDL> print, isadirectory(!dir) 
    3232;    /usr/local/rsi/idl_6.0/ 
    33 ; IDL> print, isadirectory(!dir+'notgood') 
     33;   IDL> print, isadirectory(!dir+'notgood') 
    3434; 
    3535; @history 
  • trunk/SRC/Utilities/isafile.pro

    r327 r371  
    4545; 
    4646; @examples 
    47 ; IDL> print, isafile('/Users/sebastie/SAXO_RD/Commons/cm_4mesh.pro') 
     47; 
     48;   IDL> print, isafile('/Users/sebastie/SAXO_RD/Commons/cm_4mesh.pro') 
    4849;  /Users/sebastie/SAXO_RD/Commons/cm_4mesh.pro 
    49 ; IDL> print, isafile('cm_4mesh.pro', iodir = '/Users/sebastie/SAXO_RD/Commons') 
     50;   IDL> print, isafile('cm_4mesh.pro', iodir = '/Users/sebastie/SAXO_RD/Commons') 
    5051;  /Users/sebastie/SAXO_RD/Commons/cm_4mesh.pro 
    51 ; IDL> print, isafile('cm_4mesh.pro', iodir = !path) 
     52;   IDL> print, isafile('cm_4mesh.pro', iodir = !path) 
    5253;  /Users/sebastie/SAXO_RD/Commons/cm_4mesh.pro 
    53 ; IDL> print, isafile('cm_4mesh.pro', iodir = '/Users/sebastie/SAXO_RD', /recursive) 
     54;   IDL> print, isafile('cm_4mesh.pro', iodir = '/Users/sebastie/SAXO_RD', /recursive) 
    5455;  /Users/sebastie/SAXO_RD/Commons/cm_4mesh.pro 
    55 ; IDL> print, isafile('cm_4mesh.pro', iodir = getenv('HOME'), /recursive) 
     56;   IDL> print, isafile('cm_4mesh.pro', iodir = getenv('HOME'), /recursive) 
    5657;  /Users/sebastie/SAXO_RD/Commons/cm_4mesh.pro 
    57 ; IDL> print, isafile('fake_file.pro') 
     58;   IDL> print, isafile('fake_file.pro') 
    5859; 
    5960; @history 
  • trunk/SRC/Utilities/linearequation.pro

    r325 r371  
    2828; 
    2929; @examples 
    30 ; IDL> abc=linearequation(complex(1,2),[3,4]) 
    31 ; IDL> print, abc[0]*1+abc[1]*2+abc[2] 
     30; 
     31;   IDL> abc=linearequation(complex(1,2),[3,4]) 
     32;   IDL> print, abc[0]*1+abc[1]*2+abc[2] 
    3233; 0.00000 
    3334; 
  • trunk/SRC/Utilities/lineintersection.pro

    r327 r371  
    3939; 
    4040; @examples 
    41 ; IDL> abc1=linearequation(complex(1,2),[3,4]) 
    42 ; IDL> abc2=linearequation(complex(1,2),[8,15]) 
    43 ; IDL> print, lineintersection(abc1, abc2) 
     41; 
     42;   IDL> abc1=linearequation(complex(1,2),[3,4]) 
     43;   IDL> abc2=linearequation(complex(1,2),[8,15]) 
     44;   IDL> print, lineintersection(abc1, abc2) 
    4445; (      1.00000,      2.00000) 
    45 ; IDL> print, lineintersection(abc1, abc2,/float) 
     46;   IDL> print, lineintersection(abc1, abc2,/float) 
    4647; 1.00000      2.00000 
    4748; 
  • trunk/SRC/Utilities/protype.pro

    r325 r371  
    1818; @examples 
    1919; 
    20 ; IDL> print, protype('protype') 
     20;   IDL> print, protype('protype') 
    2121;      func 
    22 ; IDL> print, protype('protype.pro') 
     22;   IDL> print, protype('protype.pro') 
    2323;      func 
    24 ; IDL> print, protype('init') 
     24;   IDL> print, protype('init') 
    2525;      batch 
    26 ; IDL> print, protype('plt') 
     26;   IDL> print, protype('plt') 
    2727;      proc 
    2828; 
  • trunk/SRC/Utilities/report.pro

    r327 r371  
    3939; If there is not any widget activated: 
    4040; 
    41 ; IDL> help, report('toto tata') 
     41;   IDL> help, report('toto tata') 
    4242; % $MAIN$: toto tata 
    4343; <Expression>    INT       =       -1 
    44 ; IDL> help, report('does it works ?',/question) 
     44;   IDL> help, report('does it works ?',/question) 
    4545; does it works ? y/n (default answer is y) 
    4646; <Expression>    BYTE      =    1 
    47 ; IDL> help, report('question1: !C does it works ?',/question) 
     47;   IDL> help, report('question1: !C does it works ?',/question) 
    4848; question1: 
    4949; does it works ? y/n (default answer is y) 
  • trunk/SRC/Utilities/routine_name.pro

    r325 r371  
    2222; 
    2323; @examples 
    24 ; IDL> print, routine_name() 
     24; 
     25;   IDL> print, routine_name() 
    2526;  /usr1/com/smasson/IDL_RD/UTILITAIRE/report.pro 
    26 IDL> print, routine_name(1) 
     27 IDL> print, routine_name(1) 
    2728;  /usr1/com/smasson/IDL_RD/PLOTS/DIVERS/determineminmax.pro 
    28 IDL> print, routine_name(2) 
     29 IDL> print, routine_name(2) 
    2930;  /usr1/com/smasson/IDL_RD/PLOTS/DESSINE/plt.pro 
    30 IDL> print, routine_name(3) 
     31 IDL> print, routine_name(3) 
    3132;  $MAIN$ 
    32 IDL> print, routine_name(4) 
     33 IDL> print, routine_name(4) 
    3334;  $MAIN$ 
    3435; 
  • trunk/SRC/Utilities/testvar.pro

    r327 r371  
    1515; 
    1616; @examples 
    17 ; IDL> print, testvar(var=toto) 
     17;   IDL> print, testvar(var=toto) 
    1818; 0 
    19 ; IDL> print, testvar(var='toto') 
     19;   IDL> print, testvar(var='toto') 
    2020; toto 
    2121; 
  • trunk/SRC/Utilities/undefine.pro

    r325 r371  
    1313; 
    1414; @examples 
    15 ; IDL> a=1 
    16 ; IDL> undefine,a 
     15;   IDL> a=1 
     16;   IDL> undefine,a 
    1717; % Compiled module: UNDEFINE. 
    18 ; IDL> help, a 
     18;   IDL> help, a 
    1919; A               UNDEFINED = <Undefined> 
    2020; 
  • trunk/SRC/Utilities/xfile.pro

    r327 r371  
    2323; 
    2424; @examples 
    25 ; IDL> xfile,'plt' 
     25; 
     26;   IDL> xfile,'plt' 
    2627; 
    2728; @history 
  • trunk/SRC/Utilities/xhelp.pro

    r327 r371  
    2020; 
    2121; @examples 
    22 ; IDL> xhelp,'plt' 
     22; 
     23;   IDL> xhelp,'plt' 
    2324; 
    2425; @history 
Note: See TracChangeset for help on using the changeset viewer.