| Back to HOW_TO  |  Back to General Information  |
 

Display procedures

Ascii printout of flag arrays:
prflm
location ?

CMPX arrays:
zd
location /home/hgs/bin/zd
source code /home/hgs/Oload/p/mpp/zd.f
can utilize an ins-file
More information
 

REAL arrays:
rd
location /home/hgs/bin/rd
source code /home/hgs/Oload/p/mpp/rd.f
needs an ins-file
 

Display screens

Common to display screens is the P option, change the palette.

zd uses subroutine  ZDISPL (/home/hgs/Oload/p/zds.f). Goto ZDISPL graphic window prompter.

rd uses subroutine  GRASOL (/home/hgs/Oload/p/gra/otes18.f) Goto GRASOL graphic window prompter.
   which is also used in
cream (display depth array)
   and otem1 and otemt1 subroutines oteq and tteq during time-stepping of the differential equations.


ZDISPL graphic window prompter
There are two frames (usually amplitude and phase display) that can by shown in one window,
but usually are divided into subsequent displays. The colour range is 15 distinct levels.

There is more detailed information; the following below is a bit short.
 
Key  Function
C continue to show phase
l L draw coastline ("L" for extended prompter)
a h present prompter for amplitude and phase range
r R redraw ("R" with refresh)
X present prompter for x-range (array index range). Global arrays are considered circularly connected. End index must be larger than begin.
Y ... y-range (array index range)
i I toggle interpolation mode. Interpolation is at screen resolution; without interpolation you'll see the grid resolution. Use "I" to show phase lines.

zd.ins file example:

22 ^ &/${TIDE}?.dat           tide solution ${TIDE} ${NVER} <---- This comment will be significant (*)
   C          \___________________________The ?-mark will cause interaction (prompt for replacement)
   C
23 ^ &/FLZU.DAT               Flags
   Q
y                 yes, area from flag file
n                 reverse order
$$                                                  (*) $$ means the comment on file unit 22 is used
f                 use flags to display
n                 suppress checkerboard
Tide height
3.0  [m]

2
   ]

As an alternative, run zd without an instruction file. At the prompter
CONSOLE CONTROL  answer Yes.
The instructions (zd.ins file example above) could be entered directly at the keyboard.



 

GRASOL graphic window prompter

The picture elements are composed of 16 basic colours with three stages of transition.

The prompter looks like this:

Not all options are shown though
 
 
 
Key Function
p change palette
Return Leave the prompter; picture remains.
3 ... 9 Pixel resolution
l L h H Lowest / next higher pixel resolution; upper case commands include refresh.
a A Redraw ("Again"). Upper case "A" to refresh the screen
arrows Move origin. You must press "a" or "A" to effectuate.
Move - prompt for numerical input
c Communicate a string to the calling program. You'll get a new prompter.
i Communicate an integer to the calling program. You'll get a new prompter. 

In rd: draw a coastline using the specified colour number.

Under otemt1 or otem1, subroutines TTEQ or OTEQ: 
elevation and potential display: number of time steps between displays 
(Incr = Increment).

In TTEQ:  trace display: ID-number of field to display.

s shut off display.  A toggle option; on/off state is shown by highlight. 
t close window inbetween displays. Toggle.
g Go = set no-prompt mode. Toggle
r R Set the field range. With "R" you get a prompter where you can choose between zero-centred, half-sided or free interval. 
Clip colours = yes implies that values outside the rrange are shown with the colours of the range corners. The alternative is to cycle through the colours with automatic mixing schemes.
v Prompt for flag target string to select what kind of cells are viewed.
n next part of the menu (2 parts)
x Redraw the axis labels.
mouse move mouse pointer to a field node and click left button. The program will list the pointer location, the field value, and the flag value. 

rd:
To draw coastlines simply hit return.
To exit the procedure you can  ^C  at the graphic prompter and answer Y (yes) to quit immediately.
Or enter  S  for shut and hit return. And return again at the next prompter.
You can enter  I  and a number between 0 and 15 to define the coastline colour.
 

TTEQ (otemt1):
In order to regain the graphic window display of elevations in tteq (and its prompt mode),
issue  OC ^G from a terminal window.

Example rd.ins file:
31 ^ &/FLZ.DAT
33 ^ &/TESTR.DAT
   q
 &param
 qclean=.true.
 title='Test cream'
 range=10.
 target='SAOoAa'
 palfile='olfg.pal'
 &end
   ]


Change Palette

You will obtain a Graphic prompter asking for a command

 

After pressing  P+Return  you will receive the Palette prompter

 
 

Table: User entries at Command prompter
Key(s) 
 + Return
Function
C Clear (This feature is presently disabled)
Q Quit
P prompt with Palette bar. There'll be an Underline character above the color bar as the cursor ( in the example it is above field #1 with color number 39)

Use <- and -> arrow keys to move to the desired color; notice that color field #0 is the window background, and the wake-up position is field #1.
Use up or down arrows to adjust color by steps of eight. 

Use R G or B keys to increase Red Green or Blue component,
r g or b keys to decrease, respectively. These shades will be volatile, however; they cannot be saved to file. 

Press ESC key to ignore or Return key to accept color change. Press SPace bar to temporarily leave the color at the present value (the next ESC will restore the old value). 

W or D Write or Dump palette. With W you'll receive a file name prompter.
R [j] Read record number j from a palette file. You'll receive a file name prompter. Default for j is the first record. A j too large will retrieve the last record. 
H Hide prompter. The program executes a READ  (5,*) statement (stdin), i.e. you must hit return in the window from where the program was started. This feature is supposed to improve the performance of screen captures. The H option is not shown in the menu, sorry.
i  j Set palette number i to colour number j. 0 <= i <= 15,  0 <= j <= 63.

.bye