@@ -69,11 +69,17 @@ program test
69
69
call plt% savefig(' contour.png' ,pyfile= ' contour.py' )
70
70
71
71
! histogram chart:
72
- do i= 1 ,n
73
- x(i) = 1.0
74
- end do
75
-
76
- write (* ,* ) x
72
+ x = (/ 0.194 ,0.501 ,- 1.241 ,1.425 ,- 2.217 ,- 0.342 ,- 0.979 ,0.909 ,0.994 ,0.101 , &
73
+ - 0.131 ,- 0.627 ,0.463 ,1.404 ,0.036 ,- 2.000 ,0.109 ,1.250 ,- 1.035 ,- 1.115 , &
74
+ 0.935 ,0.496 ,1.100 ,0.770 ,- 1.307 ,- 0.693 ,- 0.072 ,- 1.331 ,- 0.701 , &
75
+ - 0.494 ,0.666 ,- 0.313 ,- 0.430 ,- 0.654 ,1.638 ,- 0.334 ,- 0.418 ,0.550 ,- 0.034 , &
76
+ 0.473 ,0.704 ,0.801 ,- 0.157 ,0.055 ,- 0.057 ,- 1.049 ,- 1.022 ,0.495 ,0.756 , &
77
+ 0.149 ,0.543 ,- 0.813 ,- 0.171 ,- 0.994 ,- 1.532 ,0.502 ,1.324 ,- 0.593 ,- 0.467 , &
78
+ 0.372 ,- 0.904 ,1.255 ,0.931 ,- 0.779 ,1.529 ,- 0.036 ,0.783 ,0.292 ,- 0.792 , &
79
+ - 0.223 ,- 0.325 ,0.225 ,- 0.492 ,- 0.941 ,0.065 ,1.300 ,- 1.241 ,- 1.124 ,- 0.499 , &
80
+ 1.233 ,- 0.845 ,- 0.948 ,- 1.060 ,1.103 ,- 1.154 ,- 0.594 ,0.335 ,- 1.423 ,0.571 , &
81
+ - 0.903 ,1.129 ,- 0.372 ,- 1.043 ,- 1.327 ,0.147 ,1.056 ,1.068 ,- 0.699 ,0.988 ,- 0.630 / )
82
+
77
83
call plt% initialize(grid= .true. ,xlabel= ' x' ,&
78
84
title= ' hist test' ,legend= .true. ,figsize= [20 ,10 ],&
79
85
font_size = 20 ,&
0 commit comments