Last change
on this file since 473 was
354,
checked in by Argimiro Resende Secchi, 16 years ago

Fixing more wiki notation.


Property svn:eolstyle set to
native

Property svn:keywords set to
Id

File size:
1.2 KB

Line  

1  #* 

2  * EMSO Model Library (EML) Copyright (C) 2004  2007 ALSOC. 

3  * 

4  * This LIBRARY is free software; you can distribute it and/or modify 

5  * it under the therms of the ALSOC FREE LICENSE as available at 

6  * http://www.enq.ufrgs.br/alsoc. 

7  * 

8  * EMSO Copyright (C) 2004  2007 ALSOC, original code 

9  * from http://www.rps.eng.br Copyright (C) 20022004. 

10  * All rights reserved. 

11  * 

12  * EMSO is distributed under the therms of the ALSOC LICENSE as 

13  * available at http://www.enq.ufrgs.br/alsoc. 

14  * 

15  * Author: Tiago Osório 

16  * $Id: ratio.mso 354 20070830 17:17:16Z arge $ 

17  **# 

18  

19  using "types"; 

20  

21  Model Ratio 

22  

23  ATTRIBUTES 

24  Pallete = true; 

25  Icon = "icon/Ratio"; 

26  Brief = "Model Ratio."; 

27  Info = 

28  "== Inputs == 

29  * Two input signals. 

30  

31  == Outputs == 

32  * One output signal. 

33  "; 

34  

35  VARIABLES 

36  input1 as Real (Brief="input signal 1"); 

37  input2 as Real (Brief="input signal 2"); 

38  output as Real (Brief="output signal"); 

39  

40  EQUATIONS 

41  

42  if abs(input2)>1e5 then 

43  "Calculate output" 

44  input2*output=input1; 

45  else 

46  if input2>0 then 

47  "Calculate output" 

48  output=input1*1e5; 

49  else 

50  "Calculate output" 

51  output=input1*1e5; 

52  end 

53  end 

54  

55  end 

Note: See
TracBrowser
for help on using the repository browser.