From 18b98884cf03251ed1cf30f15d0cf2d2426299e7 Mon Sep 17 00:00:00 2001 From: evmik Date: Wed, 12 Jul 2006 12:07:35 -0400 Subject: unnesessary staff removed darcs-hash:20060712160735-a6199-74994ceb107c3ea605c9cb650a13e86095635389 --- propagation.m | 15 --------------- 1 file changed, 15 deletions(-) diff --git a/propagation.m b/propagation.m index f565672..fb7bb0a 100644 --- a/propagation.m +++ b/propagation.m @@ -75,19 +75,4 @@ radius = q2radius(qtf,lambda) pause(100) quit() -system("cat answ.txt answ.txt") -answ=menu("Is it reasonable mode matching?","yes","no") -if (answ ==1) - printf("xxxxxxxxxxxxxxxxxxxxxxxxxxxx") - system("cat answ.txt >>good_mode_matching.txt") -else - printf("------------------------------") -endif - -exit -# -#gset term postscript -#gset output "foo.ps" -#plot (x,w1, "1", xb, wb, "2") - -- cgit v1.2.3