1 (defmodule WEATHER (import FISH deftemplate menu) (export deftemplate acceptable_condition))
2 (deftemplate WEATHER::acceptable_condition
3 (slot locale (type SYMBOL )(allowed-symbols cancel inshore offshore open_ocean offshore_federal_waters) )
4 (slot fsh_type (type SYMBOL )(allowed-symbols bottom game jigging wreck) )
5 )
6
7 (deftemplate WEATHER::wave_height
8 (slot height (type NUMBER ))
9 )
10 (deftemplate WEATHER::swells
11 (slot seconds (type NUMBER ))
12 )
13 (deftemplate WEATHER::wind_speed
14 (slot speed (type NUMBER ))
15 (slot dir (type SYMBOL )(allowed-symbols EAST WEST NORTH SOUTH ))
16 )
17