代码搜索：assumed
找到约 1,666 项符合「assumed」的源代码
代码结果 1,666
www.eeworm.com/read/233448/4678844
f90 assumed_size.f90
! Program to test assumed size arrays
subroutine test2(p)
integer, dimension(2, *) :: p
if (any (p(:, 1:3) .ne. reshape((/1, 2, 4, 5, 7, 8/), (/2, 3/)))) &
call abort ()
end subroutine
pr
www.eeworm.com/read/162614/5523324
f90 assumed_size.f90
! Program to test assumed size arrays
subroutine test2(p)
integer, dimension(2, *) :: p
if (any (p(:, 1:3) .ne. reshape((/1, 2, 4, 5, 7, 8/), (/2, 3/)))) &
call abort ()
end subroutine
pr
www.eeworm.com/read/162614/5526152
f90 assumed_present.f90
! { dg-do compile }
! This tests the fix for the regression PR25785, where line 7 started
! generating an assumed size error.
! Contributed by Dale Ranta
subroutine my_sio_file_w
www.eeworm.com/read/366702/2873321
f90 assumed_size.f90
! Program to test assumed size arrays
subroutine test2(p)
integer, dimension(2, *) :: p
if (any (p(:, 1:3) .ne. reshape((/1, 2, 4, 5, 7, 8/), (/2, 3/)))) &
call abort ()
end subroutine
pr
www.eeworm.com/read/366702/2876498
f90 assumed_present.f90
! { dg-do compile }
! This tests the fix for the regression PR25785, where line 7 started
! generating an assumed size error.
! Contributed by Dale Ranta
subroutine my_sio_file_w
www.eeworm.com/read/366702/2877333
f90 assumed_len.f90
! { dg-do compile }
! Test of the patch for PR29941, in which LEN threw an error with
! an assumed size argument.
!
! Contributed by William Mitchell
!
subroutine whatever
www.eeworm.com/read/449409/7505935
prj gcs_assumed_geographic_1.prj
GEOGCS["GCS_Assumed_Geographic_1",DATUM["D_North_American_1927",SPHEROID["Clarke_1866",6378206.4,294.9786982]],PRIMEM["Greenwich",0.0],UNIT["Degree",0.0174532925199433]]
www.eeworm.com/read/162614/5526060
f90 assumed_dummy_2.f90
! { dg-do compile }
double precision :: arr(5, 8)
call bar (arr)
contains
subroutine foo (arr)
double precision :: arr(:,:)
arr(3, 4) = 24
end subroutine foo
subroutine bar (arr)
www.eeworm.com/read/162614/5526098
f90 assumed_dummy_1.f90
! { dg do-run}
! Tests the fix for PRs 19358, 19477, 21211 and 21622.
!
! Note that this tests only the valid cases with explicit interfaces.
!
! Contributed by Paul Thomas
!
modu
www.eeworm.com/read/162614/5526380
f90 assumed_size_nml.f90
! { dg-do compile }
! One of two tests for the fix of PR23152 - An ICE would
! ensue from assumed shape arrays in namelists.
!
! Conributed by Paul Thomas
!
program assumed_size_n