Overview
Comment:Don't zero for cc code
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: b75a629a5bd9dc69082e9c5d91e164eb1405e1a28eaa4487cab9a57ae2be2e23
User & Date: gawthrop@users.sourceforge.net on 2004-06-21 16:30:41
Other Links: branch diff | manifest | tags
Context
2004-07-19
22:22:25
Fixed initialisation of ColumnVectors for -oct. check-in: 0c0ea183a1 user: geraint@users.sourceforge.net tags: origin/master, trunk
2004-06-21
16:30:41
Don't zero for cc code check-in: b75a629a5b user: gawthrop@users.sourceforge.net tags: origin/master, trunk
16:05:58
Zapped comment that causes check-in: 2a8a0522e3 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/mtt_header from [f023820be2] to [3172effd10].

8
9
10
11
12
13
14



15
16
17
18
19
20
21
# Copyright (C) 2000 by Peter J. Gawthrop

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



## Revision 1.59  2004/06/20 13:53:06  gawthrop
## Initialise for numpar as well
##
## Revision 1.58  2004/06/20 13:34:11  gawthrop
## Create vectors using zeros(N,1) - avoids new octave
## default to row vector - more reps now included
##







>
>
>







8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
# Copyright (C) 2000 by Peter J. Gawthrop

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.60  2004/06/21 16:05:58  gawthrop
## Zapped comment that causes
##
## Revision 1.59  2004/06/20 13:53:06  gawthrop
## Initialise for numpar as well
##
## Revision 1.58  2004/06/20 13:34:11  gawthrop
## Create vectors using zeros(N,1) - avoids new octave
## default to row vector - more reps now included
##
619
620
621
622
623
624
625
626




627
628
629
630
631


632
633
634
635
636
637
638
639
640
641
	par)
	    N=$Npar; M=1
	    ;;
	*)
	    
    esac

    if [ "${language}" = "oct" ]; then




      if [ "$M" = "1" ]; then
        echo "   mtt$name = zeros($N);"
      else
        echo "   mtt$name = zeros($N,$M);"
      fi


    else
      echo "   mtt$name = zeros($N,$M);"
    fi
done
}

declare_dummies()
{
# Get the dummies
dummies="mtt_tmp"







|
>
>
>
>
|
|
|
|
|
>
>
|
<
<







622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641


642
643
644
645
646
647
648
	par)
	    N=$Npar; M=1
	    ;;
	*)
	    
    esac

    case ${language} in
	m)
          echo "   mtt$name = zeros($N,$M);"	
	;;
	oct)
	    if [ "$M" = "1" ]; then
		echo "   mtt$name = zeros($N);"
	    else
		echo "   mtt$name = zeros($N,$M);"
	    fi
	    ;;
        *)
    esac


done
}

declare_dummies()
{
# Get the dummies
dummies="mtt_tmp"
744
745
746
747
748
749
750

751
752
753
754
755
756
757
if [ "$declaredummies" = "yes" ]; then
  declare_dummies
fi

if [ "$declareswitches" = "yes" ]; then
  declare_switches
fi


zero_matrices;

}

# Argument specific stuff
get_arg_specific_stuff ()







>







751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
if [ "$declaredummies" = "yes" ]; then
  declare_dummies
fi

if [ "$declareswitches" = "yes" ]; then
  declare_switches
fi


zero_matrices;

}

# Argument specific stuff
get_arg_specific_stuff ()


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]