Changeset 693 for trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercure.ksh
- Timestamp:
- 06/27/12 18:12:50 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercure.ksh
r676 r693 1484 1484 } 1485 1485 1486 function IGCM_sys_rebuild_station { 1487 IGCM_debug_PushStack "IGCM_sys_rebuild_station" -- $@ 1488 typeset i list_opt file_in file_out prefix_invert 1489 if ( $DEBUG_sys ) ; then 1490 echo "IGCM_sys_rebuild_station :" $@ 1491 fi 1492 list_opt=$@ 1493 1494 # Invert Axis : t,x -> x,t 1495 # t,pres,x -> x,t,pres 1496 # So that we can concatenate along x 1497 i=0 1498 for file_in in ${list_opt} ; do 1499 (( i = i + 1)) 1500 [ ${i} = 1 ] && file_out=${file_in} && continue 1501 prefix_invert=$( basename ${file_in} .nc ) 1502 IGCM_sys_ncpdq -a x,time_counter -a x,time_counter,presnivs ${file_in} ${prefix_invert}_xt.nc 1503 list_invert[${#list_invert[*]}]=${prefix_invert}_xt.nc 1504 done 1505 1506 # Concatenate 1507 IGCM_sys_ncrcat ${list_invert} histstn_xt.nc 1508 1509 # Re-ivert file 1510 IGCM_sys_ncpdq -a time_counter,x -a time_counter,presnivs,x histstn_xt.nc ${file_out} 1511 1512 IGCM_debug_PopStack "IGCM_sys_rebuild_station" 1513 } 1514 1486 1515 ############################################################ 1487 1516 # Check of space available on temporary filesytems
Note: See TracChangeset
for help on using the changeset viewer.