Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- integer , intent(in) :: nLOW
- integer , intent(in) :: nUP
- logical , dimension(nLOW:nUP) :: leastSQUARE = .false.
- integer :: I
- integer , intent(in) :: nLOW
- integer , intent(in) :: nUP
- logical , dimension(nLOW:nUP) :: leastSQUARE = (/ (.false., I = nLOW:nUP) /)
- integer , intent(in) :: nLOW
- integer , intent(in) :: nUP
- logical , dimension(1:100) :: leastSQUARE = .false.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement