Last change
on this file since 698 was
373,
checked in by sdipsl, 14 years ago
|
Remove libIGCM_sys_claude.ksh and libIGCM_sys_calculo.ksh
Update/homogenize all headers usgin the new fixed-length keyword syntax regarding properties keywords
$Rev:: 13 i $: Revision of last commit
$Author:: harry $: Author of last commit
$Date:: 2006-03-15 02:33:03 -0500 (Wed, 15 Mar 2006) $: Date of last commit
Add / update original author and contact when missing
|
-
Property svn:executable set to
*
-
Property svn:keywords set to
Revision Author Date
|
File size:
1.2 KB
|
Line | |
---|
1 | #!/bin/ksh |
---|
2 | |
---|
3 | #************************************************************** |
---|
4 | # Author: Martial Mancip |
---|
5 | # Contact: Martial.Mancip__at__ipsl.jussieu.fr |
---|
6 | # $Revision:: $ Revision of last commit |
---|
7 | # $Author:: $ Author of last commit |
---|
8 | # $Date:: $ Date of last commit |
---|
9 | # IPSL (2006) |
---|
10 | # This software is governed by the CeCILL licence see libIGCM/libIGCM_CeCILL.LIC |
---|
11 | # |
---|
12 | #************************************************************** |
---|
13 | |
---|
14 | #!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
---|
15 | # We change _Fillvalue to old missing_value !!!! |
---|
16 | #!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! |
---|
17 | |
---|
18 | function IGCM_Patch_20090317_histcom__Fillvalue { |
---|
19 | IGCM_debug_PushStack "IGCM_Patch_histcom__Fillvalue" $@ |
---|
20 | |
---|
21 | typeset file |
---|
22 | |
---|
23 | file=t_$1 |
---|
24 | IGCM_sys_Mv ${1} ${file} |
---|
25 | IGCM_sys_Chmod 644 ${file} |
---|
26 | |
---|
27 | #IGCM_sys_ncrename -O --hst -a _Fillvalue,missing_value ${file} |
---|
28 | |
---|
29 | miss=$( ncdump -h ${file} | grep _Fillvalue | head -1 | awk "-F=" '{print $2}' | awk "-Ff" '{print $1}' ) |
---|
30 | |
---|
31 | [ ! X${miss} = X ] && IGCM_sys_ncatted -a missing_value,,c,f,${miss} ${file} |
---|
32 | |
---|
33 | IGCM_sys_Mv ${file} ${1} |
---|
34 | |
---|
35 | IGCM_debug_PopStack "IGCM_Patch_histcom__Fillvalue" |
---|
36 | } |
---|
Note: See
TracBrowser
for help on using the repository browser.