| 1 | #!/bin/sh | 
|---|
| 2 | # | 
|---|
| 3 | # converts config file back to old format, used by pcpopt | 
|---|
| 4 |  | 
|---|
| 5 | if [ -z "$2" ]; then | 
|---|
| 6 | echo "Usage: $o <config file> <outputfile>" | 
|---|
| 7 | exit 1 | 
|---|
| 8 | fi | 
|---|
| 9 |  | 
|---|
| 10 | input="$1" | 
|---|
| 11 | output="$2" | 
|---|
| 12 |  | 
|---|
| 13 | echo "mainname pcp" >$output | 
|---|
| 14 | echo "defaultpath ../defaults/pcp" >>$output | 
|---|
| 15 | echo "pseudopotpath /nosave/heber/defaults/pseudopot" >>$output | 
|---|
| 16 | PEGamma="`grep ^ProcPEGamma $input | awk -F'\t' {'print $2'}`" | 
|---|
| 17 | PEPsi="`grep ^ProcPEPsi $input | awk -F'\t' {'print $2'}`" | 
|---|
| 18 | echo "ProcsGammaPsi $PEGamma $PEPsi" >>$output | 
|---|
| 19 | DoOutVis="`grep ^DoOutVis $input | awk -F'\t' {'print $2'}`" | 
|---|
| 20 | echo "DoOutVis 0" >>$output | 
|---|
| 21 | DoOutMes="`grep ^DoOutMes $input | awk -F'\t' {'print $2'}`" | 
|---|
| 22 | echo "DoOutMes $DoOutMes" >>$output | 
|---|
| 23 | AddGramSch="`grep ^AddGramSch $input | awk -F'\t' {'print $2'}`" | 
|---|
| 24 | echo "AddGramSch $AddGramSch" >>$output | 
|---|
| 25 | echo "MaxOuterStep 250 1.e-5" >>$output | 
|---|
| 26 | MaxPsiStep="`grep ^MaxPsiStep $input | awk -F'\t' {'print $2'}`" | 
|---|
| 27 | echo "MaxPsiStep $MaxPsiStep" >>$output | 
|---|
| 28 |  | 
|---|
| 29 | MaxMinStep="`grep ^MaxMinStep $input | awk -F'\t' {'print $2'}`" | 
|---|
| 30 | RelEpsTotalE="`grep ^RelEpsTotalE $input | awk -F'\t' {'print $2'}`" | 
|---|
| 31 | RelEpsKineticE="`grep ^RelEpsKineticE $input | awk -F'\t' {'print $2'}`" | 
|---|
| 32 | MaxMinStopStep="`grep ^MaxMinStopStep $input | awk -F'\t' {'print $2'}`" | 
|---|
| 33 | #echo -e "MaxMinStep\t\t$MaxMinStep \t$RelEpsTotalE \t$RelEpsKineticE\t$MaxMinStopStep" >>$output | 
|---|
| 34 | echo "MaxMinStep      10      0.0001  0.01    1" >>$output | 
|---|
| 35 | MaxMinStep="`grep ^MaxInitMinStep $input | awk -F'\t' {'print $3'}`" | 
|---|
| 36 | RelEpsTotalE="`grep ^InitRelEpsTotalE $input | awk -F'\t' {'print $2'}`" | 
|---|
| 37 | RelEpsKineticE="`grep ^InitRelEpsKineticE $input | awk -F'\t' {'print $2'}`" | 
|---|
| 38 | MaxMinStopStep="`grep ^InitMaxMinStopStep $input | awk -F'\t' {'print $2'}`" | 
|---|
| 39 | #echo -e "MaxInitMinStep\t$MaxMinStep \t$RelEpsTotalE \t$RelEpsKineticE\t$MaxMinStopStep" >>$output | 
|---|
| 40 | echo "MaxInitMinStep  10      0.0001  0.01    1" >>$output | 
|---|
| 41 |  | 
|---|
| 42 | # BoxLength | 
|---|
| 43 | BoxLength="`grep ^BoxLength $input --after-context=3 | awk -F"#" {'print $1'}`" | 
|---|
| 44 | echo "$BoxLength" >>$output | 
|---|
| 45 |  | 
|---|
| 46 | ECut="`grep ^ECut $input | awk -F'\t' {'print $2'}`" | 
|---|
| 47 | echo "ECut 24." >>$output | 
|---|
| 48 |  | 
|---|
| 49 | MaxLevel="`grep ^MaxLevel $input | awk -F'\t' {'print $2'}`" | 
|---|
| 50 | echo "MaxLevel $MaxLevel" >>$output | 
|---|
| 51 | Level0Factor="`grep ^Level0Factor $input | awk -F'\t' {'print $2'}`" | 
|---|
| 52 | echo "Level0Factor $Level0Factor" >>$output | 
|---|
| 53 | RiemannTensor="`grep ^RiemannTensor $input | awk -F'\t' {'print $2'}`" | 
|---|
| 54 | echo "RiemannTensor $RiemannTensor" >>$output | 
|---|
| 55 | PsiType="`grep ^PsiType $input | awk -F'\t' {'print $3'} | awk -F"#" {'print $1'}`" | 
|---|
| 56 | echo "PsiType $PsiType" >>$output | 
|---|
| 57 |  | 
|---|
| 58 | MaxPsiDouble="`grep ^MaxPsiDouble $input | awk -F'\t' {'print $2'}`" | 
|---|
| 59 | echo -e "MaxPsiDouble\t$MaxPsiDouble" >>$output | 
|---|
| 60 |  | 
|---|
| 61 | echo "Ions" >>$output | 
|---|
| 62 | RCut="`grep ^RCut $input | awk -F'\t' {'print $3'}`" | 
|---|
| 63 | echo "RCut 0.0" >>$output | 
|---|
| 64 | IsAngstroem="`grep ^IsAngstroem $input | awk -F'\t' {'print $2'}`" | 
|---|
| 65 | echo "IsAngstroem $IsAngstroem" >>$output | 
|---|
| 66 |  | 
|---|
| 67 | MaxTypes="`grep ^MaxTypes $input | awk -F'\t' {'print $2'}`" | 
|---|
| 68 | echo "MaxTypes $MaxTypes" >>$output | 
|---|
| 69 |  | 
|---|
| 70 | echo "Ions_Data" >>$output | 
|---|
| 71 |  | 
|---|
| 72 | # IonsData | 
|---|
| 73 | i=0 | 
|---|
| 74 | while [ "$i" -lt "$MaxTypes" ];do | 
|---|
| 75 | let i=$i+1 | 
|---|
| 76 | grep "Ion_Type$i" $input | grep -v ^# | awk -F" " {'print $2" "$3" "$4" "$5" "$6" 0.05"'} | awk -F"#" {'print $1'} >>$output | 
|---|
| 77 | done | 
|---|
| 78 |  | 
|---|
| 79 |  | 
|---|