Radiation Effects) is a general purpose circuit analysis program which provides all three major analyses, AC, DC, and transient analysis, on either linear or nonlinear networks. It employs a free-form input language and state variable methods to simulate problems of interest to electrical engineers. Requested-by: "Pedro F. Giffuni" <pfg1+@pitt.edu>
19 lines
573 B
Text
19 lines
573 B
Text
--- x3/qqqcpu.f Mon Oct 4 03:53:42 1999
|
|
+++ x3/qqqcpu.f Sun Feb 11 14:34:50 2001
|
|
@@ -9,9 +9,14 @@
|
|
data r0 /1d6/
|
|
intrinsic ETime
|
|
|
|
- CALL ETime(RESULT, TARRAY)
|
|
+C This appears not to be complete. The original code contained the
|
|
+C following two code lines, which generate an "incorrect type" error.
|
|
+C Since I don't have a description of ETIME, just carry out the sentiment
|
|
+C of the comment above
|
|
+C CALL ETime(RESULT, TARRAY)
|
|
|
|
- r2 = r0 - tarray(1)
|
|
+C r2 = r0 - tarray(1)
|
|
+ r2 = r0
|
|
|
|
RETURN
|
|
|