home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / e / e065 / 1.ddi / STDPROBE.IIF < prev    next >
Encoding:
Text File  |  1991-08-28  |  3.0 KB  |  127 lines
  1. inst4.0    !18:00  Oct-22-90 (stdprobe.iif) Standard Probe include
  2. !
  3. !    Assumptions:
  4. !    On Input:    n4 Number of nodes in Output layer
  5. !            n5 Low limit for activation values
  6. !            n6 High limit for activation values
  7. !            n7 Index of Output layer
  8. !    n1, n2, n3 are corrupted on output
  9.  
  10. ?BPEr    0
  11. >beq    WtHist
  12.  
  13. @ILdD                !load default instrument
  14. =x    316            !place to put instrument on screen
  15. =y     40
  16. =ITit    "RMS Error"        !Instrument title
  17. =IGTy    "Strip"            !Graph Type
  18. =IGVr    "CurErr"        !Variable
  19. =ITTy    "RMS"            !RMS Transformation Type
  20. =ITMd    2            !Component Transformation
  21. =IEpc    1            !RMS over an epoch
  22. =Ihgt    64
  23. =Iwdt    300
  24. =Ivmn    0.0
  25. =Ivmx    n6
  26. =Ignx    100            !100 graph points
  27. =Inpl    1            !1 plots
  28. =IGC0    11            !Plot colors
  29. =IGC1    13
  30. =IGCF    12            !Foreground color
  31. =IGCB    8            !Background color
  32. =ILnA    1            !Active in Learn
  33. =IRcA    0            !Not active in recall
  34. =ILDv    10            !Every 10 iterations
  35. =IPrb    "Output"        !Point to default probe
  36. =ICAc    1            !Convergence criterion active
  37. =ICTh    0.001            !Convergence Threshold
  38. @IAdd                !Now create instrument
  39.  
  40. :WtHist
  41. ?BPHi    0
  42. >beq    CnfMat
  43. @ILdD                !load default instrument
  44. =x    316            !place to put instrument on screen
  45. =y    130
  46. =ITit    "Weight Histogram"    !Instrument title
  47. =IGTy    "Hist"            !Graph type
  48. =IGVr    "Weight"        !Variable
  49. =ITTy    "RMS"            !RMS Transformation Type
  50. =ITMd    0            !No transformation
  51. =IEpc    0            !do NOT accumulate over epoch
  52. =Ihgt    64
  53. =Iwdt    300
  54. =Ivmn    -8.0
  55. =Ivmx    8.0
  56. =Ignx    30            !100 bins
  57. =IGC0    11            !Plot colors
  58. =IGC1    11
  59. =IGCF    12            !Foreground color
  60. =IGCB    8            !Background color
  61. =ILnA    1            !Active in Learn
  62. =IRcA    0            !Not active in recall
  63. =ILDv    20            !Every 20 iterations
  64. =IPrb    "Output"        !Point to probe
  65. =ICAc    0            !No Convergence criterion
  66. =ICTh    0.0            !Convergence Threshold
  67. @IAdd                !Now create instrument
  68.  
  69. :CnfMat
  70. ?BPCM    0
  71. >beq    EndInstr
  72. !Loop over output layer to determine number of matrices
  73. =y    220            !Start y position
  74. =NPEl    n7            !Target Layer is Output layer
  75. =NPEn    0            !First PE in Output layer
  76. =n3    4            !Allow at most 4 Conf. Matrices
  77. =n1    0            !Initialize counter
  78. =n2    n4            !Determine upper limit
  79. ?n2    n3            !Greater than limit?
  80. >ble    CnfMLp
  81. =n2    n3            !Apply the limit
  82.  
  83. :CnfMLp
  84. +n1    1
  85. ?n1    n2
  86. >bgt    EndInstr
  87. =PNam    "_pe_"            !prefix
  88. +PNam    n1            !sequential numbering
  89. @PbAS                !Add Probe
  90. @PbDC                !Delete all components just in case
  91. @NrPE                !Point to target PE
  92. @PAPE                !Add target PE to probe
  93. +NPEn    1
  94.  
  95. !    *** Build Instrument ***
  96.  
  97. @ILdD                !load default instrument
  98. =ITit    "Conf. Matrix "
  99. +ITit    n1
  100. =IGTy    "ConfM"
  101. =IGVr    "Out"
  102. =ITTy    "RMS"            !RMS Transformation Type
  103. =ITMd    0            !No transformation
  104. =IEpc    1            !Force epoch
  105. =Ihgt    90            !height of graph
  106. =Iwdt    90            !Width of graph
  107. =Ivmn    n5
  108. =Ivmx    n6
  109. =Ignx    9            !Num horiz bins
  110. =Inpl    81            !Total Num Bins
  111. =ILnA    1            !Active in learn
  112. =IRcA    1            !Active in recall
  113. =ICAc    0            !No Convergence criterion
  114. =ICTh    0.0            !Convergence Threshold
  115. =ILDv    5            !Every 5 Epochs
  116. !Calculate x position
  117. =x    n3
  118. -x    n2
  119. +x    n1
  120. -x    1
  121. *x    130
  122. +x    100
  123. =IPrb    PNam            !Point to probe
  124. @IAdd                !Now create instrument
  125. >br    CnfMLp            !Go to next PE
  126. :EndInstr
  127.