FIXME : Add documentation
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | unit |
subroutine wnml_gs2_layouts(unit)
implicit none
integer, intent(in) :: unit
if (.not. exist) return
write (unit, *)
write (unit, fmt="(' &',a)") "layouts_knobs"
write (unit, fmt="(' layout = ',a)") '"'//trim(layout)//'"'
write (unit, fmt="(' local_field_solve = ',L1)") local_field_solve
write (unit, fmt="(' /')")
end subroutine wnml_gs2_layouts