mirror of
https://github.com/ton-blockchain/ton
synced 2025-03-09 15:40:10 +00:00
8 lines
212 B
Text
Executable file
8 lines
212 B
Text
Executable file
#!/usr/bin/fift -s
|
|
{ ."usage: " $0 type ." <num1> <num2>" cr
|
|
."Computes the product of two integers." cr bye } : usage
|
|
{ ' usage if } : ?usage
|
|
$# 2 <> ?usage
|
|
$1 (number) 1- ?usage
|
|
$2 (number) 1- ?usage
|
|
* . cr
|