Index: mttroot/mtt/bin/trans/switch_txt2m ================================================================== --- mttroot/mtt/bin/trans/switch_txt2m +++ mttroot/mtt/bin/trans/switch_txt2m @@ -19,17 +19,19 @@ #Write some file headers lang_header $1 switch m mttx '[mttxs]' > $1_switch.m # This is the main transformation using gawk awk '{ - if (NR==1){ - printf("for i=1:%s\n",Nx) + if ($1=="#"){ + printf("for i=1:%s\n", Nx) printf(" mttxs(i) = mttx(i);\n") printf("end;\n\n") } + else{ printf("if (%s==0.0)\n mttxs(%s)=0.0;\nend;\n\n", $1,$2) printf("if (%s<0.0)\n if (mttx(%s)<0.0)\n mttxs(%s)=0.0;\n end;\nend;\n", $1,$2,$2) + } }' Nx=$Nx < $1_switch.txt >> $1_switch.m