fortran中的复数计算虽然支持得很好，但是对实部和虚部分别操作并不清晰（不像pascal 它是个结构，可以分别赋值）： 1. 它只能通过函数来提取实部或者虚部， 2. 但它赋予了类似函数的方法 Z(x,y)
如果要操作Z的实部，比如+x1(其中x1为实变量), 可以如此： Z=Z(real(Z)+x1, aimag(Z))
要操作虚部， 则类似的有 Z=Z(real(Z), Aimag(Z)+x1)
实现是没问题，但是其中调用了两次函数，也许内部处理也就是个结构，算不上计算吧，释怀！
如果要操作Z的实部，比如+x1(其中x1为实变量), 可以如此： Z=Z(real(Z)+x1, aimag(Z))
要操作虚部， 则类似的有 Z=Z(real(Z), Aimag(Z)+x1)
实现是没问题，但是其中调用了两次函数，也许内部处理也就是个结构，算不上计算吧，释怀！
