13 lines
350 B
Fortran
13 lines
350 B
Fortran
|
|
! *** generated by SAPFOR with version 2412 and build date: Apr 29 2025 22:44:14
|
|
! *** Enabled options ***:
|
|
! *** maximum shadow width is 50 percent
|
|
! *** generated by SAPFOR
|
|
|
|
!---------------------------------------------------------------------
|
|
program spbt
|
|
include 'header3d_bt.h'
|
|
call btdv3()
|
|
call sp()
|
|
return
|
|
end |