dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/dp32.F

5406      1                  IBUGA2,IBUGA3,IBUGQ,ISUBRO,IFOUND,IERROR)
5433       CHARACTER*4 IBUGA2
5519       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'VWAE')THEN
5526         WRITE(ICOUT,52)IBUGA2,IBUGA3,IBUGQ,ISUBRO
5540       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'VWAE')
5570       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'VWAE')THEN
5597       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'VWAE')
5608         IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'VWAE')
5630         IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'VWAE')THEN
5665         IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'VWAE')
5681         IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'VWAE')THEN
5717       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'VWAE')
5805       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'VWAE')THEN
11974      1                  IBUGA2,IBUGA3,IBUGQ,ISUBRO,IFOUND,IERROR)
12000       CHARACTER*4 IBUGA2
12077       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WILC')THEN
12084         WRITE(ICOUT,52)IBUGA2,IBUGA3,IBUGQ,ISUBRO,MAXNXT
12095       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WILC')
12183      1            IBUGA2,IERROR)
12185       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WILC')THEN
12198       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WILC')
12224       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WILC')THEN
12293       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WILC')
12338           IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WILC')THEN
12382           IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WILC')
12418      1                IBUGA2,IBUGA3,ISUBRO,IERROR)
12429       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WILC')THEN
13875      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
13897       CHARACTER*4 IBUGA2
13929       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WIL5')THEN
14243           IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WIL5')THEN
14264       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WIL5')THEN
23547      1                  IBUGA2,IBUGA3,IBUGQ,ISUBRO,IFOUND,IERROR)
23584       CHARACTER*4 IBUGA2
23687       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WSHA')THEN
23697         WRITE(ICOUT,53)IBUGA2,IBUGA3,IBUGQ,ISUBRO
23718       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')
23798      1            IBUGA2,IERROR)
23800       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')THEN
23829       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')
23858       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')THEN
23886       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')
23919       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')THEN
23932       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')
23942         IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')
23956           IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')THEN
23980           IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WSHA')THEN
24024           IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')
24038      1                IBUGA2,IBUGA3,ISUBRO,IERROR)
24053         IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'WSHA')
24099         IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WSHA')THEN
24184      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
24232      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
24284      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
24340      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
24400      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
24464      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
24490       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WSHA')THEN
25158      1                  IBUGA2,IBUGA3,ISUBRO,IERROR)
25179       CHARACTER*4 IBUGA2
25210       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WSH4')THEN
25276           IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WSH4')THEN
25297       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'WSH4')THEN
26829      1                  IBUGA2,IBUGA3,IBUGQ,ISUBRO,IFOUND,IERROR)
26894       CHARACTER*4 IBUGA2
27022       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'YATE')THEN
27029         WRITE(ICOUT,54)ICASAN,IBUGA2,IBUGA3,IBUGQ,ISUBRO,MAXN
27049       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'YATE')
27103       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'YATE')
27129       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'YATE')THEN
27155       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'YATE')
27190       IF(IBUGA2.EQ.'ON'.OR.ISUBRO.EQ.'YATE')
27300       IF(IBUGA2.EQ.'ON' .OR. ISUBRO.EQ.'YATE')THEN