(FILECREATED "11-Jul-84 15:30:10" ("compiled on " {ERIS}ROACH>COEWAVE.FPKG;3) "10-Jul-84 21:15:26" tcompl%'d in WORK dated "10-Jul-84 21:56:45") (FILECREATED "11-Jul-84 15:29:36" {ERIS}ROACH>COEWAVE.FPKG;3 29371 changes to: (RECORDS RES) ( FNS COEFF.GET COEFF.PUT COEFF.INDEX COEWAVE.CREATE.COEFF COEWAVE.INIT.COEFF MEMORY.GET MEMORY.PUT MEMORY.INDEX COEWAVE.CREATE.MEMORY COEWAVE.INIT.MEMORY COEWAVE.INIT COEWAVE.CTW COEWAVE.CTW1 COEWAVE.CTW.GLOTTAL COEWAVE.CTW.TURBULENCE COEWAVE.CTW.CASCADE COEWAVE.CTW.PARALLEL COEWAVE.CTW.SUM COEWAVE.STEP.RES COEWAVE.STEP.ANTIRES COEWAVE.CTW.GAUSSIAN COEWAVE.TRACE COEWAVE.UNBREAK COEWAVE.TRACEUPDATE)) COEFF.GET D1 (P 2 ANSWER P 1 INDEX P 0 DESCRIPTOR I 1 FIELDNAME I 0 COEFF) 0oXA YHIH@ (25Q FETCHFIELD 13Q COEFF.INDEX) NIL ( 6 (COEFF INDEX POINTER)) COEFF.PUT D1 (P 2 ANSWER P 1 INDEX P 0 DESCRIPTOR I 2 VALUE I 1 FIELDNAME I 0 COEFF) 0oXA YHIH@B (26Q REPLACEFIELD 13Q COEFF.INDEX) NIL ( 6 (COEFF INDEX POINTER)) COEFF.INDEX D1 (L (0 FIELDNAME) F 2 COEFF.FIELDNAMES) RjHµh@ð‘IIlعHX°íNIL NIL () COEWAVE.CREATE.COEFF D1 (P 0 COEFF)  À `oooh¹dI¿ooohºdJ¿oooh»dK ¿oooh¼dL"¿oooh½dM$¿oooh¾dN&¿oooh_¿dO(¿oooh_¿dO*¿oooh_¿dO,¿oooh_¿dO.¿oooh_¿dO0¿NIL (5 COEFFTYPE#) ( 372Q 0.0 366Q 0.0 362Q 0.0 341Q 0.0 335Q 0.0 331Q 0.0 310Q 0.0 304Q 0.0 300Q 0.0 257Q 0.0 253Q 0.0 247Q 0.0 226Q 0.0 222Q 0.0 216Q 0.0 200Q 0.0 174Q 0.0 170Q 0.0 152Q 0.0 146Q 0.0 142Q 0.0 124Q 0.0 120Q 0.0 114Q 0.0 76Q 0.0 72Q 0.0 66Q 0.0 50Q 0.0 44Q 0.0 40Q 0.0 22Q 0.0 16Q 0.0 12Q 0.0) COEWAVE.INIT.COEFF D1 (L (0 COEFF)) œ@o@o@o@o@o@o @o @o@o@o@o@o@o@oooh@oooh@oooh @oooh"@oooh$@oooh&@oooh(@oooh*@oooh,@oooh.@oooh0@o@o2@g4@l6hNIL (624Q COEFF 616Q CASCADE 613Q COEFF 601Q COEFF 567Q COEFF 541Q COEFF 513Q COEFF 465Q COEFF 437Q COEFF 411Q COEFF 363Q COEFF 335Q COEFF 307Q COEFF 261Q COEFF 233Q COEFF 205Q COEFF 173Q COEFF 161Q COEFF 147Q COEFF 135Q COEFF 123Q COEFF 111Q COEFF 77Q COEFF 65Q COEFF 53Q COEFF 41Q COEFF 27Q COEFF 15Q COEFF 3 COEFF) ( 605Q 0.0 573Q 0.0 555Q 0.0 551Q 0.0 545Q 0.0 527Q 0.0 523Q 0.0 517Q 0.0 501Q 0.0 475Q 0.0 471Q 0.0 453Q 0.0 447Q 0.0 443Q 0.0 425Q 0.0 421Q 0.0 415Q 0.0 377Q 0.0 373Q 0.0 367Q 0.0 351Q 0.0 345Q 0.0 341Q 0.0 323Q 0.0 317Q 0.0 313Q 0.0 275Q 0.0 271Q 0.0 265Q 0.0 247Q 0.0 243Q 0.0 237Q 0.0 221Q 0.0 215Q 0.0 211Q 0.0 177Q 0.0 165Q 0.0 153Q 0.0 141Q 0.0 127Q 0.0 115Q 0.0 103Q 0.0 71Q 0.0 57Q 0.0 45Q 0.0 33Q 0.0 21Q 0.0 7 0.0) MEMORY.GET D1 (P 2 ANSWER P 1 INDEX P 0 DESCRIPTOR I 1 FIELDNAME I 0 MEMORY) 0oXA YHIH@ (25Q FETCHFIELD 13Q MEMORY.INDEX) NIL ( 6 (MEMORY INDEX POINTER)) MEMORY.PUT D1 (P 2 ANSWER P 1 INDEX P 0 DESCRIPTOR I 2 VALUE I 1 FIELDNAME I 0 MEMORY) 0oXA YHIH@B (26Q REPLACEFIELD 13Q MEMORY.INDEX) NIL ( 6 (MEMORY INDEX POINTER)) MEMORY.INDEX D1 (L (0 FIELDNAME) F 2 MEMORY.FIELDNAMES) RjHµh@ð‘IIlعHX°íNIL NIL () COEWAVE.CREATE.MEMORY D1 (P 0 MEMORY) Šð``ooh¹dI¿oohºdJ¿ooh»dK¿ooh¼dL¿ooh½dM¿ooh¾dN ¿ooh_¿dO¿ooh_¿dO ¿ooh_¿dO¿ooh_¿dO¿ooh_¿dO¿ooh_¿dO¿ooh_¿dO¿ooh_¿dO¿ooh_¿dO¿ooh_ ¿dO ¿ooh_"¿dO" ¿ooh_$¿dO$$¿ooh_&¿dO&&¿ooh_(¿dO("¿NIL (10Q MEMORYTYPE#) ( 573Q 0.0 567Q 0.0 547Q 0.0 543Q 0.0 523Q 0.0 517Q 0.0 477Q 0.0 473Q 0.0 453Q 0.0 447Q 0.0 427Q 0.0 423Q 0.0 403Q 0.0 377Q 0.0 357Q 0.0 353Q 0.0 333Q 0.0 327Q 0.0 307Q 0.0 303Q 0.0 263Q 0.0 257Q 0.0 237Q 0.0 233Q 0.0 213Q 0.0 207Q 0.0 167Q 0.0 163Q 0.0 146Q 0.0 142Q 0.0 125Q 0.0 121Q 0.0 104Q 0.0 100Q 0.0 63Q 0.0 57Q 0.0 42Q 0.0 36Q 0.0 21Q 0.0 15Q 0.0) COEWAVE.INIT.MEMORY D1 (L (0 MEMORY)) @ooh@ooh@ooh@ooh@ooh@ooh @ooh@ooh @ooh@ooh@ooh@ooh@ooh@ooh@ooh@ooh@ooh @ooh$@ooh&@ooh"@k(@j*@o<@o>@oD@o@@oB@oF@oH@o,@o.@o0@o2@o6@o8@o:@oJ@oL@oPhNIL (1005Q MEMORY 773Q MEMORY 761Q MEMORY 747Q MEMORY 735Q MEMORY 723Q MEMORY 711Q MEMORY 677Q MEMORY 665Q MEMORY 653Q MEMORY 641Q MEMORY 627Q MEMORY 615Q MEMORY 603Q MEMORY 571Q MEMORY 557Q MEMORY 545Q MEMORY 536Q MEMORY 527Q MEMORY 506Q MEMORY 465Q MEMORY 444Q MEMORY 423Q MEMORY 402Q MEMORY 361Q MEMORY 340Q MEMORY 317Q MEMORY 276Q MEMORY 255Q MEMORY 234Q MEMORY 213Q MEMORY 172Q MEMORY 151Q MEMORY 130Q MEMORY 107Q MEMORY 66Q MEMORY 45Q MEMORY 24Q MEMORY 3 MEMORY) ( 1011Q 0.0 777Q 0.0 765Q 0.0 753Q 0.0 741Q 0.0 727Q 0.0 715Q 0.0 703Q 0.0 671Q 0.0 657Q 0.0 645Q 0.0 633Q 0.0 621Q 0.0 607Q 0.0 575Q 0.0 563Q 0.0 551Q 0.0 516Q 0.0 512Q 0.0 475Q 0.0 471Q 0.0 454Q 0.0 450Q 0.0 433Q 0.0 427Q 0.0 412Q 0.0 406Q 0.0 371Q 0.0 365Q 0.0 350Q 0.0 344Q 0.0 327Q 0.0 323Q 0.0 306Q 0.0 302Q 0.0 265Q 0.0 261Q 0.0 244Q 0.0 240Q 0.0 223Q 0.0 217Q 0.0 202Q 0.0 176Q 0.0 161Q 0.0 155Q 0.0 140Q 0.0 134Q 0.0 117Q 0.0 113Q 0.0 76Q 0.0 72Q 0.0 55Q 0.0 51Q 0.0 34Q 0.0 30Q 0.0 13Q 0.0 7 0.0) COEWAVE.INIT D1 (F 0 COEWAVE.WINDOW) o cd h(14Q WDISPLAY.CLEARW 6 WDISPLAY.CREATEW) NIL ( 3 "COEWAVE WINDOW") COEWAVE.CTW D1 (P 2 N P 0 DELTAN I 4 N2 I 3 N1 I 2 WAVE I 1 MEMORY I 0 COEFF) ^DjCÙkØØXA@É AÉDéHëFA@ÉAÉ>éHë@A@É AÉ@è>AAÉ>HêBh(5 COEWAVE.CTW.GAUSSIAN) (122Q MEMORY 116Q MEMORY 105Q MEMORY 77Q MEMORY 73Q MEMORY 61Q MEMORY 55Q MEMORY 44Q MEMORY 36Q MEMORY 32Q MEMORY 12Q MEMORY) ( 24Q 2.0) COEWAVE.CTW.CASCADE D1 (P 22Q UCASC P 21Q REG6P P 20Q REG5P P 17Q REGNZC P 16Q REGNPC P 15Q REG6C P 14Q REG5C P 13Q REG4C P 12Q REG3C P 11Q REG2C P 10Q REG1C P 7 RESNZ P 6 RESNP P 5 RES6 P 4 RES5 P 3 RES4 P 2 RES3 P 1 RES2 P 0 RES1 I 1 MEMORY I 0 COEFF) =ð@@É"X@É$Y@É&Z@É([@É*\@É,]@É.^@É0_AÉ_AÉ_AÉ_AÉ_AÉ_AÉ_AÉ_AÉ_AÉ_ AÉ _"AAÉ2AÉHè6l@É6ñ™OAÉ6‹AÉ6MO ¿l@É6ñ™OAÉ6ˆOLO ¿OKO OJO OIO OHO OOO _$dNO _$AO$JAÉBLO AÉBMO" h(471Q COEWAVE.STEP.RES 455Q COEWAVE.STEP.RES 427Q COEWAVE.STEP.RES 416Q COEWAVE.STEP.ANTIRES 404Q COEWAVE.STEP.RES 373Q COEWAVE.STEP.RES 362Q COEWAVE.STEP.RES 351Q COEWAVE.STEP.RES 337Q COEWAVE.STEP.RES 301Q COEWAVE.STEP.RES) (461Q MEMORY 445Q MEMORY 435Q MEMORY 322Q MEMORY 310Q COEFF 271Q MEMORY 261Q MEMORY 247Q COEFF 234Q MEMORY 226Q MEMORY 222Q MEMORY 212Q MEMORY 202Q MEMORY 172Q MEMORY 162Q MEMORY 152Q MEMORY 142Q MEMORY 132Q MEMORY 122Q MEMORY 112Q MEMORY 102Q MEMORY 72Q COEFF 63Q COEFF 54Q COEFF 45Q COEFF 36Q COEFF 27Q COEFF 20Q COEFF 11Q COEFF) () COEWAVE.CTW.PARALLEL D1 (P 16Q UGLOT1 P 15Q REGN P 14Q REG6P P 13Q REG5P P 12Q REG4P P 11Q REG3P P 10Q REG2P P 7 REG1P P 6 RESNP P 5 RES6 P 4 RES5 P 3 RES4 P 2 RES3 P 1 RES2 P 0 RES1 I 1 MEMORY I 0 COEFF) ð@É"X@É$Y@É&Z@É([@É*\@É,]@É.^AÉ_AÉ_AÉ_AÉ_AÉ_AÉ _AÉ_@É AÉ2êHO AAÉ2AÉ4é8@ÉAÉ8êNO AAÉ8AÉBè:@ÉAÉ:êIO @ÉAÉ:êJO @ÉAÉ:êKO @ÉAÉBêLO @ÉAÉBêMO h(426Q COEWAVE.STEP.RES 403Q COEWAVE.STEP.RES 360Q COEWAVE.STEP.RES 335Q COEWAVE.STEP.RES 312Q COEWAVE.STEP.RES 244Q COEWAVE.STEP.RES 176Q COEWAVE.STEP.RES) (415Q MEMORY 407Q COEFF 372Q MEMORY 364Q COEFF 347Q MEMORY 341Q COEFF 324Q MEMORY 316Q COEFF 301Q MEMORY 273Q COEFF 262Q MEMORY 254Q MEMORY 250Q MEMORY 233Q MEMORY 225Q COEFF 214Q MEMORY 206Q MEMORY 202Q MEMORY 165Q MEMORY 157Q COEFF 147Q MEMORY 137Q MEMORY 127Q MEMORY 117Q MEMORY 107Q MEMORY 77Q MEMORY 67Q MEMORY 60Q COEFF 51Q COEFF 42Q COEFF 33Q COEFF 24Q COEFF 15Q COEFF 6 COEFF) () COEWAVE.CTW.SUM D1 (P 12Q UPAR P 11Q UCASC P 10Q OUTPUT P 7 REGNPC P 6 REGN P 5 REG6P P 4 REG5P P 3 REG4P P 2 REG3P P 1 REG2P P 0 REG1P I 1 MEMORY I 0 COEFF F 13Q PLCONSTANT) ³ ° AÉXAÉYAÉZAÉ[AÉ\AÉ ]AÉ^AÉ_AÉJ_HI JK LM N@ÉAÉBê èèèèèèè_AOLAOOAÉ<èèNAÉN _AWAÉ<ê