emath BBS (Read Only)

新規発言一覧最新記事過去一覧検索HOME

スレッド

└◇10665:
\Kyuusin [石原 守] 04/01 12:09

 └◇10666:Re:\Kyuusin [tDB] 04/01 12:51
  └◇10667:Re[2]:\Kyuusin [石原 守] 04/01 14:22
   └◇10668:Re[3]:\Kyuusin [tDB] 04/01 14:36
    └◇10669:Re[4]:\Kyuusin [石原 守] 04/01 15:02
     └◇10670:Re[5]:\Kyuusin [tDB] 04/01 15:37<-last


10665● \Kyuusin[ 石原 守 ] 2012 04/01 12:09
昨日付の実験版で以下のようなエラーがでるようになりました。
仕様変更等があったのでしょうか。
作成される.dtaは空のファイルになります。

\documentclass{jarticle}
\usepackage[notMy]{emathP}
\begin{document}
\begin{Zahyou}[ul=10mm](-1,1)(-1,1)(-1,1)
\iiitenretu*{O(-1,-1,-1)w;A(-1,1,-1)n;B(-1,-1,1)sw;C(1,1,-1)s}
\Kyuusin\O\A\B\C\D
\end{Zahyou}
\end{document}


runsystem(perl ./120331190944_d1.pl)...executed.


Runaway argument?
! Paragraph ended before \@trimleading was complete.
<to be read again>
                   \par
l.6 \Kyuusin\O\A\B\C\D

? x
スレッド一覧


10666● Re:\Kyuusin[ tDB ] 2012 04/01 12:51
再現しません。

> 作成される.dtaは空のファイルになります。

perl との連携トラブルですね。

コマンドプロンプトで
    perl 120331190944_d1.pl
を実行するとどうなるでしょうか。
120331190944_d1.dta は相変わらず,空でしたら
    120331190944_d1.pl
というテキストファイルを貼り付けてください。
スレッド一覧


10667● Re[2]:\Kyuusin[ 石原 守 ] 2012 04/01 14:22
>コマンドプロンプトで
>    perl 120331190944_d1.pl
>を実行するとどうなるでしょうか。

C:\Users\mamoru\Desktop\000>perl 120331190944_d1.pl
Undefined subroutine &main::detiii called at 120331190944_d1.pl line 3.

とエラーがでます。

>120331190944_d1.dta は相変わらず,空でしたら
>    120331190944_d1.pl
>というテキストファイルを貼り付けてください。
open(FHNDL,">./120331190944_d1.dta");
require 'emath.pl';
my $x1=-1;my $y1=-1;my $z1=-1; my $x2=-1;my $y2=1;my $z2=-1; my $x3=-1;my $y3=-1;my $z3=1; my $x4=1;my $y4=1;my $z4=-1; my $s1=$x1**2+$y1**2+$z1**2; my $s2=$x2**2+$y2**2+$z2**2; my $s3=$x3**2+$y3**2+$z3**2; my $s4=$x4**2+$y4**2+$z4**2; my $a1=2*($x2-$x1);my $b1=2*($y2-$y1);my $c1=2*($z2-$y1); my $a2=2*($x3-$x1);my $b2=2*($y3-$y1);my $c2=2*($z3-$y1); my $a3=2*($x4-$x1);my $b3=2*($y4-$y1);my $c3=2*($z4-$y1); my $d1=$s2-$s1;my $d2=$s3-$s1;my $d3=$s4-$s1; my $bunbo=detiii($a1,$b1,$c1,$a2,$b2,$c2,$a3,$b3,$c3); my $z=detiii($a1,$b1,$d1,$a2,$b2,$d2,$a3,$b3,$d3); my $y=detiii($a1,$d1,$c1,$a2,$d2,$c2,$a3,$d3,$c3); my $x=detiii($d1,$b1,$c1,$d2,$b2,$c2,$d3,$b3,$c3); $x/=$bunbo; $y/=$bunbo; $z/=$bunbo; printf FHNDL "(%s,%s,%s)\n", $x,$y,$z; 
close(FHNDL);
がファイルの内容です。
スレッド一覧


10668● Re[3]:\Kyuusin[ tDB ] 2012 04/01 14:36
120331190944_d1.pl
は正しくできています。

> Undefined subroutine &main::detiii

emath.pl が古いのが原因でしょう。
修正パック
  111014b.zip 
に含まれる
    perl.zip
内の
  emath.pl v 0.13 2011/03/07
をお使いください。
スレッド一覧


10669● Re[4]:\Kyuusin[ 石原 守 ] 2012 04/01 15:02
>修正パック
>  111014b.zip 
>に含まれる
>    perl.zip
>内の
>  emath.pl v 0.13 2011/03/07
>をお使いください。
ありがとうございます。emath.pl v 0.13 にしてエラーがでなくなりました。

その他からとれるemath.pl v 0.11が最新と勘違いしていました。

新しい年度が始まりますがこれからもよろしくお願いします。
8年ぶりに転勤です。
スレッド一覧


10670● Re[5]:\Kyuusin[ tDB ] 2012 04/01 15:37
> その他からとれるemath.pl v 0.11が最新と勘違いしていました。

紛らわしいですね。
「その他」ページに,注をつけておきました。

> 8年ぶりに転勤です。

健康に気をつけてご活躍ください。
新しく TeX ユーザが増えるといいですね。
スレッド一覧

CGIROOM