,CORAL #FF
,CORAL #FF 0 ! ,BRITI% MILIT>Y'S ANSW]
TO ,,JOVIAL  &1 QUIETLY1 "O ( !
MO/-M&AT$ LANGUAGES 9 HI/ORY4 ,DEVELOP$
AT ! ,ROYAL ,RAD> ,E/ABLI%;T AT ,MALV]N
2G9N+ 9 #AIFD BY ,PHILIP ,WOODW>D1 ,I4
;,F4 ,CURRIE1 & ;,M4 ,GRI6I?S1 X FUS$
,,ALGOL #FJ'S /RUCTURE ) ,,JOVIAL'S
R1L-"T PRAGMATISM & A LL ,=TRAN  A
LANGUAGE BUILT EXPRESSLY = MA*9ES )
LIMIT$ P[]1 FIX$-PO9T >I?METIC1 & NO
DYNAMIC /ORAGE4 ,& XS "N C>RIES A
BUR1UCRATIC BACKRONYM3 ! ;,R 9 ,,CORAL
ORIG9ALLY /OOD = ,RAD>1 N 8,R1L-"T0  !
EXPAN.N 0 REVIS$ :5 ! LANGUAGE'S REMIT
GREW4.<CITE3 .<,CORAL #FF  ! ,,RRE T1M1
! #AIFD />T1 ! RAD>R1L-"T RETCON1 & !
,,JOVIAL_/,,ALGOL_/,=TRAN RECIPE.>.>
,! LANGUAGE'S F1TURES >E A SPEC ( XS
PROBLEM DOMA93 /RUCTUR$ RECORD TYPES &
BIT-PACK+ "<Z ,PASCAL WD D">1 9L9E
ASSEMBLY = ! "PS T H TO T\* H>DW>E1 &
/R;G RUN"T *ECK+  2C A RAD> PROCESSOR
C'T AF=D A DANGL+ 9DEX4 ,9 #AIFF ,CURRIE
& ,GRI6I?S /&>DIZ$ X "U !
,9T]-,E/ABLI%;T ,COMMITTEE2 ,WOODW>D1
,WE!RALL1 & ,GORMAN'S (FICIAL DEF9I;N 0
PUBLI%$ 9 #AIGJ4 ,& FITT+LY = !
,CAMBRIDGE-S*OOL TRADI;N1 XS COMPIL]S 7
WRITT5 9 ,,BCPL4.<CITE3 .<,CORAL #FF  !
F1TURE SET1 ! #AIFF ,,IE3A /&>DIZA;N1 !
#AIGJ (FICIAL DEF9I;N1 & ! ,,BCPL
IMPLE;TA;N.>.>
,! M&AT$ DECADE
,9 #AIGA ! ,,UK ,M9I/RY ( ,DEF;E SELECT$
,CORAL #FF Z ! LANGUAGE = ALL FUTURE
MILIT>Y APPLICA;NS  N RECOMM5D$1 REQUIR$
& BUILT A COMPIL]-VALIDA;N PROGRAM TO
5=CE ! /&>D4 ,RAD>1 W1PONS SY/EMS1 NAVAL
COMPUT+3 IF X RAN 9 ,,UK DEF5SE 9 !
SEV5TIES & EI<TIES1 X PROBABLY RAN ON
,CORAL4 ,! PROGRAM'S RIGOR SET ! PREC$5T
! ,,U ,DE"P;T ( ,DEF5SE ADOPT$ = ,ADA  &
,ADA'S M&ATE IS :AT F9ALLY RETIR$
,CORAL4 ,A LANGUAGE BUILT = RAD> 5D$ UP
DEF9+ H[ GOV]N;TS /&>DIZE
LANGUAGES4.<CITE3 .<,CORAL #FF  ! #AIGA
,MO,D M&ATE1 ! COMPIL]-VALIDA;N PROGRAM1
& ! SU3ES.N BY ,ADA.>.>
,CORAL'S L91GE CLOSES A LOOP 9 ?
CATALOGUE3 BAS$ ON .<.<,,JOVIAL.>.>
"<,,SDC'S ,,ALGOL DIALECT">1 IMPLE;T$ 9
,,BCPL "<,RI*>DS'S 4TILLA;N ( !
N"E-F9I%$ .<.<,,CPL.>.>">1 !N SUP]S$$ BY
,ADA  : XF DREW ON ! COMMITTEE-LANGUAGES
]A ,CORAL & .<.<,,ALGOL ,W_\,,ALGOL
#FH.>.> BRACKET$4 ,MILIT>Y COMPUT+'S
LANGUAGE W>S RUN "? ,MALV]N4
,": X SITS
,CORAL #FF IS ! PRO( T 8UNSEXY0 LANGUAGE
DESIGN W9S R1L M&ATES3 SMALL1 *ECKABLE1
BIT-EXACT1 EMB$DABLE4 ,X N"E S"\ G5]AL;Y
X S"\ DEP5DABIL;Y AT #C A4M4 ON A RAD>
3SOLE  & = A DECADE X WAS1 BY GOV]N;T
DECREE1 ! ONLY CORRECT *OICE4
,*ECK YR "U/&+
- .< .> ,:AT DOES ,,CORAL /& =  & :AT
DID ! ;,R ORIG9ALLY M1N8 - .< .> ,:O
DESIGN$ X1 ":1 & BAS$ ON :AT8 - .< .>
,:AT DID ! ,,UK ,MO,D D ) X 9 #AIGA  &
:AT REPLAC$ X8 - .< .> ,:AT LANGUAGE 7
,CORAL COMPIL]S WRITT5 98
#A  "9"9,COMPUT] ,ON-L9E ,R1L-"T
,APPLICA;NS ,LANGUAGE"9"9  B ! ;,R
ORIG9ALLY M1NT "9"9,RAD>"9"9 "<,ROYAL
,RAD> ,E/ABLI%;T">4 #B  "9"9,WOODW>D1
,CURRIE @& ,GRI6I?S AT ,,RRE ,MALV]N"9"9
,,ALGOL #FJ "6 ,,JOVIAL "6 ,=TRAN4 #C 
"9"9M&AT$ X = ALL FUTURE MILIT>Y
APPLICA;NS"9"9 "<#AIGA">  REPLAC$ BY
"9"9,ADA"9"94 #D  "9"9,,BCPL"9"9 
,RI*>DS'S /RIPP$ ,,CPL4