Author Topic: Euler Spirals, Clothoids, Cornu Spirals  (Read 1708 times)

0 Members and 1 Guest are viewing this topic.

ymg

  • Swamp Rat
  • Posts: 725
Euler Spirals, Clothoids, Cornu Spirals
« on: June 01, 2015, 05:38:53 PM »
Here is an adaptation to Autolisp of a program by:
       Enrico Bertolazzi and Marco Frego
       Department of Industrial Engineering
       University of Trento

Part of an article at: G1 Fitting With Clothoid on Matlab Central.

The translation has been kept intentionally very litteral. 

Notes: The subroutine "FresnelCS" is replaced by "fcs", as I could not get accurate returns
           when evaluating with values higher than 6.0 (Asymptotic Evaluation). I attach an Excel
           Sheet comparing the retrurns of "fcs" and "FresnelCS" against those returned by Maxima.

ymg

Code - Auto/Visual Lisp: [Select]
  1. ; Copyright (c) 2014, Enrico Bertolazzi                                       ;
  2. ; All rights reserved.                                                        ;
  3. ;                                                                             ;
  4. ; Adaptation to Autolisp by ymg                                               ;
  5. ;                                                                             ;
  6. ; Redistribution and use in source and binary forms, with or without          ;
  7. ; modification, are permitted provided that the following conditions are      ;
  8. ; met:                                                                        ;
  9. ;                                                                             ;
  10. ;    * Redistributions of source code must retain the above copyright         ;
  11. ;      notice, this list of conditions and the following disclaimer.          ;
  12. ;    * Redistributions in binary form must reproduce the above copyright      ;
  13. ;      notice, this list of conditions and the following disclaimer in        ;
  14. ;      the documentation and/or other materials provided with the distribution;
  15. ;    * Neither the name of the  nor the names                                 ;
  16. ;      of its contributors may be used to endorse or promote products derived ;
  17. ;      from this software without specific prior written permission.          ;
  18. ;                                                                             ;
  19. ; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" ;
  20. ; AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE   ;
  21. ; IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE  ;
  22. ; ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE    ;
  23. ; LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR         ;
  24. ; CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF        ;
  25. ; SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS    ;
  26. ; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN     ;
  27. ; CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)     ;
  28. ; ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE  ;
  29. ; POSSIBILITY OF SUCH DAMAGE.                                                 ;
  30. ;                                                                             ;
  31.  
  32. ; CODE IS IN ATTACHMENT BELOW.
  33.