Overview
Comment:Fixed initialisation of ColumnVectors for -oct.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: e2048ec4bc4c182b627366e157c3d15198896963ad4a6c5676958730c46a669c
User & Date: geraint@users.sourceforge.net on 2004-07-19 22:22:25
Other Links: branch diff | manifest | tags
Context
2004-07-21
22:55:43
Updating with locally modified version.

rc, rc2 and Clutch work flawlessly; abg.m is identical whether or not -ibg is used.
BigHeatedRod doesn't work with -ibg option. check-in: 32e57554a1 user: geraint@users.sourceforge.net tags: origin/master, trunk

2004-07-19
22:22:25
Fixed initialisation of ColumnVectors for -oct. check-in: e2048ec4bc user: geraint@users.sourceforge.net tags: origin/master, trunk
2004-06-21
16:30:41
Don't zero for cc code check-in: c9e0db5495 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

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

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.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







>
>
>







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.61  2004/06/21 16:30:41  gawthrop
## Don't zero for cc code
##
## 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
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



631
632
633
634
635
636
637
638
639
640
641
	d)
	    N=$Ny; M=$Nu
	    ;;
	e)
	    N=$Nx; M=$Nx
	    ;;
	x)
	    N=$Nx; M=1
	    ;;
	dx)
	    N=$Nx; M=1
	    ;;
	edx)
	    N=$Nx; M=1
	    ;;
	y)
	    N=$Ny; M=1
	    ;;
	u)
	    N=$Nu; M=1
	    ;;
	open)
	    N=$Nx; M=1
	    ;;
	ax)
	    N=$Nx; M=1
	    ;;
	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







|


|


|


|


|


|


|


|







>
>
>



|







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
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
	d)
	    N=$Ny; M=$Nu
	    ;;
	e)
	    N=$Nx; M=$Nx
	    ;;
	x)
	    N=$Nx; M=0
	    ;;
	dx)
	    N=$Nx; M=0
	    ;;
	edx)
	    N=$Nx; M=0
	    ;;
	y)
	    N=$Ny; M=0
	    ;;
	u)
	    N=$Nu; M=0
	    ;;
	open)
	    N=$Nx; M=0
	    ;;
	ax)
	    N=$Nx; M=0
	    ;;
	par)
	    N=$Npar; M=0
	    ;;
	*)
	    
    esac

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


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