home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p105 / 2.ddi / DATA / STD.UTX < prev    next >
Encoding:
Text File  |  1989-02-01  |  483 b   |  13 lines
  1. 1
  2. 10
  3. FUN=SIN(6.28*5E7*T)*(4*(1-2E6*T)+2*SIN(2**1E7*T)*(T>=3E-7 AND T<= 7E-7)+2*(T>=1E-7 AND T<= 2E-7 OR T>= 8E-7 AND T<=9E-7))
  4. B=5*(T>=1E-8 AND T<=6E-8)-5*(T>=1E-7 AND T<=1.2E-7)
  5. DECAYSIN=5*EXP(-T/5E-7)*SIN(2**5E6*T)
  6. MOD1=5*SIN(2**1E6*T)*SIN(2**2E7*T)*EXP(-T/1E-6)
  7. FM=5*SIN(2**1E6*T*(1+T/1E-7))
  8. MOD2=5*SIN(2**1E6*T)*SIN(2**2E7*T)*EXP(-T/1E-6)*(T>5E-7 AND T <2E-6 OR T>2.5E-6)
  9. F6=10+10*SIN(2**50*T)*EXP(-T/40E-3)
  10. F7=-1.414*(T>5e-3)*SIN(2**100*(T-5e-3))
  11. F9=f8
  12. F9=
  13.