Index: mttroot/mtt/bin/trans/mtt_r2m ================================================================== --- mttroot/mtt/bin/trans/mtt_r2m +++ mttroot/mtt/bin/trans/mtt_r2m @@ -14,10 +14,13 @@ ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ +## Revision 1.14 1999/12/08 02:06:00 peterg +## Now incudes csm rep. +## ## Revision 1.13 1999/11/23 00:59:14 peterg ## Now does ssm.m ## ## Revision 1.12 1999/11/15 22:57:20 peterg ## Removed a debugging line @@ -197,11 +200,12 @@ mtt_p2m<$1_$2o.p > $1_$2o.m rm -f $1_odeo.p fi -if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "dm" ]||[ "$rep" = "csm" ]; then +if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "dm" ]||\ + [ "$rep" = "csm" ]||[ "$rep" = "obs" ]; then if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]; then #Header lang_header $1 $rep $ext '' [mtta,mttb,mttc,mttd] > $outfile.p Symbols='a b c d' @@ -210,16 +214,29 @@ if [ "$rep" = "dm" ]||[ "$rep" = "csm" ]; then #Header lang_header $1 $rep $ext '' [mtta,mttb,mttc,mttd,mtte] > $outfile.p Symbols='a b c d e' fi + +if [ "$rep" = "obs" ]; then + # Is the system affine (look in the _obs.r file + affine=`grep 'affine :=' $1_obs.r | awk '{print $3}' | sed 's/;//'` + echo 'affine = ' $affine + #Header +if [ "$affine" = "1" ]; then + lang_header $1 obs m mttx [mttobs_o,mttobs_h] > $outfile.p +else + lang_header $1 obs m mttx,mttu mttyy > $outfile.p +fi + Symbols='obs_o obs_h' +fi for Symbol in $Symbols; do rm -f $outfile.1 -if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "csm" ]; then +if [ "$rep" = "sm" ]||[ "$rep" = "ssm" ]||[ "$rep" = "csm" ]||[ "$rep" = "obs" ]; then case $Symbol in a) N=MTTNx; M=MTTNx ;; b) @@ -232,10 +249,16 @@ N=MTTNy; M=MTTNu ;; e) N=MTTNx; M=MTTNx ;; + obs_o) + N=MTTNyy; M=1 + ;; + obs_h) + N=MTTNyy; M=MTTNuu + ;; *) esac else NN=MTTNx+2*MTTNz+MTTNyz