1 files changed, 18 insertions, 0 deletions
diff --git a/50/DEPENDENCIES/legrangeinterpol.sci b/50/DEPENDENCIES/legrangeinterpol.sci
new file mode 100755
index 000000000..cbaff9113
--- /dev/null
+++ b/50/DEPENDENCIES/legrangeinterpol.sci
@@ -0,0 +1,18 @@
+function P1=legrangeinterpol (x0,x1,f0,f1)
+    x=poly(0,"x");
+    L0=(x-x1)/(x0-x1);
+    L1=(x-x0)/(x1-x0);
+    P1=L0*f0+L1*f1;
+endfunction
+    
+    
+    
+    
+    
+    
+    
+    
+    
+    
+    
+   
+\ No newline at end of file