|
◆ mlclow()
subroutine mlclow |
( |
integer*8 | fid, |
|
|
character*(*) | lname, |
|
|
integer | gtype, |
|
|
integer | sdim, |
|
|
real*8, dimension(*) | ecoo, |
|
|
integer | swm, |
|
|
integer | nip, |
|
|
real*8, dimension(*) | ipcoo, |
|
|
real*8, dimension(*) | wght, |
|
|
character*(*) | giname, |
|
|
character*(*) | isname, |
|
|
integer | cret ) |
|