JBCC = 14 JABB = JMAX - JBCC XB32 = XB ( 3 ) -XB ( 2 ) CALL VINOKUR ( JABB , 25. , 5 . , RABB , RAB ) CALL VINOKUR ( JBCC , .5 , .1 , RBCC , XB32 ) DO 41 J ...
確定! 回上一頁