Changeset 9 for trunk/src


Ignore:
Timestamp:
04/26/11 19:05:26 (13 years ago)
Author:
pinsard
Message:

new SAXO and IDL init

Location:
trunk/src
Files:
2 added
9 edited
1 moved

Legend:

Unmodified
Added
Removed

  • trunk/src/fig_mld.pro

    r8 r9  
    99; main POMME project program 
    1010; 
    11 ; - read the 2 mld models :file:`${POMME_ID}/noeddy_mld.nc` and :file:`${POMME_ID}/eddy_mld.nc` 
     11; - read the 2 mld models :file:`${PROJECT_ID}/noeddy_mld.nc` and :file:`${PROJECT_ID}/eddy_mld.nc` 
    1212; - read mld insitu data and metadata 
    1313; - compute daily mean insitu mld data 
    … …  
    1515;   measurement location 
    1616; - plot +todo+ 
    17 ; - write :file:`${POMME_OD}/fig_mld.txt` containing for each day between 
     17; - write :file:`${PROJECT_OD}/fig_mld.txt` containing for each day between 
    1818;   20000927 and +todo+ 
    1919; 
    … …  
    5555;           URL="http://www.locean-ipsl.upmc.fr/~fplod/varamma/varamma_ws/doc/html/sphinx/guides/data_content.html#data_mld_models"]; 
    5656;           pomme_ps [shape=ellipse,fontname=Courier,label="${VARAMMA_OD}/fig_mld_valid_sta.ps"]; 
    57 ;            
     57; 
    5858;           fig_mld [shape=box, 
    5959;           fontname=Courier, 
    6060;           color=blue, 
    6161;           URL="http://forge.ipsl.jussieu.fr/pomme/browser/trunk/src/fig_mld.pro" 
    62 ;           label="${POMME}/src/fig_mld.pro"]; 
    63 ;            
     62;           label="${PROJECT}/src/fig_mld.pro"]; 
     63; 
    6464;           {pomme_asc pomme_prn pomme_nc} -> {fig_mld} -> {pomme_ps}; 
    6565;        } 
    … …  
    6969; .. code-block:: guess 
    7070; 
     71;    IDL> @init_pom 
    7172;    IDL> fig_mld 
    7273;    IDL> exit 
    7374; 
    74 ; :file:`${POMME_OD}/fig_mld_valid_sta.ps` can be used for future work. 
    75 ; 
    76 ; :file:`${POMME_OD}/fig_mld.txt` can be used for future work (mainly  
     75; :file:`${PROJECT_OD}/fig_mld_valid_sta.ps` can be used for future work. 
     76; 
     77; :file:`${PROJECT_OD}/fig_mld.txt` can be used for future work (mainly 
    7778; comparison). 
    7879; 
    … …  
    8182; :func:`read_ncdf <saxo:read_ncdf>` 
    8283; :func:`julday <saxo:julday>` 
    83 ; :func:`pltt <saxo:pltt>` 
     84; :func:`plt1d <saxo:plt1d>` 
    8485; :func:`moyenne <saxo:moyenne>` 
    8586; :func:`domdef <saxo:domdef>` 
    8687; 
    87 ; :ref:`init_pom.pro` 
    8888; :func:`file_prn_to_mem` 
    8989; :func:`file_asc_to_mem` 
    … …  
    9797; figure 4 of submitted paper +todo+ 
    9898; 
     99; :ref:`project_init.pro` 
     100; :ref:`cm_project.pro` 
     101; 
    99102; :todo: 
     103; 
     104;  
     105; - fplod 20110426T170242Z aedon.locean-ipsl.upmc.fr (Darwin) 
     106; 
     107;   * make it work : now pb with :: 
     108; 
     109;     % Error: impossible to make a "t" type plot with jpt = 1 
     110;     % Attempt to subscript MLD1 with IDAY is out of range. 
    100111; 
    101112; remove hard coded value (95) of time axe of model correction 
    … …  
    105116; 
    106117; 250 = red 
    107 ; 90 = light blue  
     118; 90 = light blue 
    108119; 150 = green 
    109120; ++ longitude should be dark blue 
    110 ; ++ latitude should be orange  
     121; ++ latitude should be orange 
    111122; 
    112123; superposer plot latitude et longitude 
    113 ;  
     124; 
    114125; mettre les labels et le titre des Y du plot longitude à droite 
    115126; see x recipe http://www.dfanning.com/graphics_tips/xattop.html 
    … …  
    118129; 
    119130; :history: 
     131; 
     132; - fplod 20110426T161700Z aedon.locean-ipsl.upmc.fr (Darwin) 
     133; 
     134;   * rely on project_init.pro instead of init_pom.pro 
     135;   * fix typo (copy/paste std1 vs mld5) 
     136;   * add init_pom 
     137;   * handle 2D vs 1D my* because ml use only delta = 0 
    120138; 
    121139; - fplod 20101209T100325Z aedon.locean-ipsl.upmc.fr (Darwin) 
    … …  
    157175compile_opt idl2, strictarrsubs 
    158176; 
    159 @init_pom 
     177@cm_project 
    160178; 
    161179; read MLD in insitu files and metafiles 
    … …  
    165183data_insitu=join_dmean_asc(data_dmean,data_asc) 
    166184; 
    167 ; temps des données insitu  
     185; temps des données insitu 
    168186time_insitu=data_insitu.doy 
    169187; 
    … …  
    174192mld3 = findgen(ndays) 
    175193mld4 = findgen(ndays) 
     194mld5 = findgen(ndays) 
    176195std1 = findgen(ndays) 
    177196xlon = findgen(ndays) 
    … …  
    184203      mld3[iday] = !VALUES.F_NAN 
    185204      mld4[iday] = !VALUES.F_NAN 
     205      mld5[iday] = !VALUES.F_NAN 
    186206      std1[iday] = !VALUES.F_NAN 
    187207      xlon[iday] = !VALUES.F_NAN 
    … …  
    192212      mld3[iday] = data_insitu[indice_insitu].mean_zhom005 
    193213      mld4[iday] = data_insitu[indice_insitu].mean_zhom010 
    194       std1[iday] = data_insitu[indice_insitu].mean_zhomelch 
     214      mld5[iday] = data_insitu[indice_insitu].mean_zhomelch 
    195215      std1[iday] = data_insitu[indice_insitu].std_zhom001 
    196216      xlon[iday] = data_insitu[indice_insitu].lon 
    … …  
    224244 
    225245         jt = time_insitu[iday]+95 
    226          mldm_box = reform(read_ncdf('mld', jt, /timestep, file=iodir+'eddy_mld.nc',  /nostruct, box = mybox)) 
    227          mldr_box = reform(read_ncdf('mld', jt, /timestep, file=iodir+'noeddy_mld.nc',  /nostruct, box = mybox)) 
     246         mldm_box = reform(read_ncdf('mld', jt, /timestep, file=project_id_env+'eddy_mld.nc',  /nostruct, box = mybox)) 
     247         mldr_box = reform(read_ncdf('mld', jt, /timestep, file=project_id_env+'noeddy_mld.nc',  /nostruct, box = mybox)) 
    228248 
    229249         mymldm[idelta,iday] = moyenne(mldm_box, box = mybox, 'xy') 
    … …  
    240260 ENDFOR 
    241261; 
    242 ; plot:  
     262; plot: 
    243263; selection de la partie qui nous interesse: 
    244264ind = where(finite(mld1) NE 0) 
    245265mld1 = mld1[ind] 
    246266std1 = std1[ind] 
    247 mymldm = mymldm[0, *] 
    248 mymldm = mymldm[ind] 
    249 mymldr = mymldr[0, *] 
    250 mymldr = mymldr[ind]       
    251  
    252 myvarm = myvarm[0, *] 
    253 myvarm = myvarm[ind] 
    254 myvarr = myvarr[0, *] 
    255 myvarr = myvarr[ind]      
     267mymldm_1d = mymldm[0, *] 
     268mymldm_1d = mymldm[ind] 
     269mymldr_1d = mymldr[0, *] 
     270mymldr_1d = mymldr[ind] 
     271 
     272myvarm_1d = myvarm[0, *] 
     273myvarm_1d = myvarm[ind] 
     274myvarr_1d = myvarr[0, *] 
     275myvarr_1d = myvarr[ind] 
    256276 
    257277time=julday(01,01,2001)+time_insitu 
    … …  
    262282 
    263283 
    264 ;++ ok openps, pomme_od_env+'fig_mld_valid_sta.ps' 
     284;++ ok openps, project_od_env+'fig_mld_valid_sta.ps' 
    265285plt1d,  -mld1,  't',  -300,  0,  ytitle="meters", title='MLD along cruise track', color = 10, small = [1, 2, 1] 
    266 polyfill, [time, reverse(time)], [(-mymldm-myvarm),reverse(-mymldm+myvarm)],  color = 250 
    267 polyfill, [time, reverse(time)], [(-mymldr-myvarr),reverse(-mymldr+myvarr)],  color = 150 
     286polyfill, [time, reverse(time)], [(-mymldm_1d-myvarm_1d),reverse(-mymldm_1d+myvarm_1d)],  color = 250 
     287polyfill, [time, reverse(time)], [(-mymldr_1d-myvarr_1d),reverse(-mymldr_1d+myvarr_1d)],  color = 150 
    268288polyfill, [time, reverse(time)], [(-mld1-std1),reverse(-mld1+std1)], color = 90 
    269 plt1d,  -mymldr,  't',  /ov1d, line = 2 
     289plt1d,  -mymldr_1d,  't',  /ov1d, line = 2 
    270290plt1d,  -mld1,  't', /ov1d 
    271 plt1d,  -mymldm,  't', /ov1d,  line = 1 
     291plt1d,  -mymldm_1d,  't', /ov1d,  line = 1 
    272292 
    273293time = time_save 
    … …  
    278298 
    279299; 
    280 ; Write results in ${POMME_OD}/fig_mld.txt 
    281 fullfilename=pomme_od_env+'fig_mld.txt' 
     300; Write results in ${PROJECT_OD}/fig_mld.txt 
     301fullfilename=project_od_env+'fig_mld.txt' 
    282302OPENW, lun, fullfilename, /GET_LUN 
    283303;++ hanlde error 
    … …  
    315335FREE_LUN, lun 
    316336 
    317  
    318337END 

  • trunk/src/file_asc_long2mem.pro

    r8 r9  
    4444; test existence of filename 
    4545; 
    46 ; usage of ${POMME_ID} 
     46; :history: 
    4747; 
    48 ; :history: 
     48; - fplod 20110426T152245Z cratos.locean-ipsl.upmc.fr (Linux) 
     49; 
     50;   * usage of PROJECT 
    4951; 
    5052; - fplod 20101123T122132Z aedon.locean-ipsl.upmc.fr (Darwin) 

  • trunk/src/file_asc_p1l1_to_mem.pro

    r8 r9  
    4343; 
    4444; test existence of filename 
    45 ; 
    46 ; usage of ${POMME_ID} 
    4745; 
    4846; :history: 

  • trunk/src/file_asc_p2l1_to_mem.pro

    r8 r9  
    4848; 
    4949; test existence of filename 
    50 ; 
    51 ; usage of ${POMME_ID} 
    5250; 
    5351; add sequence using read/write 

  • trunk/src/file_asc_p2l2_to_mem.pro

    r8 r9  
    4444; 
    4545; test existence of filename 
    46 ; 
    47 ; usage of ${POMME_ID} 
    4846; 
    4947; :history: 

  • trunk/src/file_asc_to_mem.pro

    r2 r9  
    2525; 
    2626; :todo: 
    27 ; 
    28 ; usage of ${POMME_ID} 
    2927; 
    3028; parametrisation ?? 

  • trunk/src/file_prn2mem.pro

    r8 r9  
    6262; 
    6363; test existence of filename 
    64 ; 
    65 ; usage of ${POMME_ID} 
    6664; 
    6765; :history: 

  • trunk/src/file_prn_to_mem.pro

    r6 r9  
    3636; 
    3737; parametrisation ?? 
    38 ; 
    39 ; usage of ${POMME_ID} 
    4038; 
    4139; learn how to concatenate array of structure (and avoid loop) 

  • trunk/src/init_pom.pro

    r8 r9  
    1212;  - ++ 
    1313; 
    14 ; Read :file:`${POMME_ID}/meshmak.nc`. 
     14; Read :file:`${PROJECT_ID}/meshmak.nc`. 
    1515; 
    1616; :examples: 
    … …  
    2626; :ref:`init.pro` 
    2727; 
    28 ; :program:`pomme_profile.sh` 
     28; :program:`project_profile.sh` 
    2929; 
    3030; :uses: 
    … …  
    4040; SAXO sans compatibility (common) 
    4141; 
    42 ; add test if ${POMME_ID} defined 
     42; réparer le lien sphinx sur common.pro 
    4343; 
    44 ; réparer le lien sphinx sur pomme_profile.sh 
     44; conflict with project_init.pro and init.pro 
     45; :history: 
    4546; 
    46 ; réparer le lien sphinx sur common.pro  
     47; - fplod 20110426T152454Z cratos.locean-ipsl.upmc.fr (Linux) 
    4748; 
    48 ; :history: 
     49;   * usage of PROJECT 
    4950; 
    5051; - fplod 20101129T124507Z aedon.locean-ipsl.upmc.fr (Darwin) 
    … …  
    6364; 
    6465@common 
     66@cm_project 
    6567; 
    6668; check environnement 
    6769; 
    68 pomme_id_env=GETENV('POMME_ID') 
    69 pomme_od_env=GETENV('POMME_OD') 
    70 ; 
    71 iodir = isadirectory(pomme_id_env) 
     70iodir = isadirectory(project_id_env) 
    7271; 
    7372;--------------------------------------------------------- 

  • trunk/src/project_profile.sh

    r2 r9  
    22#+ 
    33# 
    4 # .. program:: pomme_profile.sh 
    5 # 
    6 # ================ 
    7 # pomme_profile.sh 
    8 # ================ 
    9 # 
    10 # ------------------------ 
    11 # define POMME environment 
    12 # ------------------------ 
     4# .. program:: project_profile.sh 
     5# 
     6# .. _project_profile.sh: 
     7# 
     8# ============================================= 
     9# project_profile.sh - define POMME environment 
     10# ============================================= 
    1311# 
    1412# SYNOPSIS 
    … …  
    1715# Online usage:: 
    1816# 
    19 #  $ . ./pomme_profile.sh -d directory -i indir -o outdir -t tempdir 
     17#  $ . ./project_profile.sh -d directory -i indir -o outdir -t tempdir -s saxo_dir 
    2018# 
    2119# In ${HOME}/.profile, add the following line:: 
    2220# 
    23 #  . pomme_profile.sh -d directory  -i indir -o outdir -t tempdir 
     21#  . project_profile.sh -d directory  -i indir -o outdir -t tempdir -s saxo_dir 
    2422# 
    2523# DESCRIPTION 
    … …  
    3028# .. option:: -o  <outdir> 
    3129# .. option:: -t  <tempdir> 
     30# .. option:: -s  <saxo_dir> 
    3231# 
    3332# define POMME environment 
    3433# 
    35 # ${POMME} is the base directory of tools. 
    36 # 
    37 # ${POMME_LOG} is the directory where log files will be written. 
    38 # 
    39 # ${POMME_ID} is the directory where input files must be. 
    40 # 
    41 # ${POMME_OD} is the directory where output files will be written. 
    42 # 
    43 # PATH is completed with ${POMME}. 
     34# ${PROJECT} is the base directory of tools. 
     35# 
     36# ${PROJECT_LOG} is the directory where log files will be written. 
     37# 
     38# ${PROJECT_ID} is the directory where input files must be. 
     39# 
     40# ${PROJECT_OD} is the directory where output files will be written. 
     41# 
     42# ${SAXO_DIR} is the base directory of SAXO tools. 
     43# 
     44# PATH is completed with ${PROJECT}. 
    4445# 
    4546# SEE ALSO 
    … …  
    4849# for IDL/GDL environment : 
    4950# 
    50 # :program:`pomme_startup.pro` 
     51# :ref:`project_init.pro` 
     52# :ref:`cm_project.pro` 
    5153# 
    5254# EXAMPLES 
    … …  
    5658# 
    5759#  $ cd /usr/home/fplod/incas/pomme/pomme_ws/ 
    58 #  $ . ./src/pomme_profile.sh \ 
     60#  $ . ./src/project_profile.sh \ 
    5961#    -d $(pwd) \ 
    6062#    -i /usr/temp/${LOGNAME}/pomme_d/ \ 
    6163#    -o /usr/temp/${LOGNAME}/pomme_d/ \ 
    62 #    -t /usr/temp/${LOGNAME}/log/ 
    63 # 
    64 # For fplod on zeus.locean-ipsl.umpc.fr:: 
     64#    -t /usr/temp/${LOGNAME}/log/ \ 
     65#    -s /usr/home/fplod/SAXO_DIR/ 
     66# 
     67# For fplod on cratos.locean-ipsl.umpc.fr:: 
    6568# 
    6669#  $ cd ${HOME}/incas/pomme/pomme_ws/ 
    67 #  $ . ./src/pomme_profile.sh \ 
     70#  $ . ./src/project_profile.sh \ 
    6871#    -d $(pwd) \ 
    6972#    -i /usr/temp/${LOGNAME}/pomme_d/ \ 
    7073#    -o /usr/temp/${LOGNAME}/pomme_d/ \ 
    71 #    -t /usr/temp/${LOGNAME}/log/ 
     74#    -t /usr/temp/${LOGNAME}/log/ \ 
     75#    -s ${HOME}/SAXO_DIR/ 
    7276# 
    7377# For pinsard on camelot.ipsl.polytechnique.fr or merlin15-c.climserv:: 
    7478# 
    7579#  $ cd ${HOME}/pomme/ 
    76 #  $ . ./src/pomme_profile.sh \ 
     80#  $ . ./src/project_profile.sh \ 
    7781#   -d $(pwd) \ 
    7882#   -i /homedata/${LOGNAME}/pomme_d/ \ 
    7983#   -o /homedata/${LOGNAME}/pomme_d/ \ 
    80 #   -t /homedata/${LOGNAME}/log/ 
     84#   -t /homedata/${LOGNAME}/log/ \ 
     85#   -s ${HOME}/SAXO_DIR/ 
    8186# 
    8287# TODO 
    … …  
    8994# ++ besoin de posix 
    9095# 
    91 # ++ pas de MANPATH defini par défaut sur zeus et cerbere 
    92 # 
    93 # define IDL_STARTUP 
     96# ++ pas de MANPATH defini par défaut sur cratos  et cerbere 
    9497# 
    9598# EVOLUTIONS 
    9699# ========== 
     100# 
     101# - fplod 20110426T151058Z cratos.locean-ipsl.upmc.fr (Linux) 
     102# 
     103#   * add IDL and  SAXO env. 
     104#   * replace POMME by PROJECT 
     105#   * replace zeus by cratos 
    97106# 
    98107# - fplod 20101118T171653Z aedon.locean-ipsl.upmc.fr (Darwin) 
    … …  
    115124# 
    116125# as this script might be launch in .profile, command is forced. 
    117 command=pomme_profile.sh 
    118 # 
    119 usage=" Usage : ${command} -d directory -i indir -o outdir -t tempdir" 
     126command=project_profile.sh 
     127# 
     128usage=" Usage : ${command} -d directory -i indir -o outdir -t tempdir -s saxo_dir" 
    120129# 
    121130set +u 
    … …  
    143152         shift 
    144153      ;; 
     154      -s) 
     155         saxo_dir=${2} 
     156         shift 
     157      ;; 
    145158      *) 
    146159         # other choice 
    … …  
    169182fi 
    170183# 
    171 POMME=${directory} 
    172 export POMME 
     184PROJECT=${directory} 
     185export PROJECT 
    173186unset drectory 
    174187# 
    175 # add POMME tools to PATH 
     188# add PROJECT tools to PATH 
    176189# if not already done 
    177 suppath=$(echo ${POMME}/src | tr -s "/") 
     190suppath=$(echo ${PROJECT}/src | tr -s "/") 
    178191echo ${PATH} | grep -q "${suppath}:" 
    179192test_path=${?} 
    … …  
    188201unset test_path 
    189202# 
    190 # add POMME manuals to MANPATH 
     203# add PROJECT manuals to MANPATH 
    191204# if not already done 
    192 suppath=$(echo ${POMME}/doc/man | tr -s "/") 
     205suppath=$(echo ${PROJECT}/doc/man | tr -s "/") 
    193206echo ${MANPATH} | grep -q "${suppath}:" 
    194207test_manpath=${?} 
    … …  
    204217unset suppath 
    205218# 
    206 POMME_LOG=${tempdir} 
    207 export POMME_LOG 
     219PROJECT_LOG=${tempdir} 
     220export PROJECT_LOG 
    208221unset tempdir 
    209 if [ ! -d ${POMME_LOG} ] 
    210 then 
    211    mkdir -p ${POMME_LOG} 
     222if [ ! -d ${PROJECT_LOG} ] 
     223then 
     224   mkdir -p ${PROJECT_LOG} 
    212225   status=${?} 
    213226   if [ ${status} -ne 0 ] 
    … …  
    216229      # nb : no exit because this file should be launched by login process 
    217230   else 
    218       echo "${command} : iii : creation of \${POMME_LOG}" 
     231      echo "${command} : iii : creation of \${PROJECT_LOG}" 
    219232   fi 
    220233   unset status 
    221234fi 
    222 # check for permission on POMME_LOG 
    223 if [ ! -x ${POMME_LOG} ] 
    224 then 
    225    echo " eee : ${POMME_LOG} not reachable" 
    226    # nb : no exit because this file should be launched by login process 
    227 fi 
    228 # 
    229 # check for permission on POMME_LOG 
    230 if [ ! -w ${POMME_LOG} ] 
    231 then 
    232    echo " eee : ${POMME_LOG} not writable" 
     235# check for permission on PROJECT_LOG 
     236if [ ! -x ${PROJECT_LOG} ] 
     237then 
     238   echo " eee : ${PROJECT_LOG} not reachable" 
     239   # nb : no exit because this file should be launched by login process 
     240fi 
     241# 
     242# check for permission on PROJECT_LOG 
     243if [ ! -w ${PROJECT_LOG} ] 
     244then 
     245   echo " eee : ${PROJECT_LOG} not writable" 
    233246   # nb : no exit because this file shouldreachable be launched by login process 
    234247fi 
    … …  
    238251# 
    239252# io directories 
    240 POMME_ID=${indir} 
    241 export POMME_ID 
     253PROJECT_ID=${indir} 
     254export PROJECT_ID 
    242255unset indir 
    243 if [ ! -d ${POMME_ID} ] 
    244 then 
    245    mkdir -p ${POMME_ID} 
    246    echo "${command} : iii : creation of \${POMME_ID}" 
    247 fi 
    248 # check for permission on POMME_ID 
    249 if [ ! -x ${POMME_ID} ] 
    250 then 
    251    echo " eee : ${POMME_ID} not reachable" 
    252    # nb : no exit because this file should be launched by login process 
    253 fi 
    254 # 
    255 POMME_OD=${outdir} 
    256 export POMME_OD 
     256if [ ! -d ${PROJECT_ID} ] 
     257then 
     258   mkdir -p ${PROJECT_ID} 
     259   echo "${command} : iii : creation of \${PROJECT_ID}" 
     260fi 
     261# check for permission on PROJECT_ID 
     262if [ ! -x ${PROJECT_ID} ] 
     263then 
     264   echo " eee : ${PROJECT_ID} not reachable" 
     265   # nb : no exit because this file should be launched by login process 
     266fi 
     267# 
     268PROJECT_OD=${outdir} 
     269export PROJECT_OD 
    257270unset outdir 
    258 if [ ! -d ${POMME_OD} ] 
    259 then 
    260     mkdir -p ${POMME_OD} 
    261     echo "${command} : iii : creation of \${POMME_OD}" 
    262 fi 
    263 # check for permission on POMME_OD 
    264 if [ ! -x ${POMME_OD} ] 
    265 then 
    266    echo " eee : ${POMME_OD} not reachable" 
    267    # nb : no exit because this file should be launched by login process 
    268 fi 
    269 if [ ! -w ${POMME_OD} ] 
    270 then 
    271    echo " eee : ${POMME_OD} not writable" 
    272    # nb : no exit because this file should be launched by login process 
    273 fi 
    274 # 
     271if [ ! -d ${PROJECT_OD} ] 
     272then 
     273    mkdir -p ${PROJECT_OD} 
     274    echo "${command} : iii : creation of \${PROJECT_OD}" 
     275fi 
     276# check for permission on PROJECT_OD 
     277if [ ! -x ${PROJECT_OD} ] 
     278then 
     279   echo " eee : ${PROJECT_OD} not reachable" 
     280   # nb : no exit because this file should be launched by login process 
     281fi 
     282if [ ! -w ${PROJECT_OD} ] 
     283then 
     284   echo " eee : ${PROJECT_OD} not writable" 
     285   # nb : no exit because this file should be launched by login process 
     286fi 
     287# 
     288SAXO_DIR=${saxo_dir} 
     289export SAXO_DIR 
     290# 
     291# IDL startup 
     292IDL_STARTUP=${PROJECT}/src/project_init.pro 
     293export IDL_STARTUP 
    275294# end 
    276295unset command 
Note: See TracChangeset for help on using the changeset viewer.