如何获取Block中的一个计算值

Question

f[w_] := Block[{phy = w(*初相位*), \[Omega]t, tra, x, p1, p2}, 
  trajectory[\[Omega]t_, \[Omega]t0_] := (x[\[Omega]t] /. First@DSolve[
       {x''[\[Omega]t] == -Cos[\[Omega]t], x'[\[Omega]t0] == 0, 
        x[\[Omega]t0] == 0}
       , x, \[Omega]t
       ]); 
  result = \[Omega]t /. 
    NSolve[{trajectory[\[Omega]t, phy] == 0, \[Pi]/2 <= \[Omega]t < 
        2 \[Pi]}, \[Omega]t][[1]]; 
  Print[Evaluate@((2 Sin[result])^2)]; 
  tra = trajectory[\[Omega]t, phy]; 
  p1 = Plot[-tra, {\[Omega]t, 0, result}, 
    PlotStyle -> Blend[{Red, Green, Blue}, RandomReal[]], 
    ImageSize -> 600, PlotRange -> All]]
    
    
    x = Table[f[i], {i, 0.001, 0.3, 0.02}];
Show[%]

我想在外部获得Print打印的那个值，该用什么办法？

Comments

我试着用了一下Catch和Throw 但是并没有成功

Answer 1

直接在里面把值赋给外面的变量啊

Comments

还能这样做？谢谢