Changeset 786 for trunk/libIGCM/libIGCM_sys
- Timestamp:
- 02/04/13 17:03:47 (11 years ago)
- File:
-
- 1 edited
-
trunk/libIGCM/libIGCM_sys/libIGCM_sys_iitm.ksh (modified) (41 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/libIGCM/libIGCM_sys/libIGCM_sys_iitm.ksh
r785 r786 247 247 IGCM_debug_PushStack "IGCM_sys_Mkdir" $@ 248 248 if ( $DEBUG_sys ) ; then 249 249 echo "IGCM_sys_Mkdir :" $@ 250 250 fi 251 251 if [ ! -d ${1} ]; then 252 253 254 255 256 252 \mkdir -p $1 253 if [ $? -gt 0 ] ; then 254 echo "IGCM_sys_Mkdir : erreur." 255 IGCM_debug_Exit "IGCM_sys_Mkdir" 256 fi 257 257 fi 258 258 # vérification : 259 259 if [ ! -d ${1} ] ; then 260 261 260 echo "IGCM_sys_Mkdir : erreur." 261 IGCM_debug_Exit "IGCM_sys_Mkdir" 262 262 fi 263 263 IGCM_debug_PopStack "IGCM_sys_Mkdir" … … 272 272 IGCM_debug_PushStack "IGCM_sys_MkdirArchive" $@ 273 273 if ( $DEBUG_sys ) ; then 274 274 echo "IGCM_sys_MkdirArchive :" $@ 275 275 fi 276 276 #- creation de repertoire sur le serveur fichier … … 278 278 279 279 if [ $? -gt 0 ] ; then 280 281 280 echo "IGCM_sys_MkdirArchive : erreur." 281 IGCM_debug_Exit "IGCM_sys_MkdirArchive" 282 282 fi 283 283 IGCM_debug_PopStack "IGCM_sys_MkdirArchive" … … 292 292 IGCM_debug_PushStack "IGCM_sys_MkdirWork" $@ 293 293 if ( $DEBUG_sys ) ; then 294 294 echo "IGCM_sys_MkdirWork :" $@ 295 295 fi 296 296 #- creation de repertoire sur le serveur fichier 297 297 if [ ! -d ${1} ]; then 298 299 300 301 302 298 \mkdir -p $1 299 if [ $? -gt 0 ] ; then 300 echo "IGCM_sys_MkdirWork : erreur." 301 IGCM_debug_Exit "IGCM_sys_MkdirWork" 302 fi 303 303 fi 304 304 IGCM_debug_PopStack "IGCM_sys_MkdirWork" … … 313 313 IGCM_debug_PushStack "IGCM_sys_Cd" $@ 314 314 if ( $DEBUG_sys ) ; then 315 315 echo "IGCM_sys_Cd :" $@ 316 316 fi 317 317 \cd $1 318 318 if [ $? -gt 0 ] ; then 319 320 319 echo "IGCM_sys_Cd : erreur." 320 IGCM_debug_Exit "IGCM_sys_Cd" 321 321 fi 322 322 IGCM_debug_PopStack "IGCM_sys_Cd" … … 331 331 IGCM_debug_PushStack "IGCM_sys_Chmod" -- $@ 332 332 if ( $DEBUG_sys ) ; then 333 333 echo "IGCM_sys_Chmod :" $@ 334 334 fi 335 335 if [ $DRYRUN -le 1 ]; then 336 337 338 339 340 336 \chmod $@ 337 if [ $? -gt 0 ] ; then 338 echo "IGCM_sys_Chmod : erreur." 339 IGCM_debug_Exit "IGCM_sys_Chmod" 340 fi 341 341 else 342 342 ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 343 343 fi 344 344 IGCM_debug_PopStack "IGCM_sys_Chmod" … … 356 356 set +A sizeF -- $( ls -la ${1} ) 357 357 if [ $? -gt 0 ] ; then 358 358 IGCM_debug_Exit "IGCM_sys_FileSize" 359 359 fi 360 360 eval ${2}=${sizeF[4]} … … 371 371 IGCM_debug_PushStack "IGCM_sys_TestDir" $@ 372 372 if ( $DEBUG_sys ) ; then 373 373 echo "IGCM_sys_TestDir :" $@ 374 374 fi 375 375 typeset ExistFlag … … 388 388 IGCM_debug_PushStack "IGCM_sys_TestDirArchive" $@ 389 389 if ( $DEBUG_sys ) ; then 390 390 echo "IGCM_sys_TestDirArchive :" $@ 391 391 fi 392 392 typeset ExistFlag … … 420 420 IGCM_sys_RshArchive "ls ${@} 2>/dev/null | wc -l" 421 421 if [ $? -gt 0 ] ; then 422 422 echo "IGCM_sys_CountFileArchive : erreur." 423 423 fi 424 424 IGCM_debug_PopStack "IGCM_sys_CountFileArchive" … … 433 433 IGCM_debug_PushStack "IGCM_sys_Tree" $@ 434 434 if ( $DEBUG_sys ) ; then 435 435 echo "IGCM_sys_Tree :" $@ 436 436 fi 437 437 … … 449 449 IGCM_debug_PushStack "IGCM_sys_Tar" $@ 450 450 if ( $DEBUG_sys ) ; then 451 451 echo "IGCM_sys_Tar :" $@ 452 452 fi 453 453 \tar cvf $@ 454 454 if [ $? -gt 0 ] ; then 455 456 455 echo "IGCM_sys_Tar : erreur." 456 IGCM_debug_Exit "IGCM_sys_Tar" 457 457 fi 458 458 \tar tvf $1 … … 469 469 IGCM_debug_PushStack "IGCM_sys_UnTar" $@ 470 470 if ( $DEBUG_sys ) ; then 471 471 echo "IGCM_sys_UnTar :" $@ 472 472 fi 473 473 \tar xvf $1 474 474 if [ $? -gt 0 ] ; then 475 476 475 echo "IGCM_sys_UnTar : erreur." 476 IGCM_debug_Exit "IGCM_sys_UnTar" 477 477 fi 478 478 IGCM_debug_PopStack "IGCM_sys_UnTar" … … 487 487 IGCM_debug_PushStack "IGCM_sys_Qsub" $@ 488 488 if ( $DEBUG_sys ) ; then 489 489 echo "IGCM_sys_Qsub :" $@ 490 490 fi 491 491 { … … 494 494 } 495 495 if [ ${ERROR} -gt 0 ] ; then 496 497 496 echo "IGCM_sys_Qsub : erreur $@." 497 IGCM_debug_Exit "IGCM_sys_Qsub" 498 498 fi 499 499 IGCM_debug_PopStack "IGCM_sys_Qsub" … … 508 508 IGCM_debug_PushStack "IGCM_sys_QsubPost" $@ 509 509 if ( $DEBUG_sys ) ; then 510 510 echo "IGCM_sys_QsubPost :" $@ 511 511 fi 512 512 cd ${POST_DIR} … … 514 514 cd - 515 515 if [ $? -gt 0 ] ; then 516 517 516 echo "IGCM_sys_QsubPost : erreur " $@ 517 IGCM_debug_Exit "IGCM_sys_QsubPost" 518 518 fi 519 519 IGCM_debug_PopStack "IGCM_sys_QsubPost" … … 533 533 RET=$1 534 534 if [ ! $RET ] ; then 535 535 echo "rsync error !" 536 536 fi 537 537 538 538 if [ $MYLANG = "fr" ]; then 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 539 case $RET in 540 0) return ;; 541 1) echo "Erreur de rsync ; RERR_SYNTAX : " 542 echo "Erreur de syntaxe ou d'utilisation." 543 return;; 544 2) echo "Erreur de rsync ; RERR_PROTOCOL : " 545 echo "Incompatibilité de protocole." 546 return;; 547 3) echo "Erreur de rsync ; RERR_FILESELECT 3" 548 echo "Erreurs lors de la sélection des fichiers d'entrée sortie et" 549 echo "répertoires" 550 return;; 551 4) echo "Erreur de rsync ; RERR_UNSUPPORTED" 552 echo "Action demandée non supportée : une tentative de manipulation de" 553 echo "fichiers 64-bits sur une plate-forme qui ne les supporte pas a" 554 echo "été faite ; ou une option qui est supportée par le client mais" 555 echo "pas par le serveur a été spécifiée." 556 return;; 557 10) echo "Erreur de rsync ; RERR_SOCKETIO" 558 echo "Erreur dans le socket d'entrée sortie" 559 return;; 560 11) echo "Erreur de rsync ; RERR_FILEIO" 561 echo "Erreur d'entrée sortie fichier" 562 return;; 563 12) echo "Erreur de rsync ; RERR_STREAMIO" 564 echo "Erreur dans flux de donnée du protocole rsync" 565 return;; 566 13) echo "Erreur de rsync ; RERR_MESSAGEIO" 567 echo "Erreur avec les diagnostics du programme" 568 return;; 569 14) echo "Erreur de rsync ; RERR_IPC" 570 echo "Erreur dans le code IPC" 571 return;; 572 20) echo "Erreur de rsync ; RERR_SIGNAL" 573 echo "SIGUSR1 ou SIGINT reçu" 574 return;; 575 21) echo "Erreur de rsync ; RERR_WAITCHILD" 576 echo "Une erreur retournée par waitpid()" 577 return;; 578 22) echo "Erreur de rsync ; RERR_MALLOC" 579 echo "Erreur lors de l'allocation des tampons de mémoire de coeur" 580 return;; 581 23) echo "" 582 582 echo "Erreur fichier inexistant" 583 584 585 586 587 588 589 583 return;; 584 30) echo "Erreur de rsync ; RERR_TIMEOUT" 585 echo "Temps d'attente écoulé dans l'envoi/réception de données" 586 return;; 587 *) echo "Erreur de rsync : code de retour de rsync inconnu :" $RET 588 return;; 589 esac 590 590 elif [ $MYLANG = "en" ] ; then 591 592 0) return;; 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 591 case $RET in 592 0) return;; 593 1) echo "rsync error : Syntax or usage error " 594 return;; 595 2) echo "rsync error : Protocol incompatibility " 596 return;; 597 3) echo "rsync error : Errors selecting input/output files, dirs" 598 return;; 599 4) echo "rsync error : Requested action not supported: an attempt" 600 echo "was made to manipulate 64-bit files on a platform that cannot support" 601 echo "them; or an option was specified that is supported by the client and" 602 echo "not by the server." 603 return;; 604 5) echo "rsync error : Error starting client-server protocol" 605 return;; 606 10) echo "rsync error : Error in socket I/O " 607 return;; 608 11) echo "rsync error : Error in file I/O " 609 return;; 610 12) echo "rsync error : Error in rsync protocol data stream " 611 return;; 612 13) echo "rsync error : Errors with program diagnostics " 613 return;; 614 14) echo "rsync error : Error in IPC code " 615 return;; 616 20) echo "rsync error : Received SIGUSR1 or SIGINT " 617 return;; 618 21) echo "rsync error : Some error returned by waitpid() " 619 return;; 620 22) echo "rsync error : Error allocating core memory buffers " 621 return;; 622 23) echo "rsync error : Partial transfer due to error" 623 return;; 624 24) echo "rsync error : Partial transfer due to vanished source files" 625 return;; 626 30) echo "rsync error : Timeout in data send/receive " 627 return;; 628 *) echo "rsync error : return code of rsync unknown :" $RET 629 return;; 630 esac 631 631 else 632 633 632 echo "unknown language $MYLANG." 633 return 634 634 fi 635 635 } … … 643 643 IGCM_debug_PushStack "IGCM_sys_Cp" $@ 644 644 if ( $DEBUG_sys ) ; then 645 645 echo "IGCM_sys_Cp :" $@ 646 646 fi 647 647 … … 653 653 654 654 if [ ${RET} -gt 0 ] ; then 655 656 657 655 echo "IGCM_sys_Cp : error." 656 cat out_rsync 657 IGCM_debug_Exit "IGCM_sys_Cp" 658 658 fi 659 659 IGCM_debug_PopStack "IGCM_sys_Cp" … … 668 668 IGCM_debug_PushStack "IGCM_sys_Rm" -- $@ 669 669 if ( $DEBUG_sys ) ; then 670 670 echo "IGCM_sys_Rm :" $@ 671 671 fi 672 672 … … 678 678 679 679 if [ ${RET} -gt 0 ] ; then 680 681 682 680 echo "IGCM_sys_Rm : error." 681 cat out_rsync 682 IGCM_debug_Exit "IGCM_sys_Rm" 683 683 fi 684 684 IGCM_debug_PopStack "IGCM_sys_Rm" … … 694 694 IGCM_debug_PushStack "IGCM_sys_RmRunDir" -- $@ 695 695 if ( $DEBUG_sys ) ; then 696 696 echo "IGCM_sys_RmRunDir :" $@ 697 697 fi 698 698 … … 704 704 705 705 if [ ${RET} -gt 0 ] ; then 706 707 708 706 echo "IGCM_sys_RmRunDir : error." 707 cat out_rsync 708 IGCM_debug_Exit "IGCM_sys_RmRunDir" 709 709 else 710 710 \rm out_rsync 711 711 fi 712 712 … … 722 722 IGCM_debug_PushStack "IGCM_sys_Mv" $@ 723 723 if ( $DEBUG_sys ) ; then 724 724 echo "IGCM_sys_Mv :" $@ 725 725 fi 726 726 … … 728 728 729 729 typeset RET 730 730 731 731 echo mv $@ > out_rsync 2>&1 732 732 \mv $@ >> out_rsync 2>&1 733 733 RET=$? 734 734 735 735 if [ ${RET} -gt 0 ] ; then 736 736 echo "IGCM_sys_Mv : error in mv." … … 753 753 IGCM_debug_PushStack "IGCM_sys_Put_Dir" $@ 754 754 if ( $DEBUG_sys ) ; then 755 755 echo "IGCM_sys_Put_Dir :" $@ 756 756 fi 757 757 if [ $DRYRUN = 0 ]; then 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 758 if [ ! -d ${1} ] ; then 759 echo "WARNING : IGCM_sys_Put_Dir ${1} DOES NOT EXIST ." 760 IGCM_debug_PopStack "IGCM_sys_Put_Dir" 761 return 762 fi 763 764 typeset RET 765 766 # Only if we use rsync 767 #IGCM_sys_TestDirArchive $( dirname $2 ) 768 # 769 #USUAL WAY 770 \cp -r $1 $2 > out_rsync 2>&1 771 RET=$? 772 773 if [ ${RET} -gt 0 ] ; then 774 echo "IGCM_sys_Put_Dir : error." 775 cat out_rsync 776 IGCM_debug_Exit "IGCM_sys_Put_Dir" 777 fi 778 778 else 779 779 ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 780 780 fi 781 781 IGCM_debug_PopStack "IGCM_sys_Put_Dir" … … 790 790 IGCM_debug_PushStack "IGCM_sys_Get_Dir" $@ 791 791 if ( $DEBUG_sys ) ; then 792 792 echo "IGCM_sys_Get_Dir :" $@ 793 793 fi 794 794 if [ $DRYRUN = 0 ]; then 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 795 if [ ! -d ${1} ] ; then 796 echo "WARNING : IGCM_sys_Get_Dir ${1} DOES NOT EXIST ." 797 IGCM_debug_PopStack "IGCM_sys_Get_Dir" 798 return 799 fi 800 801 typeset RET 802 803 #USUAL WAY 804 \cp -rp $1 $2 > out_rsync 2>&1 805 RET=$? 806 807 if [ ${RET} -gt 0 ] ; then 808 echo "IGCM_sys_Get_Dir : error." 809 cat out_rsync 810 IGCM_debug_Exit "IGCM_sys_Get_Dir" 811 fi 812 812 else 813 813 ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 814 814 fi 815 815 IGCM_debug_PopStack "IGCM_sys_Get_Dir" … … 824 824 IGCM_debug_PushStack "IGCM_sys_Get_Master" $@ 825 825 if ( $DEBUG_sys ) ; then 826 826 echo "IGCM_sys_Get_Master :" $@ 827 827 fi 828 828 if [ $DRYRUN = 0 ]; then … … 845 845 fi 846 846 else 847 847 ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 848 848 fi 849 849 IGCM_debug_PopStack "IGCM_sys_Get_Master" … … 859 859 IGCM_debug_PushStack "IGCM_sys_Put_Rest" $@ 860 860 if ( $DEBUG_sys ) ; then 861 861 echo "IGCM_sys_Put_Rest :" $@ 862 862 fi 863 863 if [ $DRYRUN = 0 ]; then 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 864 if [ ! -f ${1} ] ; then 865 echo "ERROR : IGCM_sys_Put_Rest ${1} DOES NOT EXIST ." 866 IGCM_debug_Exit "IGCM_sys_Put_Rest" 867 fi 868 869 typeset RET 870 # 871 if [ X${JobType} = XRUN ] ; then 872 IGCM_sys_Chmod 444 ${1} 873 fi 874 # 875 # Only if we use rsync 876 #IGCM_sys_MkdirArchive $( dirname $2 ) 877 # 878 #USUAL WAY 879 \cp $1 $2 > out_rsync 2>&1 880 RET=$? 881 882 if [ ${RET} -gt 0 ] ; then 883 echo "IGCM_sys_Put_Rest : error." 884 cat out_rsync 885 IGCM_debug_Exit "IGCM_sys_Put_Rest" 886 fi 887 887 else 888 888 ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 889 889 fi 890 890 IGCM_debug_PopStack "IGCM_sys_Put_Rest" … … 899 899 IGCM_debug_PushStack "IGCM_sys_Put_Out" $@ 900 900 if ( $DEBUG_sys ) ; then 901 901 echo "IGCM_sys_Put_Out :" $@ 902 902 fi 903 903 if [ $DRYRUN = 0 ]; then 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 904 if [ ! -f ${1} ] ; then 905 echo "WARNING : IGCM_sys_Put_Out ${1} DOES NOT EXIST ." 906 IGCM_debug_PopStack "IGCM_sys_Put_Out" 907 return 1 908 fi 909 # 910 IGCM_sys_MkdirArchive $( dirname $2 ) 911 # 912 typeset RET 913 # 914 if [ X${JobType} = XRUN ] ; then 915 if [ X${3} = X ] ; then 916 IGCM_sys_Chmod 444 ${1} 917 fi 918 fi 919 # 920 #USUAL WAY 921 \cp $1 $2 > out_rsync 2>&1 922 RET=$? 923 924 if [ ${RET} -gt 0 ] ; then 925 echo "IGCM_sys_Put_Out : error." 926 cat out_rsync 927 IGCM_debug_Exit "IGCM_sys_Put_Out" 928 fi 929 929 else 930 930 ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 931 931 fi 932 932 IGCM_debug_PopStack "IGCM_sys_Put_Out" … … 945 945 946 946 if ( $DEBUG_sys ) ; then 947 947 echo "IGCM_sys_Get :" $@ 948 948 fi 949 949 if [ $DRYRUN -le 2 ]; then 950 950 if [ X${1} = X'/l' ] ; then 951 951 # test if the first file is present in the old computation : 952 953 954 955 956 952 eval set +A dm_liste \${${2}} 953 else 954 dm_liste=${1} 955 fi 956 eval DEST=\${${#}} 957 957 958 958 # test if the (first) file is present in the old computation : 959 960 959 IGCM_sys_TestFileArchive ${dm_liste[0]} 960 RET=$? 961 961 if [ ${RET} -gt 0 ] ; then 962 963 964 962 echo "IGCM_sys_Get, ERROR : regular file ${dm_liste[0]} DOES NOT EXIST ." 963 IGCM_debug_Exit "IGCM_sys_Get" 964 return 965 965 fi 966 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 967 # SD : dm_liste is not suited for computing job 968 # because we change filename during transfert 969 # dm_liste is better suited for post-treatment 970 #dm_liste=" " 971 #(( ifile=1 )) 972 #while [ $ifile -lt $# ] ; do 973 # dm_liste=$( eval echo ${dm_liste} " "\${${ifile}} ) 974 # (( ifile = ifile + 1 )) 975 #done 976 #DEST=$( eval echo \${${#}} ) 977 978 #USUAL WAY 979 \cp ${dm_liste[*]} ${DEST} > out_rsync 2>&1 980 RET=$? 981 982 if [ ${RET} -gt 0 ] ; then 983 echo "IGCM_sys_Get : copy error." 984 cat out_rsync 985 IGCM_debug_Exit "IGCM_sys_Get" 986 fi 987 987 else 988 988 ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 989 989 fi 990 990 IGCM_debug_PopStack "IGCM_sys_Get" … … 1001 1001 IGCM_debug_PushStack "IGCM_sys_FichWork" $@ 1002 1002 if ( $DEBUG_sys ) ; then 1003 1003 echo "IGCM_sys_GetDate_FichWork :" $@ 1004 1004 fi 1005 1005 # donne la date filesys d'un fichier sur la machine work … … 1015 1015 IGCM_debug_PushStack "IGCM_sys_FichArchive" $@ 1016 1016 if ( $DEBUG_sys ) ; then 1017 1017 echo "IGCM_sys_GetDate_FichArchive :" $@ 1018 1018 fi 1019 1019 IGCM_debug_PopStack "IGCM_sys_FichArchive" … … 1026 1026 IGCM_debug_PushStack "IGCM_sys_rebuild" -- $@ 1027 1027 if ( $DEBUG_sys ) ; then 1028 1028 echo "IGCM_sys_rebuild :" $@ 1029 1029 fi 1030 1030 /gpfs1/home/sebastien/REBUILD/rebuild -f -o $@ … … 1043 1043 IGCM_debug_PushStack "IGCM_sys_activ_variables" 1044 1044 if ( $DEBUG_sys ) ; then 1045 1045 echo "IGCM_sys_activ_variables " 1046 1046 fi 1047 1047 … … 1064 1064 IGCM_debug_PushStack "IGCM_sys_desactiv_variables" 1065 1065 if ( $DEBUG_sys ) ; then 1066 1066 echo "IGCM_sys_desactiv_variables " 1067 1067 fi 1068 1068 # -------------------------------------------------------------------- … … 1085 1085 set -x 1086 1086 if ( $DEBUG_sys ) ; then 1087 1087 echo "IGCM_sys_build_run_file " $@ 1088 1088 fi 1089 1089 … … 1094 1094 1095 1095 (( NUM_PROC_ATM = BATCH_NUM_PROC_TOT - NUM_PROC_OASIS - NUM_PROC_OCE )) 1096 1096 1097 1097 if [ $1 = MPI2 ]; then 1098 1098 echo "IGCM_sys_build_run_file : error - MPI2 not available on iitm. " 1099 1099 IGCM_debug_Exit "IGCM_sys_build_run_file" 1100 1100 elif [ $1 = MPI1 ]; then 1101 1101 cat <<EOF > run_file 1102 1102 ./oasis 1103 1103 EOF 1104 1104 1105 1106 1107 1108 1109 1105 typeset i 1106 (( i = 0 )) 1107 while [ ${i} -lt ${NUM_PROC_ATM} ] ; do 1108 (( i = i + 1 )) 1109 cat <<EOF >> run_file 1110 1110 ./lmdz.x 1111 1111 EOF 1112 1112 done 1113 1113 1114 1114 (( i = 0 )) 1115 1115 while [ ${i} -lt ${NUM_PROC_OCE} ] ; do 1116 1117 1116 (( i = i + 1 )) 1117 cat <<EOF >> run_file 1118 1118 ./opa.xx 1119 1119 EOF 1120 1120 done 1121 1121 1122 1122 wc -l run_file 1123 1123 fi 1124 1124 set +x … … 1131 1131 IGCM_debug_PushStack "IGCM_sys_check_quota" 1132 1132 if ( $DEBUG_sys ) ; then 1133 1133 echo "IGCM_sys_check_quota" 1134 1134 fi 1135 1135 IGCM_debug_PopStack "IGCM_sys_check_quota"
Note: See TracChangeset
for help on using the changeset viewer.
