;; 等额本息还款debx, 输入总金额A, 年利率y, m个月还清, 计算月供和总利息:
;; 例子: (debx 1000000 0.0631 (* 30 12)) ;==>
;; 6196.247877564253
;; 1230649.235923131
(define (debx A y m)
(let* [(b (/ y 12))
(b1 (expt (+ 1 b) m))
(A1 (/ (* b A b1) (- b1 1)))]
(values A1 (- (* A1 m) A))))
;;公式推导 https://baike.baidu.com/item/等额本息/3227456向银行借100万,30年还清, 每月还6200, 总共还利息123万。相关推荐
LISP教程:使用LISP编写简单的程序
是调用刚刚定义的函数的代码。定义了一个名为 “greet” 的函数,该函数接受一个参数 “name”。定义了一个名为 “greet” 的函数,该函数接受一个参数 “name”。定义了一个名为 “greet” 的函数,该函数接受一个参数 “name”。定义了一个名为 “greet” 的函数,该函数接受一个参数 “name”。定义了一个名为 “greet” 的函数,该函数接受一个参数 “name”。定义了一个名为 “greet” 的函数,该函数接受一个参数 “name”。是调用刚刚定义的函数的代码。
画圆的lisp源码
(defun 画圆 (半径 圆心-x 圆心-y) (dotimes (角度 360) (let ((弧度 (/ 角度 180.0 pi))) (plot (+ 圆心-x (* 半径 (cos 弧度))) (+ 圆心-y (* 半径 (sin 弧度)))))) 上面的代码可以用来画一个圆。它接受三个参数:半径、圆心的 x 坐标和圆心的 y 坐标。它使用...
Lisp源码200例
Lisp源码200例,角度阵列程序,创建并插入匿名块,测量两线夹角,按给定比例建立尺寸标注样式程序,初始化绘图环境
autolisp函数大全,CAD的 lisp
12.l(*error* 字符串)程序错误时的警示信息12.2(alert 字符串)以对话框式显示出警告字符串12.3(apply 功能函数列表)将功能函数与列表结合后执行12.4(defun 名称 自变量列表表达式_.)自定函数或子程序12.5(eval 表达式)返回:表达式的执行结果12.6(exit)强制退出目前的应用程序12.7(lambda 自变量表达式)定义未命名的函数12.8(progn 表达式1 表达式2…)连接其内的表达式为一组,常用于配合if、cond等函数。
收集的lisp源码
收集的lisp源码,有很多不错的实例
CAD LISP24个源代码
CAD二次开发源代码,如更改索引颜色,获取屏幕角点坐标,用DCL作密码输入框
用lisp写一段CAD实体居中代码
在Lisp中,可以使用命令(setq ent (entget entname))获取CAD实体的所有信息,然后提取其中的位置信息,实现实体居中的代码可以是:(setq ent (entget entname))(setq mid_x (/ (+ (cdr (assoc 10 ent)) (cdr (assoc 11 ent))) 2))(setq mid_y (/ (+ (cdr (assoc 2...
CAD二次开发LISP程序源码 90个源码代码
CAD二次开发LISP程序源码 90个源码代码,使用AutoCAD加载就可以使用。学习资料例程!
Lisp 语言入门教程(一)
Lisp(“LISt Processing”)是一种古老而强大的编程语言,特别适合处理符号数据和列表。Lisp 是一种以括号和递归见长的语言,它启发了许多编程范式。以下是一个基础教程,帮助你快速了解 Lisp 的基本语法和功能。Lisp 的核心思想是“代码即数据,数据即代码”。在 Lisp 中,代码是由列表(list)构成的,而列表的本质是括号包裹的表达式。典型的 Lisp 表达式格式如下: 例如, 表示“1 加 2”,相当于其他编程语言中的 。Lisp 支持多种数据类型,最常用的有:Lisp 中提供了简单
明经通道源码共享(lisp)
明经通道源码共享 lisp ,内容丰富,内含多种代码。
LISP源码800例.rar
LISP,全称为“List Processor”,是一种历史悠久的高级编程语言,以其独特的链表数据结构和符号处理能力闻名。这份名为“LISP源码800例”的资源集合,显然是为那些想要深入理解LISP编程的人准备的。它包含了800个不同的LISP代码示例,涵盖了各种编程技巧和应用场景,是学习LISP语言的宝贵资料。 LISP的基本概念: 1. **S-表达式(S-Expression)**:LISP中的一切都是S-表达式,包括数据和程序。S-表达式可以是原子(如数字、字符串或符号)或列表。列表形式的S-表达式代表了程序结构,而原子则表示数据。 2. **链表数据结构**:LISP的数据结构基于链表,这使得处理复杂的数据结构变得简单。每个链表节点包含一个值和指向下一个节点的引用。 3. **函数式编程**:LISP强调函数是“第一类公民”,意味着函数可以作为参数传递、作为返回值返回,甚至存储在变量中。 4. **动态类型系统**:LISP不使用静态类型,变量的类型在运行时确定,提高了代码的灵活性。 5. **宏系统**:LISP的宏允许程序员自定义语言语法,增强了语言的可扩展性。 6. **读取-求值-打印循环(REPL)**:LISP提供了一个交互式的REPL环境,允许程序员即时测试和修改代码。 通过分析这800个源码示例,学习者可以深入了解以下关键知识点: 1. **基本操作**:包括创建和操作链表的函数,如`cons`,`car`,`cdr`等,以及数字运算和逻辑操作。 2. **函数定义与调用**:LISP中的函数定义通常使用`defun`,函数调用则是直接使用函数名后跟参数列表。 3. **条件判断与控制流**:`if`,`cond`,`case`等语句用于条件判断,`do`,`loop`,`when`等用于循环和迭代。
标注所有线段的lisp程序源码_在网上找的几个比较有用的lisp小程序
1. 计算所有线段总长度(加载后只需框选所有线(defun c:LL()(setvar"cmdecho" 1)(setq en(ssget (list '(0 . "spline,arc,line,ellipse,LWPOLYLINE"))))(setq i 0)(setq ll 0)(repeat(sslength en)(setq ss(ssname en i))(setq enda...
lisp源码_GetFilesV1-6.lsp_lisp插件源码_lisp插件源码_lisp源码_分享收集的lisp源码_
自行研究学习。分享个早期搜集学习的lisp源码
初识LISP(1)——基本的结构、语法与数据类型
;宏定义 (defmacro setTo10(num) (setq num 10) (print num)) (setq x 25) (print x) (setTo10 x) ;显示数据类型和所属范围 (setq x 281474976710656) ;构建一个符号指定一个值 (setq x 281474976710657) (print (type-of x)
海外跨境电商商城源码-进出口电商平台网站-多语言多商户平台
我们的海外跨境电商系统源码还包括各种功能模块,如用户管理、商品管理、订单管理等。支付管理:与主流支付平台(如Stripe、PayPal等)的集成,支持多种支付方式;订单管理:创建订单、支付订单、取消订单等操作,以及订单状态查询和历史记录;购物车管理:添加商品到购物车、查看购物车、修改购物车中的商品数量等操作;商品管理:商品信息录入、编辑、删除等操作,以及商品分类和搜索功能。客服管理:在线咨询、投诉处理等功能,提供更好的用户服务。用户管理:注册、登录、忘记密码、个人资料。# 检查电子邮件地址是否有效。
基于PLC智能立体车库控制系统设计
摘要 本系统设计以三层立体车库为研究对象,通过对立体车库的原理分析、动作流程设计和一系列的软硬件设计,达到立体车库自动化控制的目的。系统采用可编程控制器作为立体车库控制系统的控制单元,实现该系统的工艺要求,通过程序仿真调试,完成系统的各种动作要求,达到自动控制的目的。系统设计分为总体设计、硬件设计以及软件设计。按照立体车库控制系统的控制策略进行图纸设计;重点分析工艺流程图,对立体车库控制系统进行程序编译和MCGS上位机调试,通过系统的调试和修改,达到了基本控制的要求。系统设计明确了工艺要求,确定
lisp源码 微盘,AutoLISP - 源码下载|Windows编程|其他小程序|源代码 - 源码中国
CAD操作Excel函数................\circle_data_2xls写数据到表格.LSP................\ExcelLisp表格通用程序.LSP................\KozMos VLXLS Project.doc................\KozMos VLXLS Projects.htm................\vlex-vlis...
向量库深度解析:选型、索引原理与生产实践
本文系统解析五大主流向量库(pgvector、Milvus、Weaviate、ChromaDB、Faiss)的定位、优缺点与适用场景,深入拆解FLAT、IVF、HNSW等核心索引原理,并重点分析Milvus的Compaction机制。针对数据治理场景,提供精准选型建议:中小规模优先pgvector或Weaviate,超大规模选择Milvus,开发测试推荐ChromaDB。核心索引推荐HNSW,兼顾检索速度与召回率。全文从理论到实践,为开发者提供清晰的向量库选型逻辑与生产落地指南。
Lisp基础语法
使用setq或defvar定义变量。定义变量 x 并赋值为 10定义全局变量 /y使用defun定义函数,语法为(defun 函数名 (参数列表) 函数体)。纳京高(* n n));定义计算平方的函数调用函数,返回 25。
小曾WRF自学日记(3)渐入佳境 ——WRF实例-数据下载与WPS前处理
ww
【回眸】Tessy集成测试软件使用指南(一)新手使用篇
这个专栏的文章前4篇都在记录如何使用Tessy进行单元测试,集成测试需要有一定单元测试基础,且做集成测试之前,需要做好单元测试,否则将会大幅增加软件单元代码纠错的代价。集成测试所花费的时间通常远远超过单元测试。如果直接从单元测试到系统测试,结果往往是不理想的。集成测试可以检测由于单元相互交互而导致的错误,通常由一组专业的测试人员执行。
865



被折叠的 条评论
为什么被折叠?



