Overview
Comment:Fixed C,I and R causality.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 77f7cdf8d23bf12ec54b7d8d83b95341ec88510a7aa32bc70c45162c20c877d6
User & Date: geraint@users.sourceforge.net on 2004-08-31 01:59:12
Other Links: branch diff | manifest | tags
Context
2004-08-31
02:03:26
C++ headers no longer required to simulate without Reduce.
Perl CRs work for all languages: r, m, C++, etc.
check-in: ccc7cb45ca user: geraint@users.sourceforge.net tags: origin/master, trunk
01:59:12
Fixed C,I and R causality. check-in: 77f7cdf8d2 user: geraint@users.sourceforge.net tags: origin/master, trunk
01:29:48
CRs are applied to sorted equation files during production. check-in: 785bd9f79e user: geraint@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/lib/cr/perl/lin.pm from [b081e585d9] to [09da787f54].

135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
	
	if (
	    ($out_port == 1)
	    and
	    ($in_port  == 1)
	    )
	{			# single port	    
	    if ($out_causality eq $gain_causality)
	    {
		$retval = "(($input)*($gain))";
	    }	    
	    elsif ($out_causality ne $gain_causality)
	    {
		$retval = "(($input)/($gain))";
	    }
	}
    }
    
    if ($retval)







|



|







135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
	
	if (
	    ($out_port == 1)
	    and
	    ($in_port  == 1)
	    )
	{			# single port	    
	    if ($in_causality eq $gain_causality)
	    {
		$retval = "(($input)*($gain))";
	    }	    
	    elsif ($in_causality ne $gain_causality)
	    {
		$retval = "(($input)/($gain))";
	    }
	}
    }
    
    if ($retval)


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