| 1 | ; IDL Version 6.0 (linux x86 m32) |
|---|
| 2 | ; Journal File for mklod@chromios.locean-ipsl.upmc.fr |
|---|
| 3 | ; Working directory: /.autofs//home/mklod/IDL |
|---|
| 4 | ; Date: Tue Mar 14 10:26:23 2006 |
|---|
| 5 | |
|---|
| 6 | ; |
|---|
| 7 | ; This is the initialisation file. |
|---|
| 8 | ; it defines the !path and the defaut values of some of the common variables |
|---|
| 9 | ; |
|---|
| 10 | ; this is supposed to speed-up IDL... |
|---|
| 11 | ; |
|---|
| 12 | ; a = fltarr(1000,1000,100) |
|---|
| 13 | ; a = 0 |
|---|
| 14 | ; |
|---|
| 15 | ; path definition |
|---|
| 16 | ; |
|---|
| 17 | !path = expand_path('+' + '/.autofs/home/mklod/SVN/TRUNK') $ ; procs local home |
|---|
| 18 | + ':' + expand_path('+' + '/.autofs/home/mklod/SAXO_new_svn') $ ; saxo home |
|---|
| 19 | + ':' + expand_path('+' + !dir) |
|---|
| 20 | ; |
|---|
| 21 | ; compatibility with the old version |
|---|
| 22 | ; |
|---|
| 23 | keep_compatibility, 1 |
|---|
| 24 | ; |
|---|
| 25 | ; define all the commons |
|---|
| 26 | ; |
|---|
| 27 | @all_cm |
|---|
| 28 | ; |
|---|
| 29 | ; define default directories |
|---|
| 30 | ; |
|---|
| 31 | homedir = isadirectory('/.autofs/home/mklod/SVN/TRUNK/', title = 'Select the default HOME directory') |
|---|
| 32 | iodir = isadirectory('/.autofs/home/mklod/SVN/TRUNK/', title = 'Select the default IO directory') |
|---|
| 33 | psdir = isadirectory('/.autofs/home/mklod/SVN/TRUNK/out/post_out/', title = 'Select the default postscripts directory') |
|---|
| 34 | imagedir = isadirectory('/.autofs/home/mklod/SVN/TRUNK/out/post_out/', title = 'Select the default images directory') |
|---|
| 35 | animdir = isadirectory('/.autofs/home/mklod/SVN/TRUNK/out/post_out/', title = 'Select the default animations directory') |
|---|
| 36 | ; |
|---|
| 37 | ; define printer parameters |
|---|
| 38 | ; |
|---|
| 39 | printer_human_names = '' |
|---|
| 40 | printer_machine_names = '' |
|---|
| 41 | print_command = '' |
|---|
| 42 | ; |
|---|
| 43 | ; colors ... |
|---|
| 44 | ; |
|---|
| 45 | device, decomposed = 0 |
|---|
| 46 | device, retain = 2 |
|---|
| 47 | lct, 39 |
|---|
| 48 | ; |
|---|
| 49 | ; postscript parameters ... |
|---|
| 50 | ; |
|---|
| 51 | key_portrait = 0 |
|---|
| 52 | page_size = [20.9903, 29.7039] |
|---|
| 53 | windowsize_scale = 1.00000 |
|---|
| 54 | archive_ps = 0 |
|---|
| 55 | ; |
|---|
| 56 | ;======================================================== |
|---|
| 57 | ; end of the part that should be modified by the users... |
|---|
| 58 | ;======================================================== |
|---|
| 59 | ; |
|---|
| 60 | ; default definitions of many other common parameters... |
|---|
| 61 | jpiglo = 1L |
|---|
| 62 | jpjglo = 1L |
|---|
| 63 | jpkglo = 1L |
|---|
| 64 | jpidta = jpiglo |
|---|
| 65 | jpjdta = jpjglo |
|---|
| 66 | jpkdta = jpjglo |
|---|
| 67 | jpi = 1L |
|---|
| 68 | jpj = 1L |
|---|
| 69 | jpk = 1L |
|---|
| 70 | jpt = 1L |
|---|
| 71 | time = 0L |
|---|
| 72 | ixminmesh = -1L |
|---|
| 73 | ixmaxmesh = -1L |
|---|
| 74 | iyminmesh = -1L |
|---|
| 75 | iymaxmesh = -1L |
|---|
| 76 | izminmesh = -1L |
|---|
| 77 | izmaxmesh = -1L |
|---|
| 78 | ixmindta = 0L |
|---|
| 79 | ixmaxdta = jpidta-1 |
|---|
| 80 | iymindta = 0L |
|---|
| 81 | iymaxdta = jpjdta-1 |
|---|
| 82 | izmindta = 0L |
|---|
| 83 | izmaxdta = jpkdta-1 |
|---|
| 84 | key_shift = 0L |
|---|
| 85 | key_periodic = 0L |
|---|
| 86 | key_yreverse = 0L |
|---|
| 87 | key_zreverse = 0L |
|---|
| 88 | key_stride = [1, 1, 1] |
|---|
| 89 | ccmeshparameters ={filename:'No File', filetype:'nothing' $ |
|---|
| 90 | , jpiglo:jpiglo, jpjglo:jpjglo, jpkglo:jpkglo $ |
|---|
| 91 | , jpi:jpi, jpj:jpj, jpk:jpk $ |
|---|
| 92 | , ixminmesh:ixminmesh, ixmaxmesh:ixmaxmesh $ |
|---|
| 93 | , iyminmesh:iyminmesh, iymaxmesh:iymaxmesh $ |
|---|
| 94 | , izminmesh:izminmesh, izmaxmesh:izmaxmesh $ |
|---|
| 95 | , key_shift:key_shift, key_periodic:key_periodic $ |
|---|
| 96 | , triangulation:-1, boundary:[-180, 180]} |
|---|
| 97 | ccreadparameters = {funclec_name:'No File' $ |
|---|
| 98 | , jpidta:jpidta, jpjdta:jpjdta, jpkdta:jpkdta $ |
|---|
| 99 | , ixmindta:ixmindta, ixmaxdta:ixmaxdta $ |
|---|
| 100 | , iymindta:iymindta, iymaxdta:iymaxdta $ |
|---|
| 101 | , izmindta:izmindta, izmaxdta:izmaxdta} |
|---|
| 102 | lon1 = 0 |
|---|
| 103 | lon2 = 1 |
|---|
| 104 | lat1 = 0 |
|---|
| 105 | lat2 = 1 |
|---|
| 106 | vert1 = 0 |
|---|
| 107 | vert2 = 1 |
|---|
| 108 | valmask = 1.e20 |
|---|
| 109 | vargrid = 'T' |
|---|
| 110 | varname = '' |
|---|
| 111 | varexp = '' |
|---|
| 112 | varunit = '' |
|---|
| 113 | vardate= '0' |
|---|
| 114 | @updateold |
|---|
| 115 | ; |
|---|
| 116 | |
|---|
| 117 | @init_post_it |
|---|
