4 lines
108 B
Text
4 lines
108 B
Text
|
procedure main()
|
||
|
|
write(&progname) # obtain and write out the program name from the keyword &progname
|
||
|
|
end
|