⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 env.l

📁 A very small LISP implementation with several packages and demo programs.
💻 L
字号:
# 21jan07abu# (c) Software Lab. Alexander Burger(model This   '(runway1  -120.0  -200.0  -0.02      (`DarkGrey NIL        +20.0   -20.0      0        +20.0   +20.0      0        -20.0   +20.0      0        -20.0   -20.0      0 )      (`White NIL        +10.0    -1.0      0        +10.0    +1.0      0        -10.0    +1.0      0        -10.0    -1.0      0 ) ) )(model This   '(runway2  -80.0  -200.0  -0.02      (`DarkGrey NIL        +20.0   -20.0      0        +20.0   +20.0      0        -20.0   +20.0      0        -20.0   -20.0      0 )      (`White NIL        +10.0    -1.0      0        +10.0    +1.0      0        -10.0    +1.0      0        -10.0    -1.0      0 ) ) )(model This   '(runway3  -40.0  -200.0  -0.02      (`DarkGrey NIL        +20.0   -20.0      0        +20.0   +20.0      0        -20.0   +20.0      0        -20.0   -20.0      0 )      (`White NIL        +10.0    -1.0      0        +10.0    +1.0      0        -10.0    +1.0      0        -10.0    -1.0      0 ) ) )(model This   '(runway4  0.0  -200.0  -0.02      (`DarkGrey NIL        +20.0   -20.0      0        +20.0   +20.0      0        -20.0   +20.0      0        -20.0   -20.0      0 )      (`White NIL        +10.0    -1.0      0        +10.0    +1.0      0        -10.0    +1.0      0        -10.0    -1.0      0 ) ) )(model This   '(runway5  +40.0  -200.0  -0.02      (`DarkGrey NIL        +20.0   -20.0      0        +20.0   +20.0      0        -20.0   +20.0      0        -20.0   -20.0      0 )      (`White NIL        +10.0    -1.0      0        +10.0    +1.0      0        -10.0    +1.0      0        -10.0    -1.0      0 ) ) )(model This   '(runway6  +80.0  -200.0  -0.02      (`DarkGrey NIL        +20.0   -20.0      0        +20.0   +20.0      0        -20.0   +20.0      0        -20.0   -20.0      0 )      (`White NIL        +10.0    -1.0      0        +10.0    +1.0      0        -10.0    +1.0      0        -10.0    -1.0      0 ) ) )(model This   '(runway7  +120.0  -200.0  -0.02      (`DarkGrey NIL        +20.0   -20.0      0        +20.0   +20.0      0        -20.0   +20.0      0        -20.0   -20.0      0 )      (`White NIL        +10.0    -1.0      0        +10.0    +1.0      0        -10.0    +1.0      0        -10.0    -1.0      0 ) ) )(=: env   (list      (: runway1)      (: runway2)      (: runway3)      (: runway4)      (: runway5)      (: runway6)      (: runway7) ) )

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -