diff options
author | rahulp13 | 2021-01-07 07:55:48 +0530 |
---|---|---|
committer | rahulp13 | 2021-01-07 07:55:48 +0530 |
commit | 088203b088a02eabb4606dc734e901b81f237b11 (patch) | |
tree | ebe9109661a149c82fc66599a6ce8103637d0b4a /Windows/spice/examples/various/agauss_test.cir | |
parent | ac223c4a69c701ad0a247401acdc48b8b6b6dba6 (diff) | |
download | eSim-088203b088a02eabb4606dc734e901b81f237b11.tar.gz eSim-088203b088a02eabb4606dc734e901b81f237b11.tar.bz2 eSim-088203b088a02eabb4606dc734e901b81f237b11.zip |
removed outdated dependencies
Diffstat (limited to 'Windows/spice/examples/various/agauss_test.cir')
-rw-r--r-- | Windows/spice/examples/various/agauss_test.cir | 48 |
1 files changed, 0 insertions, 48 deletions
diff --git a/Windows/spice/examples/various/agauss_test.cir b/Windows/spice/examples/various/agauss_test.cir deleted file mode 100644 index c2532751..00000000 --- a/Windows/spice/examples/various/agauss_test.cir +++ /dev/null @@ -1,48 +0,0 @@ -* agauss test in ngspice -* generate a sequence of gaussian distributed random numbers. -* test the distribution by sorting the numbers into -* a histogram (buckets) -* chapt. 17.8.6 -.control - define agauss(nom, avar, sig) (nom + avar/sig * sgauss(0)) - let mc_runs = 200 - let run = 0 - let no_buck = 8 $ number of buckets - let bucket = unitvec(no_buck) $ each element contains 1 - let delta = 3e-11 $ width of each bucket, depends - $ on avar and sig - let lolimit = 1e-09 - 3*delta - let hilimit = 1e-09 + 3*delta - - dowhile run < mc_runs - let val = agauss(1e-09, 1e-10, 3) $ get the random number - if (val < lolimit) - let bucket[0] = bucket[0] + 1 $ 'lowest' bucket - end - let part = 1 - dowhile part < (no_buck - 1) - if ((val < (lolimit + part*delta)) & -+ (val > (lolimit + (part-1)*delta))) - let bucket[part] = bucket[part] + 1 - break - end - let part = part + 1 - end - if (val > hilimit) -* 'highest' bucket - let bucket[no_buck - 1] = bucket[no_buck - 1] + 1 - end - let run = run + 1 - end - - let part = 0 - dowhile part < no_buck - let value = bucket[part] - 1 - set value = "$&value" -* print the buckets' contents - echo $value - let part = part + 1 - end - -.endc -.end |